/ Apple Reference & Presentation Library 1993 Spring / ARPL-Spring-93-Partner-Edition.iso / Applications / Time Management / Microsoft Project 3.0 Demo / MS Project 3.0 User demo / MS Project 3.0 User demo.rsrc / VWFI_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 00 af 5a 2c | 00 00 00 08 00 00 00 00 |......Z,|........|
|00000010| 00 07 00 00 00 00 00 00 | 23 53 00 00 23 7c 00 00 |........|#S..#|..|
|00000020| 23 9f 00 00 23 9f 00 00 | 23 a1 00 00 23 a1 00 00 |#...#...|#...#...|
|00000030| 23 a1 6f 6e 20 73 74 61 | 72 74 4d 6f 76 69 65 0d |#.on sta|rtMovie.|
|00000040| 20 20 67 6c 6f 62 61 6c | 20 43 50 55 2c 67 43 68 |  global| CPU,gCh|
|00000050| 65 63 6b 65 64 2c 67 44 | 6e 52 2c 67 44 6e 4c 2c |ecked,gD|nR,gDnL,|
|00000060| 67 44 6e 43 6f 6c 2c 67 | 44 6e 41 6c 6c 2c 67 44 |gDnCol,g|DnAll,gD|
|00000070| 6e 4c 6e 6b 2c 67 44 6e | 55 4c 6e 6b 0d 20 20 67 |nLnk,gDn|ULnk.  g|
|00000080| 6c 6f 62 61 6c 20 67 44 | 6e 50 63 65 6e 74 2c 67 |lobal gD|nPcent,g|
|00000090| 64 6e 50 72 6f 43 2c 67 | 64 6e 52 65 73 0d 20 20 |dnProC,g|dnRes.  |
|000000a0| 73 65 74 4d 61 63 68 69 | 6e 65 54 79 70 65 0d 20 |setMachi|neType. |
|000000b0| 20 73 65 74 20 74 68 65 | 20 69 6d 6d 65 64 69 61 | set the| immedia|
|000000c0| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 32 34 20 |te of sp|rite 24 |
|000000d0| 74 6f 20 74 72 75 65 0d | 20 20 70 75 70 70 65 74 |to true.|  puppet|
|000000e0| 73 70 72 69 74 65 20 32 | 34 2c 20 74 72 75 65 0d |sprite 2|4, true.|
|000000f0| 20 20 70 75 70 70 65 74 | 74 65 6d 70 6f 20 28 35 |  puppet|tempo (5|
|00000100| 2a 43 50 55 29 0d 20 20 | 73 65 74 20 74 68 65 20 |*CPU).  |set the |
|00000110| 65 78 69 74 6c 6f 63 6b | 20 74 6f 20 74 72 75 65 |exitlock| to true|
|00000120| 0d 20 20 2d 2d 74 72 61 | 63 6b 20 64 6f 77 6e 20 |.  --tra|ck down |
|00000130| 62 75 74 74 6f 6e 73 0d | 20 20 73 65 74 20 67 43 |buttons.|  set gC|
|00000140| 68 65 63 6b 65 64 20 3d | 20 74 68 65 20 6e 75 6d |hecked =| the num|
|00000150| 62 65 72 20 6f 66 20 63 | 61 73 74 20 22 63 68 65 |ber of c|ast "che|
|00000160| 63 6b 65 64 22 0d 20 20 | 73 65 74 20 67 44 6e 52 |cked".  |set gDnR|
|00000170| 20 3d 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 | = the n|umber of|
|00000180| 20 63 61 73 74 20 22 64 | 6e 52 22 0d 20 20 73 65 | cast "d|nR".  se|
|00000190| 74 20 67 44 6e 4c 20 3d | 20 74 68 65 20 6e 75 6d |t gDnL =| the num|
|000001a0| 62 65 72 20 6f 66 20 63 | 61 73 74 20 22 64 6e 4c |ber of c|ast "dnL|
|000001b0| 22 0d 20 20 73 65 74 20 | 67 44 6e 43 6f 6c 20 3d |".  set |gDnCol =|
|000001c0| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 63 | the num|ber of c|
|000001d0| 61 73 74 20 22 64 6e 43 | 6f 6c 22 0d 20 20 73 65 |ast "dnC|ol".  se|
|000001e0| 74 20 67 44 6e 41 6c 6c | 20 3d 20 74 68 65 20 6e |t gDnAll| = the n|
|000001f0| 75 6d 62 65 72 20 6f 66 | 20 63 61 73 74 20 22 64 |umber of| cast "d|
|00000200| 6e 41 6c 6c 22 0d 20 20 | 73 65 74 20 67 44 6e 4c |nAll".  |set gDnL|
|00000210| 6e 6b 20 3d 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |nk = the| number |
|00000220| 6f 66 20 63 61 73 74 20 | 22 64 6e 4c 6e 6b 22 0d |of cast |"dnLnk".|
|00000230| 20 20 73 65 74 20 67 44 | 6e 55 4c 6e 6b 20 3d 20 |  set gD|nULnk = |
|00000240| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 61 |the numb|er of ca|
|00000250| 73 74 20 22 64 6e 55 4c | 6e 6b 22 0d 20 20 73 65 |st "dnUL|nk".  se|
|00000260| 74 20 67 44 6e 50 63 65 | 6e 74 20 3d 20 74 68 65 |t gDnPce|nt = the|
|00000270| 20 6e 75 6d 62 65 72 20 | 6f 66 20 63 61 73 74 20 | number |of cast |
|00000280| 22 64 6e 50 63 65 6e 74 | 22 0d 20 20 73 65 74 20 |"dnPcent|".  set |
|00000290| 67 44 6e 50 72 6f 43 20 | 3d 20 74 68 65 20 6e 75 |gDnProC |= the nu|
|000002a0| 6d 62 65 72 20 6f 66 20 | 63 61 73 74 20 22 64 6e |mber of |cast "dn|
|000002b0| 50 72 6f 43 22 0d 20 20 | 73 65 74 20 67 44 6e 52 |ProC".  |set gDnR|
|000002c0| 65 73 20 3d 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |es = the| number |
|000002d0| 6f 66 20 63 61 73 74 20 | 22 64 6e 52 65 73 22 0d |of cast |"dnRes".|
|000002e0| 20 20 73 65 74 20 74 68 | 65 20 74 65 78 74 20 6f |  set th|e text o|
|000002f0| 66 20 63 61 73 74 20 22 | 70 6f 70 62 75 74 74 6f |f cast "|popbutto|
|00000300| 6e 22 20 3d 20 22 20 20 | 20 50 72 65 64 65 63 65 |n" = "  | Predece|
|00000310| 73 73 6f 72 73 22 0d 20 | 20 73 65 74 20 74 68 65 |ssors". | set the|
|00000320| 20 74 65 78 74 46 6f 6e | 74 20 6f 66 20 66 69 65 | textFon|t of fie|
|00000330| 6c 64 20 22 70 6f 70 62 | 75 74 74 6f 6e 22 20 3d |ld "popb|utton" =|
|00000340| 20 22 63 68 69 63 61 67 | 6f 22 0d 20 20 73 65 74 | "chicag|o".  set|
|00000350| 20 74 68 65 20 74 65 78 | 74 20 6f 66 20 63 61 73 | the tex|t of cas|
|00000360| 74 20 22 72 65 73 54 65 | 78 74 22 20 3d 20 22 20 |t "resTe|xt" = " |
|00000370| 22 0d 20 20 73 65 74 20 | 74 68 65 20 74 65 78 74 |".  set |the text|
|00000380| 46 6f 6e 74 20 6f 66 20 | 66 69 65 6c 64 20 22 72 |Font of |field "r|
|00000390| 65 73 54 65 78 74 22 20 | 3d 20 22 63 68 69 63 61 |esText" |= "chica|
|000003a0| 67 6f 22 0d 20 20 2d 2d | 6f 70 65 6e 72 65 73 46 |go".  --|openresF|
|000003b0| 69 6c 65 20 22 70 72 6f | 6a 65 63 74 52 65 73 46 |ile "pro|jectResF|
|000003c0| 69 6c 65 22 20 20 20 20 | 20 2d 2d 66 6f 72 20 64 |ile"    | --for d|
|000003d0| 65 76 65 6c 6f 70 6d 65 | 6e 74 20 6f 6e 6c 79 21 |evelopme|nt only!|
|000003e0| 21 21 21 21 21 21 21 0d | 65 6e 64 20 73 74 61 72 |!!!!!!!.|end star|
|000003f0| 74 4d 6f 76 69 65 0d 0d | 2d 2d 6f 6e 20 73 74 6f |tMovie..|--on sto|
|00000400| 70 6d 6f 76 69 65 0d 20 | 2d 2d 20 63 6c 6f 73 65 |pmovie. |-- close|
|00000410| 52 65 73 46 69 6c 65 20 | 22 70 72 6f 6a 65 63 74 |ResFile |"project|
|00000420| 52 65 73 46 69 6c 65 22 | 20 20 2d 2d 2d 66 6f 72 |ResFile"|  ---for|
|00000430| 20 64 65 76 65 6c 6f 70 | 6d 65 6e 74 20 6f 6e 6c | develop|ment onl|
|00000440| 79 21 21 21 21 21 21 21 | 21 0d 2d 2d 65 6e 64 0d |y!!!!!!!|!.--end.|
|00000450| 0d 6f 6e 20 73 65 74 50 | 72 65 64 0d 20 20 73 65 |.on setP|red.  se|
|00000460| 74 20 74 68 65 20 74 65 | 78 74 20 6f 66 20 63 61 |t the te|xt of ca|
|00000470| 73 74 20 22 70 6f 70 62 | 75 74 74 6f 6e 22 20 3d |st "popb|utton" =|
|00000480| 20 22 20 20 20 50 72 65 | 64 65 63 65 73 73 6f 72 | "   Pre|decessor|
|00000490| 73 22 0d 20 20 73 65 74 | 20 74 68 65 20 74 65 78 |s".  set| the tex|
|000004a0| 74 46 6f 6e 74 20 6f 66 | 20 66 69 65 6c 64 20 22 |tFont of| field "|
|000004b0| 70 6f 70 62 75 74 74 6f | 6e 22 20 3d 20 22 63 68 |popbutto|n" = "ch|
|000004c0| 69 63 61 67 6f 22 0d 65 | 6e 64 0d 0d 6f 6e 20 69 |icago".e|nd..on i|
|000004d0| 6e 69 74 52 65 73 0d 20 | 20 69 6e 73 74 61 6c 6c |nitRes. | install|
|000004e0| 4d 65 6e 75 20 41 31 38 | 0d 20 20 73 65 74 20 74 |Menu A18|.  set t|
|000004f0| 68 65 20 69 6d 6d 65 64 | 69 61 74 65 20 6f 66 20 |he immed|iate of |
|00000500| 73 70 72 69 74 65 20 32 | 31 20 74 6f 20 54 52 55 |sprite 2|1 to TRU|
|00000510| 45 20 20 0d 20 20 0d 20 | 20 67 6c 6f 62 61 6c 20 |E  .  . | global |
|00000520| 50 6f 70 4d 65 6e 75 0d | 20 20 69 66 20 6f 62 6a |PopMenu.|  if obj|
|00000530| 65 63 74 50 28 20 50 6f | 70 4d 65 6e 75 20 29 20 |ectP( Po|pMenu ) |
|00000540| 74 68 65 6e 20 50 6f 70 | 4d 65 6e 75 28 20 6d 44 |then Pop|Menu( mD|
|00000550| 69 73 70 6f 73 65 20 29 | 0d 20 20 73 65 74 20 6d |ispose )|.  set m|
|00000560| 65 6e 75 4c 69 73 74 20 | 3d 20 74 68 65 20 74 65 |enuList |= the te|
|00000570| 78 74 20 6f 66 20 63 61 | 73 74 20 22 72 65 73 4d |xt of ca|st "resM|
|00000580| 65 6e 75 54 65 78 74 22 | 0d 20 20 73 65 74 20 70 |enuText"|.  set p|
|00000590| 6f 70 4d 65 6e 75 20 3d | 20 50 6f 70 4d 65 6e 75 |opMenu =| PopMenu|
|000005a0| 28 6d 4e 65 77 2c 6d 65 | 6e 75 4c 69 73 74 2c 20 |(mNew,me|nuList, |
|000005b0| 32 30 30 29 0d 20 20 0d | 20 20 69 66 20 6e 6f 74 |200).  .|  if not|
|000005c0| 20 6f 62 6a 65 63 74 50 | 28 20 50 6f 70 4d 65 6e | objectP|( PopMen|
|000005d0| 75 20 29 20 74 68 65 6e | 20 0d 20 20 20 20 61 6c |u ) then| .    al|
|000005e0| 65 72 74 20 22 50 6f 70 | 4d 65 6e 75 20 4f 62 6a |ert "Pop|Menu Obj|
|000005f0| 65 63 74 20 6e 6f 74 20 | 6d 61 64 65 3a 20 22 20 |ect not |made: " |
|00000600| 26 20 73 74 72 69 6e 67 | 28 20 50 6f 70 4d 65 6e |& string|( PopMen|
|00000610| 75 20 29 0d 20 20 65 6e | 64 20 69 66 0d 20 20 0d |u ).  en|d if.  .|
|00000620| 20 20 50 6f 70 4d 65 6e | 75 28 6d 53 6d 61 72 74 |  PopMen|u(mSmart|
|00000630| 2c 20 31 20 29 0d 65 6e | 64 0d 0d 6f 6e 20 70 6f |, 1 ).en|d..on po|
|00000640| 70 52 65 73 20 20 2d 2d | 63 61 73 74 20 73 63 72 |pRes  --|cast scr|
|00000650| 69 70 74 20 20 0d 20 20 | 67 6c 6f 62 61 6c 20 20 |ipt  .  |global  |
|00000660| 50 6f 70 4d 65 6e 75 0d | 20 20 73 65 74 20 73 48 |PopMenu.|  set sH|
|00000670| 20 3d 20 74 68 65 20 6c | 65 66 74 20 6f 66 20 73 | = the l|eft of s|
|00000680| 70 72 69 74 65 20 32 31 | 20 2b 20 74 68 65 20 73 |prite 21| + the s|
|00000690| 74 61 67 65 4c 65 66 74 | 20 2b 20 31 0d 20 20 73 |tageLeft| + 1.  s|
|000006a0| 65 74 20 73 56 20 3d 20 | 74 68 65 20 74 6f 70 20 |et sV = |the top |
|000006b0| 6f 66 20 73 70 72 69 74 | 65 20 32 31 20 2b 20 74 |of sprit|e 21 + t|
|000006c0| 68 65 20 73 74 61 67 65 | 54 6f 70 20 2b 20 31 0d |he stage|Top + 1.|
|000006d0| 20 20 0d 20 20 70 6f 70 | 4d 65 6e 75 28 6d 44 69 |  .  pop|Menu(mDi|
|000006e0| 73 61 62 6c 65 49 74 65 | 6d 2c 32 29 0d 20 20 70 |sableIte|m,2).  p|
|000006f0| 6f 70 4d 65 6e 75 28 6d | 44 69 73 61 62 6c 65 49 |opMenu(m|DisableI|
|00000700| 74 65 6d 2c 33 29 0d 20 | 20 70 6f 70 4d 65 6e 75 |tem,3). | popMenu|
|00000710| 28 6d 44 69 73 61 62 6c | 65 49 74 65 6d 2c 34 29 |(mDisabl|eItem,4)|
|00000720| 0d 20 20 70 6f 70 4d 65 | 6e 75 28 6d 44 69 73 61 |.  popMe|nu(mDisa|
|00000730| 62 6c 65 49 74 65 6d 2c | 35 29 0d 20 20 70 6f 70 |bleItem,|5).  pop|
|00000740| 4d 65 6e 75 28 6d 44 69 | 73 61 62 6c 65 49 74 65 |Menu(mDi|sableIte|
|00000750| 6d 2c 36 29 0d 20 20 70 | 6f 70 4d 65 6e 75 28 6d |m,6).  p|opMenu(m|
|00000760| 44 69 73 61 62 6c 65 49 | 74 65 6d 2c 37 29 0d 20 |DisableI|tem,7). |
|00000770| 20 70 6f 70 4d 65 6e 75 | 28 6d 44 69 73 61 62 6c | popMenu|(mDisabl|
|00000780| 65 49 74 65 6d 2c 38 29 | 0d 20 20 70 6f 70 4d 65 |eItem,8)|.  popMe|
|00000790| 6e 75 28 6d 44 69 73 61 | 62 6c 65 49 74 65 6d 2c |nu(mDisa|bleItem,|
|000007a0| 39 29 0d 20 20 70 6f 70 | 4d 65 6e 75 28 6d 44 69 |9).  pop|Menu(mDi|
|000007b0| 73 61 62 6c 65 49 74 65 | 6d 2c 31 30 29 0d 20 20 |sableIte|m,10).  |
|000007c0| 0d 20 20 73 65 74 20 72 | 65 73 75 6c 74 20 3d 20 |.  set r|esult = |
|000007d0| 50 6f 70 4d 65 6e 75 28 | 6d 50 6f 70 54 65 78 74 |PopMenu(|mPopText|
|000007e0| 2c 20 73 48 2c 20 73 56 | 2c 20 30 29 0d 20 20 69 |, sH, sV|, 0).  i|
|000007f0| 66 20 73 74 72 69 6e 67 | 28 20 72 65 73 75 6c 74 |f string|( result|
|00000800| 20 29 20 3d 20 22 22 20 | 74 68 65 6e 20 65 78 69 | ) = "" |then exi|
|00000810| 74 0d 20 20 65 6c 73 65 | 20 73 65 74 20 74 68 65 |t.  else| set the|
|00000820| 20 74 65 78 74 20 6f 66 | 20 63 61 73 74 20 22 72 | text of| cast "r|
|00000830| 65 73 54 65 78 74 22 20 | 74 6f 20 22 20 20 20 22 |esText" |to "   "|
|00000840| 20 26 20 73 74 72 69 6e | 67 28 20 72 65 73 75 6c | & strin|g( resul|
|00000850| 74 20 29 20 0d 20 20 69 | 66 20 74 68 65 20 74 65 |t ) .  i|f the te|
|00000860| 78 74 20 6f 66 20 63 61 | 73 74 20 22 72 65 73 54 |xt of ca|st "resT|
|00000870| 65 78 74 22 20 3d 20 22 | 20 20 20 61 75 64 69 6f |ext" = "|   audio|
|00000880| 2d 76 69 73 75 61 6c 20 | 74 65 61 6d 22 20 c2 0d |-visual |team" ..|
|00000890| 61 6e 64 20 28 74 68 65 | 20 66 72 61 6d 65 29 20 |and (the| frame) |
|000008a0| 3c 20 36 39 36 20 74 68 | 65 6e 20 67 6f 20 6d 61 |< 696 th|en go ma|
|000008b0| 72 6b 65 72 28 31 29 0d | 65 6e 64 0d 0d 6f 6e 20 |rker(1).|end..on |
|000008c0| 69 6e 69 74 50 6f 70 0d | 20 20 69 6e 73 74 61 6c |initPop.|  instal|
|000008d0| 6c 4d 65 6e 75 20 41 31 | 38 0d 20 20 73 65 74 20 |lMenu A1|8.  set |
|000008e0| 74 68 65 20 69 6d 6d 65 | 64 69 61 74 65 20 6f 66 |the imme|diate of|
|000008f0| 20 73 70 72 69 74 65 20 | 31 34 20 74 6f 20 54 52 | sprite |14 to TR|
|00000900| 55 45 20 20 0d 20 20 0d | 20 20 67 6c 6f 62 61 6c |UE  .  .|  global|
|00000910| 20 50 6f 70 4d 65 6e 75 | 0d 20 20 69 66 20 6f 62 | PopMenu|.  if ob|
|00000920| 6a 65 63 74 50 28 20 50 | 6f 70 4d 65 6e 75 20 29 |jectP( P|opMenu )|
|00000930| 20 74 68 65 6e 20 50 6f | 70 4d 65 6e 75 28 20 6d | then Po|pMenu( m|
|00000940| 44 69 73 70 6f 73 65 20 | 29 0d 20 20 73 65 74 20 |Dispose |).  set |
|00000950| 6d 65 6e 75 4c 69 73 74 | 20 3d 20 74 68 65 20 74 |menuList| = the t|
|00000960| 65 78 74 20 6f 66 20 63 | 61 73 74 20 22 70 6f 70 |ext of c|ast "pop|
|00000970| 75 70 54 65 78 74 22 0d | 20 20 73 65 74 20 70 6f |upText".|  set po|
|00000980| 70 4d 65 6e 75 20 3d 20 | 50 6f 70 4d 65 6e 75 28 |pMenu = |PopMenu(|
|00000990| 6d 4e 65 77 2c 6d 65 6e | 75 4c 69 73 74 2c 20 32 |mNew,men|uList, 2|
|000009a0| 30 30 29 0d 20 20 0d 20 | 20 69 66 20 6e 6f 74 20 |00).  . | if not |
|000009b0| 6f 62 6a 65 63 74 50 28 | 20 50 6f 70 4d 65 6e 75 |objectP(| PopMenu|
|000009c0| 20 29 20 74 68 65 6e 20 | 0d 20 20 20 20 61 6c 65 | ) then |.    ale|
|000009d0| 72 74 20 22 50 6f 70 4d | 65 6e 75 20 4f 62 6a 65 |rt "PopM|enu Obje|
|000009e0| 63 74 20 6e 6f 74 20 6d | 61 64 65 3a 20 22 20 26 |ct not m|ade: " &|
|000009f0| 20 73 74 72 69 6e 67 28 | 20 50 6f 70 4d 65 6e 75 | string(| PopMenu|
|00000a00| 20 29 0d 20 20 65 6e 64 | 20 69 66 0d 20 20 0d 20 | ).  end| if.  . |
|00000a10| 20 50 6f 70 4d 65 6e 75 | 28 6d 53 6d 61 72 74 2c | PopMenu|(mSmart,|
|00000a20| 20 31 20 29 0d 65 6e 64 | 0d 0d 6f 6e 20 70 6f 70 | 1 ).end|..on pop|
|00000a30| 55 70 20 20 2d 2d 63 61 | 73 74 20 73 63 72 69 70 |Up  --ca|st scrip|
|00000a40| 74 20 20 0d 20 20 67 6c | 6f 62 61 6c 20 20 50 6f |t  .  gl|obal  Po|
|00000a50| 70 4d 65 6e 75 0d 20 20 | 73 65 74 20 73 48 20 3d |pMenu.  |set sH =|
|00000a60| 20 74 68 65 20 6c 65 66 | 74 20 6f 66 20 73 70 72 | the lef|t of spr|
|00000a70| 69 74 65 20 31 34 20 2b | 20 74 68 65 20 73 74 61 |ite 14 +| the sta|
|00000a80| 67 65 4c 65 66 74 20 2b | 20 31 0d 20 20 73 65 74 |geLeft +| 1.  set|
|00000a90| 20 73 56 20 3d 20 74 68 | 65 20 74 6f 70 20 6f 66 | sV = th|e top of|
|00000aa0| 20 73 70 72 69 74 65 20 | 31 34 20 2b 20 74 68 65 | sprite |14 + the|
|00000ab0| 20 73 74 61 67 65 54 6f | 70 20 2b 20 31 0d 20 20 | stageTo|p + 1.  |
|00000ac0| 0d 20 20 70 6f 70 4d 65 | 6e 75 28 6d 44 69 73 61 |.  popMe|nu(mDisa|
|00000ad0| 62 6c 65 49 74 65 6d 2c | 33 29 0d 20 20 70 6f 70 |bleItem,|3).  pop|
|00000ae0| 4d 65 6e 75 28 6d 44 69 | 73 61 62 6c 65 49 74 65 |Menu(mDi|sableIte|
|00000af0| 6d 2c 34 29 0d 20 20 70 | 6f 70 4d 65 6e 75 28 6d |m,4).  p|opMenu(m|
|00000b00| 44 69 73 61 62 6c 65 49 | 74 65 6d 2c 35 29 0d 20 |DisableI|tem,5). |
|00000b10| 20 70 6f 70 4d 65 6e 75 | 28 6d 44 69 73 61 62 6c | popMenu|(mDisabl|
|00000b20| 65 49 74 65 6d 2c 36 29 | 0d 20 20 70 6f 70 4d 65 |eItem,6)|.  popMe|
|00000b30| 6e 75 28 6d 44 69 73 61 | 62 6c 65 49 74 65 6d 2c |nu(mDisa|bleItem,|
|00000b40| 37 29 0d 20 20 70 6f 70 | 4d 65 6e 75 28 6d 44 69 |7).  pop|Menu(mDi|
|00000b50| 73 61 62 6c 65 49 74 65 | 6d 2c 38 29 0d 20 20 70 |sableIte|m,8).  p|
|00000b60| 6f 70 4d 65 6e 75 28 6d | 44 69 73 61 62 6c 65 49 |opMenu(m|DisableI|
|00000b70| 74 65 6d 2c 39 29 0d 20 | 20 70 6f 70 4d 65 6e 75 |tem,9). | popMenu|
|00000b80| 28 6d 44 69 73 61 62 6c | 65 49 74 65 6d 2c 31 30 |(mDisabl|eItem,10|
|00000b90| 29 0d 20 20 70 6f 70 4d | 65 6e 75 28 6d 44 69 73 |).  popM|enu(mDis|
|00000ba0| 61 62 6c 65 49 74 65 6d | 2c 31 31 29 0d 20 20 70 |ableItem|,11).  p|
|00000bb0| 6f 70 4d 65 6e 75 28 6d | 44 69 73 61 62 6c 65 49 |opMenu(m|DisableI|
|00000bc0| 74 65 6d 2c 31 32 29 0d | 20 20 70 6f 70 4d 65 6e |tem,12).|  popMen|
|00000bd0| 75 28 6d 44 69 73 61 62 | 6c 65 49 74 65 6d 2c 31 |u(mDisab|leItem,1|
|00000be0| 33 29 0d 20 20 73 65 74 | 20 69 74 65 6d 6e 75 6d |3).  set| itemnum|
|00000bf0| 20 3d 20 32 0d 20 20 0d | 20 20 73 65 74 20 72 65 | = 2.  .|  set re|
|00000c00| 73 75 6c 74 20 3d 20 50 | 6f 70 4d 65 6e 75 28 6d |sult = P|opMenu(m|
|00000c10| 50 6f 70 54 65 78 74 2c | 20 73 48 2c 20 73 56 2c |PopText,| sH, sV,|
|00000c20| 20 30 29 0d 20 20 69 66 | 20 73 74 72 69 6e 67 28 | 0).  if| string(|
|00000c30| 20 72 65 73 75 6c 74 20 | 29 20 3d 20 22 22 20 74 | result |) = "" t|
|00000c40| 68 65 6e 20 65 78 69 74 | 0d 20 20 65 6c 73 65 20 |hen exit|.  else |
|00000c50| 73 65 74 20 74 68 65 20 | 74 65 78 74 20 6f 66 20 |set the |text of |
|00000c60| 63 61 73 74 20 22 70 6f | 70 62 75 74 74 6f 6e 22 |cast "po|pbutton"|
|00000c70| 20 74 6f 20 22 20 20 20 | 22 20 26 20 73 74 72 69 | to "   |" & stri|
|00000c80| 6e 67 28 20 72 65 73 75 | 6c 74 20 29 20 0d 65 6e |ng( resu|lt ) .en|
|00000c90| 64 0d 0d 6f 6e 20 50 6f | 70 51 75 69 74 0d 20 20 |d..on Po|pQuit.  |
|00000ca0| 67 6c 6f 62 61 6c 20 50 | 6f 70 4d 65 6e 75 0d 20 |global P|opMenu. |
|00000cb0| 20 69 66 20 6f 62 6a 65 | 63 74 50 28 20 50 6f 70 | if obje|ctP( Pop|
|00000cc0| 4d 65 6e 75 20 29 20 74 | 68 65 6e 20 50 6f 70 4d |Menu ) t|hen PopM|
|00000cd0| 65 6e 75 28 20 6d 44 69 | 73 70 6f 73 65 20 29 0d |enu( mDi|spose ).|
|00000ce0| 65 6e 64 0d 0d 6f 6e 20 | 64 6f 42 65 73 74 46 69 |end..on |doBestFi|
|00000cf0| 74 0d 20 20 69 66 20 74 | 68 65 20 64 6f 75 62 6c |t.  if t|he doubl|
|00000d00| 65 63 6c 69 63 6b 20 74 | 68 65 6e 0d 20 20 20 20 |eclick t|hen.    |
|00000d10| 67 6f 20 6d 61 72 6b 65 | 72 28 31 29 0d 20 20 20 |go marke|r(1).   |
|00000d20| 20 63 75 72 73 6f 72 20 | 30 0d 20 20 65 6e 64 20 | cursor |0.  end |
|00000d30| 69 66 0d 65 6e 64 0d 0d | 6f 6e 20 64 6f 43 75 72 |if.end..|on doCur|
|00000d40| 73 6f 72 0d 20 20 69 66 | 20 72 6f 6c 6c 6f 76 65 |sor.  if| rollove|
|00000d50| 72 28 31 31 29 20 74 68 | 65 6e 20 63 75 72 73 6f |r(11) th|en curso|
|00000d60| 72 20 34 30 30 0d 20 20 | 65 6c 73 65 20 63 75 72 |r 400.  |else cur|
|00000d70| 73 6f 72 20 2d 31 0d 20 | 20 2d 2d 77 68 65 6e 20 |sor -1. | --when |
|00000d80| 6b 65 79 64 6f 77 6e 20 | 74 68 65 6e 20 64 6f 4b |keydown |then doK|
|00000d90| 65 79 0d 65 6e 64 0d 0d | 6f 6e 20 74 65 6d 70 52 |ey.end..|on tempR|
|00000da0| 65 73 42 75 74 74 6f 6e | 0d 20 20 67 6c 6f 62 61 |esButton|.  globa|
|00000db0| 6c 20 67 54 65 6d 50 75 | 70 2c 67 43 61 73 74 2c |l gTemPu|p,gCast,|
|00000dc0| 67 44 6e 52 65 73 0d 20 | 20 73 65 74 20 67 54 65 |gDnRes. | set gTe|
|00000dd0| 6d 50 75 70 20 3d 20 31 | 39 0d 20 20 73 65 74 20 |mPup = 1|9.  set |
|00000de0| 67 43 61 73 74 20 3d 20 | 67 44 6e 52 65 73 0d 20 |gCast = |gDnRes. |
|00000df0| 20 70 75 70 70 65 74 73 | 70 72 69 74 65 20 67 54 | puppets|prite gT|
|00000e00| 65 6d 50 75 70 2c 20 74 | 72 75 65 0d 20 20 73 65 |emPup, t|rue.  se|
|00000e10| 74 20 74 68 65 20 69 6d | 6d 65 64 69 61 74 65 20 |t the im|mediate |
|00000e20| 6f 66 20 73 70 72 69 74 | 65 20 67 54 65 6d 50 75 |of sprit|e gTemPu|
|00000e30| 70 20 3d 20 74 72 75 65 | 0d 20 20 73 65 74 20 74 |p = true|.  set t|
|00000e40| 68 65 20 74 65 78 74 20 | 6f 66 20 63 61 73 74 20 |he text |of cast |
|00000e50| 22 72 65 73 54 65 78 74 | 22 20 3d 20 22 20 22 0d |"resText|" = " ".|
|00000e60| 20 20 73 65 74 20 74 68 | 65 20 74 65 78 74 46 6f |  set th|e textFo|
|00000e70| 6e 74 20 6f 66 20 66 69 | 65 6c 64 20 22 72 65 73 |nt of fi|eld "res|
|00000e80| 54 65 78 74 22 20 3d 20 | 22 63 68 69 63 61 67 6f |Text" = |"chicago|
|00000e90| 22 0d 65 6e 64 0d 0d 6f | 6e 20 74 65 6d 70 50 72 |".end..o|n tempPr|
|00000ea0| 6f 43 42 75 74 74 6f 6e | 0d 20 20 67 6c 6f 62 61 |oCButton|.  globa|
|00000eb0| 6c 20 67 54 65 6d 50 75 | 70 2c 67 43 61 73 74 2c |l gTemPu|p,gCast,|
|00000ec0| 67 44 6e 50 72 6f 43 0d | 20 20 73 65 74 20 67 54 |gDnProC.|  set gT|
|00000ed0| 65 6d 50 75 70 20 3d 20 | 31 38 0d 20 20 73 65 74 |emPup = |18.  set|
|00000ee0| 20 67 43 61 73 74 20 3d | 20 67 44 6e 50 72 6f 43 | gCast =| gDnProC|
|00000ef0| 0d 20 20 70 75 70 70 65 | 74 73 70 72 69 74 65 20 |.  puppe|tsprite |
|00000f00| 67 54 65 6d 50 75 70 2c | 20 74 72 75 65 0d 20 20 |gTemPup,| true.  |
|00000f10| 73 65 74 20 74 68 65 20 | 69 6d 6d 65 64 69 61 74 |set the |immediat|
|00000f20| 65 20 6f 66 20 73 70 72 | 69 74 65 20 67 54 65 6d |e of spr|ite gTem|
|00000f30| 50 75 70 20 3d 20 74 72 | 75 65 0d 65 6e 64 0d 0d |Pup = tr|ue.end..|
|00000f40| 6f 6e 20 74 65 6d 70 50 | 63 65 6e 74 42 75 74 74 |on tempP|centButt|
|00000f50| 6f 6e 0d 20 20 67 6c 6f | 62 61 6c 20 67 54 65 6d |on.  glo|bal gTem|
|00000f60| 50 75 70 2c 67 43 61 73 | 74 2c 67 44 6e 50 63 65 |Pup,gCas|t,gDnPce|
|00000f70| 6e 74 0d 20 20 73 65 74 | 20 67 54 65 6d 50 75 70 |nt.  set| gTemPup|
|00000f80| 20 3d 20 31 38 0d 20 20 | 73 65 74 20 67 43 61 73 | = 18.  |set gCas|
|00000f90| 74 20 3d 20 67 44 6e 50 | 63 65 6e 74 0d 20 20 70 |t = gDnP|cent.  p|
|00000fa0| 75 70 70 65 74 73 70 72 | 69 74 65 20 67 54 65 6d |uppetspr|ite gTem|
|00000fb0| 50 75 70 2c 20 74 72 75 | 65 0d 20 20 73 65 74 20 |Pup, tru|e.  set |
|00000fc0| 74 68 65 20 69 6d 6d 65 | 64 69 61 74 65 20 6f 66 |the imme|diate of|
|00000fd0| 20 73 70 72 69 74 65 20 | 67 54 65 6d 50 75 70 20 | sprite |gTemPup |
|00000fe0| 3d 20 74 72 75 65 0d 65 | 6e 64 0d 0d 6f 6e 20 74 |= true.e|nd..on t|
|00000ff0| 65 6d 70 55 4c 6e 6b 42 | 75 74 74 6f 6e 0d 20 20 |empULnkB|utton.  |
|00001000| 67 6c 6f 62 61 6c 20 67 | 54 65 6d 50 75 70 2c 67 |global g|TemPup,g|
|00001010| 43 61 73 74 2c 67 44 6e | 55 4c 6e 6b 0d 20 20 73 |Cast,gDn|ULnk.  s|
|00001020| 65 74 20 67 54 65 6d 50 | 75 70 20 3d 20 31 39 0d |et gTemP|up = 19.|
|00001030| 20 20 73 65 74 20 67 43 | 61 73 74 20 3d 20 67 44 |  set gC|ast = gD|
|00001040| 6e 55 4c 6e 6b 0d 20 20 | 70 75 70 70 65 74 73 70 |nULnk.  |puppetsp|
|00001050| 72 69 74 65 20 67 54 65 | 6d 50 75 70 2c 20 74 72 |rite gTe|mPup, tr|
|00001060| 75 65 0d 20 20 73 65 74 | 20 74 68 65 20 69 6d 6d |ue.  set| the imm|
|00001070| 65 64 69 61 74 65 20 6f | 66 20 73 70 72 69 74 65 |ediate o|f sprite|
|00001080| 20 67 54 65 6d 50 75 70 | 20 3d 20 74 72 75 65 0d | gTemPup| = true.|
|00001090| 20 20 77 68 65 6e 20 6b | 65 79 44 6f 77 6e 20 74 |  when k|eyDown t|
|000010a0| 68 65 6e 20 64 6f 4b 65 | 79 0d 65 6e 64 0d 0d 6f |hen doKe|y.end..o|
|000010b0| 6e 20 74 65 6d 70 4c 6e | 6b 42 75 74 74 6f 6e 0d |n tempLn|kButton.|
|000010c0| 20 20 67 6c 6f 62 61 6c | 20 67 54 65 6d 50 75 70 |  global| gTemPup|
|000010d0| 2c 67 43 61 73 74 2c 67 | 44 6e 4c 6e 6b 0d 20 20 |,gCast,g|DnLnk.  |
|000010e0| 73 65 74 20 67 54 65 6d | 50 75 70 20 3d 20 31 39 |set gTem|Pup = 19|
|000010f0| 0d 20 20 73 65 74 20 67 | 43 61 73 74 20 3d 20 67 |.  set g|Cast = g|
|00001100| 44 6e 4c 6e 6b 0d 20 20 | 70 75 70 70 65 74 73 70 |DnLnk.  |puppetsp|
|00001110| 72 69 74 65 20 67 54 65 | 6d 50 75 70 2c 20 74 72 |rite gTe|mPup, tr|
|00001120| 75 65 0d 20 20 73 65 74 | 20 74 68 65 20 69 6d 6d |ue.  set| the imm|
|00001130| 65 64 69 61 74 65 20 6f | 66 20 73 70 72 69 74 65 |ediate o|f sprite|
|00001140| 20 67 54 65 6d 50 75 70 | 20 3d 20 74 72 75 65 0d | gTemPup| = true.|
|00001150| 65 6e 64 0d 0d 6f 6e 20 | 74 65 6d 70 41 6c 6c 42 |end..on |tempAllB|
|00001160| 75 74 74 6f 6e 0d 20 20 | 67 6c 6f 62 61 6c 20 67 |utton.  |global g|
|00001170| 54 65 6d 50 75 70 2c 67 | 43 61 73 74 2c 67 44 6e |TemPup,g|Cast,gDn|
|00001180| 41 6c 6c 0d 20 20 73 65 | 74 20 67 54 65 6d 50 75 |All.  se|t gTemPu|
|00001190| 70 20 3d 20 31 35 0d 20 | 20 73 65 74 20 67 43 61 |p = 15. | set gCa|
|000011a0| 73 74 20 3d 20 67 44 6e | 41 6c 6c 0d 20 20 70 75 |st = gDn|All.  pu|
|000011b0| 70 70 65 74 73 70 72 69 | 74 65 20 67 54 65 6d 50 |ppetspri|te gTemP|
|000011c0| 75 70 2c 20 74 72 75 65 | 0d 20 20 73 65 74 20 74 |up, true|.  set t|
|000011d0| 68 65 20 69 6d 6d 65 64 | 69 61 74 65 20 6f 66 20 |he immed|iate of |
|000011e0| 73 70 72 69 74 65 20 67 | 54 65 6d 50 75 70 20 3d |sprite g|TemPup =|
|000011f0| 20 74 72 75 65 0d 65 6e | 64 0d 0d 6f 6e 20 74 65 | true.en|d..on te|
|00001200| 6d 70 43 6f 6c 42 75 74 | 74 6f 6e 0d 20 20 67 6c |mpColBut|ton.  gl|
|00001210| 6f 62 61 6c 20 67 54 65 | 6d 50 75 70 2c 67 43 61 |obal gTe|mPup,gCa|
|00001220| 73 74 2c 67 44 6e 43 6f | 6c 0d 20 20 73 65 74 20 |st,gDnCo|l.  set |
|00001230| 67 54 65 6d 50 75 70 20 | 3d 20 32 30 0d 20 20 73 |gTemPup |= 20.  s|
|00001240| 65 74 20 67 43 61 73 74 | 20 3d 20 67 44 6e 43 6f |et gCast| = gDnCo|
|00001250| 6c 0d 20 20 70 75 70 70 | 65 74 73 70 72 69 74 65 |l.  pupp|etsprite|
|00001260| 20 67 54 65 6d 50 75 70 | 2c 20 74 72 75 65 0d 20 | gTemPup|, true. |
|00001270| 20 73 65 74 20 74 68 65 | 20 69 6d 6d 65 64 69 61 | set the| immedia|
|00001280| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 67 54 65 |te of sp|rite gTe|
|00001290| 6d 50 75 70 20 3d 20 74 | 72 75 65 0d 65 6e 64 0d |mPup = t|rue.end.|
|000012a0| 0d 6f 6e 20 74 65 6d 70 | 52 62 75 74 74 6f 6e 0d |.on temp|Rbutton.|
|000012b0| 20 20 67 6c 6f 62 61 6c | 20 67 54 65 6d 50 75 70 |  global| gTemPup|
|000012c0| 2c 67 43 61 73 74 2c 67 | 44 6e 52 0d 20 20 73 65 |,gCast,g|DnR.  se|
|000012d0| 74 20 67 54 65 6d 50 75 | 70 20 3d 20 31 37 0d 20 |t gTemPu|p = 17. |
|000012e0| 20 73 65 74 20 67 43 61 | 73 74 20 3d 20 67 44 6e | set gCa|st = gDn|
|000012f0| 52 0d 20 20 70 75 70 70 | 65 74 73 70 72 69 74 65 |R.  pupp|etsprite|
|00001300| 20 67 54 65 6d 50 75 70 | 2c 20 74 72 75 65 0d 20 | gTemPup|, true. |
|00001310| 20 73 65 74 20 74 68 65 | 20 69 6d 6d 65 64 69 61 | set the| immedia|
|00001320| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 67 54 65 |te of sp|rite gTe|
|00001330| 6d 50 75 70 20 3d 20 74 | 72 75 65 0d 65 6e 64 0d |mPup = t|rue.end.|
|00001340| 0d 6f 6e 20 74 65 6d 70 | 4c 62 75 74 74 6f 6e 0d |.on temp|Lbutton.|
|00001350| 20 20 67 6c 6f 62 61 6c | 20 67 54 65 6d 50 75 70 |  global| gTemPup|
|00001360| 2c 67 43 61 73 74 2c 67 | 44 6e 4c 0d 20 20 73 65 |,gCast,g|DnL.  se|
|00001370| 74 20 67 54 65 6d 50 75 | 70 20 3d 20 31 37 0d 20 |t gTemPu|p = 17. |
|00001380| 20 73 65 74 20 67 43 61 | 73 74 20 3d 20 67 44 6e | set gCa|st = gDn|
|00001390| 4c 0d 20 20 70 75 70 70 | 65 74 73 70 72 69 74 65 |L.  pupp|etsprite|
|000013a0| 20 67 54 65 6d 50 75 70 | 2c 20 74 72 75 65 0d 20 | gTemPup|, true. |
|000013b0| 20 73 65 74 20 74 68 65 | 20 69 6d 6d 65 64 69 61 | set the| immedia|
|000013c0| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 67 54 65 |te of sp|rite gTe|
|000013d0| 6d 50 75 70 20 3d 20 74 | 72 75 65 0d 20 20 77 68 |mPup = t|rue.  wh|
|000013e0| 65 6e 20 6b 65 79 64 6f | 77 6e 20 74 68 65 6e 20 |en keydo|wn then |
|000013f0| 64 6f 4b 65 79 0d 65 6e | 64 20 0d 0d 6f 6e 20 74 |doKey.en|d ..on t|
|00001400| 65 6d 70 43 68 65 63 6b | 42 75 74 74 6f 6e 0d 20 |empCheck|Button. |
|00001410| 20 67 6c 6f 62 61 6c 20 | 67 54 65 6d 50 75 70 2c | global |gTemPup,|
|00001420| 67 43 61 73 74 2c 67 43 | 68 65 63 6b 65 64 0d 20 |gCast,gC|hecked. |
|00001430| 20 73 65 74 20 67 54 65 | 6d 50 75 70 20 3d 20 39 | set gTe|mPup = 9|
|00001440| 0d 20 20 73 65 74 20 67 | 43 61 73 74 20 3d 20 67 |.  set g|Cast = g|
|00001450| 43 68 65 63 6b 65 64 0d | 20 20 70 75 70 70 65 74 |Checked.|  puppet|
|00001460| 73 70 72 69 74 65 20 67 | 54 65 6d 50 75 70 2c 20 |sprite g|TemPup, |
|00001470| 74 72 75 65 0d 20 20 73 | 65 74 20 74 68 65 20 69 |true.  s|et the i|
|00001480| 6d 6d 65 64 69 61 74 65 | 20 6f 66 20 73 70 72 69 |mmediate| of spri|
|00001490| 74 65 20 67 54 65 6d 50 | 75 70 20 3d 20 74 72 75 |te gTemP|up = tru|
|000014a0| 65 0d 20 20 77 68 65 6e | 20 6b 65 79 64 6f 77 6e |e.  when| keydown|
|000014b0| 20 74 68 65 6e 20 64 6f | 4b 65 79 0d 65 6e 64 0d | then do|Key.end.|
|000014c0| 0d 6f 6e 20 74 65 6d 70 | 42 75 74 74 6f 6e 20 77 |.on temp|Button w|
|000014d0| 68 65 72 65 0d 20 20 67 | 6c 6f 62 61 6c 20 67 54 |here.  g|lobal gT|
|000014e0| 65 6d 50 75 70 2c 67 43 | 61 73 74 0d 20 20 73 65 |emPup,gC|ast.  se|
|000014f0| 74 20 74 68 65 20 63 61 | 73 74 6e 75 6d 20 6f 66 |t the ca|stnum of|
|00001500| 20 73 70 72 69 74 65 20 | 67 54 65 6d 50 75 70 20 | sprite |gTemPup |
|00001510| 3d 20 67 43 61 73 74 0d | 20 20 75 70 64 61 74 65 |= gCast.|  update|
|00001520| 73 74 61 67 65 0d 20 20 | 72 65 70 65 61 74 20 77 |stage.  |repeat w|
|00001530| 68 69 6c 65 20 74 68 65 | 20 6d 6f 75 73 65 64 6f |hile the| mousedo|
|00001540| 77 6e 0d 20 20 65 6e 64 | 20 72 65 70 65 61 74 0d |wn.  end| repeat.|
|00001550| 20 20 70 75 70 70 65 74 | 73 70 72 69 74 65 20 67 |  puppet|sprite g|
|00001560| 54 65 6d 50 75 70 2c 66 | 61 6c 73 65 20 2d 2d 2d |TemPup,f|alse ---|
|00001570| 63 68 61 6e 67 65 20 62 | 75 74 74 6f 6e 20 61 6e |change b|utton an|
|00001580| 64 20 63 6c 65 61 72 20 | 70 75 70 70 65 74 0d 20 |d clear |puppet. |
|00001590| 20 73 65 74 20 74 68 65 | 20 69 6d 6d 65 64 69 61 | set the| immedia|
|000015a0| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 67 54 65 |te of sp|rite gTe|
|000015b0| 6d 50 75 70 20 3d 20 66 | 61 6c 73 65 0d 20 20 75 |mPup = f|alse.  u|
|000015c0| 70 64 61 74 65 73 74 61 | 67 65 0d 20 20 64 6f 20 |pdatesta|ge.  do |
|000015d0| 73 74 72 69 6e 67 28 77 | 68 65 72 65 29 0d 65 6e |string(w|here).en|
|000015e0| 64 0d 0d 0d 6f 6e 20 71 | 75 69 74 74 65 72 0d 20 |d...on q|uitter. |
|000015f0| 20 70 75 70 70 65 74 73 | 70 72 69 74 65 20 32 34 | puppets|prite 24|
|00001600| 2c 20 66 61 6c 73 65 0d | 20 20 67 6f 20 22 51 75 |, false.|  go "Qu|
|00001610| 69 74 47 65 6e 65 72 69 | 63 22 0d 65 6e 64 0d 0d |itGeneri|c".end..|
|00001620| 6f 6e 20 72 65 73 74 61 | 72 74 44 65 6d 6f 0d 20 |on resta|rtDemo. |
|00001630| 20 73 65 74 20 74 68 65 | 20 69 6d 6d 65 64 69 61 | set the| immedia|
|00001640| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 32 34 20 |te of sp|rite 24 |
|00001650| 3d 20 66 61 6c 73 65 0d | 20 20 70 75 70 70 65 74 |= false.|  puppet|
|00001660| 73 70 72 69 74 65 20 32 | 34 2c 66 61 6c 73 65 0d |sprite 2|4,false.|
|00001670| 20 20 63 75 72 73 6f 72 | 20 30 0d 20 20 67 6f 20 |  cursor| 0.  go |
|00001680| 22 73 74 72 65 73 73 65 | 64 22 0d 20 20 69 6e 73 |"stresse|d".  ins|
|00001690| 74 61 6c 6c 6d 65 6e 75 | 20 30 0d 20 20 61 74 74 |tallmenu| 0.  att|
|000016a0| 72 61 63 74 6c 6f 6f 70 | 0d 65 6e 64 0d 0d 6f 6e |ractloop|.end..on|
|000016b0| 20 65 78 63 65 6c 0d 20 | 20 69 66 20 74 68 65 20 | excel. | if the |
|000016c0| 6b 65 79 20 3d 20 72 65 | 74 75 72 6e 20 6f 72 20 |key = re|turn or |
|000016d0| 74 68 65 20 6b 65 79 20 | 3d 20 65 6e 74 65 72 20 |the key |= enter |
|000016e0| 74 68 65 6e 20 0d 20 20 | 20 20 69 6e 73 74 61 6c |then .  |  instal|
|000016f0| 6c 6d 65 6e 75 20 30 0d | 20 20 20 20 67 6f 20 22 |lmenu 0.|    go "|
|00001700| 65 78 63 65 6c 22 0d 20 | 20 65 6e 64 20 69 66 0d |excel". | end if.|
|00001710| 65 6e 64 0d 0d 6f 6e 20 | 77 72 61 70 0d 20 20 69 |end..on |wrap.  i|
|00001720| 66 20 74 68 65 20 6b 65 | 79 20 3d 20 72 65 74 75 |f the ke|y = retu|
|00001730| 72 6e 20 6f 72 20 74 68 | 65 20 6b 65 79 20 3d 20 |rn or th|e key = |
|00001740| 65 6e 74 65 72 20 74 68 | 65 6e 20 0d 20 20 20 20 |enter th|en .    |
|00001750| 69 6e 73 74 61 6c 6c 6d | 65 6e 75 20 30 0d 20 20 |installm|enu 0.  |
|00001760| 20 20 70 75 70 70 65 74 | 73 70 72 69 74 65 20 32 |  puppet|sprite 2|
|00001770| 34 2c 20 66 61 6c 73 65 | 0d 20 20 20 20 67 6f 20 |4, false|.    go |
|00001780| 22 57 72 61 70 22 0d 20 | 20 20 20 73 65 74 20 74 |"Wrap". |   set t|
|00001790| 68 65 20 73 74 61 67 65 | 63 6f 6c 6f 72 20 3d 20 |he stage|color = |
|000017a0| 39 0d 20 20 65 6e 64 20 | 69 66 0d 65 6e 64 0d 0d |9.  end |if.end..|
|000017b0| 6f 6e 20 64 6f 51 75 69 | 74 0d 20 20 67 6f 20 22 |on doQui|t.  go "|
|000017c0| 72 65 61 6c 6c 79 51 75 | 69 74 22 0d 20 20 71 75 |reallyQu|it".  qu|
|000017d0| 69 74 0d 65 6e 64 0d 0d | 0d 6f 6e 20 73 74 61 72 |it.end..|.on star|
|000017e0| 74 44 65 6d 6f 0d 20 20 | 70 75 70 70 65 74 73 70 |tDemo.  |puppetsp|
|000017f0| 72 69 74 65 20 32 34 2c | 20 74 72 75 65 0d 20 20 |rite 24,| true.  |
|00001800| 73 65 74 20 74 68 65 20 | 69 6d 6d 65 64 69 61 74 |set the |immediat|
|00001810| 65 20 6f 66 20 73 70 72 | 69 74 65 20 32 34 20 3d |e of spr|ite 24 =|
|00001820| 20 74 72 75 65 0d 20 20 | 2d 2d 64 65 6d 6f 54 69 | true.  |--demoTi|
|00001830| 6d 65 72 0d 65 6e 64 20 | 73 74 61 72 74 44 65 6d |mer.end |startDem|
|00001840| 6f 0d 0d 6f 6e 20 61 74 | 74 72 61 63 74 4c 6f 6f |o..on at|tractLoo|
|00001850| 70 0d 20 20 73 65 74 20 | 74 68 65 20 73 74 61 67 |p.  set |the stag|
|00001860| 65 63 6f 6c 6f 72 20 3d | 20 31 32 38 0d 20 20 77 |ecolor =| 128.  w|
|00001870| 68 65 6e 20 74 69 6d 65 | 6f 75 74 20 74 68 65 6e |hen time|out then|
|00001880| 20 6e 6f 74 68 69 6e 67 | 0d 20 20 2d 2d 6c 6f 61 | nothing|.  --loa|
|00001890| 64 20 66 72 61 6d 65 73 | 20 74 68 72 6f 75 67 68 |d frames| through|
|000018a0| 20 74 68 65 20 73 74 61 | 72 74 20 66 72 61 6d 65 | the sta|rt frame|
|000018b0| 0d 20 20 70 72 65 6c 6f | 61 64 20 31 33 20 20 20 |.  prelo|ad 13   |
|000018c0| 20 2d 2d 67 65 74 20 75 | 73 20 74 6f 20 74 65 78 | --get u|s to tex|
|000018d0| 74 20 61 6e 64 20 6e 65 | 77 20 70 72 65 6c 6f 61 |t and ne|w preloa|
|000018e0| 64 20 20 20 20 20 20 20 | 20 0d 20 20 72 65 70 65 |d       | .  repe|
|000018f0| 61 74 20 77 68 69 6c 65 | 20 74 68 65 20 73 74 61 |at while| the sta|
|00001900| 67 65 63 6f 6c 6f 72 20 | 3d 20 31 32 38 0d 20 20 |gecolor |= 128.  |
|00001910| 20 20 70 6c 61 79 20 22 | 73 74 72 65 73 73 65 64 |  play "|stressed|
|00001920| 22 0d 20 20 20 20 70 6c | 61 79 20 22 75 6e 63 65 |".    pl|ay "unce|
|00001930| 72 74 61 69 6e 22 0d 20 | 20 20 20 70 6c 61 79 20 |rtain". |   play |
|00001940| 22 6f 76 65 72 22 0d 20 | 20 20 20 70 6c 61 79 20 |"over". |   play |
|00001950| 22 6d 69 73 75 6e 22 0d | 20 20 20 20 70 6c 61 79 |"misun".|    play|
|00001960| 20 22 72 65 6c 69 65 76 | 65 64 22 0d 20 20 65 6e | "reliev|ed".  en|
|00001970| 64 20 72 65 70 65 61 74 | 0d 65 6e 64 0d 0d 6f 6e |d repeat|.end..on|
|00001980| 20 6d 6f 75 73 65 57 68 | 65 72 65 0d 20 20 73 65 | mouseWh|ere.  se|
|00001990| 74 20 70 6f 69 6e 74 65 | 72 20 3d 20 74 68 65 20 |t pointe|r = the |
|000019a0| 6d 6f 75 73 65 56 0d 20 | 20 69 66 20 70 6f 69 6e |mouseV. | if poin|
|000019b0| 74 65 72 20 3e 31 36 30 | 20 61 6e 64 20 70 6f 69 |ter >160| and poi|
|000019c0| 6e 74 65 72 20 3c 32 30 | 36 20 74 68 65 6e 20 62 |nter <20|6 then b|
|000019d0| 75 74 74 6f 6e 31 20 2d | 2d 70 6c 61 6e 0d 20 20 |utton1 -|-plan.  |
|000019e0| 65 6c 73 65 20 69 66 20 | 70 6f 69 6e 74 65 72 20 |else if |pointer |
|000019f0| 3e 32 32 35 20 61 6e 64 | 20 70 6f 69 6e 74 65 72 |>225 and| pointer|
|00001a00| 20 3c 32 37 31 20 74 68 | 65 6e 20 62 75 74 74 6f | <271 th|en butto|
|00001a10| 6e 32 20 2d 2d 6d 61 6e | 61 67 65 0d 20 20 65 6c |n2 --man|age.  el|
|00001a20| 73 65 20 69 66 20 70 6f | 69 6e 74 65 72 20 3e 32 |se if po|inter >2|
|00001a30| 39 30 20 61 6e 64 20 70 | 6f 69 6e 74 65 72 20 3c |90 and p|ointer <|
|00001a40| 33 33 36 20 74 68 65 6e | 20 62 75 74 74 6f 6e 33 |336 then| button3|
|00001a50| 20 2d 2d 63 6f 6d 6d 0d | 20 20 65 6c 73 65 20 69 | --comm.|  else i|
|00001a60| 66 20 70 6f 69 6e 74 65 | 72 20 3e 33 39 34 20 61 |f pointe|r >394 a|
|00001a70| 6e 64 20 70 6f 69 6e 74 | 65 72 20 3c 34 34 30 20 |nd point|er <440 |
|00001a80| 74 68 65 6e 20 62 75 74 | 74 6f 6e 34 20 2d 2d 71 |then but|ton4 --q|
|00001a90| 75 69 74 0d 20 20 77 68 | 65 6e 20 6b 65 79 64 6f |uit.  wh|en keydo|
|00001aa0| 77 6e 20 74 68 65 6e 20 | 6e 6f 74 68 69 6e 67 0d |wn then |nothing.|
|00001ab0| 65 6e 64 0d 0d 6f 6e 20 | 62 75 74 74 6f 6e 31 20 |end..on |button1 |
|00001ac0| 20 2d 2d 70 6c 61 6e 0d | 20 20 73 65 74 20 74 68 | --plan.|  set th|
|00001ad0| 65 20 63 61 73 74 6e 75 | 6d 20 6f 66 20 73 70 72 |e castnu|m of spr|
|00001ae0| 69 74 65 20 32 34 20 3d | 20 41 31 32 0d 20 20 75 |ite 24 =| A12.  u|
|00001af0| 70 64 61 74 65 73 74 61 | 67 65 0d 20 20 63 6c 65 |pdatesta|ge.  cle|
|00001b00| 61 72 70 75 70 70 65 74 | 73 0d 20 20 70 75 70 70 |arpuppet|s.  pupp|
|00001b10| 65 74 74 72 61 6e 73 69 | 74 69 6f 6e 20 39 2c 30 |ettransi|tion 9,0|
|00001b20| 2c 34 0d 20 20 67 6f 20 | 22 73 74 61 72 74 22 0d |,4.  go |"start".|
|00001b30| 65 6e 64 20 0d 0d 6f 6e | 20 62 75 74 74 6f 6e 32 |end ..on| button2|
|00001b40| 20 20 2d 2d 6d 61 6e 61 | 67 65 0d 20 20 73 65 74 |  --mana|ge.  set|
|00001b50| 20 74 68 65 20 63 61 73 | 74 6e 75 6d 20 6f 66 20 | the cas|tnum of |
|00001b60| 73 70 72 69 74 65 20 32 | 34 20 3d 20 41 31 33 0d |sprite 2|4 = A13.|
|00001b70| 20 20 75 70 64 61 74 65 | 73 74 61 67 65 0d 20 20 |  update|stage.  |
|00001b80| 63 6c 65 61 72 70 75 70 | 70 65 74 73 0d 20 20 70 |clearpup|pets.  p|
|00001b90| 75 70 70 65 74 74 72 61 | 6e 73 69 74 69 6f 6e 20 |uppettra|nsition |
|00001ba0| 39 2c 30 2c 34 0d 20 20 | 67 6f 20 22 6d 61 6e 61 |9,0,4.  |go "mana|
|00001bb0| 67 65 22 0d 20 20 2d 2d | 70 72 65 6c 6f 61 64 20 |ge".  --|preload |
|00001bc0| 36 37 36 0d 65 6e 64 0d | 0d 6f 6e 20 62 75 74 74 |676.end.|.on butt|
|00001bd0| 6f 6e 33 20 20 2d 2d 63 | 6f 6d 6d 0d 20 20 73 65 |on3  --c|omm.  se|
|00001be0| 74 20 74 68 65 20 63 61 | 73 74 6e 75 6d 20 6f 66 |t the ca|stnum of|
|00001bf0| 20 73 70 72 69 74 65 20 | 32 34 20 3d 20 41 31 34 | sprite |24 = A14|
|00001c00| 0d 20 20 75 70 64 61 74 | 65 73 74 61 67 65 0d 20 |.  updat|estage. |
|00001c10| 20 63 6c 65 61 72 70 75 | 70 70 65 74 73 0d 20 20 | clearpu|ppets.  |
|00001c20| 70 75 70 70 65 74 74 72 | 61 6e 73 69 74 69 6f 6e |puppettr|ansition|
|00001c30| 20 39 2c 30 2c 34 0d 20 | 20 67 6f 20 22 73 65 74 | 9,0,4. | go "set|
|00001c40| 35 22 0d 20 20 2d 2d 70 | 72 65 6c 6f 61 64 20 37 |5".  --p|reload 7|
|00001c50| 34 37 0d 65 6e 64 0d 0d | 6f 6e 20 62 75 74 74 6f |47.end..|on butto|
|00001c60| 6e 34 20 2d 2d 71 75 69 | 74 20 62 75 74 74 6f 6e |n4 --qui|t button|
|00001c70| 0d 20 20 73 65 74 20 74 | 68 65 20 63 61 73 74 6e |.  set t|he castn|
|00001c80| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 32 34 20 |um of sp|rite 24 |
|00001c90| 3d 20 41 31 35 0d 20 20 | 75 70 64 61 74 65 73 74 |= A15.  |updatest|
|00001ca0| 61 67 65 0d 20 20 72 65 | 70 65 61 74 20 77 68 69 |age.  re|peat whi|
|00001cb0| 6c 65 20 74 68 65 20 6d | 6f 75 73 65 64 6f 77 6e |le the m|ousedown|
|00001cc0| 0d 20 20 65 6e 64 20 72 | 65 70 65 61 74 0d 20 20 |.  end r|epeat.  |
|00001cd0| 73 65 74 20 74 68 65 20 | 63 61 73 74 6e 75 6d 20 |set the |castnum |
|00001ce0| 6f 66 20 73 70 72 69 74 | 65 20 32 34 20 3d 20 41 |of sprit|e 24 = A|
|00001cf0| 31 31 0d 20 20 75 70 64 | 61 74 65 73 74 61 67 65 |11.  upd|atestage|
|00001d00| 0d 20 20 63 6c 65 61 72 | 70 75 70 70 65 74 73 0d |.  clear|puppets.|
|00001d10| 20 20 69 6e 73 74 61 6c | 6c 6d 65 6e 75 20 30 0d |  instal|lmenu 0.|
|00001d20| 20 20 75 70 64 61 74 65 | 73 74 61 67 65 0d 20 20 |  update|stage.  |
|00001d30| 70 75 70 70 65 74 73 70 | 72 69 74 65 20 32 34 2c |puppetsp|rite 24,|
|00001d40| 66 61 6c 73 65 0d 20 20 | 67 6f 20 22 77 72 61 70 |false.  |go "wrap|
|00001d50| 22 0d 65 6e 64 0d 0d 6f | 6e 20 69 6e 69 74 31 0d |".end..o|n init1.|
|00001d60| 20 20 73 65 74 20 74 68 | 65 20 63 61 73 74 6e 75 |  set th|e castnu|
|00001d70| 6d 20 6f 66 20 73 70 72 | 69 74 65 20 32 34 20 3d |m of spr|ite 24 =|
|00001d80| 20 41 31 32 0d 20 20 75 | 70 64 61 74 65 73 74 61 | A12.  u|pdatesta|
|00001d90| 67 65 0d 20 20 73 65 74 | 20 74 68 65 20 69 6d 6d |ge.  set| the imm|
|00001da0| 65 64 69 61 74 65 20 6f | 66 20 73 70 72 69 74 65 |ediate o|f sprite|
|00001db0| 20 36 20 3d 20 74 72 75 | 65 0d 20 20 69 6e 73 74 | 6 = tru|e.  inst|
|00001dc0| 61 6c 6c 6d 65 6e 75 20 | 30 0d 20 20 2d 2d 63 6c |allmenu |0.  --cl|
|00001dd0| 65 61 72 20 52 41 4d 20 | 61 6e 64 20 73 65 74 20 |ear RAM |and set |
|00001de0| 75 70 20 74 68 65 20 6e | 65 78 74 20 73 65 63 74 |up the n|ext sect|
|00001df0| 69 6f 6e 0d 20 20 63 75 | 72 73 6f 72 20 34 0d 20 |ion.  cu|rsor 4. |
|00001e00| 20 75 6e 6c 6f 61 64 0d | 20 20 70 72 65 6c 6f 61 | unload.|  preloa|
|00001e10| 64 20 33 34 31 0d 20 20 | 63 75 72 73 6f 72 20 2d |d 341.  |cursor -|
|00001e20| 31 0d 65 6e 64 0d 0d 6f | 6e 20 69 6e 69 74 32 0d |1.end..o|n init2.|
|00001e30| 20 20 69 6e 73 74 61 6c | 6c 6d 65 6e 75 20 61 32 |  instal|lmenu a2|
|00001e40| 31 0d 65 6e 64 0d 0d 6f | 6e 20 69 6e 69 74 33 0d |1.end..o|n init3.|
|00001e50| 20 20 73 65 74 20 74 68 | 65 20 63 61 73 74 6e 75 |  set th|e castnu|
|00001e60| 6d 20 6f 66 20 73 70 72 | 69 74 65 20 32 34 20 3d |m of spr|ite 24 =|
|00001e70| 20 41 31 34 0d 20 20 75 | 70 64 61 74 65 73 74 61 | A14.  u|pdatesta|
|00001e80| 67 65 0d 65 6e 64 0d 0d | 6f 6e 20 69 6e 69 74 34 |ge.end..|on init4|
|00001e90| 0d 20 20 73 65 74 20 74 | 68 65 20 63 61 73 74 6e |.  set t|he castn|
|00001ea0| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 32 34 20 |um of sp|rite 24 |
|00001eb0| 3d 20 41 31 35 0d 20 20 | 75 70 64 61 74 65 73 74 |= A15.  |updatest|
|00001ec0| 61 67 65 0d 65 6e 64 0d | 0d 6f 6e 20 69 6e 69 74 |age.end.|.on init|
|00001ed0| 35 0d 20 20 73 65 74 20 | 74 68 65 20 63 61 73 74 |5.  set |the cast|
|00001ee0| 6e 75 6d 20 6f 66 20 73 | 70 72 69 74 65 20 32 34 |num of s|prite 24|
|00001ef0| 20 3d 20 41 31 34 0d 20 | 20 75 70 64 61 74 65 73 | = A14. | updates|
|00001f00| 74 61 67 65 0d 20 20 69 | 6e 73 74 61 6c 6c 6d 65 |tage.  i|nstallme|
|00001f10| 6e 75 20 30 0d 65 6e 64 | 0d 0d 6f 6e 20 63 6c 65 |nu 0.end|..on cle|
|00001f20| 61 72 50 75 70 70 65 74 | 73 0d 20 20 72 65 70 65 |arPuppet|s.  repe|
|00001f30| 61 74 20 77 69 74 68 20 | 69 20 3d 20 37 20 74 6f |at with |i = 7 to|
|00001f40| 20 32 33 0d 20 20 20 20 | 70 75 70 70 65 74 73 70 | 23.    |puppetsp|
|00001f50| 72 69 74 65 20 69 2c 66 | 61 6c 73 65 0d 20 20 65 |rite i,f|alse.  e|
|00001f60| 6e 64 20 72 65 70 65 61 | 74 0d 65 6e 64 0d 0d 6f |nd repea|t.end..o|
|00001f70| 6e 20 64 6f 4b 65 79 0d | 20 20 67 6c 6f 62 61 6c |n doKey.|  global|
|00001f80| 20 67 54 65 6d 50 75 70 | 0d 20 20 69 66 20 74 68 | gTemPup|.  if th|
|00001f90| 65 20 6b 65 79 20 3d 20 | 72 65 74 75 72 6e 20 6f |e key = |return o|
|00001fa0| 72 20 74 68 65 20 6b 65 | 79 20 3d 20 65 6e 74 65 |r the ke|y = ente|
|00001fb0| 72 20 74 68 65 6e 20 67 | 6f 20 6d 61 72 6b 65 72 |r then g|o marker|
|00001fc0| 28 31 29 0d 20 20 77 68 | 65 6e 20 6b 65 79 64 6f |(1).  wh|en keydo|
|00001fd0| 77 6e 20 74 68 65 6e 20 | 6e 6f 74 68 69 6e 67 0d |wn then |nothing.|
|00001fe0| 20 20 69 66 20 67 54 65 | 6d 50 75 70 20 3c 3e 20 |  if gTe|mPup <> |
|00001ff0| 22 22 20 74 68 65 6e 0d | 20 20 20 20 70 75 70 70 |"" then.|    pupp|
|00002000| 65 74 73 70 72 69 74 65 | 20 67 54 65 6d 50 75 70 |etsprite| gTemPup|
|00002010| 2c 66 61 6c 73 65 20 2d | 2d 2d 63 68 61 6e 67 65 |,false -|--change|
|00002020| 20 62 75 74 74 6f 6e 20 | 61 6e 64 20 63 6c 65 61 | button |and clea|
|00002030| 72 20 70 75 70 70 65 74 | 0d 20 20 20 20 73 65 74 |r puppet|.    set|
|00002040| 20 74 68 65 20 69 6d 6d | 65 64 69 61 74 65 20 6f | the imm|ediate o|
|00002050| 66 20 73 70 72 69 74 65 | 20 67 54 65 6d 50 75 70 |f sprite| gTemPup|
|00002060| 20 3d 20 66 61 6c 73 65 | 0d 20 20 65 6e 64 20 69 | = false|.  end i|
|00002070| 66 0d 65 6e 64 0d 0d 6f | 6e 20 74 68 65 56 69 65 |f.end..o|n theVie|
|00002080| 77 73 0d 20 20 69 66 20 | 74 68 65 20 6b 65 79 20 |ws.  if |the key |
|00002090| 3d 20 72 65 74 75 72 6e | 20 6f 72 20 74 68 65 20 |= return| or the |
|000020a0| 6b 65 79 20 3d 20 65 6e | 74 65 72 20 74 68 65 6e |key = en|ter then|
|000020b0| 20 67 6f 20 6d 61 72 6b | 65 72 28 22 73 65 74 35 | go mark|er("set5|
|000020c0| 22 29 2d 31 0d 20 20 77 | 68 65 6e 20 6b 65 79 64 |")-1.  w|hen keyd|
|000020d0| 6f 77 6e 20 74 68 65 6e | 20 6e 6f 74 68 69 6e 67 |own then| nothing|
|000020e0| 0d 65 6e 64 0d 0d 6f 6e | 20 74 65 6d 70 6f 74 79 |.end..on| tempoty|
|000020f0| 70 65 0d 20 20 67 6c 6f | 62 61 6c 20 43 50 55 0d |pe.  glo|bal CPU.|
|00002100| 20 20 70 75 70 70 65 74 | 74 65 6d 70 6f 20 28 35 |  puppet|tempo (5|
|00002110| 2a 43 50 55 29 20 20 20 | 2d 2d 64 6f 20 6d 61 63 |*CPU)   |--do mac|
|00002120| 68 69 6e 65 20 74 79 70 | 65 20 63 68 65 63 6b 20 |hine typ|e check |
|00002130| 66 69 72 73 74 0d 65 6e | 64 0d 0d 6f 6e 20 64 65 |first.en|d..on de|
|00002140| 6d 6f 54 69 6d 65 72 0d | 20 20 73 65 74 20 74 68 |moTimer.|  set th|
|00002150| 65 20 74 69 6d 65 6f 75 | 74 6c 61 70 73 65 64 20 |e timeou|tlapsed |
|00002160| 3d 20 30 0d 20 20 73 65 | 74 20 74 68 65 20 74 69 |= 0.  se|t the ti|
|00002170| 6d 65 6f 75 74 73 63 72 | 69 70 74 20 3d 20 22 64 |meoutscr|ipt = "d|
|00002180| 65 6d 6f 74 69 6d 65 6f | 75 74 22 0d 20 20 73 65 |emotimeo|ut".  se|
|00002190| 74 20 74 68 65 20 74 69 | 6d 65 6f 75 74 6c 65 6e |t the ti|meoutlen|
|000021a0| 67 74 68 20 3d 20 36 30 | 2a 36 30 0d 65 6e 64 0d |gth = 60|*60.end.|
|000021b0| 0d 6f 6e 20 64 65 6d 6f | 54 69 6d 65 6f 75 74 0d |.on demo|Timeout.|
|000021c0| 20 20 6e 6f 74 68 69 6e | 67 0d 65 6e 64 20 0d 0d |  nothin|g.end ..|
|000021d0| 0d 6f 6e 20 73 65 74 4d | 61 63 68 69 6e 65 54 79 |.on setM|achineTy|
|000021e0| 70 65 0d 20 20 67 6c 6f | 62 61 6c 20 43 50 55 0d |pe.  glo|bal CPU.|
|000021f0| 20 20 69 66 20 74 68 65 | 20 6d 61 63 68 69 6e 65 |  if the| machine|
|00002200| 74 79 70 65 20 3e 30 20 | 61 6e 64 20 74 68 65 20 |type >0 |and the |
|00002210| 6d 61 63 68 69 6e 65 74 | 79 70 65 20 3c 34 20 74 |machinet|ype <4 t|
|00002220| 68 65 6e 20 73 65 74 20 | 43 50 55 20 3d 20 34 20 |hen set |CPU = 4 |
|00002230| 2d 2d 73 6c 6f 77 0d 20 | 20 65 6c 73 65 20 69 66 |--slow. | else if|
|00002240| 20 74 68 65 20 6d 61 63 | 68 69 6e 65 74 79 70 65 | the mac|hinetype|
|00002250| 20 3d 31 35 20 74 68 65 | 6e 20 73 65 74 20 43 50 | =15 the|n set CP|
|00002260| 55 20 3d 20 34 20 2d 2d | 73 6c 6f 77 0d 20 20 65 |U = 4 --|slow.  e|
|00002270| 6c 73 65 20 69 66 20 74 | 68 65 20 6d 61 63 68 69 |lse if t|he machi|
|00002280| 6e 65 74 79 70 65 20 3e | 33 20 61 6e 64 20 74 68 |netype >|3 and th|
|00002290| 65 20 6d 61 63 68 69 6e | 65 74 79 70 65 20 3c 39 |e machin|etype <9|
|000022a0| 20 74 68 65 6e 20 73 65 | 74 20 43 50 55 20 3d 20 | then se|t CPU = |
|000022b0| 32 20 2d 2d 6d 65 64 0d | 20 20 65 6c 73 65 20 69 |2 --med.|  else i|
|000022c0| 66 20 74 68 65 20 6d 61 | 63 68 69 6e 65 74 79 70 |f the ma|chinetyp|
|000022d0| 65 20 3e 31 35 20 61 6e | 64 20 74 68 65 20 6d 61 |e >15 an|d the ma|
|000022e0| 63 68 69 6e 65 74 79 70 | 65 20 3c 31 38 20 74 68 |chinetyp|e <18 th|
|000022f0| 65 6e 20 73 65 74 20 43 | 50 55 20 3d 20 32 20 2d |en set C|PU = 2 -|
|00002300| 2d 6d 65 64 0d 20 20 65 | 6c 73 65 20 69 66 20 74 |-med.  e|lse if t|
|00002310| 68 65 20 6d 61 63 68 69 | 6e 65 74 79 70 65 20 3e |he machi|netype >|
|00002320| 38 20 74 68 65 6e 20 73 | 65 74 20 43 50 55 20 3d |8 then s|et CPU =|
|00002330| 20 32 20 2d 2d 66 61 73 | 74 0d 20 20 65 6c 73 65 | 2 --fas|t.  else|
|00002340| 20 69 66 20 74 68 65 20 | 6d 61 63 68 69 6e 65 74 | if the |machinet|
|00002350| 79 70 65 20 3d 20 32 35 | 36 20 74 68 65 6e 20 73 |ype = 25|6 then s|
|00002360| 65 74 20 43 50 55 20 3d | 20 50 43 0d 20 20 65 6c |et CPU =| PC.  el|
|00002370| 73 65 20 73 65 74 20 43 | 50 55 20 3d 20 32 0d 65 |se set C|PU = 2.e|
|00002380| 6e 64 0d 0d 0d 28 52 69 | 6c 65 79 20 4d 63 4c 61 |nd...(Ri|ley McLa|
|00002390| 75 67 68 6c 69 6e 20 2d | 20 4a 52 41 20 49 6e 74 |ughlin -| JRA Int|
|000023a0| 65 72 61 63 74 69 76 65 | 20 4d 65 64 69 61 22 52 |eractive| Media"R|
|000023b0| 69 6c 65 79 20 4d 63 4c | 61 75 67 68 6c 69 6e 20 |iley McL|aughlin |
|000023c0| 2d 20 4a 52 41 20 49 6e | 74 65 72 61 63 74 69 76 |- JRA In|teractiv|
|000023d0| 65 00 00                |                         |e..     |        |
+--------+-------------------------+-------------------------+--------+--------+