/ Really Useful CD 1 / ReallyUsefulCD1.iso / extras / games / _sen_wrang / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 24 f4 20 3e 24 | 2e 47 61 6d 65 73 2e 21 |...$. >$|.Games.!|
|00000010| 53 65 6e 5f 77 72 61 6e | 67 2e 21 52 75 6e 49 6d |Sen_wran|g.!RunIm|
|00000020| 61 67 65 32 0d 00 14 0d | ee 20 85 20 eb 20 37 3a |age2....|. . . 7:|
|00000030| e0 0d 00 1e 15 de 20 50 | 25 20 38 37 3a 5b 4f 50 |...... P|% 87:[OP|
|00000040| 54 20 30 3a 2e 77 0d 00 | 28 18 2e 54 69 74 6c 65 |T 0:.w..|(..Title|
|00000050| 20 45 51 55 53 20 c4 31 | 32 2c 22 20 22 29 0d 00 | EQUS .1|2," ")..|
|00000060| 32 1d 45 51 55 44 30 3a | 5d 3a 24 54 69 74 6c 65 |2.EQUD0:|]:$Title|
|00000070| 3d 22 57 72 61 6e 67 6c | 65 72 22 0d 00 3c 1e de |="Wrangl|er"..<..|
|00000080| 20 74 61 73 6b 69 64 25 | 34 3a 24 74 61 73 6b 69 | taskid%|4:$taski|
|00000090| 64 25 3d 22 54 41 53 4b | 22 0d 00 46 19 de 20 50 |d%="TASK|"..F.. P|
|000000a0| 25 33 31 3a 5b 4f 50 54 | 30 3a 2e 6f 20 45 51 55 |%31:[OPT|0:.o EQU|
|000000b0| 44 30 0d 00 50 23 45 51 | 55 44 31 30 30 3a 45 51 |D0..P#EQ|UD100:EQ|
|000000c0| 55 44 32 35 36 3a 45 51 | 55 44 39 36 30 3a 45 51 |UD256:EQ|UD960:EQ|
|000000d0| 55 44 37 36 38 0d 00 5a | 18 45 51 55 44 30 3a 45 |UD768..Z|.EQUD0:E|
|000000e0| 51 55 44 30 3a 45 51 55 | 44 2d 31 3a 5d 0d 00 64 |QUD0:EQU|D-1:]..d|
|000000f0| 62 de 20 62 20 36 34 3a | de 20 75 20 34 34 3a de |b. b 64:|. u 44:.|
|00000100| 20 74 65 6d 70 6c 61 74 | 65 25 20 26 34 30 30 2c | templat|e% &400,|
|00000110| 69 6e 66 6f 25 20 26 32 | 30 30 2c 73 63 6f 72 65 |info% &2|00,score|
|00000120| 25 20 26 32 30 30 2c 69 | 63 6f 6e 25 20 26 34 30 |% &200,i|con% &40|
|00000130| 30 2c 69 63 6f 6e 65 6e | 64 25 20 30 2c 62 75 66 |0,iconen|d% 0,buf|
|00000140| 66 65 72 25 20 26 32 30 | 30 3a 65 6e 64 3d a3 0d |fer% &20|0:end=..|
|00000150| 00 6e 35 de 20 71 25 20 | 31 30 30 2c 73 75 69 74 |.n5. q% |100,suit|
|00000160| 24 28 34 29 2c 73 70 62 | 6c 6b 25 20 36 34 2c 69 |$(4),spb|lk% 64,i|
|00000170| 63 6f 6e 73 28 38 2c 33 | 29 2c 64 73 70 62 6c 6b |cons(8,3|),dspblk|
|00000180| 25 20 36 34 0d 00 78 13 | 73 75 69 74 24 28 31 29 |% 64..x.|suit$(1)|
|00000190| 3d 22 63 6c 75 62 22 0d | 00 82 16 73 75 69 74 24 |="club".|...suit$|
|000001a0| 28 32 29 3d 22 64 69 61 | 6d 6f 6e 64 22 0d 00 8c |(2)="dia|mond"...|
|000001b0| 14 73 75 69 74 24 28 33 | 29 3d 22 68 65 61 72 74 |.suit$(3|)="heart|
|000001c0| 22 0d 00 96 14 73 75 69 | 74 24 28 34 29 3d 22 73 |"....sui|t$(4)="s|
|000001d0| 70 61 64 65 22 0d 00 a0 | 12 70 6c 61 79 65 64 3d |pade"...|.played=|
|000001e0| 30 3a 77 6f 6e 3d 30 0d | 00 aa 44 c8 99 22 57 69 |0:won=0.|..D.."Wi|
|000001f0| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|00000200| 30 30 2c 21 74 61 73 6b | 69 64 25 2c 22 57 72 61 |00,!task|id%,"Wra|
|00000210| 6e 67 6c 65 72 22 20 b8 | 20 76 65 72 73 69 6f 6e |ngler" .| version|
|00000220| 25 2c 74 61 73 6b 68 61 | 6e 64 25 0d 00 b4 10 ee |%,taskha|nd%.....|
|00000230| 85 20 f2 65 72 72 6f 72 | 62 6f 78 0d 00 be 30 53 |. .error|box...0S|
|00000240| 25 3d 8e 22 3c 53 65 6e | 57 72 61 6e 67 24 44 69 |%=."<Sen|Wrang$Di|
|00000250| 72 3e 2e 53 70 72 69 74 | 65 73 22 3a 54 25 3d a2 |r>.Sprit|es":T%=.|
|00000260| 23 53 25 2b 31 36 3a d9 | 23 53 25 0d 00 c8 2a de |#S%+16:.|#S%...*.|
|00000270| 20 73 70 72 69 74 65 73 | 25 20 54 25 2c 66 61 63 | sprites|% T%,fac|
|00000280| 74 6f 72 73 25 20 31 35 | 2c 70 69 78 74 72 61 6e |tors% 15|,pixtran|
|00000290| 73 25 20 31 35 0d 00 d2 | 39 21 73 70 72 69 74 65 |s% 15...|9!sprite|
|000002a0| 73 25 3d 54 25 3a 73 70 | 72 69 74 65 73 25 21 34 |s%=T%:sp|rites%!4|
|000002b0| 3d 30 3a 73 70 72 69 74 | 65 73 25 21 38 3d 31 36 |=0:sprit|es%!8=16|
|000002c0| 3a 73 70 72 69 74 65 73 | 25 21 31 32 3d 30 0d 00 |:sprites|%!12=0..|
|000002d0| dc 22 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |.".. "OS|_SpriteO|
|000002e0| 70 22 2c 26 31 30 39 2c | 73 70 72 69 74 65 73 25 |p",&109,|sprites%|
|000002f0| 0d 00 e6 3b c8 99 20 22 | 4f 53 5f 53 70 72 69 74 |...;.. "|OS_Sprit|
|00000300| 65 4f 70 22 2c 26 31 30 | 41 2c 73 70 72 69 74 65 |eOp",&10|A,sprite|
|00000310| 73 25 2c 22 3c 53 65 6e | 57 72 61 6e 67 24 44 69 |s%,"<Sen|Wrang$Di|
|00000320| 72 3e 2e 53 70 72 69 74 | 65 73 22 0d 00 f0 11 c8 |r>.Sprit|es".....|
|00000330| 99 22 4f 53 5f 42 79 74 | 65 22 2c 39 0d 00 fa 13 |."OS_Byt|e",9....|
|00000340| 69 63 70 61 74 25 3d a4 | 69 63 6f 6e 62 61 72 0d |icpat%=.|iconbar.|
|00000350| 01 04 34 c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 54 |..4.."Wi|mp_OpenT|
|00000360| 65 6d 70 6c 61 74 65 22 | 2c 2c 22 3c 53 65 6e 57 |emplate"|,,"<SenW|
|00000370| 72 61 6e 67 24 44 69 72 | 3e 2e 54 65 6d 70 6c 61 |rang$Dir|>.Templa|
|00000380| 74 65 22 0d 01 0e 46 c8 | 99 22 57 69 6d 70 5f 4c |te"...F.|."Wimp_L|
|00000390| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 74 65 |oadTempl|ate",,te|
|000003a0| 6d 70 6c 61 74 65 25 2c | 69 63 6f 6e 25 2c 69 63 |mplate%,|icon%,ic|
|000003b0| 6f 6e 65 6e 64 25 2c 2d | 31 2c 22 2a 22 2c 30 20 |onend%,-|1,"*",0 |
|000003c0| b8 20 2c 2c 69 63 6f 6e | 25 0d 01 18 19 74 65 6d |. ,,icon|%....tem|
|000003d0| 70 6c 61 74 65 25 21 36 | 34 3d 73 70 72 69 74 65 |plate%!6|4=sprite|
|000003e0| 73 25 0d 01 22 29 c8 99 | 22 57 69 6d 70 5f 43 72 |s%..")..|"Wimp_Cr|
|000003f0| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 74 65 6d |eateWind|ow",,tem|
|00000400| 70 6c 61 74 65 25 20 b8 | 20 21 6f 0d 01 2c 0b 70 |plate% .| !o..,.p|
|00000410| 61 74 25 3d 21 6f 0d 01 | 36 45 c8 99 22 57 69 6d |at%=!o..|6E.."Wim|
|00000420| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000430| 2c 69 6e 66 6f 25 2c 69 | 63 6f 6e 25 2c 69 63 6f |,info%,i|con%,ico|
|00000440| 6e 65 6e 64 25 2c 2d 31 | 2c 22 49 6e 66 6f 22 2c |nend%,-1|,"Info",|
|00000450| 30 20 b8 20 2c 2c 69 63 | 6f 6e 25 0d 01 40 25 c8 |0 . ,,ic|on%..@%.|
|00000460| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e |."Wimp_C|reateWin|
|00000470| 64 6f 77 22 2c 2c 69 6e | 66 6f 25 20 b8 20 21 6f |dow",,in|fo% . !o|
|00000480| 0d 01 4a 0d 69 6e 66 6f | 77 25 3d 21 6f 0d 01 54 |..J.info|w%=!o..T|
|00000490| 3d c8 99 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d |=.."Wimp|_LoadTem|
|000004a0| 70 6c 61 74 65 22 2c 2c | 73 63 6f 72 65 25 2c 69 |plate",,|score%,i|
|000004b0| 63 6f 6e 25 2c 69 63 6f | 6e 65 6e 64 25 2c 2d 31 |con%,ico|nend%,-1|
|000004c0| 2c 22 53 63 6f 72 65 22 | 2c 30 0d 01 5e 26 c8 99 |,"Score"|,0..^&..|
|000004d0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|000004e0| 6f 77 22 2c 2c 73 63 6f | 72 65 25 20 b8 20 21 6f |ow",,sco|re% . !o|
|000004f0| 0d 01 68 0e 73 63 6f 72 | 65 77 25 3d 21 6f 0d 01 |..h.scor|ew%=!o..|
|00000500| 72 09 f2 69 6e 69 74 0d | 01 7c 45 c8 99 20 22 57 |r..init.|.|E.. "W|
|00000510| 69 6d 70 5f 44 72 61 67 | 42 6f 78 22 2c 2c 2d 31 |imp_Drag|Box",,-1|
|00000520| 3a f2 67 65 74 70 6f 69 | 6e 74 65 72 3a 78 6f 25 |:.getpoi|nter:xo%|
|00000530| 3d 6d 6f 75 73 65 78 25 | 3a 79 6f 25 3d 6d 6f 75 |=mousex%|:yo%=mou|
|00000540| 73 65 79 25 3a 6f 70 65 | 6e 25 3d a3 0d 01 86 05 |sey%:ope|n%=.....|
|00000550| f5 0d 01 90 18 c8 99 22 | 57 69 6d 70 5f 50 6f 6c |......."|Wimp_Pol|
|00000560| 6c 22 2c 2c 62 20 b8 20 | 72 0d 01 9a 0a c8 8e 20 |l",,b . |r...... |
|00000570| 72 20 ca 0d 01 a4 08 20 | c9 20 31 0d 01 ae 0a 20 |r ..... |. 1.... |
|00000580| 21 75 3d 21 62 0d 01 b8 | 21 20 c8 99 22 57 69 6d |!u=!b...|! .."Wim|
|00000590| 70 5f 52 65 64 72 61 77 | 57 69 6e 64 6f 77 22 2c |p_Redraw|Window",|
|000005a0| 2c 75 20 b8 20 6d 0d 01 | c2 09 20 c8 95 20 6d 0d |,u . m..|.. .. m.|
|000005b0| 01 cc 21 20 c8 99 22 57 | 69 6d 70 5f 47 65 74 52 |..! .."W|imp_GetR|
|000005c0| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 75 20 b8 20 6d |ectangle|",,u . m|
|000005d0| 0d 01 d6 06 20 ce 0d 01 | e0 08 20 c9 20 32 0d 01 |.... ...|.. . 2..|
|000005e0| ea 1b 20 c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |.. .."Wi|mp_OpenW|
|000005f0| 69 6e 64 6f 77 22 2c 2c | 62 0d 01 f4 08 20 c9 20 |indow",,|b.... . |
|00000600| 33 0d 01 fe 1c 20 c8 99 | 22 57 69 6d 70 5f 43 6c |3.... ..|"Wimp_Cl|
|00000610| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 0d 02 08 |oseWindo|w",,b...|
|00000620| 07 c9 20 36 0d 02 12 2a | f2 63 68 65 63 6b 6d 6f |.. 6...*|.checkmo|
|00000630| 75 73 65 28 21 62 2c 62 | 21 34 2c 62 21 38 2c 62 |use(!b,b|!4,b!8,b|
|00000640| 21 31 32 2c 62 21 31 36 | 2c 62 21 32 30 29 0d 02 |!12,b!16|,b!20)..|
|00000650| 1c 07 c9 20 37 0d 02 26 | 2d e7 20 ac 28 77 69 6e |... 7..&|-. .(win|
|00000660| 29 20 f2 74 72 79 6d 6f | 76 65 28 64 72 61 67 5f |) .trymo|ve(drag_|
|00000670| 76 61 6c 75 65 2c 64 72 | 61 67 5f 73 6f 75 72 63 |value,dr|ag_sourc|
|00000680| 65 29 0d 02 30 16 c9 20 | 39 3a f2 6d 65 6e 75 73 |e)..0.. |9:.menus|
|00000690| 65 6c 65 63 74 28 62 29 | 0d 02 3a 17 c9 20 31 37 |elect(b)|..:.. 17|
|000006a0| 2c 31 38 3a f2 72 65 63 | 65 69 76 65 28 62 29 0d |,18:.rec|eive(b).|
|000006b0| 02 44 05 cb 0d 02 4e 07 | fd 20 a3 0d 02 58 05 e0 |.D....N.|. ...X..|
|000006c0| 0d 02 62 0a dd f2 69 6e | 69 74 0d 02 6c 14 c8 99 |..b...in|it..l...|
|000006d0| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 6e 22 0d 02 |"Hourgla|ss_On"..|
|000006e0| 76 0c 53 25 3d b3 28 2d | 91 29 0d 02 80 17 de 63 |v.S%=.(-|.).....c|
|000006f0| 61 72 64 28 38 29 2c 70 | 69 6c 65 28 38 2c 34 30 |ard(8),p|ile(8,40|
|00000700| 29 0d 02 8a 14 ea 20 54 | 25 2c 54 31 25 2c 4a 31 |)..... T|%,T1%,J1|
|00000710| 25 2c 4a 32 25 0d 02 94 | 2c de 4d 25 31 30 2c 70 |%,J2%...|,.M%10,p|
|00000720| 28 31 30 34 29 2c 4f 25 | 28 31 30 34 29 2c 73 28 |(104),O%|(104),s(|
|00000730| 31 30 34 29 2c 42 25 28 | 38 29 2c 63 25 28 33 30 |104),B%(|8),c%(30|
|00000740| 29 0d 02 9e 23 e3 41 25 | 3d 30 b8 38 3a 42 25 28 |)...#.A%|=0.8:B%(|
|00000750| 41 25 29 3d 30 3a 63 61 | 72 64 28 41 25 29 3d 32 |A%)=0:ca|rd(A%)=2|
|00000760| 35 35 3a ed 0d 02 a8 17 | e3 41 25 3d 30 b8 31 30 |55:.....|.A%=0.10|
|00000770| 33 3a 70 28 41 25 29 3d | 30 3a ed 0d 02 b2 11 73 |3:p(A%)=|0:.....s|
|00000780| 24 3d 22 43 44 48 53 43 | 44 48 53 22 0d 02 bc 16 |$="CDHSC|DHS"....|
|00000790| 6e 24 3d 22 41 32 33 34 | 35 36 37 38 39 54 4a 51 |n$="A234|56789TJQ|
|000007a0| 4b 22 0d 02 c6 12 64 3d | 2d 31 3a 55 25 3d 30 3a |K"....d=|-1:U%=0:|
|000007b0| 56 25 3d 30 0d 02 d0 0c | f2 73 68 75 66 66 6c 65 |V%=0....|.shuffle|
|000007c0| 0d 02 da 15 c8 99 22 48 | 6f 75 72 67 6c 61 73 73 |......"H|ourglass|
|000007d0| 5f 4f 66 66 22 0d 02 e4 | 05 e1 0d 02 ee 21 dd f2 |_Off"...|.....!..|
|000007e0| 73 68 75 66 66 6c 65 3a | ea 20 54 25 2c 54 31 25 |shuffle:|. T%,T1%|
|000007f0| 2c 4a 31 25 2c 4a 32 25 | 2c 41 25 0d 02 f8 14 c8 |,J1%,J2%|,A%.....|
|00000800| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d |."Hourgl|ass_On".|
|00000810| 02 f9 25 e3 20 41 25 3d | 30 20 b8 38 3a 42 25 28 |..%. A%=|0 .8:B%(|
|00000820| 41 25 29 3d 30 3a 63 61 | 72 64 28 41 25 29 3d 32 |A%)=0:ca|rd(A%)=2|
|00000830| 35 35 3a ed 0d 02 fa 17 | e3 41 25 3d 30 b8 31 30 |55:.....|.A%=0.10|
|00000840| 33 3a 70 28 41 25 29 3d | 30 3a ed 0d 03 02 33 e3 |3:p(A%)=|0:....3.|
|00000850| 43 25 3d 30 b8 31 30 33 | 3a e7 70 28 43 25 29 3c |C%=0.103|:.p(C%)<|
|00000860| 3e 32 35 35 20 8c 70 28 | 43 25 29 3d 30 3a 73 28 |>255 .p(|C%)=0:s(|
|00000870| 54 25 29 3d 43 25 3a 54 | 25 3d 54 25 2b 31 0d 03 |T%)=C%:T|%=T%+1..|
|00000880| 0c 05 ed 0d 03 16 19 e3 | 52 25 3d 30 b8 37 3a e3 |........|R%=0.7:.|
|00000890| 44 25 3d 42 25 28 52 25 | 29 b8 31 32 0d 03 20 1b |D%=B%(R%|).12.. .|
|000008a0| f5 45 25 3d b3 28 54 25 | 29 2d 31 3a fd 73 28 45 |.E%=.(T%|)-1:.s(E|
|000008b0| 25 29 3c 3e 32 35 35 0d | 03 2a 22 4f 25 28 28 52 |%)<>255.|.*"O%((R|
|000008c0| 25 2a 31 33 2b 44 25 29 | 29 3d 73 28 45 25 29 3a |%*13+D%)|)=s(E%):|
|000008d0| 73 28 45 25 29 3d 32 35 | 35 0d 03 34 07 ed 3a ed |s(E%)=25|5..4..:.|
|000008e0| 0d 03 3e 0b e3 54 25 3d | 30 b8 37 0d 03 48 4e e7 |..>..T%=|0.7..HN.|
|000008f0| 28 4f 25 28 54 25 29 29 | 83 31 33 2b 31 3d 31 33 |(O%(T%))|.13+1=13|
|00000900| 20 8c 4a 31 25 3d 4f 25 | 28 54 25 29 3a 4a 32 25 | .J1%=O%|(T%):J2%|
|00000910| 3d b3 28 39 35 29 2b 38 | 3a 4f 25 28 54 25 29 3d |=.(95)+8|:O%(T%)=|
|00000920| 4f 25 28 4a 32 25 29 3a | 4f 25 28 4a 32 25 29 3d |O%(J2%):|O%(J2%)=|
|00000930| 4a 31 25 3a e5 8d 44 48 | 43 0d 03 52 15 54 31 25 |J1%:..DH|C..R.T1%|
|00000940| 3d 30 3a e7 54 25 3d 30 | 3a e5 8d 44 70 43 0d 03 |=0:.T%=0|:..DpC..|
|00000950| 5c 5a f5 e7 28 4f 25 28 | 54 25 29 29 83 31 33 3d |\Z..(O%(|T%)).13=|
|00000960| 28 4f 25 28 54 31 25 29 | 29 83 31 33 20 8c 4a 31 |(O%(T1%)|).13 .J1|
|00000970| 25 3d 4f 25 28 54 25 29 | 3a 4a 32 25 3d b3 28 39 |%=O%(T%)|:J2%=.(9|
|00000980| 35 29 2b 38 3a 4f 25 28 | 54 25 29 3d 4f 25 28 4a |5)+8:O%(|T%)=O%(J|
|00000990| 32 25 29 3a 4f 25 28 4a | 32 25 29 3d 4a 31 25 3a |2%):O%(J|2%)=J1%:|
|000009a0| fd b9 3a e5 8d 44 48 43 | 0d 03 66 15 54 31 25 3d |..:..DHC|..f.T1%=|
|000009b0| 54 31 25 2b 31 3a fd 54 | 31 25 3d 54 25 0d 03 70 |T1%+1:.T|1%=T%..p|
|000009c0| 05 ed 0d 03 7a 43 e3 54 | 25 3d 30 b8 37 3a 70 69 |....zC.T|%=0.7:pi|
|000009d0| 6c 65 28 54 25 2c 30 29 | 3d 31 32 3a e3 54 31 25 |le(T%,0)|=12:.T1%|
|000009e0| 3d 31 b8 31 32 3a 70 69 | 6c 65 28 54 25 2c 54 31 |=1.12:pi|le(T%,T1|
|000009f0| 25 29 3d 4f 25 28 28 54 | 25 2b 54 31 25 2a 38 29 |%)=O%((T|%+T1%*8)|
|00000a00| 29 3a ed 3a ed 0d 03 84 | 15 c8 99 22 48 6f 75 72 |):.:....|..."Hour|
|00000a10| 67 6c 61 73 73 5f 4f 66 | 66 22 0d 03 8e 34 f2 64 |glass_Of|f"...4.d|
|00000a20| 69 73 70 6c 61 79 28 70 | 61 74 25 29 3a 72 65 3d |isplay(p|at%):re=|
|00000a30| 30 3a 70 6c 61 79 65 64 | 3d 70 6c 61 79 65 64 2b |0:played|=played+|
|00000a40| 31 3a 6d 6f 76 65 3d 30 | 3a 77 69 6e 3d a3 0d 03 |1:move=0|:win=...|
|00000a50| 98 05 e1 0d 03 ac 13 dd | f2 72 65 64 65 61 6c 3a |........|.redeal:|
|00000a60| ea 58 25 2c 59 25 0d 03 | b6 15 c8 99 20 22 48 6f |.X%,Y%..|.... "Ho|
|00000a70| 75 72 67 6c 61 73 73 5f | 4f 6e 22 0d 03 c0 13 e7 |urglass_|On".....|
|00000a80| 20 72 65 3d 38 8c ef 37 | 3a e5 8d 64 5e 43 0d 03 | re=8..7|:..d^C..|
|00000a90| ca 53 e3 58 25 3d 30 b8 | 70 69 6c 65 28 72 65 2c |.S.X%=0.|pile(re,|
|00000aa0| 30 29 3a f2 7a 61 70 28 | 58 25 29 3a 70 69 6c 65 |0):.zap(|X%):pile|
|00000ab0| 28 38 2c 58 25 29 3d 70 | 69 6c 65 28 72 65 2c 58 |(8,X%)=p|ile(re,X|
|00000ac0| 25 29 3a 70 69 6c 65 28 | 72 65 2c 58 25 29 3d 32 |%):pile(|re,X%)=2|
|00000ad0| 35 35 3a ed 3a 70 69 6c | 65 28 72 65 2c 30 29 3d |55:.:pil|e(re,0)=|
|00000ae0| 30 0d 03 d4 92 e3 58 25 | 3d 31 b8 70 69 6c 65 28 |0.....X%|=1.pile(|
|00000af0| 38 2c 30 29 3a 59 25 3d | 28 28 58 25 2d 31 29 83 |8,0):Y%=|((X%-1).|
|00000b00| 38 29 3a 70 69 6c 65 28 | 59 25 2c 30 29 3d 70 69 |8):pile(|Y%,0)=pi|
|00000b10| 6c 65 28 59 25 2c 30 29 | 2b 31 3a 70 69 6c 65 28 |le(Y%,0)|+1:pile(|
|00000b20| 59 25 2c 70 69 6c 65 28 | 59 25 2c 30 29 29 3d 70 |Y%,pile(|Y%,0))=p|
|00000b30| 69 6c 65 28 38 2c 58 25 | 29 3a ed 3a 72 65 3d 72 |ile(8,X%|):.:re=r|
|00000b40| 65 2b 31 3a e3 58 25 3d | 30 b8 37 3a f2 64 72 61 |e+1:.X%=|0.7:.dra|
|00000b50| 77 28 58 25 2c 33 2c a4 | 63 61 72 64 28 58 25 29 |w(X%,3,.|card(X%)|
|00000b60| 2c 70 69 6c 65 28 58 25 | 2c 30 29 2c 70 61 74 25 |,pile(X%|,0),pat%|
|00000b70| 29 3a ed 0d 03 de 17 c8 | 99 22 48 6f 75 72 67 6c |):......|."Hourgl|
|00000b80| 61 73 73 5f 4f 66 66 22 | 3a e1 0d 03 f2 33 dd a4 |ass_Off"|:....3..|
|00000b90| 63 61 72 64 28 70 29 3a | e7 70 69 6c 65 28 70 2c |card(p):|.pile(p,|
|00000ba0| 30 29 3d 30 20 8c 3d 32 | 35 35 8b 3d 70 69 6c 65 |0)=0 .=2|55.=pile|
|00000bb0| 28 70 2c 70 69 6c 65 28 | 70 2c 30 29 29 0d 04 06 |(p,pile(|p,0))...|
|00000bc0| 14 dd a4 76 61 6c 28 70 | 69 6c 65 29 3a ea 76 61 |...val(p|ile):.va|
|00000bd0| 6c 0d 04 10 24 76 61 6c | 3d 63 61 72 64 28 70 69 |l...$val|=card(pi|
|00000be0| 6c 65 2d 31 29 83 31 33 | 2b 31 3a e7 76 61 6c 3d |le-1).13|+1:.val=|
|00000bf0| 31 33 8c 3d a3 0d 04 1a | 30 e7 63 61 72 64 28 70 |13.=....|0.card(p|
|00000c00| 69 6c 65 2d 31 29 3d 32 | 35 35 20 8c 20 76 61 6c |ile-1)=2|55 . val|
|00000c10| 3d 28 4f 25 28 28 70 69 | 6c 65 2d 31 29 29 2b 31 |=(O%((pi|le-1))+1|
|00000c20| 29 20 83 31 33 0d 04 24 | 34 76 61 6c 3d 76 61 6c |) .13..$|4val=val|
|00000c30| 2b 28 28 4f 25 28 28 70 | 69 6c 65 2d 31 29 29 2b |+((O%((p|ile-1))+|
|00000c40| 31 29 83 31 33 29 3a e7 | 76 61 6c 3e 31 33 8c 76 |1).13):.|val>13.v|
|00000c50| 61 6c 3d 76 61 6c 2d 31 | 33 0d 04 2e 28 e7 76 61 |al=val-1|3...(.va|
|00000c60| 6c 3c 3e 70 69 6c 65 28 | 6b 2d 31 2c 70 69 6c 65 |l<>pile(|k-1,pile|
|00000c70| 28 6b 2d 31 2c 30 29 29 | 83 31 33 2b 31 20 8c 3d |(k-1,0))|.13+1 .=|
|00000c80| a3 0d 04 38 06 3d b9 0d | 04 4c 0e dd 20 a4 69 63 |...8.=..|.L.. .ic|
|00000c90| 6f 6e 62 61 72 0d 04 56 | 0a 21 71 25 3d 2d 31 0d |onbar..V|.!q%=-1.|
|00000ca0| 04 60 23 71 25 21 34 3d | 30 3a 71 25 21 38 3d 30 |.`#q%!4=|0:q%!8=0|
|00000cb0| 3a 71 25 21 31 32 3d 36 | 38 3a 71 25 21 31 36 3d |:q%!12=6|8:q%!16=|
|00000cc0| 36 38 0d 04 6a 0f 71 25 | 21 32 30 3d 26 32 31 30 |68..j.q%|!20=&210|
|00000cd0| 32 0d 04 74 17 73 70 6e | 61 6d 65 24 3d 22 73 65 |2..t.spn|ame$="se|
|00000ce0| 6e 5f 77 72 61 6e 67 22 | 0d 04 7e 29 de 20 71 25 |n_wrang"|..~). q%|
|00000cf0| 21 32 34 20 28 a9 73 70 | 6e 61 6d 65 24 2b 31 29 |!24 (.sp|name$+1)|
|00000d00| 3a 24 28 71 25 21 32 34 | 29 3d 73 70 6e 61 6d 65 |:$(q%!24|)=spname|
|00000d10| 24 0d 04 88 12 71 25 21 | 32 38 3d 73 70 72 69 74 |$....q%!|28=sprit|
|00000d20| 65 73 25 0d 04 92 14 71 | 25 21 33 32 3d a9 73 70 |es%....q|%!32=.sp|
|00000d30| 6e 61 6d 65 24 2b 31 0d | 04 9c 22 c8 99 20 22 57 |name$+1.|..".. "W|
|00000d40| 69 6d 70 5f 43 72 65 61 | 74 65 49 63 6f 6e 22 2c |imp_Crea|teIcon",|
|00000d50| 2c 71 25 20 b8 20 69 63 | 25 0d 04 a6 08 3d 69 63 |,q% . ic|%....=ic|
|00000d60| 25 0d 04 ba 37 dd 20 f2 | 63 68 65 63 6b 6d 6f 75 |%...7. .|checkmou|
|00000d70| 73 65 28 6d 6f 75 73 65 | 78 25 2c 6d 6f 75 73 65 |se(mouse|x%,mouse|
|00000d80| 79 25 2c 62 25 2c 68 61 | 6e 64 6c 65 25 2c 69 63 |y%,b%,ha|ndle%,ic|
|00000d90| 6f 6e 25 2c 6f 62 25 29 | 0d 04 bb 1f e7 20 77 69 |on%,ob%)|..... wi|
|00000da0| 6e 20 80 20 68 61 6e 64 | 6c 65 25 3d 70 61 74 25 |n . hand|le%=pat%|
|00000db0| 20 8c 20 62 25 3d 32 0d | 04 c4 0b e7 62 25 80 32 | . b%=2.|....b%.2|
|00000dc0| 20 8c 0d 04 ce 12 20 20 | c8 8e 20 68 61 6e 64 6c | .....  |.. handl|
|00000dd0| 65 25 20 ca 0d 04 d8 47 | 20 20 c9 20 70 61 74 25 |e% ....G|  . pat%|
|00000de0| 3a f2 73 63 6f 72 65 3a | f2 64 6f 6d 65 6e 75 28 |:.score:|.domenu(|
|00000df0| 70 61 74 25 2c 22 44 65 | 61 6c 20 48 61 6e 64 2c |pat%,"De|al Hand,|
|00000e00| 53 63 6f 72 65 2c 4e 65 | 77 20 47 61 6d 65 22 2c |Score,Ne|w Game",|
|00000e10| 22 57 72 61 6e 67 6c 65 | 72 22 29 0d 04 e2 30 20 |"Wrangle|r")...0 |
|00000e20| 20 c9 20 2d 32 3a 20 20 | f2 64 6f 6d 65 6e 75 28 | . -2:  |.domenu(|
|00000e30| 31 30 31 2c 22 49 6e 66 | 6f 2c 51 75 69 74 22 2c |101,"Inf|o,Quit",|
|00000e40| 22 57 72 61 6e 67 6c 65 | 72 22 29 0d 04 ec 07 20 |"Wrangle|r").... |
|00000e50| 20 cb 0d 04 f6 05 cd 0d | 05 00 0c e7 20 62 25 80 | .......|.... b%.|
|00000e60| 35 20 8c 0d 05 0a 20 20 | 20 e7 68 61 6e 64 6c 65 |5 ....  | .handle|
|00000e70| 25 3e 2d 31 8c f2 67 65 | 74 77 28 68 61 6e 64 6c |%>-1..ge|tw(handl|
|00000e80| 65 25 29 0d 05 14 12 20 | 20 c8 8e 20 68 61 6e 64 |e%).... | .. hand|
|00000e90| 6c 65 25 20 ca 0d 05 1e | 0c 20 20 c9 20 70 61 74 |le% ....|.  . pat|
|00000ea0| 25 0d 05 28 23 20 20 58 | 25 3d 6d 6f 75 73 65 78 |%..(#  X|%=mousex|
|00000eb0| 25 2d 62 78 25 3a 59 25 | 3d 6d 6f 75 73 65 79 25 |%-bx%:Y%|=mousey%|
|00000ec0| 2d 62 79 25 0d 05 32 12 | 20 20 e7 20 69 63 6f 6e |-by%..2.|  . icon|
|00000ed0| 25 3c 31 36 20 8c 0d 05 | 3c 07 20 20 cc 0d 05 46 |%<16 ...|<.  ...F|
|00000ee0| 20 20 20 20 20 f2 67 65 | 74 49 63 6f 6e 49 6e 66 |     .ge|tIconInf|
|00000ef0| 6f 28 70 61 74 25 2c 69 | 63 6f 6e 25 29 0d 05 50 |o(pat%,i|con%)..P|
|00000f00| 13 20 20 20 20 63 61 72 | 64 24 3d 64 61 74 61 24 |.    car|d$=data$|
|00000f10| 0d 05 5a 19 20 20 20 20 | e7 20 63 61 72 64 24 3c |..Z.    |. card$<|
|00000f20| 3e 22 62 61 63 6b 22 20 | 8c 0d 05 64 1e 20 20 20 |>"back" |...d.   |
|00000f30| 20 20 20 e7 20 c0 63 61 | 72 64 24 2c 34 29 3d 22 |   . .ca|rd$,4)="|
|00000f40| 63 6c 75 62 22 20 8c 0d | 05 6e 24 20 20 20 20 20 |club" ..|.n$     |
|00000f50| 20 20 20 20 64 72 61 67 | 5f 76 61 6c 75 65 3d bb |    drag|_value=.|
|00000f60| 28 c2 63 61 72 64 24 2c | 35 29 29 0d 05 78 0b 20 |(.card$,|5))..x. |
|00000f70| 20 20 20 20 20 cc 0d 05 | 82 24 20 20 20 20 20 20 |     ...|.$      |
|00000f80| 20 20 20 e7 20 c0 63 61 | 72 64 24 2c 37 29 3d 22 |   . .ca|rd$,7)="|
|00000f90| 64 69 61 6d 6f 6e 64 22 | 20 8c 0d 05 8c 26 20 20 |diamond"| ....&  |
|00000fa0| 20 20 20 20 20 20 20 20 | 20 64 72 61 67 5f 76 61 |        | drag_va|
|00000fb0| 6c 75 65 3d bb 28 c2 63 | 61 72 64 24 2c 38 29 29 |lue=.(.c|ard$,8))|
|00000fc0| 0d 05 96 0e 20 20 20 20 | 20 20 20 20 20 cc 0d 05 |....    |     ...|
|00000fd0| a0 24 20 20 20 20 20 20 | 20 20 20 20 20 e7 20 c0 |.$      |     . .|
|00000fe0| 63 61 72 64 24 2c 35 29 | 3d 22 68 65 61 72 74 22 |card$,5)|="heart"|
|00000ff0| 20 8c 0d 05 aa 29 20 20 | 20 20 20 20 20 20 20 20 | ....)  |        |
|00001000| 20 20 20 20 64 72 61 67 | 5f 76 61 6c 75 65 3d bb |    drag|_value=.|
|00001010| 28 c2 63 61 72 64 24 2c | 36 29 29 0d 05 b4 10 20 |(.card$,|6)).... |
|00001020| 20 20 20 20 20 20 20 20 | 20 20 cc 0d 05 be 27 20 |        |  ....' |
|00001030| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 e7 20 c0 |        |     . .|
|00001040| 63 61 72 64 24 2c 35 29 | 3d 22 73 70 61 64 65 22 |card$,5)|="spade"|
|00001050| 20 8c 0d 05 c8 2c 20 20 | 20 20 20 20 20 20 20 20 | ....,  |        |
|00001060| 20 20 20 20 20 20 20 64 | 72 61 67 5f 76 61 6c 75 |       d|rag_valu|
|00001070| 65 3d bb 28 c2 63 61 72 | 64 24 2c 36 29 29 0d 05 |e=.(.car|d$,6))..|
|00001080| d2 13 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..      |        |
|00001090| cd 0d 05 dc 10 20 20 20 | 20 20 20 20 20 20 20 20 |.....   |        |
|000010a0| cd 0d 05 e6 0d 20 20 20 | 20 20 20 20 20 cd 0d 05 |.....   |     ...|
|000010b0| f0 0b 20 20 20 20 20 20 | cd 0d 05 fa 3e 20 20 20 |..      |....>   |
|000010c0| 20 20 20 64 73 70 62 6c | 6b 25 21 32 30 3d 70 61 |   dspbl|k%!20=pa|
|000010d0| 74 25 3a c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |t%:.. "W|imp_GetW|
|000010e0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 64 73 70 |indowSta|te",,dsp|
|000010f0| 62 6c 6b 25 2b 32 30 0d | 06 04 4f 20 20 20 20 20 |blk%+20.|..O     |
|00001100| 20 64 73 70 62 6c 6b 25 | 21 30 3d 70 61 74 25 3a | dspblk%|!0=pat%:|
|00001110| 64 73 70 62 6c 6b 25 21 | 34 3d 35 3a 64 73 70 62 |dspblk%!|4=5:dspb|
|00001120| 6c 6b 25 21 38 3d 6d 6f | 75 73 65 78 25 2d 33 32 |lk%!8=mo|usex%-32|
|00001130| 3a 64 73 70 62 6c 6b 25 | 21 31 32 3d 6d 6f 75 73 |:dspblk%|!12=mous|
|00001140| 65 79 25 2d 35 30 0d 06 | 0e 35 20 20 20 20 20 20 |ey%-50..|.5      |
|00001150| 64 73 70 62 6c 6b 25 21 | 31 36 3d 6d 6f 75 73 65 |dspblk%!|16=mouse|
|00001160| 78 25 2b 33 32 3a 64 73 | 70 62 6c 6b 25 21 32 30 |x%+32:ds|pblk%!20|
|00001170| 3d 6d 6f 75 73 65 79 25 | 2b 35 30 0d 06 18 55 20 |=mousey%|+50...U |
|00001180| 20 20 20 20 20 64 72 61 | 67 5f 73 6f 75 72 63 65 |     dra|g_source|
|00001190| 3d 69 63 6f 6e 25 2d 31 | 35 3a e7 20 70 69 6c 65 |=icon%-1|5:. pile|
|000011a0| 28 64 72 61 67 5f 73 6f | 75 72 63 65 2d 31 2c 30 |(drag_so|urce-1,0|
|000011b0| 29 3e 30 20 8c 20 c8 99 | 20 22 57 69 6d 70 5f 44 |)>0 . ..| "Wimp_D|
|000011c0| 72 61 67 42 6f 78 22 2c | 2c 64 73 70 62 6c 6b 25 |ragBox",|,dspblk%|
|000011d0| 0d 06 22 09 20 20 20 20 | cd 0d 06 2c 07 20 20 cd |..".    |...,.  .|
|000011e0| 0d 06 36 34 c9 20 2d 32 | 3a e7 6f 70 65 6e 25 20 |..64. -2|:.open% |
|000011f0| f2 66 72 6f 6e 74 28 70 | 61 74 25 29 20 8b 20 f2 |.front(p|at%) . .|
|00001200| 72 65 6f 70 65 6e 28 70 | 61 74 25 29 3a 6f 70 65 |reopen(p|at%):ope|
|00001210| 6e 25 3d b9 0d 06 40 05 | cb 0d 06 4a 05 cd 0d 06 |n%=...@.|...J....|
|00001220| 54 05 e1 0d 06 68 27 dd | 20 f2 64 6f 6d 65 6e 75 |T....h'.| .domenu|
|00001230| 28 68 61 6e 64 6c 65 25 | 2c 6d 65 6e 75 24 2c 6d |(handle%|,menu$,m|
|00001240| 65 6e 75 74 69 74 6c 65 | 24 29 0d 06 72 17 6d 65 |enutitle|$)..r.me|
|00001250| 6e 75 68 61 6e 64 6c 65 | 25 3d 68 61 6e 64 6c 65 |nuhandle|%=handle|
|00001260| 25 0d 06 7c 14 6d 65 6e | 75 70 74 72 25 3d 62 75 |%..|.men|uptr%=bu|
|00001270| 66 66 65 72 25 0d 06 86 | 08 69 25 3d 30 0d 06 90 |ffer%...|.i%=0...|
|00001280| 12 6d 65 6e 75 70 74 72 | 25 21 32 30 3d 34 30 0d |.menuptr|%!20=40.|
|00001290| 06 9a 18 24 6d 65 6e 75 | 70 74 72 25 3d 6d 65 6e |...$menu|ptr%=men|
|000012a0| 75 74 69 74 6c 65 24 0d | 06 a4 3b 6d 65 6e 75 70 |utitle$.|..;menup|
|000012b0| 74 72 25 3f 31 32 3d 37 | 3a 6d 65 6e 75 70 74 72 |tr%?12=7|:menuptr|
|000012c0| 25 3f 31 33 3d 32 3a 6d | 65 6e 75 70 74 72 25 3f |%?13=2:m|enuptr%?|
|000012d0| 31 34 3d 37 3a 6d 65 6e | 75 70 74 72 25 3f 31 35 |14=7:men|uptr%?15|
|000012e0| 3d 30 0d 06 ae 21 6d 65 | 6e 75 70 74 72 25 21 31 |=0...!me|nuptr%!1|
|000012f0| 36 3d 32 30 30 3a 6d 65 | 6e 75 70 74 72 25 21 32 |6=200:me|nuptr%!2|
|00001300| 34 3d 30 0d 06 b8 10 6d | 65 6e 75 70 74 72 25 2b |4=0....m|enuptr%+|
|00001310| 3d 32 38 0d 06 c2 31 f5 | 20 69 74 65 6d 24 3d a4 |=28...1.| item$=.|
|00001320| 70 61 72 28 22 2c 22 29 | 3a f2 6d 65 6e 75 69 74 |par(",")|:.menuit|
|00001330| 65 6d 28 69 74 65 6d 24 | 29 3a fd 20 69 74 65 6d |em(item$|):. item|
|00001340| 24 3d 22 22 0d 06 cc 23 | 6d 65 6e 75 70 74 72 25 |$=""...#|menuptr%|
|00001350| 21 2d 32 34 3d 28 6d 65 | 6e 75 70 74 72 25 21 2d |!-24=(me|nuptr%!-|
|00001360| 32 34 29 84 26 38 30 0d | 06 d6 75 e7 68 61 6e 64 |24).&80.|..u.hand|
|00001370| 6c 65 25 3d 31 30 31 20 | c8 99 20 22 57 69 6d 70 |le%=101 |.. "Wimp|
|00001380| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 62 75 |_CreateM|enu",,bu|
|00001390| 66 66 65 72 25 2c 6d 6f | 75 73 65 78 25 2d 33 32 |ffer%,mo|usex%-32|
|000013a0| 2c 39 36 2b 34 30 20 8b | 20 c8 99 20 22 57 69 6d |,96+40 .| .. "Wim|
|000013b0| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 62 |p_Create|Menu",,b|
|000013c0| 75 66 66 65 72 25 2c 6d | 6f 75 73 65 78 25 2d 33 |uffer%,m|ousex%-3|
|000013d0| 32 2c 6d 6f 75 73 65 79 | 25 2b 31 36 0d 06 e0 05 |2,mousey|%+16....|
|000013e0| e1 0d 06 ea 05 20 0d 06 | f4 16 dd 20 f2 6d 65 6e |..... ..|... .men|
|000013f0| 75 69 74 65 6d 28 74 65 | 78 74 24 29 0d 06 fe 10 |uitem(te|xt$)....|
|00001400| e7 20 74 65 78 74 24 3d | 22 22 20 e1 0d 07 08 10 |. text$=|"" .....|
|00001410| 6d 65 6e 75 70 74 72 25 | 21 30 3d 30 0d 07 12 11 |menuptr%|!0=0....|
|00001420| 6d 65 6e 75 70 74 72 25 | 21 34 3d 2d 31 0d 07 1c |menuptr%|!4=-1...|
|00001430| 26 e7 20 74 65 78 74 24 | 3d 22 49 6e 66 6f 22 20 |&. text$|="Info" |
|00001440| 8c 20 6d 65 6e 75 70 74 | 72 25 21 34 3d 69 6e 66 |. menupt|r%!4=inf|
|00001450| 6f 77 25 0d 07 26 27 e7 | 20 74 65 78 74 24 3d 22 |ow%..&'.| text$="|
|00001460| 53 63 6f 72 65 22 8c 20 | 6d 65 6e 75 70 74 72 25 |Score". |menuptr%|
|00001470| 21 34 3d 73 63 6f 72 65 | 77 25 0d 07 30 18 6d 65 |!4=score|w%..0.me|
|00001480| 6e 75 70 74 72 25 21 38 | 3d 26 30 37 30 30 30 30 |nuptr%!8|=&070000|
|00001490| 32 31 0d 07 3a 18 24 28 | 6d 65 6e 75 70 74 72 25 |21..:.$(|menuptr%|
|000014a0| 2b 31 32 29 3d 74 65 78 | 74 24 0d 07 44 10 6d 65 |+12)=tex|t$..D.me|
|000014b0| 6e 75 70 74 72 25 2b 3d | 32 34 0d 07 4e 05 e1 0d |nuptr%+=|24..N...|
|000014c0| 07 58 05 20 0d 07 62 10 | dd 20 a4 70 61 72 28 73 |.X. ..b.|. .par(s|
|000014d0| 65 70 24 29 0d 07 6c 25 | 69 31 25 3d 69 25 2b 31 |ep$)..l%|i1%=i%+1|
|000014e0| 3a 69 25 3d a7 6d 65 6e | 75 24 2b 73 65 70 24 2c |:i%=.men|u$+sep$,|
|000014f0| 73 65 70 24 2c 69 31 25 | 29 0d 07 76 17 3d c1 6d |sep$,i1%|)..v.=.m|
|00001500| 65 6e 75 24 2c 69 31 25 | 2c 69 25 2d 69 31 25 29 |enu$,i1%|,i%-i1%)|
|00001510| 0d 07 80 0f dd 20 f2 65 | 72 72 6f 72 62 6f 78 0d |..... .e|rrorbox.|
|00001520| 07 8a 19 c8 99 20 22 57 | 69 6d 70 5f 44 72 61 67 |..... "W|imp_Drag|
|00001530| 42 6f 78 22 2c 2c 2d 31 | 0d 07 94 30 21 62 75 66 |Box",,-1|...0!buf|
|00001540| 66 65 72 25 3d 9f 3a 24 | 28 62 75 66 66 65 72 25 |fer%=.:$|(buffer%|
|00001550| 2b 34 29 3d f6 24 2b 22 | 20 61 74 20 6c 69 6e 65 |+4)=.$+"| at line|
|00001560| 20 22 2b c3 9e 2b bd 30 | 0d 07 9e 2e c8 99 20 22 | "+..+.0|...... "|
|00001570| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|00001580| 22 2c 62 75 66 66 65 72 | 25 2c 31 2c 22 57 72 61 |",buffer|%,1,"Wra|
|00001590| 6e 67 6c 65 72 22 0d 07 | a8 0d f2 66 69 6e 69 73 |ngler"..|...finis|
|000015a0| 68 3a e0 0d 07 b2 05 e1 | 0d 07 bc 0c dd f2 66 69 |h:......|......fi|
|000015b0| 6e 69 73 68 0d 07 c6 2a | c8 99 20 22 57 69 6d 70 |nish...*|.. "Wimp|
|000015c0| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 74 61 73 6b |_CloseDo|wn",task|
|000015d0| 68 61 6e 64 25 2c 21 74 | 61 73 6b 69 64 25 0d 07 |hand%,!t|askid%..|
|000015e0| d0 1b c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |.... "Wi|mp_Close|
|000015f0| 54 65 6d 70 6c 61 74 65 | 22 0d 07 da 05 e1 0d 07 |Template|".......|
|00001600| e4 14 dd 20 f2 67 65 74 | 77 28 68 61 6e 64 6c 65 |... .get|w(handle|
|00001610| 25 29 0d 07 ee 2c 21 71 | 25 3d 68 61 6e 64 6c 65 |%)...,!q|%=handle|
|00001620| 25 3a c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |%:.. "Wi|mp_GetWi|
|00001630| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 71 25 0d 07 |ndowStat|e",,q%..|
|00001640| f8 2b f2 69 6e 66 6f 28 | 71 25 2b 34 29 3a 62 68 |.+.info(|q%+4):bh|
|00001650| 61 6e 64 6c 65 25 3d 71 | 25 21 32 38 3a 66 6c 61 |andle%=q|%!28:fla|
|00001660| 67 73 25 3d 71 25 21 33 | 32 0d 08 02 05 e1 0d 08 |gs%=q%!3|2.......|
|00001670| 0c 05 20 0d 08 16 0f dd | 20 f2 69 6e 66 6f 28 71 |.. .....| .info(q|
|00001680| 25 29 0d 08 20 3d 78 30 | 25 3d 21 71 25 3a 79 30 |%).. =x0|%=!q%:y0|
|00001690| 25 3d 71 25 21 34 3a 78 | 31 25 3d 71 25 21 38 3a |%=q%!4:x|1%=q%!8:|
|000016a0| 79 31 25 3d 71 25 21 31 | 32 3a 73 63 78 25 3d 71 |y1%=q%!1|2:scx%=q|
|000016b0| 25 21 31 36 3a 73 63 79 | 25 3d 71 25 21 32 30 0d |%!16:scy|%=q%!20.|
|000016c0| 08 2a 1d 62 78 25 3d 78 | 30 25 2d 73 63 78 25 3a |.*.bx%=x|0%-scx%:|
|000016d0| 62 79 25 3d 79 31 25 2d | 73 63 79 25 0d 08 34 05 |by%=y1%-|scy%..4.|
|000016e0| e1 0d 08 3e 05 20 0d 08 | 48 05 20 0d 08 52 12 dd |...>. ..|H. ..R..|
|000016f0| 20 f2 72 65 63 65 69 76 | 65 28 71 25 29 0d 08 5c | .receiv|e(q%)..\|
|00001700| 0e c8 8e 20 71 25 21 31 | 36 20 ca 0d 08 66 11 c9 |... q%!1|6 ...f..|
|00001710| 20 30 3a f2 66 69 6e 69 | 73 68 3a e0 0d 08 70 19 | 0:.fini|sh:...p.|
|00001720| c9 20 26 34 30 30 43 31 | 3a f2 67 65 74 6d 6f 64 |. &400C1|:.getmod|
|00001730| 65 69 6e 66 6f 0d 08 7a | 05 cb 0d 08 84 05 e1 0d |einfo..z|........|
|00001740| 08 8e 19 dd 20 f2 6d 65 | 6e 75 73 65 6c 65 63 74 |.... .me|nuselect|
|00001750| 28 6d 65 6e 75 73 25 29 | 0d 08 98 38 c8 99 20 22 |(menus%)|...8.. "|
|00001760| 57 69 6d 70 5f 44 65 63 | 6f 64 65 4d 65 6e 75 22 |Wimp_Dec|odeMenu"|
|00001770| 2c 2c 62 75 66 66 65 72 | 25 2c 6d 65 6e 75 73 25 |,,buffer|%,menus%|
|00001780| 2c c4 32 30 30 2c 22 20 | 22 29 b8 2c 2c 2c 61 24 |,.200," |").,,,a$|
|00001790| 0d 08 a2 0f e7 20 61 24 | 3d 22 22 20 8c 20 e1 0d |..... a$|="" . ..|
|000017a0| 08 ac 14 c8 8e 20 6d 65 | 6e 75 68 61 6e 64 6c 65 |..... me|nuhandle|
|000017b0| 25 20 ca 0d 08 b6 0a c9 | 20 70 61 74 25 0d 08 c0 |% ......| pat%...|
|000017c0| 17 20 20 e7 20 61 24 3d | 22 4e 65 77 20 47 61 6d |.  . a$=|"New Gam|
|000017d0| 65 22 20 8c 0d 08 ca 13 | 20 20 20 20 20 20 20 f2 |e" .....|       .|
|000017e0| 73 68 75 66 66 6c 65 0d | 08 d4 05 20 0d 08 de 05 |shuffle.|... ....|
|000017f0| 20 0d 08 e8 07 20 20 cd | 0d 08 f2 18 20 20 e7 20 | ....  .|....  . |
|00001800| 61 24 3d 22 44 65 61 6c | 20 48 61 6e 64 22 20 8c |a$="Deal| Hand" .|
|00001810| 0d 08 fc 12 20 20 20 20 | 20 20 20 f2 72 65 64 65 |....    |   .rede|
|00001820| 61 6c 0d 09 06 07 20 20 | cd 0d 09 10 09 c9 20 31 |al....  |...... 1|
|00001830| 30 31 0d 09 1a 1b 20 20 | e7 20 61 24 3d 22 51 75 |01....  |. a$="Qu|
|00001840| 69 74 22 3a f2 66 69 6e | 69 73 68 3a e0 0d 09 24 |it":.fin|ish:...$|
|00001850| 13 20 20 e7 20 61 24 3d | 22 49 6e 66 6f 22 20 8c |.  . a$=|"Info" .|
|00001860| 0d 09 2e 19 20 20 20 20 | 20 20 f2 72 65 6f 70 65 |....    |  .reope|
|00001870| 6e 28 69 6e 66 6f 77 25 | 29 0d 09 38 07 20 20 cd |n(infow%|)..8.  .|
|00001880| 0d 09 42 05 cb 0d 09 4c | 05 e1 0d 09 56 05 20 0d |..B....L|....V. .|
|00001890| 09 60 11 dd 20 f2 67 65 | 74 70 6f 69 6e 74 65 72 |.`.. .ge|tpointer|
|000018a0| 0d 09 6a 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..j .. "|Wimp_Get|
|000018b0| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 22 2c 2c 71 25 |PointerI|nfo",,q%|
|000018c0| 0d 09 74 48 6d 6f 75 73 | 65 78 25 3d 21 71 25 3a |..tHmous|ex%=!q%:|
|000018d0| 6d 6f 75 73 65 79 25 3d | 71 25 21 34 3a 62 25 3d |mousey%=|q%!4:b%=|
|000018e0| 71 25 21 38 3a 68 61 6e | 64 6c 65 25 3d 71 25 21 |q%!8:han|dle%=q%!|
|000018f0| 31 32 3a 69 63 6f 6e 25 | 3d 71 25 21 31 36 3a 6f |12:icon%|=q%!16:o|
|00001900| 62 25 3d 71 25 21 32 30 | 0d 09 7e 05 e1 0d 09 88 |b%=q%!20|..~.....|
|00001910| 05 20 0d 09 92 15 dd 20 | f2 66 72 6f 6e 74 28 68 |. ..... |.front(h|
|00001920| 61 6e 64 6c 65 25 29 0d | 09 9c 11 e7 68 61 6e 64 |andle%).|....hand|
|00001930| 6c 65 25 3d 2d 31 8c e1 | 0d 09 a6 12 f2 67 65 74 |le%=-1..|.....get|
|00001940| 77 28 68 61 6e 64 6c 65 | 25 29 0d 09 b0 36 f2 6f |w(handle|%)...6.o|
|00001950| 70 65 6e 5f 77 69 6e 64 | 6f 77 28 68 61 6e 64 6c |pen_wind|ow(handl|
|00001960| 65 25 2c 78 30 25 2c 79 | 30 25 2c 78 31 25 2c 79 |e%,x0%,y|0%,x1%,y|
|00001970| 31 25 2c 73 63 78 25 2c | 73 63 79 25 2c 2d 31 29 |1%,scx%,|scy%,-1)|
|00001980| 0d 09 ba 05 e1 0d 09 c4 | 05 20 0d 09 ce 16 dd 20 |........|. ..... |
|00001990| f2 72 65 6f 70 65 6e 28 | 68 61 6e 64 6c 65 25 29 |.reopen(|handle%)|
|000019a0| 0d 09 d8 12 f2 67 65 74 | 77 28 68 61 6e 64 6c 65 |.....get|w(handle|
|000019b0| 25 29 0d 09 e2 46 f2 6f | 70 65 6e 5f 77 69 6e 64 |%)...F.o|pen_wind|
|000019c0| 6f 77 28 68 61 6e 64 6c | 65 25 2c 78 6f 25 2c 79 |ow(handl|e%,xo%,y|
|000019d0| 6f 25 2c 78 31 25 2d 78 | 30 25 2b 78 6f 25 2c 79 |o%,x1%-x|0%+xo%,y|
|000019e0| 31 25 2d 79 30 25 2b 79 | 6f 25 2c 73 63 78 25 2c |1%-y0%+y|o%,scx%,|
|000019f0| 73 63 79 25 2c 2d 31 29 | 0d 09 ec 05 e1 0d 09 f6 |scy%,-1)|........|
|00001a00| 05 20 0d 0a 00 3e dd 20 | f2 6f 70 65 6e 5f 77 69 |. ...>. |.open_wi|
|00001a10| 6e 64 6f 77 28 68 61 6e | 64 6c 65 25 2c 78 30 25 |ndow(han|dle%,x0%|
|00001a20| 2c 79 30 25 2c 78 31 25 | 2c 79 31 25 2c 73 63 78 |,y0%,x1%|,y1%,scx|
|00001a30| 25 2c 73 63 79 25 2c 62 | 68 61 6e 64 6c 65 25 29 |%,scy%,b|handle%)|
|00001a40| 0d 0a 0a 11 e7 68 61 6e | 64 6c 65 25 3d 2d 31 8c |.....han|dle%=-1.|
|00001a50| e1 0d 0a 14 1f 71 25 21 | 30 3d 68 61 6e 64 6c 65 |.....q%!|0=handle|
|00001a60| 25 3a 71 25 21 32 38 3d | 62 68 61 6e 64 6c 65 25 |%:q%!28=|bhandle%|
|00001a70| 0d 0a 1e 29 71 25 21 34 | 3d 78 30 25 3a 71 25 21 |...)q%!4|=x0%:q%!|
|00001a80| 38 3d 79 30 25 3a 71 25 | 21 31 32 3d 78 31 25 3a |8=y0%:q%|!12=x1%:|
|00001a90| 71 25 21 31 36 3d 79 31 | 25 0d 0a 28 19 71 25 21 |q%!16=y1|%..(.q%!|
|00001aa0| 32 30 3d 73 63 78 25 3a | 71 25 21 32 34 3d 73 63 |20=scx%:|q%!24=sc|
|00001ab0| 79 25 0d 0a 32 1c c8 99 | 20 22 57 69 6d 70 5f 4f |y%..2...| "Wimp_O|
|00001ac0| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 71 25 0d 0a |penWindo|w",,q%..|
|00001ad0| 3c 05 e1 0d 0a 46 05 20 | 0d 0a 50 2a dd f2 64 72 |<....F. |..P*..dr|
|00001ae0| 61 77 28 63 6f 6c 25 2c | 72 6f 77 25 2c 63 61 72 |aw(col%,|row%,car|
|00001af0| 64 25 2c 64 65 70 74 68 | 25 2c 68 61 6e 64 6c 65 |d%,depth|%,handle|
|00001b00| 25 29 0d 0a 5a 11 e7 20 | 63 61 72 64 25 3d 32 35 |%)..Z.. |card%=25|
|00001b10| 35 20 e1 0d 0a 64 1a 70 | 6f 73 25 3d 28 63 6f 6c |5 ...d.p|os%=(col|
|00001b20| 25 29 2b 38 2a 28 72 6f | 77 25 2d 31 29 0d 0a 6e |%)+8*(ro|w%-1)..n|
|00001b30| 2d 63 61 72 64 24 3d 73 | 75 69 74 24 28 28 63 61 |-card$=s|uit$((ca|
|00001b40| 72 64 25 81 31 33 29 81 | 32 2b 31 29 2b c3 28 63 |rd%.13).|2+1)+.(c|
|00001b50| 61 72 64 25 83 31 33 2b | 31 29 0d 0a 78 23 f2 72 |ard%.13+|1)..x#.r|
|00001b60| 65 64 72 61 77 49 63 6f | 6e 28 68 61 6e 64 6c 65 |edrawIco|n(handle|
|00001b70| 25 2c 70 6f 73 25 2c 63 | 61 72 64 24 29 0d 0a 82 |%,pos%,c|ard$)...|
|00001b80| 05 e1 0d 0a 8c 16 dd f2 | 64 69 73 70 6c 61 79 28 |........|display(|
|00001b90| 68 61 6e 64 6c 65 25 29 | 0d 0a 96 0d e3 20 54 25 |handle%)|..... T%|
|00001ba0| 3d 30 b8 20 37 0d 0a a0 | 20 f2 64 72 61 77 28 54 |=0. 7...| .draw(T|
|00001bb0| 25 2c 31 2c 4f 25 28 54 | 25 29 2c 31 2c 68 61 6e |%,1,O%(T|%),1,han|
|00001bc0| 64 6c 65 25 29 0d 0a aa | 2c f2 64 72 61 77 28 54 |dle%)...|,.draw(T|
|00001bd0| 25 2c 33 2c a4 63 61 72 | 64 28 54 25 29 2c 70 69 |%,3,.car|d(T%),pi|
|00001be0| 6c 65 28 54 25 2c 30 29 | 2c 68 61 6e 64 6c 65 25 |le(T%,0)|,handle%|
|00001bf0| 29 0d 0a b4 24 f2 72 65 | 64 72 61 77 49 63 6f 6e |)...$.re|drawIcon|
|00001c00| 28 68 61 6e 64 6c 65 25 | 2c 54 25 2b 38 2c 22 62 |(handle%|,T%+8,"b|
|00001c10| 61 63 6b 22 29 0d 0a be | 08 ed 20 54 25 0d 0a c8 |ack")...|.. T%...|
|00001c20| 05 e1 0d 0a d2 21 dd 20 | f2 67 65 74 49 63 6f 6e |.....!. |.getIcon|
|00001c30| 49 6e 66 6f 28 68 61 6e | 64 6c 65 25 2c 69 63 6f |Info(han|dle%,ico|
|00001c40| 6e 25 29 0d 0a dc 25 73 | 70 62 6c 6b 25 21 30 3d |n%)...%s|pblk%!0=|
|00001c50| 68 61 6e 64 6c 65 25 20 | 3a 20 73 70 62 6c 6b 25 |handle% |: spblk%|
|00001c60| 21 34 3d 69 63 6f 6e 25 | 0d 0a e6 22 c8 99 20 22 |!4=icon%|...".. "|
|00001c70| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00001c80| 65 22 2c 2c 73 70 62 6c | 6b 25 0d 0a f0 44 69 78 |e",,spbl|k%...Dix|
|00001c90| 30 25 3d 73 70 62 6c 6b | 25 21 38 20 3a 20 69 79 |0%=spblk|%!8 : iy|
|00001ca0| 30 25 3d 73 70 62 6c 6b | 25 21 31 32 20 3a 20 69 |0%=spblk|%!12 : i|
|00001cb0| 78 31 25 3d 73 70 62 6c | 6b 25 21 31 36 20 3a 20 |x1%=spbl|k%!16 : |
|00001cc0| 69 79 31 25 3d 73 70 62 | 6c 6b 25 21 32 30 0d 0a |iy1%=spb|lk%!20..|
|00001cd0| fa 14 66 6c 61 67 73 25 | 3d 73 70 62 6c 6b 25 21 |..flags%|=spblk%!|
|00001ce0| 32 34 0d 0b 04 16 64 61 | 74 61 24 3d 24 28 73 70 |24....da|ta$=$(sp|
|00001cf0| 62 6c 6b 25 2b 32 38 29 | 0d 0b 0e 05 e1 0d 0b 18 |blk%+28)|........|
|00001d00| 20 dd 20 f2 64 65 6c 65 | 74 65 49 63 6f 6e 28 68 | . .dele|teIcon(h|
|00001d10| 61 6e 64 6c 65 25 2c 69 | 63 6f 6e 25 29 0d 0b 22 |andle%,i|con%).."|
|00001d20| 25 73 70 62 6c 6b 25 21 | 30 3d 68 61 6e 64 6c 65 |%spblk%!|0=handle|
|00001d30| 25 20 3a 20 73 70 62 6c | 6b 25 21 34 3d 69 63 6f |% : spbl|k%!4=ico|
|00001d40| 6e 25 0d 0b 2c 20 c8 99 | 20 22 57 69 6d 70 5f 44 |n%.., ..| "Wimp_D|
|00001d50| 65 6c 65 74 65 49 63 6f | 6e 22 2c 2c 73 70 62 6c |eleteIco|n",,spbl|
|00001d60| 6b 25 0d 0b 36 05 e1 0d | 0b 40 26 dd 20 f2 72 65 |k%..6...|.@&. .re|
|00001d70| 64 72 61 77 49 63 6f 6e | 28 68 61 6e 64 6c 65 25 |drawIcon|(handle%|
|00001d80| 2c 69 63 6f 6e 25 2c 74 | 65 78 74 24 29 0d 0b 4a |,icon%,t|ext$)..J|
|00001d90| 3c f2 67 65 74 49 63 6f | 6e 49 6e 66 6f 28 68 61 |<.getIco|nInfo(ha|
|00001da0| 6e 64 6c 65 25 2c 69 63 | 6f 6e 25 29 20 3a 20 f2 |ndle%,ic|on%) : .|
|00001db0| 64 65 6c 65 74 65 49 63 | 6f 6e 28 68 61 6e 64 6c |deleteIc|on(handl|
|00001dc0| 65 25 2c 69 63 6f 6e 25 | 29 0d 0b 54 3c 69 25 3d |e%,icon%|)..T<i%=|
|00001dd0| a4 63 72 65 61 74 65 49 | 63 6f 6e 28 68 61 6e 64 |.createI|con(hand|
|00001de0| 6c 65 25 2c 69 78 30 25 | 2c 69 79 30 25 2c 69 78 |le%,ix0%|,iy0%,ix|
|00001df0| 31 25 2c 69 79 31 25 2c | 66 6c 61 67 73 25 2c 74 |1%,iy1%,|flags%,t|
|00001e00| 65 78 74 24 29 0d 0b 5e | 35 c8 99 20 22 57 69 6d |ext$)..^|5.. "Wim|
|00001e10| 70 5f 46 6f 72 63 65 52 | 65 64 72 61 77 22 2c 68 |p_ForceR|edraw",h|
|00001e20| 61 6e 64 6c 65 25 2c 69 | 78 30 25 2c 69 79 30 25 |andle%,i|x0%,iy0%|
|00001e30| 2c 69 78 31 25 2c 69 79 | 31 25 0d 0b 68 05 e1 0d |,ix1%,iy|1%..h...|
|00001e40| 0b 72 28 dd f2 7a 61 70 | 28 78 29 3a f2 72 65 64 |.r(..zap|(x):.red|
|00001e50| 72 61 77 49 63 6f 6e 28 | 70 61 74 25 2c 31 36 2b |rawIcon(|pat%,16+|
|00001e60| 78 2c 22 22 29 3a e1 0d | 0b 7c 3b dd 20 a4 63 72 |x,""):..|.|;. .cr|
|00001e70| 65 61 74 65 49 63 6f 6e | 28 68 61 6e 64 6c 65 25 |eateIcon|(handle%|
|00001e80| 2c 69 78 30 25 2c 69 79 | 30 25 2c 69 78 31 25 2c |,ix0%,iy|0%,ix1%,|
|00001e90| 69 79 31 25 2c 66 6c 61 | 67 73 25 2c 64 61 74 61 |iy1%,fla|gs%,data|
|00001ea0| 24 29 0d 0b 86 34 73 70 | 62 6c 6b 25 21 30 3d 68 |$)...4sp|blk%!0=h|
|00001eb0| 61 6e 64 6c 65 25 20 3a | 20 73 70 62 6c 6b 25 21 |andle% :| spblk%!|
|00001ec0| 34 3d 69 78 30 25 20 3a | 20 73 70 62 6c 6b 25 21 |4=ix0% :| spblk%!|
|00001ed0| 38 3d 69 79 30 25 0d 0b | 90 36 73 70 62 6c 6b 25 |8=iy0%..|.6spblk%|
|00001ee0| 21 31 32 3d 69 78 31 25 | 20 3a 20 73 70 62 6c 6b |!12=ix1%| : spblk|
|00001ef0| 25 21 31 36 3d 69 79 31 | 25 20 3a 20 73 70 62 6c |%!16=iy1|% : spbl|
|00001f00| 6b 25 21 32 30 3d 66 6c | 61 67 73 25 0d 0b 9a 16 |k%!20=fl|ags%....|
|00001f10| 24 28 73 70 62 6c 6b 25 | 2b 32 34 29 3d 64 61 74 |$(spblk%|+24)=dat|
|00001f20| 61 24 0d 0b a4 28 c8 99 | 20 22 57 69 6d 70 5f 43 |a$...(..| "Wimp_C|
|00001f30| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 73 70 62 6c |reateIco|n",,spbl|
|00001f40| 6b 25 20 b8 20 69 63 6f | 6e 25 0d 0b ae 0a 3d 69 |k% . ico|n%....=i|
|00001f50| 63 6f 6e 25 0d 0b b8 19 | dd f2 74 72 79 6d 6f 76 |con%....|..trymov|
|00001f60| 65 28 64 72 61 67 5f 76 | 61 6c 2c 6b 29 0d 0b c2 |e(drag_v|al,k)...|
|00001f70| 2d f2 67 65 74 70 6f 69 | 6e 74 65 72 3a 58 25 3d |-.getpoi|nter:X%=|
|00001f80| 6d 6f 75 73 65 78 25 2d | 62 78 25 3a 59 25 3d 6d |mousex%-|bx%:Y%=m|
|00001f90| 6f 75 73 65 79 25 2d 62 | 79 25 0d 0b cc 19 e7 20 |ousey%-b|y%..... |
|00001fa0| 59 25 3e 2d 32 31 32 20 | 84 20 59 25 3c 2d 33 32 |Y%>-212 |. Y%<-32|
|00001fb0| 30 20 e1 0d 0b d6 21 78 | 3d 28 58 25 2d 35 30 29 |0 ....!x|=(X%-50)|
|00001fc0| 81 39 36 2b 31 3a e7 78 | 3c 31 20 84 20 78 3e 38 |.96+1:.x|<1 . x>8|
|00001fd0| 20 8c 20 e1 0d 0b e0 11 | e7 20 ac a4 76 61 6c 28 | . .....|. ..val(|
|00001fe0| 78 29 8c 20 e1 0d 0b ea | a8 63 61 72 64 28 78 2d |x). ....|.card(x-|
|00001ff0| 31 29 3d 70 69 6c 65 28 | 6b 2d 31 2c 70 69 6c 65 |1)=pile(|k-1,pile|
|00002000| 28 6b 2d 31 2c 30 29 29 | 3a f2 7a 61 70 28 6b 2d |(k-1,0))|:.zap(k-|
|00002010| 31 29 3a f2 64 72 61 77 | 28 78 2d 31 2c 32 2c 63 |1):.draw|(x-1,2,c|
|00002020| 61 72 64 28 78 2d 31 29 | 2c 31 2c 70 61 74 25 29 |ard(x-1)|,1,pat%)|
|00002030| 3a 70 69 6c 65 28 6b 2d | 31 2c 70 69 6c 65 28 6b |:pile(k-|1,pile(k|
|00002040| 2d 31 2c 30 29 29 3d 32 | 35 35 3a 70 69 6c 65 28 |-1,0))=2|55:pile(|
|00002050| 6b 2d 31 2c 30 29 3d 70 | 69 6c 65 28 6b 2d 31 2c |k-1,0)=p|ile(k-1,|
|00002060| 30 29 2d 31 3a f2 64 72 | 61 77 28 6b 2d 31 2c 33 |0)-1:.dr|aw(k-1,3|
|00002070| 2c a4 63 61 72 64 28 6b | 2d 31 29 2c 70 69 6c 65 |,.card(k|-1),pile|
|00002080| 28 6b 2d 31 2c 30 29 2c | 70 61 74 25 29 0d 0b f4 |(k-1,0),|pat%)...|
|00002090| 19 6d 6f 76 65 3d 6d 6f | 76 65 2b 31 3a f2 63 68 |.move=mo|ve+1:.ch|
|000020a0| 65 63 6b 77 69 6e 0d 0b | fe 05 e1 0d 0c 08 12 dd |eckwin..|........|
|000020b0| 20 f2 67 65 74 6d 6f 64 | 65 69 6e 66 6f 0d 0c 12 | .getmod|einfo...|
|000020c0| 46 c8 99 22 57 69 6d 70 | 5f 52 65 61 64 50 69 78 |F.."Wimp|_ReadPix|
|000020d0| 54 72 61 6e 73 22 2c 26 | 31 30 30 2c 73 70 72 69 |Trans",&|100,spri|
|000020e0| 74 65 73 25 2c 22 63 6c | 75 62 31 32 22 2c 2c 2c |tes%,"cl|ub12",,,|
|000020f0| 2c 66 61 63 74 6f 72 73 | 25 2c 70 69 78 74 72 61 |,factors|%,pixtra|
|00002100| 6e 73 25 0d 0c 1c 05 e1 | 0d 0c 30 0b dd f2 73 63 |ns%.....|..0...sc|
|00002110| 6f 72 65 0d 0c 3a 24 f2 | 72 65 64 72 61 77 49 63 |ore..:$.|redrawIc|
|00002120| 6f 6e 28 73 63 6f 72 65 | 77 25 2c 30 2c c3 28 70 |on(score|w%,0,.(p|
|00002130| 6c 61 79 65 64 29 29 0d | 0c 44 21 f2 72 65 64 72 |layed)).|.D!.redr|
|00002140| 61 77 49 63 6f 6e 28 73 | 63 6f 72 65 77 25 2c 31 |awIcon(s|corew%,1|
|00002150| 2c c3 28 77 6f 6e 29 29 | 0d 0c 4e 22 f2 72 65 64 |,.(won))|..N".red|
|00002160| 72 61 77 49 63 6f 6e 28 | 73 63 6f 72 65 77 25 2c |rawIcon(|scorew%,|
|00002170| 32 2c c3 28 6d 6f 76 65 | 29 29 0d 0c 58 20 f2 72 |2,.(move|))..X .r|
|00002180| 65 64 72 61 77 49 63 6f | 6e 28 73 63 6f 72 65 77 |edrawIco|n(scorew|
|00002190| 25 2c 33 2c c3 28 72 65 | 29 29 0d 0c 62 05 e1 0d |%,3,.(re|))..b...|
|000021a0| 0c 76 12 dd f2 63 68 65 | 63 6b 77 69 6e 3a ea 54 |.v...che|ckwin:.T|
|000021b0| 25 0d 0c 77 09 77 69 6e | 3d b9 0d 0c 80 0c e3 20 |%..w.win|=...... |
|000021c0| 54 25 3d 30 b8 37 0d 0c | 8a 1c e7 20 a4 63 61 72 |T%=0.7..|... .car|
|000021d0| 64 28 54 25 29 3c 3e 32 | 35 35 20 8c 20 77 69 6e |d(T%)<>2|55 . win|
|000021e0| 3d a3 0d 0c 94 08 ed 20 | 54 25 0d 0c 9e 10 e7 20 |=...... |T%..... |
|000021f0| ac 28 77 69 6e 29 20 8c | 20 e1 0d 0c a8 0d 77 6f |.(win) .| .....wo|
|00002200| 6e 3d 77 6f 6e 2b 31 0d | 0c a9 05 e1 0d ff       |n=won+1.|......  |
+--------+-------------------------+-------------------------+--------+--------+