‘ÕX­îúIF­<³L\¯œƒWXÿÿÿÿÿ¾ ¨( @€ÏÐÀ¿ßà°ï¯  ï(ð/ð/ï(ï àŸ 0ð/8ÿ0@ÿ0?ÿ/8ð 0ï(à ß?Gÿ@PÿOWÿOXÿOPÿ?Hÿ0@ð/7ï@Oÿ_`ÿ`hÿ_hÿPXÿ 0à(ßP_ÿopÿpxÿowÿ_gÿ@Oð/8ï'ß'à 7ðpÿ€ÿ‡ÿ`oÿ?Gï/7à Ï€0?ð€ˆÿ?Hï/8à`/ßo?GðOXð@Hï0?à/ÐpOWð?Hà/8ß 7ïOPï?Gà/7ß(Ï ÀP0@ïPXð@Oï0@ß 0ÐO Ð@Hð/Ï@'Ð 0ß0@à@Pð0?ß'Ï_OPð@Hà(Ð 7ß/7Ð'À ¿ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ^^^^^^^^^^ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ^^^^^^^^^^^^^^ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ^^TeeBBBBeTT^^^^^^ÿÿÿÿÿÿÿÿÿÿÿÿÿ^eBDJ33333JJDBeZ^^^^ÿÿÿÿÿÿÿÿÿÿÿTD33==#####==3JDBT^^^^ÿÿÿÿÿÿÿÿÿeJ=###=3DeZ^^TÿÿÿÿÿÿÿB3# #=3JBZ^^Tÿÿÿÿÿÿ3#  #=JBT^^ÿÿÿÿÿJ# Sll #=JBZ^Tÿÿÿÿ# %,68??86,/@A*< ##ÿÿÿÿ45('.6787-9%:;*<=#ÿÿÿÿÿ$+&,--.,/01)2 3ÿÿÿÿÿÿ $%&&'%($!)* ##ÿÿÿÿÿÿÿ  !"#ÿÿÿÿÿÿÿÿÿ  ÿÿÿÿÿÿÿÿÿÿÿ  ÿÿÿÿÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÀÿÿÿüÿøð?àÀÀ€€€€ÀÀàð?øüÿÿÿÿÀÿd܈;FÐüâ@¤ôobject0®ÿÿÿÿœÿÿÿÿÿÿÿ ¸[ÿÿÿÿ#show_info() checksum=0 stringnospaces= "" inputstring=get_string("input your username", "") // strip out any spaces for(i=1; i<=string_length(inputstring); i+=1) { if (string_char_at(inputstring,i) != " ") { stringnospaces =stringnospaces + string_char_at(inputstring,i) } } if (string_length(stringnospaces)!=9) { show_message("Invalid, wrong length") game_end() exit } if (string_letters(string_char_at(stringnospaces,1)) = "") { show_message("Invalid, first character must be a letter") game_end() exit } for(i=2; i<=string_length(stringnospaces); i+=1) { if (string_digits(string_char_at(stringnospaces,i)) = "") { show_message("Invalid, non numeric character after first letter") game_end() exit } checksum+=real(string_char_at(stringnospaces,i)) } checksum = checksum mod 10 if checksum !=0 { show_message("Invalid checksum = " + string(checksum)) game_end() exit } show_message("Valid username") game_end()0000000ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¤room0€àÀÀÀÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ€à€à ÿÿÿÿÿÿÿÿÿÿÿÿ°¡†¡†€–˜XÿGame InformationÿÿÿÿÿÿÿÿX9{\rtf1\ansi\ansicpg1252\deff0\deflang3081{\fonttbl{\f0\fnil\fcharset0 Arial;}{\f1\fnil Arial;}} {\colortbl ;\red0\green0\blue0;} \viewkind4\uc1\pard\cf1\b\fs54 Data Validation\fs24 \par Tony Forster, June 2006 \par \b0\i May be copied with acknowledgement\i0 \par \par The user name entered must be in the form \par \par Lnnnnnnnn \par where L is a letter and n is a digit \par \par Spaces are allowable eg. \par L nnnn nnnn \par \par The checksum is computed so that the digits must add to zero in the 1's column (modulo 10 division)\f1 \par } ôSpritesSounds BackgroundsPathsScripts Fonts Time LinesObjectsobject0Roomsroom0 Game Information Global Game Settings