home *** CD-ROM | disk | FTP | other *** search
Unknown | 2006-10-23 | 4.0 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 4a 3f 2f 2f 3d 3d 3d 3d |........|J?//====|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 0a 2f |========|=====../|
|00000050| 2f 20 43 6f 6d 6d 61 6e | 64 43 6f 64 65 54 72 69 |/ Comman|dCodeTri|
|00000060| 67 67 65 72 20 0d 0a 2f | 2f 20 53 65 65 20 43 6f |gger ../|/ See Co|
|00000070| 6d 6d 61 6e 64 43 6f 64 | 65 54 72 69 67 67 65 72 |mmandCod|eTrigger|
|00000080| 2e 74 78 74 0d 0a 2f 2f | 3d 3d 3d 3d 3d 3d 3d 3d |.txt..//|========|
|00000090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0a 63 6c 61 73 73 |========|=..class|
|000000d0| 20 43 6f 6d 6d 61 6e 64 | 43 6f 64 65 54 72 69 67 | Command|CodeTrig|
|000000e0| 67 65 72 20 65 78 74 65 | 6e 64 73 20 54 72 69 67 |ger exte|nds Trig|
|000000f0| 67 65 72 20 70 6c 61 63 | 65 61 62 6c 65 3b 0d 0a |ger plac|eable;..|
|00000100| 20 20 20 20 0d 0a 20 20 | 20 20 2f 2f 20 64 61 74 | .. | // dat|
|00000110| 61 20 6d 65 6d 62 65 72 | 73 20 66 6f 72 20 6d 65 |a member|s for me|
|00000120| 73 73 61 67 65 73 20 61 | 6e 64 20 72 61 6e 64 6f |ssages a|nd rando|
|00000130| 6d 20 6e 75 6d 62 65 72 | 73 0d 0a 20 20 20 20 76 |m number|s.. v|
|00000140| 61 72 20 70 72 69 76 61 | 74 65 20 73 74 72 69 6e |ar priva|te strin|
|00000150| 67 20 46 69 72 73 74 4d | 65 73 73 61 67 65 3b 0d |g FirstM|essage;.|
|00000160| 0a 20 20 20 20 76 61 72 | 20 70 72 69 76 61 74 65 |. var| private|
|00000170| 20 73 74 72 69 6e 67 20 | 43 6f 64 65 46 6f 72 53 | string |CodeForS|
|00000180| 65 61 72 63 68 3b 0d 0a | 20 20 20 20 63 6f 6e 73 |earch;..| cons|
|00000190| 74 20 4e 55 4d 4f 46 4d | 45 53 53 41 47 45 53 20 |t NUMOFM|ESSAGES |
|000001a0| 3d 20 36 3b 0d 0a 20 20 | 20 20 65 6e 75 6d 20 50 |= 6;.. | enum P|
|000001b0| 53 74 61 74 65 7b 0d 0a | 20 20 20 20 20 20 20 20 |State{..| |
|000001c0| 20 20 20 55 50 2c 0d 0a | 20 20 20 20 20 20 20 20 | UP,..| |
|000001d0| 20 20 20 44 4f 57 4e 0d | 0a 20 20 20 20 7d 3b 20 | DOWN.|. }; |
|000001e0| 0d 0a 20 20 20 2f 2f 23 | 31 0d 0a 20 20 20 63 6f |.. //#|1.. co|
|000001f0| 6e 73 74 20 43 4f 44 45 | 4c 45 4e 47 54 48 20 3d |nst CODE|LENGTH =|
|00000200| 20 38 3b 0d 0a 20 20 20 | 63 6f 6e 73 74 20 4e 55 | 8;.. |const NU|
|00000210| 4d 4f 46 54 52 49 45 53 | 20 3d 20 32 30 3b 0d 0a |MOFTRIES| = 20;..|
|00000220| 20 20 20 63 6f 6e 73 74 | 20 4c 4f 57 41 53 43 49 | const| LOWASCI|
|00000230| 49 20 3d 20 39 37 3b 0d | 0a 20 20 20 63 6f 6e 73 |I = 97;.|. cons|
|00000240| 74 20 48 49 47 48 41 53 | 43 49 49 20 3d 20 31 32 |t HIGHAS|CII = 12|
|00000250| 32 3b 20 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |2; ....f|unction |
|00000260| 50 6f 73 74 42 65 67 69 | 6e 50 6c 61 79 28 29 0d |PostBegi|nPlay().|
|00000270| 0a 7b 0d 0a 20 20 20 20 | 46 69 72 73 74 4d 65 73 |.{.. |FirstMes|
|00000280| 73 61 67 65 20 3d 20 22 | 47 6f 21 22 3b 0d 0a 20 |sage = "|Go!";.. |
|00000290| 20 20 20 53 75 70 65 72 | 2e 50 6f 73 74 42 65 67 | Super|.PostBeg|
|000002a0| 69 6e 50 6c 61 79 28 29 | 3b 0d 0a 20 20 20 20 4d |inPlay()|;.. M|
|000002b0| 65 73 73 61 67 65 20 3d | 20 46 69 72 73 74 4d 65 |essage =| FirstMe|
|000002c0| 73 73 61 67 65 3b 0d 0a | 20 20 20 20 2f 2f 23 32 |ssage;..| //#2|
|000002d0| 0d 0a 20 20 20 20 43 6f | 64 65 46 6f 72 53 65 61 |.. Co|deForSea|
|000002e0| 72 63 68 20 3d 20 4d 61 | 6b 65 43 6f 64 65 28 43 |rch = Ma|keCode(C|
|000002f0| 4f 44 45 4c 45 4e 47 54 | 48 29 3b 0d 0a 7d 2f 2f |ODELENGT|H);..}//|
|00000300| 20 65 6e 64 20 50 6f 73 | 74 42 65 67 69 6e 50 6c | end Pos|tBeginPl|
|00000310| 61 79 28 29 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |ay()....|function|
|00000320| 20 54 6f 75 63 68 28 20 | 61 63 74 6f 72 20 4f 74 | Touch( |actor Ot|
|00000330| 68 65 72 20 29 0d 0a 7b | 0d 0a 20 20 20 20 69 66 |her )..{|.. if|
|00000340| 20 28 49 73 52 65 6c 65 | 76 61 6e 74 28 20 4f 74 | (IsRele|vant( Ot|
|00000350| 68 65 72 20 29 20 29 0d | 0a 20 20 20 20 7b 0d 0a |her ) ).|. {..|
|00000360| 20 20 20 20 20 20 20 20 | 69 66 20 28 50 61 77 6e | |if (Pawn|
|00000370| 28 4f 74 68 65 72 29 2e | 62 49 73 43 72 6f 75 63 |(Other).|bIsCrouc|
|00000380| 68 65 64 29 7b 20 2f 2f | 20 64 6f 77 6e 20 73 74 |hed){ //| down st|
|00000390| 61 74 65 0d 0a 20 20 20 | 20 20 20 20 20 20 20 20 |ate.. | |
|000003a0| 20 4d 65 73 73 61 67 65 | 3d 20 4d 61 6b 65 4d 65 | Message|= MakeMe|
|000003b0| 73 73 61 67 65 28 50 53 | 74 61 74 65 2e 44 4f 57 |ssage(PS|tate.DOW|
|000003c0| 4e 29 3b 0d 0a 20 20 20 | 20 20 20 20 20 7d 2f 2f |N);.. | }//|
|000003d0| 65 6e 64 20 69 66 0d 0a | 20 20 20 20 20 20 20 20 |end if..| |
|000003e0| 65 6c 73 65 7b 20 2f 2f | 20 75 70 20 73 74 61 74 |else{ //| up stat|
|000003f0| 65 0d 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 4d |e.. | M|
|00000400| 65 73 73 61 67 65 3d 20 | 4d 61 6b 65 4d 65 73 73 |essage= |MakeMess|
|00000410| 61 67 65 28 50 53 74 61 | 74 65 2e 55 50 29 3b 0d |age(PSta|te.UP);.|
|00000420| 0a 20 20 20 20 20 20 20 | 20 7d 2f 2f 65 6e 64 20 |. | }//end |
|00000430| 65 6c 73 65 0d 0a 0d 0a | 20 20 20 20 20 20 20 20 |else....| |
|00000440| 53 75 70 65 72 2e 54 6f | 75 63 68 28 4f 74 68 65 |Super.To|uch(Othe|
|00000450| 72 29 3b 0d 0a 20 20 20 | 20 7d 2f 2f 65 6e 64 20 |r);.. | }//end |
|00000460| 6f 75 74 65 72 20 69 66 | 0d 0a 7d 2f 2f 20 65 6e |outer if|..}// en|
|00000470| 64 20 54 6f 75 63 68 28 | 29 0d 0a 0d 0a 70 72 69 |d Touch(|)....pri|
|00000480| 76 61 74 65 20 66 75 6e | 63 74 69 6f 6e 20 73 74 |vate fun|ction st|
|00000490| 72 69 6e 67 20 4d 61 6b | 65 4d 65 73 73 61 67 65 |ring Mak|eMessage|
|000004a0| 28 50 53 74 61 74 65 20 | 73 74 61 74 65 29 7b 0d |(PState |state){.|
|000004b0| 0a 20 20 20 20 6c 6f 63 | 61 6c 20 69 6e 74 20 52 |. loc|al int R|
|000004c0| 61 6e 64 6f 6d 4e 75 6d | 62 65 72 3b 0d 0a 20 20 |andomNum|ber;.. |
|000004d0| 20 20 6c 6f 63 61 6c 20 | 73 74 72 69 6e 67 20 41 | local |string A|
|000004e0| 63 74 69 6f 6e 4d 65 73 | 73 61 67 65 3b 20 0d 0a |ctionMes|sage; ..|
|000004f0| 20 20 20 20 52 61 6e 64 | 6f 6d 4e 75 6d 62 65 72 | Rand|omNumber|
|00000500| 20 3d 20 52 61 6e 64 28 | 4e 55 4d 4f 46 4d 45 53 | = Rand(|NUMOFMES|
|00000510| 53 41 47 45 53 29 3b 0d | 0a 0d 0a 20 20 20 20 2f |SAGES);.|... /|
|00000520| 2f 42 75 69 6c 64 20 6d | 65 73 73 61 67 65 73 20 |/Build m|essages |
|00000530| 6f 6e 20 74 68 65 20 62 | 61 73 69 73 20 6f 66 20 |on the b|asis of |
|00000540| 75 70 20 6f 72 20 64 6f | 77 6e 20 73 74 61 74 65 |up or do|wn state|
|00000550| 20 20 0d 0a 20 20 20 20 | 0d 0a 20 20 20 20 69 66 | .. |.. if|
|00000560| 28 20 73 74 61 74 65 20 | 3d 3d 20 50 53 74 61 74 |( state |== PStat|
|00000570| 65 2e 55 50 20 29 7b 0d | 0a 20 20 20 20 20 20 20 |e.UP ){.|. |
|00000580| 41 63 74 69 6f 6e 4d 65 | 73 73 61 67 65 20 40 3d |ActionMe|ssage @=|
|00000590| 20 22 47 65 74 20 64 6f | 77 6e 21 20 22 3b 0d 0a | "Get do|wn! ";..|
|000005a0| 0d 0a 20 20 20 20 20 20 | 20 2f 2f 20 23 33 0d 0a |.. | // #3..|
|000005b0| 20 20 20 20 20 20 20 2f | 2f 20 52 65 76 65 61 6c | /|/ Reveal|
|000005c0| 20 74 68 65 20 63 6f 64 | 65 0d 0a 20 20 20 20 20 | the cod|e.. |
|000005d0| 20 20 41 63 74 69 6f 6e | 4d 65 73 73 61 67 65 20 | Action|Message |
|000005e0| 40 3d 20 22 48 65 72 65 | 20 69 73 20 74 68 65 20 |@= "Here| is the |
|000005f0| 63 6f 64 65 3a 20 22 3b | 20 0d 0a 20 20 20 20 20 |code: ";| .. |
|00000600| 20 20 41 63 74 69 6f 6e | 4d 65 73 73 61 67 65 20 | Action|Message |
|00000610| 40 3d 20 20 47 65 74 43 | 6f 64 65 46 6f 72 53 65 |@= GetC|odeForSe|
|00000620| 61 72 63 68 28 29 3b 0d | 0a 20 20 20 20 7d 0d 0a |arch();.|. }..|
|00000630| 20 20 20 20 65 6c 73 65 | 20 69 66 28 20 73 74 61 | else| if( sta|
|00000640| 74 65 20 3d 3d 20 50 53 | 74 61 74 65 2e 44 4f 57 |te == PS|tate.DOW|
|00000650| 4e 20 29 7b 0d 0a 20 20 | 20 20 20 20 20 41 63 74 |N ){.. | Act|
|00000660| 69 6f 6e 4d 65 73 73 61 | 67 65 20 40 3d 20 22 47 |ionMessa|ge @= "G|
|00000670| 65 74 20 75 70 21 20 2d | 20 22 3b 0d 0a 20 20 20 |et up! -| ";.. |
|00000680| 20 20 20 20 2f 2f 43 6f | 6e 76 65 79 20 61 20 6d | //Co|nvey a m|
|00000690| 65 73 73 61 67 65 0d 0a | 20 20 20 20 20 20 20 41 |essage..| A|
|000006a0| 63 74 69 6f 6e 4d 65 73 | 73 61 67 65 20 40 3d 20 |ctionMes|sage @= |
|000006b0| 47 65 74 4d 65 73 73 61 | 67 65 54 65 78 74 28 52 |GetMessa|geText(R|
|000006c0| 61 6e 64 6f 6d 4e 75 6d | 62 65 72 29 3b 20 0d 0a |andomNum|ber); ..|
|000006d0| 20 20 20 20 20 20 20 2f | 2f 66 69 6e 64 20 61 20 | /|/find a |
|000006e0| 6c 65 74 74 65 72 20 6f | 66 20 74 68 65 20 63 6f |letter o|f the co|
|000006f0| 64 65 0d 0a 20 20 20 20 | 20 20 20 2f 2f 20 23 34 |de.. | // #4|
|00000700| 0d 0a 20 20 20 20 20 20 | 20 41 63 74 69 6f 6e 4d |.. | ActionM|
|00000710| 65 73 73 61 67 65 20 40 | 3d 20 20 52 65 70 6f 72 |essage @|= Repor|
|00000720| 74 43 6f 64 65 46 6f 75 | 6e 64 28 20 43 6f 64 65 |tCodeFou|nd( Code|
|00000730| 46 6f 72 53 65 61 72 63 | 68 20 20 29 3b 0d 0a 20 |ForSearc|h );.. |
|00000740| 20 20 20 7d 0d 0a 20 20 | 20 20 65 6c 73 65 20 7b | }.. | else {|
|00000750| 0d 0a 20 20 20 20 20 20 | 20 41 63 74 69 6f 6e 4d |.. | ActionM|
|00000760| 65 73 73 61 67 65 20 3d | 20 22 4f 6b 61 79 2e 22 |essage =| "Okay."|
|00000770| 3b 0d 0a 20 20 20 20 7d | 0d 0a 20 20 20 20 72 65 |;.. }|.. re|
|00000780| 74 75 72 6e 20 41 63 74 | 69 6f 6e 4d 65 73 73 61 |turn Act|ionMessa|
|00000790| 67 65 3b 20 0d 0a 7d 0d | 0a 0d 0a 70 72 69 76 61 |ge; ..}.|...priva|
|000007a0| 74 65 20 66 75 6e 63 74 | 69 6f 6e 20 73 74 72 69 |te funct|ion stri|
|000007b0| 6e 67 20 47 65 74 4d 65 | 73 73 61 67 65 54 65 78 |ng GetMe|ssageTex|
|000007c0| 74 28 69 6e 74 20 69 6e | 64 65 78 29 7b 0d 0a 20 |t(int in|dex){.. |
|000007d0| 20 20 2f 2f 44 65 66 69 | 6e 65 20 61 20 73 74 61 | //Defi|ne a sta|
|000007e0| 74 69 63 20 61 72 72 61 | 79 20 6f 66 20 74 68 65 |tic arra|y of the|
|000007f0| 20 73 74 72 69 6e 67 20 | 74 79 70 65 0d 0a 20 20 | string |type.. |
|00000800| 20 6c 6f 63 61 6c 20 73 | 74 72 69 6e 67 20 50 61 | local s|tring Pa|
|00000810| 77 6e 4d 65 73 73 61 67 | 65 73 5b 4e 55 4d 4f 46 |wnMessag|es[NUMOF|
|00000820| 4d 45 53 53 41 47 45 53 | 5d 3b 20 0d 0a 20 20 20 |MESSAGES|]; .. |
|00000830| 6c 6f 63 61 6c 20 73 74 | 72 69 6e 67 20 54 4d 65 |local st|ring TMe|
|00000840| 73 73 61 67 65 3b 0d 0a | 20 20 20 2f 2f 41 73 73 |ssage;..| //Ass|
|00000850| 69 67 6e 20 74 65 78 74 | 20 76 61 6c 75 65 73 20 |ign text| values |
|00000860| 74 6f 20 65 6c 65 6d 65 | 6e 74 73 20 0d 0a 20 20 |to eleme|nts .. |
|00000870| 20 50 61 77 6e 4d 65 73 | 73 61 67 65 73 5b 30 5d | PawnMes|sages[0]|
|00000880| 3d 20 22 57 61 74 63 68 | 20 6f 75 74 20 62 65 68 |= "Watch| out beh|
|00000890| 69 6e 64 20 79 6f 75 21 | 22 3b 0d 0a 20 20 20 50 |ind you!|";.. P|
|000008a0| 61 77 6e 4d 65 73 73 61 | 67 65 73 5b 31 5d 3d 20 |awnMessa|ges[1]= |
|000008b0| 22 54 75 72 6e 20 74 6f | 20 79 6f 75 72 20 6c 65 |"Turn to| your le|
|000008c0| 66 74 21 22 3b 0d 0a 20 | 20 20 50 61 77 6e 4d 65 |ft!";.. | PawnMe|
|000008d0| 73 73 61 67 65 73 5b 32 | 5d 3d 20 22 47 65 74 20 |ssages[2|]= "Get |
|000008e0| 72 65 61 64 79 20 74 6f | 20 67 6f 21 22 3b 0d 0a |ready to| go!";..|
|000008f0| 20 20 20 50 61 77 6e 4d | 65 73 73 61 67 65 73 5b | PawnM|essages[|
|00000900| 33 5d 3d 20 22 44 69 64 | 20 79 6f 75 20 73 65 65 |3]= "Did| you see|
|00000910| 20 74 68 65 20 64 61 6e | 67 65 72 3f 22 3b 0d 0a | the dan|ger?";..|
|00000920| 20 20 20 50 61 77 6e 4d | 65 73 73 61 67 65 73 5b | PawnM|essages[|
|00000930| 34 5d 3d 20 22 43 61 6e | 20 77 65 20 6d 6f 76 65 |4]= "Can| we move|
|00000940| 20 61 67 61 69 6e 3f 22 | 3b 0d 0a 20 20 20 50 61 | again?"|;.. Pa|
|00000950| 77 6e 4d 65 73 73 61 67 | 65 73 5b 35 5d 3d 20 22 |wnMessag|es[5]= "|
|00000960| 48 6f 77 20 6d 61 6e 79 | 20 64 69 64 20 79 6f 75 |How many| did you|
|00000970| 72 20 73 65 65 3f 22 3b | 0d 0a 20 20 2f 2f 52 65 |r see?";|.. //Re|
|00000980| 74 72 69 65 76 65 20 61 | 6e 20 65 6c 65 6d 65 6e |trieve a|n elemen|
|00000990| 74 20 66 72 6f 6d 20 74 | 68 65 20 61 72 72 61 79 |t from t|he array|
|000009a0| 0d 0a 20 20 20 69 66 28 | 69 6e 64 65 78 20 3c 20 |.. if(|index < |
|000009b0| 4e 55 4d 4f 46 4d 45 53 | 53 41 47 45 53 20 26 26 |NUMOFMES|SAGES &&|
|000009c0| 20 69 6e 64 65 78 20 3e | 3d 20 30 29 7b 0d 0a 20 | index >|= 0){.. |
|000009d0| 20 20 20 20 20 54 4d 65 | 73 73 61 67 65 20 3d 20 | TMe|ssage = |
|000009e0| 50 61 77 6e 4d 65 73 73 | 61 67 65 73 5b 69 6e 64 |PawnMess|ages[ind|
|000009f0| 65 78 5d 3b 0d 0a 20 20 | 20 7d 0d 0a 20 20 20 72 |ex];.. | }.. r|
|00000a00| 65 74 75 72 6e 20 54 4d | 65 73 73 61 67 65 3b 0d |eturn TM|essage;.|
|00000a10| 0a 7d 0d 0a 0d 0a 70 72 | 69 76 61 74 65 20 66 75 |.}....pr|ivate fu|
|00000a20| 6e 63 74 69 6f 6e 20 73 | 74 72 69 6e 67 20 4d 61 |nction s|tring Ma|
|00000a30| 6b 65 43 6f 64 65 28 69 | 6e 74 20 6c 69 6d 69 74 |keCode(i|nt limit|
|00000a40| 29 7b 0d 0a 20 20 20 20 | 6c 6f 63 61 6c 20 69 6e |){.. |local in|
|00000a50| 74 20 43 74 72 3b 0d 0a | 20 20 20 20 6c 6f 63 61 |t Ctr;..| loca|
|00000a60| 6c 20 73 74 72 69 6e 67 | 20 43 6f 64 65 3b 0d 0a |l string| Code;..|
|00000a70| 20 20 20 2f 2f 43 6f 6e | 74 72 6f 6c 20 66 6f 72 | //Con|trol for|
|00000a80| 20 74 68 65 20 77 68 69 | 6c 65 20 73 74 61 74 65 | the whi|le state|
|00000a90| 6d 65 6e 74 20 0d 0a 20 | 20 20 43 74 72 20 3d 20 |ment .. | Ctr = |
|00000aa0| 30 3b 0d 0a 20 20 20 2f | 2f 23 35 0d 0a 20 20 20 |0;.. /|/#5.. |
|00000ab0| 77 68 69 6c 65 28 43 74 | 72 20 3c 20 6c 69 6d 69 |while(Ct|r < limi|
|00000ac0| 74 29 7b 0d 0a 20 20 20 | 20 20 20 2f 2f 20 42 75 |t){.. | // Bu|
|00000ad0| 69 6c 64 20 61 20 73 74 | 69 6e 67 20 75 73 69 6e |ild a st|ing usin|
|00000ae0| 67 20 72 61 6e 64 6f 6d | 20 6e 75 6d 62 65 72 73 |g random| numbers|
|00000af0| 0d 0a 20 20 20 20 20 20 | 2f 2f 20 43 6f 6e 76 65 |.. |// Conve|
|00000b00| 72 74 20 74 68 65 20 6e | 75 6d 62 65 72 73 20 74 |rt the n|umbers t|
|00000b10| 6f 20 6c 65 74 74 65 72 | 73 0d 0a 20 20 20 20 20 |o letter|s.. |
|00000b20| 20 43 6f 64 65 20 24 3d | 20 43 68 72 28 47 65 6e | Code $=| Chr(Gen|
|00000b30| 65 72 61 74 65 52 61 6e | 64 6f 6d 28 29 29 3b 0d |erateRan|dom());.|
|00000b40| 0a 20 20 20 20 20 20 2f | 2f 20 49 6e 63 72 65 6d |. /|/ Increm|
|00000b50| 65 6e 74 20 74 68 65 20 | 63 6f 75 6e 74 0d 0a 20 |ent the |count.. |
|00000b60| 20 20 20 20 20 43 74 72 | 2b 2b 3b 0d 0a 20 20 20 | Ctr|++;.. |
|00000b70| 20 7d 2f 2f 20 65 6e 64 | 20 77 68 69 6c 65 20 20 | }// end| while |
|00000b80| 20 0d 0a 20 20 20 20 72 | 65 74 75 72 6e 20 43 6f | .. r|eturn Co|
|00000b90| 64 65 3b 0d 0a 7d 2f 2f | 65 6e 64 20 4d 61 6b 65 |de;..}//|end Make|
|00000ba0| 0d 0a 0d 0a 2f 2f 20 23 | 36 0d 0a 70 72 69 76 61 |....// #|6..priva|
|00000bb0| 74 65 20 66 75 6e 63 74 | 69 6f 6e 20 69 6e 74 20 |te funct|ion int |
|00000bc0| 47 65 6e 65 72 61 74 65 | 52 61 6e 64 6f 6d 28 29 |Generate|Random()|
|00000bd0| 7b 0d 0a 20 20 20 20 20 | 6c 6f 63 61 6c 20 66 6c |{.. |local fl|
|00000be0| 6f 61 74 20 68 69 67 68 | 2c 20 6c 6f 77 3b 0d 0a |oat high|, low;..|
|00000bf0| 20 20 20 20 20 4c 6f 77 | 20 3d 20 4c 4f 57 41 53 | Low| = LOWAS|
|00000c00| 43 49 49 3b 0d 0a 20 20 | 20 20 20 48 69 67 68 20 |CII;.. | High |
|00000c10| 3d 20 48 49 47 48 41 53 | 43 49 49 3b 20 0d 0a 20 |= HIGHAS|CII; .. |
|00000c20| 20 20 20 20 2f 2f 52 65 | 74 75 72 6e 20 61 6e 20 | //Re|turn an |
|00000c30| 69 6e 74 65 67 65 72 0d | 0a 20 20 20 20 20 72 65 |integer.|. re|
|00000c40| 74 75 72 6e 20 49 6e 74 | 28 20 52 61 6e 64 52 61 |turn Int|( RandRa|
|00000c50| 6e 67 65 28 20 4c 6f 77 | 20 2c 20 48 69 67 68 20 |nge( Low| , High |
|00000c60| 29 29 3b 0d 0a 20 20 7d | 0d 0a 0d 0a 2f 2f 20 23 |));.. }|....// #|
|00000c70| 37 0d 0a 70 72 69 76 61 | 74 65 20 66 75 6e 63 74 |7..priva|te funct|
|00000c80| 69 6f 6e 20 73 74 72 69 | 6e 67 20 47 65 74 43 6f |ion stri|ng GetCo|
|00000c90| 64 65 46 6f 72 53 65 61 | 72 63 68 28 29 7b 0d 0a |deForSea|rch(){..|
|00000ca0| 20 20 20 20 20 72 65 74 | 75 72 6e 20 43 6f 64 65 | ret|urn Code|
|00000cb0| 46 6f 72 53 65 61 72 63 | 68 3b 0d 0a 7d 0d 0a 0d |ForSearc|h;..}...|
|00000cc0| 0a 70 72 69 76 61 74 65 | 20 66 75 6e 63 74 69 6f |.private| functio|
|00000cd0| 6e 20 73 74 72 69 6e 67 | 20 52 65 70 6f 72 74 43 |n string| ReportC|
|00000ce0| 6f 64 65 46 6f 75 6e 64 | 28 73 74 72 69 6e 67 20 |odeFound|(string |
|00000cf0| 43 6f 64 65 29 7b 0d 0a | 20 20 20 20 20 6c 6f 63 |Code){..| loc|
|00000d00| 61 6c 20 73 74 72 69 6e | 67 20 53 65 6c 65 63 74 |al strin|g Select|
|00000d10| 65 64 4c 65 74 74 65 72 | 2c 20 52 65 70 6f 72 74 |edLetter|, Report|
|00000d20| 3b 0d 0a 20 20 20 20 20 | 6c 6f 63 61 6c 20 69 6e |;.. |local in|
|00000d30| 74 20 43 74 72 3b 0d 0a | 20 20 20 20 20 20 20 20 |t Ctr;..| |
|00000d40| 0d 0a 20 20 20 20 20 2f | 2f 20 23 38 0d 0a 20 20 |.. /|/ #8.. |
|00000d50| 20 20 20 66 6f 72 28 43 | 74 72 20 3d 20 30 3b 20 | for(C|tr = 0; |
|00000d60| 43 74 72 20 3c 20 4e 55 | 4d 4f 46 54 52 49 45 53 |Ctr < NU|MOFTRIES|
|00000d70| 3b 20 43 74 72 2b 2b 29 | 7b 0d 0a 20 20 20 20 20 |; Ctr++)|{.. |
|00000d80| 20 20 20 20 2f 2f 20 43 | 61 73 74 20 6e 75 6d 62 | // C|ast numb|
|00000d90| 65 72 73 20 74 6f 20 61 | 20 73 74 72 69 6e 67 0d |ers to a| string.|
|00000da0| 0a 20 20 20 20 20 20 20 | 20 20 53 65 6c 65 63 74 |. | Select|
|00000db0| 65 64 4c 65 74 74 65 72 | 20 3d 20 43 68 72 28 47 |edLetter| = Chr(G|
|00000dc0| 65 6e 65 72 61 74 65 52 | 61 6e 64 6f 6d 28 29 29 |enerateR|andom())|
|00000dd0| 3b 20 20 20 20 20 20 20 | 20 20 0d 0a 20 20 20 20 |; | .. |
|00000de0| 20 20 20 20 20 2f 2f 53 | 65 65 20 69 66 20 69 74 | //S|ee if it|
|00000df0| 20 69 73 20 69 6e 20 74 | 68 65 20 73 74 72 69 6e | is in t|he strin|
|00000e00| 67 0d 0a 20 20 20 20 20 | 20 20 20 20 2f 2f 23 20 |g.. | //# |
|00000e10| 39 0d 0a 20 20 20 20 20 | 20 20 20 20 2f 2f 20 55 |9.. | // U|
|00000e20| 73 65 20 63 6f 6d 70 6f | 75 6e 64 20 42 6f 6f 6c |se compo|und Bool|
|00000e30| 65 61 6e 20 74 6f 20 64 | 65 74 65 72 6d 69 6e 65 |ean to d|etermine|
|00000e40| 20 69 66 0d 0a 20 20 20 | 20 20 20 20 20 20 2f 2f | if.. | //|
|00000e50| 20 74 68 65 20 6c 65 74 | 74 65 72 20 69 73 20 69 | the let|ter is i|
|00000e60| 6e 20 74 68 65 20 63 6f | 64 65 20 72 61 6e 67 65 |n the co|de range|
|00000e70| 0d 0a 20 20 20 20 20 20 | 20 20 20 69 66 28 20 49 |.. | if( I|
|00000e80| 6e 53 74 72 28 43 6f 64 | 65 2c 20 53 65 6c 65 63 |nStr(Cod|e, Selec|
|00000e90| 74 65 64 4c 65 74 74 65 | 72 29 20 3e 3d 20 30 20 |tedLette|r) >= 0 |
|00000ea0| 0d 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 26 |.. | &|
|00000eb0| 26 20 49 6e 53 74 72 28 | 43 6f 64 65 2c 20 53 65 |& InStr(|Code, Se|
|00000ec0| 6c 65 63 74 65 64 4c 65 | 74 74 65 72 29 20 3c 3d |lectedLe|tter) <=|
|00000ed0| 20 43 4f 44 45 4c 45 4e | 47 54 48 29 7b 0d 0a 20 | CODELEN|GTH){.. |
|00000ee0| 20 20 20 20 20 20 20 20 | 20 20 52 65 70 6f 72 74 | | Report|
|00000ef0| 20 40 3d 20 22 4f 6b 61 | 79 2c 20 79 6f 75 20 68 | @= "Oka|y, you h|
|00000f00| 61 76 65 20 66 6f 75 6e | 64 20 70 61 72 74 20 6f |ave foun|d part o|
|00000f10| 66 20 74 68 65 20 63 6f | 64 65 3a 20 22 3b 0d 0a |f the co|de: ";..|
|00000f20| 20 20 20 20 20 20 20 20 | 20 20 20 2f 2f 41 64 64 | | //Add|
|00000f30| 20 74 68 65 20 6c 65 74 | 74 65 72 20 74 6f 20 74 | the let|ter to t|
|00000f40| 68 65 20 72 65 70 6f 72 | 74 0d 0a 20 20 20 20 20 |he repor|t.. |
|00000f50| 20 20 20 20 20 20 52 65 | 70 6f 72 74 20 40 3d 20 | Re|port @= |
|00000f60| 53 65 6c 65 63 74 65 64 | 4c 65 74 74 65 72 3b 20 |Selected|Letter; |
|00000f70| 0d 0a 20 20 20 20 20 20 | 20 20 20 20 20 62 72 65 |.. | bre|
|00000f80| 61 6b 3b 20 20 20 20 20 | 20 20 20 0d 0a 20 20 20 |ak; | .. |
|00000f90| 20 20 20 20 20 20 7d 2f | 2f 65 6e 64 20 69 66 0d | }/|/end if.|
|00000fa0| 0a 20 20 20 20 20 20 7d | 2f 2f 65 6e 64 20 66 6f |. }|//end fo|
|00000fb0| 72 20 20 0d 0a 20 20 20 | 20 20 20 72 65 74 75 72 |r .. | retur|
|00000fc0| 6e 20 52 65 70 6f 72 74 | 3b 20 20 20 0d 0a 7d 0d |n Report|; ..}.|
|00000fd0| 0a 0d 0a 00 | |.... | |
+--------+-------------------------+-------------------------+--------+--------+