home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1988-10-18 | 11.3 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
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 20 | 21 52 75 6e 49 6d 61 67 |..... > |!RunImag|
|00000010| 65 0d 00 14 1e de 20 74 | 61 73 6b 69 64 25 34 3a |e..... t|askid%4:|
|00000020| 24 74 61 73 6b 69 64 25 | 3d 22 54 41 53 4b 22 0d |$taskid%|="TASK".|
|00000030| 00 1e 3b c8 99 20 22 57 | 69 6d 70 5f 49 6e 69 74 |..;.. "W|imp_Init|
|00000040| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 74 61 73 |ialise",|200,!tas|
|00000050| 6b 69 64 25 2c 22 50 61 | 74 69 65 6e 63 65 22 20 |kid%,"Pa|tience" |
|00000060| b8 20 76 65 72 73 69 6f | 6e 25 0d 00 28 4b 60 77 |. versio|n%..(K`w|
|00000070| 62 63 6f 6c 3d 31 30 3a | 60 74 62 63 6f 6c 3d 32 |bcol=10:|`tbcol=2|
|00000080| 3a 60 73 63 6f 3d 33 3a | 60 6d 62 63 6f 6c 3d 32 |:`sco=3:|`mbcol=2|
|00000090| 3a 60 77 66 63 6f 6c 3d | 26 37 3a 60 74 66 63 6f |:`wfcol=|&7:`tfco|
|000000a0| 6c 3d 37 3a 60 73 63 69 | 3d 31 3a 60 74 62 63 6f |l=7:`sci|=1:`tbco|
|000000b0| 6c 32 3d 31 32 0d 00 32 | 09 f2 76 61 72 73 0d 00 |l2=12..2|..vars..|
|000000c0| 3c 1c de 20 71 25 20 26 | 32 30 30 2c 6d 65 6e 75 |<.. q% &|200,menu|
|000000d0| 64 61 74 61 25 20 26 32 | 30 30 0d 00 46 05 20 0d |data% &2|00..F. .|
|000000e0| 00 50 15 6d 61 78 62 75 | 66 25 3d 26 32 30 30 3a |.P.maxbu|f%=&200:|
|000000f0| 40 25 3d 35 0d 00 5a 30 | de 20 62 75 66 66 65 72 |@%=5..Z0|. buffer|
|00000100| 25 20 6d 61 78 62 75 66 | 25 2c 65 6e 64 62 75 66 |% maxbuf|%,endbuf|
|00000110| 25 20 2d 31 3a 63 75 72 | 62 75 66 25 3d 62 75 66 |% -1:cur|buf%=buf|
|00000120| 66 65 72 25 0d 00 64 0e | de 20 62 6c 6f 63 6b 20 |fer%..d.|. block |
|00000130| 31 32 0d 00 6e 05 20 0d | 00 78 11 70 61 74 25 3d |12..n. .|.x.pat%=|
|00000140| a4 63 77 69 6e 64 6f 77 | 0d 00 82 44 dc 20 50 61 |.cwindow|...D. Pa|
|00000150| 74 69 65 6e 63 65 2c 26 | 30 46 2c 60 77 66 63 6f |tience,&|0F,`wfco|
|00000160| 6c 2c 60 77 62 63 6f 6c | 2c 30 2c 2d 31 30 32 34 |l,`wbcol|,0,-1024|
|00000170| 2c 38 30 30 2c 30 2c 20 | 20 20 20 20 30 2c 2d 36 |,800,0, | 0,-6|
|00000180| 34 30 2c 38 30 30 2c 30 | 20 20 2c 30 0d 00 8c 05 |40,800,0| ,0....|
|00000190| 20 0d 00 96 24 de 20 53 | 50 41 43 45 25 20 35 32 | ...$. S|PACE% 52|
|000001a0| 2c 41 24 28 37 29 2c 53 | 25 28 33 29 2c 73 75 69 |,A$(7),S|%(3),sui|
|000001b0| 74 24 28 33 29 0d 00 a0 | 20 4e 25 3d b3 28 91 20 |t$(3)...| N%=.(. |
|000001c0| 84 20 26 38 30 30 30 30 | 30 30 30 29 3a f2 53 48 |. &80000|000):.SH|
|000001d0| 55 46 46 4c 45 0d 00 aa | 48 73 75 69 74 24 28 30 |UFFLE...|Hsuit$(0|
|000001e0| 29 3d 22 63 6c 75 62 22 | 3a 73 75 69 74 24 28 31 |)="club"|:suit$(1|
|000001f0| 29 3d 22 64 69 61 6d 6f | 6e 64 22 3a 73 75 69 74 |)="diamo|nd":suit|
|00000200| 24 28 32 29 3d 22 68 65 | 61 72 74 22 3a 73 75 69 |$(2)="he|art":sui|
|00000210| 74 24 28 33 29 3d 22 73 | 70 61 64 65 22 0d 00 b4 |t$(3)="s|pade"...|
|00000220| 05 20 0d 00 be 30 53 25 | 3d 8e 22 3c 50 61 74 69 |. ...0S%|=."<Pati|
|00000230| 65 6e 63 65 24 44 69 72 | 3e 2e 53 70 72 69 74 65 |ence$Dir|>.Sprite|
|00000240| 73 22 3a 54 25 3d a2 23 | 53 25 2b 31 36 3a d9 23 |s":T%=.#|S%+16:.#|
|00000250| 53 25 0d 00 c8 2a de 20 | 73 70 72 69 74 65 73 25 |S%...*. |sprites%|
|00000260| 20 54 25 2c 66 61 63 74 | 6f 72 73 25 20 31 35 2c | T%,fact|ors% 15,|
|00000270| 70 69 78 74 72 61 6e 73 | 25 20 31 35 0d 00 d2 1d |pixtrans|% 15....|
|00000280| 21 73 70 72 69 74 65 73 | 25 3d 54 25 3a 73 70 72 |!sprites|%=T%:spr|
|00000290| 69 74 65 73 25 21 38 3d | 31 0d 00 dc 1a c8 99 20 |ites%!8=|1...... |
|000002a0| 73 70 6f 70 25 2c 26 31 | 30 39 2c 73 70 72 69 74 |spop%,&1|09,sprit|
|000002b0| 65 73 25 0d 00 e6 33 c8 | 99 20 73 70 6f 70 25 2c |es%...3.|. spop%,|
|000002c0| 26 31 30 41 2c 73 70 72 | 69 74 65 73 25 2c 22 3c |&10A,spr|ites%,"<|
|000002d0| 50 61 74 69 65 6e 63 65 | 24 44 69 72 3e 2e 53 70 |Patience|$Dir>.Sp|
|000002e0| 72 69 74 65 73 22 0d 00 | f0 13 69 63 70 61 74 25 |rites"..|..icpat%|
|000002f0| 3d a4 69 63 6f 6e 62 61 | 72 0d 00 fa 10 f2 67 65 |=.iconba|r.....ge|
|00000300| 74 6d 6f 64 65 69 6e 66 | 6f 0d 01 04 05 20 0d 01 |tmodeinf|o.... ..|
|00000310| 0e 11 ee 20 85 20 f2 65 | 72 72 6f 72 62 6f 78 0d |... . .e|rrorbox.|
|00000320| 01 18 3b c8 99 20 44 72 | 61 67 2c 2c 2d 31 3a f2 |..;.. Dr|ag,,-1:.|
|00000330| 67 65 74 70 6f 69 6e 74 | 65 72 3a 78 6f 25 3d 6d |getpoint|er:xo%=m|
|00000340| 6f 75 73 65 78 25 3a 79 | 6f 25 3d 6d 6f 75 73 65 |ousex%:y|o%=mouse|
|00000350| 79 25 3a 6f 70 65 6e 25 | 3d a3 0d 01 22 05 f5 0d |y%:open%|=..."...|
|00000360| 01 2c 18 20 20 c8 99 20 | 50 6f 6c 6c 25 2c 31 2c |.,. .. |Poll%,1,|
|00000370| 71 25 20 b8 20 41 25 0d | 01 36 0d 20 20 c8 8e 20 |q% . A%.|.6. .. |
|00000380| 41 25 20 ca 0d 01 40 1e | 20 20 c9 20 31 20 3a f2 |A% ...@.| . 1 :.|
|00000390| 72 65 64 72 61 77 5f 77 | 69 6e 64 6f 77 28 21 71 |redraw_w|indow(!q|
|000003a0| 25 29 0d 01 4a 44 20 20 | c9 20 32 20 3a f2 6f 70 |%)..JD |. 2 :.op|
|000003b0| 65 6e 5f 77 69 6e 64 6f | 77 28 21 71 25 2c 71 25 |en_windo|w(!q%,q%|
|000003c0| 21 34 2c 71 25 21 38 2c | 71 25 21 31 32 2c 71 25 |!4,q%!8,|q%!12,q%|
|000003d0| 21 31 36 2c 71 25 21 32 | 30 2c 71 25 21 32 34 2c |!16,q%!2|0,q%!24,|
|000003e0| 71 25 21 32 38 29 0d 01 | 54 1d 20 20 c9 20 33 20 |q%!28)..|T. . 3 |
|000003f0| 3a f2 63 6c 6f 73 65 61 | 77 69 6e 64 6f 77 28 21 |:.closea|window(!|
|00000400| 71 25 29 0d 01 5e 37 20 | 20 c9 20 36 20 3a f2 63 |q%)..^7 | . 6 :.c|
|00000410| 68 65 63 6b 6d 6f 75 73 | 65 28 21 71 25 2c 71 25 |heckmous|e(!q%,q%|
|00000420| 21 34 2c 71 25 21 38 2c | 71 25 21 31 32 2c 71 25 |!4,q%!8,|q%!12,q%|
|00000430| 21 31 36 2c 71 25 21 32 | 30 29 0d 01 68 34 20 20 |!16,q%!2|0)..h4 |
|00000440| c9 20 37 20 3a f2 67 65 | 74 70 6f 69 6e 74 65 72 |. 7 :.ge|tpointer|
|00000450| 3a 58 25 3d 6d 6f 75 73 | 65 78 25 2d 62 78 25 3a |:X%=mous|ex%-bx%:|
|00000460| 59 25 3d 6d 6f 75 73 65 | 79 25 2d 62 79 25 0d 01 |Y%=mouse|y%-by%..|
|00000470| 72 25 20 20 e7 58 25 3e | 32 34 2b 39 2a 36 38 20 |r% .X%>|24+9*68 |
|00000480| e7 59 25 3c 2d 31 37 36 | 20 e7 59 25 3e 2d 32 35 |.Y%<-176| .Y%>-25|
|00000490| 36 20 c9 0d 01 7c 2b 20 | 20 e7 58 25 3e 3d 38 2b |6 ...|+ | .X%>=8+|
|000004a0| 37 2a 36 38 20 e7 59 25 | 3e 3d 2d 31 37 36 20 f2 |7*68 .Y%|>=-176 .|
|000004b0| 54 4f 28 53 52 43 24 2c | 22 53 22 29 3a c9 0d 01 |TO(SRC$,|"S"):...|
|000004c0| 86 2c 20 20 e7 58 25 3c | 38 2b 37 2a 36 38 20 f2 |., .X%<|8+7*68 .|
|000004d0| 54 4f 28 53 52 43 24 2c | bd 28 28 58 25 2d 38 29 |TO(SRC$,|.((X%-8)|
|000004e0| 81 36 38 2b 97 22 41 22 | 29 29 0d 01 90 1a 20 20 |.68+."A"|)).... |
|000004f0| c9 20 39 20 3a f2 6d 65 | 6e 75 73 65 6c 65 63 74 |. 9 :.me|nuselect|
|00000500| 28 71 25 29 0d 01 9a 60 | 20 20 c9 20 31 30 3a e7 |(q%)...`| . 10:.|
|00000510| 21 71 25 3d 70 61 74 25 | 20 f2 6f 70 65 6e 5f 77 |!q%=pat%| .open_w|
|00000520| 69 6e 64 6f 77 28 21 71 | 25 2c 71 25 21 34 2c 71 |indow(!q|%,q%!4,q|
|00000530| 25 21 38 2c 71 25 21 31 | 32 2c 71 25 21 31 36 2c |%!8,q%!1|2,q%!16,|
|00000540| 71 25 21 32 30 2b 33 32 | 2a 71 25 21 33 32 2c 71 |q%!20+32|*q%!32,q|
|00000550| 25 21 32 34 2b 36 34 2a | 71 25 21 33 36 2c 71 25 |%!24+64*|q%!36,q%|
|00000560| 21 32 38 29 0d 01 a4 1a | 20 20 c9 20 31 37 2c 31 |!28)....| . 17,1|
|00000570| 38 3a f2 72 65 63 65 69 | 76 65 28 71 25 29 0d 01 |8:.recei|ve(q%)..|
|00000580| ae 07 20 20 cb 0d 01 b8 | 07 fd 20 a3 0d 01 c2 05 |.. ....|.. .....|
|00000590| 20 0d 01 cc 12 dd 20 f2 | 72 65 63 65 69 76 65 28 | ..... .|receive(|
|000005a0| 71 25 29 0d 01 d6 0e c8 | 8e 20 71 25 21 31 36 20 |q%).....|. q%!16 |
|000005b0| ca 0d 01 e0 11 c9 20 30 | 3a f2 66 69 6e 69 73 68 |...... 0|:.finish|
|000005c0| 3a e0 0d 01 ea 19 c9 20 | 26 34 30 30 43 31 3a f2 |:...... |&400C1:.|
|000005d0| 67 65 74 6d 6f 64 65 69 | 6e 66 6f 0d 01 f4 05 cb |getmodei|nfo.....|
|000005e0| 0d 01 fe 05 e1 0d 02 08 | 05 20 0d 02 12 0e dd 20 |........|. ..... |
|000005f0| a4 63 77 69 6e 64 6f 77 | 0d 02 1c 3f f3 20 41 24 |.cwindow|...?. A$|
|00000600| 2c 66 25 2c 66 63 25 2c | 62 63 25 2c 78 30 25 2c |,f%,fc%,|bc%,x0%,|
|00000610| 79 30 25 2c 78 31 25 2c | 79 31 25 2c 63 78 30 25 |y0%,x1%,|y1%,cx0%|
|00000620| 2c 63 79 30 25 2c 63 78 | 31 25 2c 63 79 31 25 2c |,cy0%,cx|1%,cy1%,|
|00000630| 6e 69 63 6f 6e 73 25 0d | 02 26 56 3d a4 63 72 65 |nicons%.|.&V=.cre|
|00000640| 61 74 65 5f 77 69 6e 64 | 6f 77 28 63 78 30 25 2c |ate_wind|ow(cx0%,|
|00000650| 63 79 30 25 2c 63 78 31 | 25 2c 63 79 31 25 2c 30 |cy0%,cx1|%,cy1%,0|
|00000660| 2c 30 2c 66 25 2c 66 63 | 25 2c 62 63 25 2c 78 30 |,0,f%,fc|%,bc%,x0|
|00000670| 25 2c 79 30 25 2c 78 31 | 25 2c 79 31 25 2c 26 32 |%,y0%,x1|%,y1%,&2|
|00000680| 44 2c 41 24 2c 6e 69 63 | 6f 6e 73 25 29 0d 02 30 |D,A$,nic|ons%)..0|
|00000690| 05 20 0d 02 3a 37 dd 20 | f2 63 68 65 63 6b 6d 6f |. ..:7. |.checkmo|
|000006a0| 75 73 65 28 6d 6f 75 73 | 65 78 25 2c 6d 6f 75 73 |use(mous|ex%,mous|
|000006b0| 65 79 25 2c 62 25 2c 68 | 61 6e 64 6c 65 25 2c 69 |ey%,b%,h|andle%,i|
|000006c0| 63 6f 6e 25 2c 6f 62 25 | 29 0d 02 44 0b e7 62 25 |con%,ob%|)..D..b%|
|000006d0| 80 32 20 8c 0d 02 4e 12 | 20 20 c8 8e 20 68 61 6e |.2 ...N.| .. han|
|000006e0| 64 6c 65 25 20 ca 0d 02 | 58 38 20 20 c9 20 70 61 |dle% ...|X8 . pa|
|000006f0| 74 25 3a f2 64 6f 6d 65 | 6e 75 28 70 61 74 25 2c |t%:.dome|nu(pat%,|
|00000700| 22 44 65 61 6c 20 48 61 | 6e 64 2c 52 65 73 69 67 |"Deal Ha|nd,Resig|
|00000710| 6e 22 2c 22 50 61 74 69 | 65 6e 63 65 22 29 0d 02 |n","Pati|ence")..|
|00000720| 62 2b 20 20 c9 20 2d 32 | 3a 20 20 f2 64 6f 6d 65 |b+ . -2|: .dome|
|00000730| 6e 75 28 31 30 31 2c 22 | 51 75 69 74 22 2c 22 50 |nu(101,"|Quit","P|
|00000740| 61 74 69 65 6e 63 65 22 | 29 0d 02 6c 07 20 20 cb |atience"|)..l. .|
|00000750| 0d 02 76 05 cd 0d 02 80 | 0b e7 62 25 80 34 20 8c |..v.....|..b%.4 .|
|00000760| 0d 02 8a 20 20 20 e7 68 | 61 6e 64 6c 65 25 3e 2d |... .h|andle%>-|
|00000770| 31 8c f2 67 65 74 77 28 | 68 61 6e 64 6c 65 25 29 |1..getw(|handle%)|
|00000780| 0d 02 94 12 20 20 c8 8e | 20 68 61 6e 64 6c 65 25 |.... ..| handle%|
|00000790| 20 ca 0d 02 9e 0c 20 20 | c9 20 70 61 74 25 0d 02 | ..... |. pat%..|
|000007a0| a8 23 20 20 58 25 3d 6d | 6f 75 73 65 78 25 2d 62 |.# X%=m|ousex%-b|
|000007b0| 78 25 3a 59 25 3d 6d 6f | 75 73 65 79 25 2d 62 79 |x%:Y%=mo|usey%-by|
|000007c0| 25 0d 02 b2 2d 20 20 e7 | 58 25 3e 3d 32 34 2b 39 |%...- .|X%>=24+9|
|000007d0| 2a 36 38 20 e7 59 25 3c | 2d 31 37 36 20 e7 59 25 |*68 .Y%<|-176 .Y%|
|000007e0| 3e 3d 2d 32 35 36 20 f2 | 4e 45 58 54 3a c9 0d 02 |>=-256 .|NEXT:...|
|000007f0| bc 38 20 20 e7 70 6c 61 | 79 20 e7 58 25 3e 3d 32 |.8 .pla|y .X%>=2|
|00000800| 34 2b 38 2a 36 38 20 e7 | 59 25 3c 2d 31 37 36 20 |4+8*68 .|Y%<-176 |
|00000810| e7 59 25 3e 3d 2d 32 35 | 36 20 f2 46 52 4f 4d 28 |.Y%>=-25|6 .FROM(|
|00000820| 22 50 22 29 3a c9 0d 02 | c6 31 20 20 e7 70 6c 61 |"P"):...|.1 .pla|
|00000830| 79 20 e7 58 25 3c 38 2b | 37 2a 36 38 20 f2 46 52 |y .X%<8+|7*68 .FR|
|00000840| 4f 4d 28 bd 28 28 58 25 | 2d 38 29 81 36 38 2b 97 |OM(.((X%|-8).68+.|
|00000850| 22 41 22 29 29 3a c9 0d | 02 d0 36 20 20 c9 20 2d |"A")):..|..6 . -|
|00000860| 32 3a e7 6f 70 65 6e 25 | 20 f2 66 72 6f 6e 74 28 |2:.open%| .front(|
|00000870| 70 61 74 25 29 20 8b 20 | f2 72 65 6f 70 65 6e 28 |pat%) . |.reopen(|
|00000880| 70 61 74 25 29 3a 6f 70 | 65 6e 25 3d b9 0d 02 da |pat%):op|en%=....|
|00000890| 07 20 20 cb 0d 02 e4 05 | cd 0d 02 ee 0b e7 62 25 |. .....|......b%|
|000008a0| 80 31 20 8c 0d 02 f8 20 | 20 20 e7 68 61 6e 64 6c |.1 .... | .handl|
|000008b0| 65 25 3e 2d 31 8c f2 67 | 65 74 77 28 68 61 6e 64 |e%>-1..g|etw(hand|
|000008c0| 6c 65 25 29 0d 03 02 12 | 20 20 c8 8e 20 68 61 6e |le%)....| .. han|
|000008d0| 64 6c 65 25 20 ca 0d 03 | 0c 0c 20 20 c9 20 70 61 |dle% ...|.. . pa|
|000008e0| 74 25 0d 03 16 23 20 20 | 58 25 3d 6d 6f 75 73 65 |t%...# |X%=mouse|
|000008f0| 78 25 2d 62 78 25 3a 59 | 25 3d 6d 6f 75 73 65 79 |x%-bx%:Y|%=mousey|
|00000900| 25 2d 62 79 25 0d 03 20 | 48 20 20 e7 70 6c 61 79 |%-by%.. |H .play|
|00000910| 20 e7 58 25 3e 3d 32 34 | 2b 38 2a 36 38 20 e7 59 | .X%>=24|+8*68 .Y|
|00000920| 25 3c 2d 31 37 36 20 e7 | 59 25 3e 3d 2d 32 35 36 |%<-176 .|Y%>=-256|
|00000930| 20 e7 ac a4 46 52 4f 4d | 28 22 50 22 29 20 f2 54 | ...FROM|("P") .T|
|00000940| 4f 28 53 52 43 24 2c 22 | 53 22 29 3a c9 0d 03 2a |O(SRC$,"|S"):...*|
|00000950| 41 20 20 e7 70 6c 61 79 | 20 e7 58 25 3c 38 2b 37 |A .play| .X%<8+7|
|00000960| 2a 36 38 20 e7 ac a4 46 | 52 4f 4d 28 bd 28 28 58 |*68 ...F|ROM(.((X|
|00000970| 25 2d 38 29 81 36 38 2b | 97 22 41 22 29 29 20 f2 |%-8).68+|."A")) .|
|00000980| 54 4f 28 53 52 43 24 2c | 22 53 22 29 3a c9 0d 03 |TO(SRC$,|"S"):...|
|00000990| 34 36 20 20 c9 20 2d 32 | 3a e7 6f 70 65 6e 25 20 |46 . -2|:.open% |
|000009a0| f2 66 72 6f 6e 74 28 70 | 61 74 25 29 20 8b 20 f2 |.front(p|at%) . .|
|000009b0| 72 65 6f 70 65 6e 28 70 | 61 74 25 29 3a 6f 70 65 |reopen(p|at%):ope|
|000009c0| 6e 25 3d b9 0d 03 3e 07 | 20 20 cb 0d 03 48 05 cd |n%=...>.| ...H..|
|000009d0| 0d 03 52 05 e1 0d 03 5c | 05 20 0d 03 66 1c dd 20 |..R....\|. ..f.. |
|000009e0| f2 63 6c 6f 73 65 61 77 | 69 6e 64 6f 77 28 68 61 |.closeaw|indow(ha|
|000009f0| 6e 64 6c 65 25 29 0d 03 | 70 12 f2 67 65 74 77 28 |ndle%)..|p..getw(|
|00000a00| 68 61 6e 64 6c 65 25 29 | 0d 03 7a 1b 78 6f 25 3d |handle%)|..z.xo%=|
|00000a10| 78 30 25 3a 79 6f 25 3d | 79 30 25 3a 6f 70 65 6e |x0%:yo%=|y0%:open|
|00000a20| 25 3d a3 0d 03 84 1a f2 | 63 6c 6f 73 65 5f 77 69 |%=......|close_wi|
|00000a30| 6e 64 6f 77 28 68 61 6e | 64 6c 65 25 29 0d 03 8e |ndow(han|dle%)...|
|00000a40| 05 e1 0d 03 98 05 20 0d | 03 a2 0d dd 20 f2 66 69 |...... .|.... .fi|
|00000a50| 6e 69 73 68 0d 03 ac 17 | c8 99 20 22 57 69 6d 70 |nish....|.. "Wimp|
|00000a60| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 0d 03 b6 05 e1 |_CloseDo|wn".....|
|00000a70| 0d 03 c0 05 20 0d 03 ca | 27 dd 20 f2 64 6f 6d 65 |.... ...|'. .dome|
|00000a80| 6e 75 28 68 61 6e 64 6c | 65 25 2c 6d 65 6e 75 24 |nu(handl|e%,menu$|
|00000a90| 2c 6d 65 6e 75 74 69 74 | 6c 65 24 29 0d 03 d4 17 |,menutit|le$)....|
|00000aa0| 6d 65 6e 75 68 61 6e 64 | 6c 65 25 3d 68 61 6e 64 |menuhand|le%=hand|
|00000ab0| 6c 65 25 0d 03 de 14 6d | 65 6e 75 70 74 72 25 3d |le%....m|enuptr%=|
|00000ac0| 62 75 66 66 65 72 25 0d | 03 e8 08 69 25 3d 30 0d |buffer%.|...i%=0.|
|00000ad0| 03 f2 12 6d 65 6e 75 70 | 74 72 25 21 32 30 3d 34 |...menup|tr%!20=4|
|00000ae0| 30 0d 03 fc 18 24 6d 65 | 6e 75 70 74 72 25 3d 6d |0....$me|nuptr%=m|
|00000af0| 65 6e 75 74 69 74 6c 65 | 24 0d 04 06 4a 6d 65 6e |enutitle|$...Jmen|
|00000b00| 75 70 74 72 25 3f 31 32 | 3d 60 74 66 63 6f 6c 3a |uptr%?12|=`tfcol:|
|00000b10| 6d 65 6e 75 70 74 72 25 | 3f 31 33 3d 32 3a 6d 65 |menuptr%|?13=2:me|
|00000b20| 6e 75 70 74 72 25 3f 31 | 34 3d 60 77 66 63 6f 6c |nuptr%?1|4=`wfcol|
|00000b30| 3a 6d 65 6e 75 70 74 72 | 25 3f 31 35 3d 60 77 62 |:menuptr|%?15=`wb|
|00000b40| 63 6f 6c 0d 04 10 24 6d | 65 6e 75 70 74 72 25 21 |col...$m|enuptr%!|
|00000b50| 31 36 3d 31 38 30 2d 32 | 34 3a 6d 65 6e 75 70 74 |16=180-2|4:menupt|
|00000b60| 72 25 21 32 34 3d 30 0d | 04 1a 10 6d 65 6e 75 70 |r%!24=0.|...menup|
|00000b70| 74 72 25 2b 3d 32 38 0d | 04 24 31 f5 20 69 74 65 |tr%+=28.|.$1. ite|
|00000b80| 6d 24 3d a4 70 61 72 28 | 22 2c 22 29 3a f2 6d 65 |m$=.par(|","):.me|
|00000b90| 6e 75 69 74 65 6d 28 69 | 74 65 6d 24 29 3a fd 20 |nuitem(i|tem$):. |
|00000ba0| 69 74 65 6d 24 3d 22 22 | 0d 04 2e 23 6d 65 6e 75 |item$=""|...#menu|
|00000bb0| 70 74 72 25 21 2d 32 34 | 3d 28 6d 65 6e 75 70 74 |ptr%!-24|=(menupt|
|00000bc0| 72 25 21 2d 32 34 29 84 | 26 38 30 0d 04 38 5f e7 |r%!-24).|&80..8_.|
|00000bd0| 68 61 6e 64 6c 65 25 3d | 31 30 31 20 c8 99 20 43 |handle%=|101 .. C|
|00000be0| 72 4d 65 6e 75 2c 2c 62 | 75 66 66 65 72 25 2c 6d |rMenu,,b|uffer%,m|
|00000bf0| 6f 75 73 65 78 25 2d 33 | 32 2c 39 36 2b 34 30 20 |ousex%-3|2,96+40 |
|00000c00| 8b 20 c8 99 20 43 72 4d | 65 6e 75 2c 2c 62 75 66 |. .. CrM|enu,,buf|
|00000c10| 66 65 72 25 2c 6d 6f 75 | 73 65 78 25 2d 33 32 2c |fer%,mou|sex%-32,|
|00000c20| 6d 6f 75 73 65 79 25 2b | 31 36 0d 04 42 05 e1 0d |mousey%+|16..B...|
|00000c30| 04 4c 05 20 0d 04 56 16 | dd 20 f2 6d 65 6e 75 69 |.L. ..V.|. .menui|
|00000c40| 74 65 6d 28 74 65 78 74 | 24 29 0d 04 60 10 e7 20 |tem(text|$)..`.. |
|00000c50| 74 65 78 74 24 3d 22 22 | 20 e1 0d 04 6a 10 6d 65 |text$=""| ...j.me|
|00000c60| 6e 75 70 74 72 25 21 30 | 3d 30 0d 04 74 11 6d 65 |nuptr%!0|=0..t.me|
|00000c70| 6e 75 70 74 72 25 21 34 | 3d 2d 31 0d 04 7e 18 6d |nuptr%!4|=-1..~.m|
|00000c80| 65 6e 75 70 74 72 25 21 | 38 3d 26 30 37 30 30 30 |enuptr%!|8=&07000|
|00000c90| 30 32 31 0d 04 88 18 24 | 28 6d 65 6e 75 70 74 72 |021....$|(menuptr|
|00000ca0| 25 2b 31 32 29 3d 74 65 | 78 74 24 0d 04 92 10 6d |%+12)=te|xt$....m|
|00000cb0| 65 6e 75 70 74 72 25 2b | 3d 32 34 0d 04 9c 05 e1 |enuptr%+|=24.....|
|00000cc0| 0d 04 a6 05 20 0d 04 b0 | 10 dd 20 a4 70 61 72 28 |.... ...|.. .par(|
|00000cd0| 73 65 70 24 29 0d 04 ba | 25 69 31 25 3d 69 25 2b |sep$)...|%i1%=i%+|
|00000ce0| 31 3a 69 25 3d a7 6d 65 | 6e 75 24 2b 73 65 70 24 |1:i%=.me|nu$+sep$|
|00000cf0| 2c 73 65 70 24 2c 69 31 | 25 29 0d 04 c4 17 3d c1 |,sep$,i1|%)....=.|
|00000d00| 6d 65 6e 75 24 2c 69 31 | 25 2c 69 25 2d 69 31 25 |menu$,i1|%,i%-i1%|
|00000d10| 29 0d 04 ce 05 20 0d 04 | d8 19 dd 20 f2 6d 65 6e |).... ..|... .men|
|00000d20| 75 73 65 6c 65 63 74 28 | 6d 65 6e 75 73 25 29 0d |uselect(|menus%).|
|00000d30| 04 e2 2d c8 99 20 44 63 | 4d 65 6e 75 2c 2c 62 75 |..-.. Dc|Menu,,bu|
|00000d40| 66 66 65 72 25 2c 6d 65 | 6e 75 73 25 2c c4 32 30 |ffer%,me|nus%,.20|
|00000d50| 30 2c 22 20 22 29 b8 2c | 2c 2c 61 24 0d 04 ec 0f |0," ").,|,,a$....|
|00000d60| e7 20 61 24 3d 22 22 20 | 8c 20 e1 0d 04 f6 14 c8 |. a$="" |. ......|
|00000d70| 8e 20 6d 65 6e 75 68 61 | 6e 64 6c 65 25 20 ca 0d |. menuha|ndle% ..|
|00000d80| 05 00 0a c9 20 70 61 74 | 25 0d 05 0a 15 20 20 e7 |.... pat|%.... .|
|00000d90| 20 61 24 3d 22 52 65 73 | 69 67 6e 22 20 8c 0d 05 | a$="Res|ign" ...|
|00000da0| 14 1d 20 20 20 20 e3 49 | 25 3d 31 b8 37 3a e3 4a |.. .I|%=1.7:.J|
|00000db0| 25 3d 31 b8 a9 41 24 28 | 49 25 29 0d 05 1e 31 20 |%=1..A$(|I%)...1 |
|00000dc0| 20 20 20 20 20 c1 41 24 | 28 49 25 29 2c 4a 25 2c | .A$|(I%),J%,|
|00000dd0| 31 29 3d bd 28 97 c1 41 | 24 28 49 25 29 2c 4a 25 |1)=.(..A|$(I%),J%|
|00000de0| 2c 31 29 80 31 32 37 29 | 3a ed 3a ed 0d 05 28 23 |,1).127)|:.:...(#|
|00000df0| 20 20 20 20 f2 72 65 64 | 72 61 77 5f 77 69 6e 64 | .red|raw_wind|
|00000e00| 6f 77 28 70 61 74 25 29 | 3a 70 6c 61 79 3d a3 0d |ow(pat%)|:play=..|
|00000e10| 05 32 07 20 20 cd 0d 05 | 3c 18 20 20 e7 20 61 24 |.2. ...|<. . a$|
|00000e20| 3d 22 44 65 61 6c 20 48 | 61 6e 64 22 20 8c 0d 05 |="Deal H|and" ...|
|00000e30| 46 25 20 20 20 20 f2 53 | 48 55 46 46 4c 45 3a f2 |F% .S|HUFFLE:.|
|00000e40| 72 65 64 72 61 77 5f 77 | 69 6e 64 6f 77 28 70 61 |redraw_w|indow(pa|
|00000e50| 74 25 29 0d 05 50 07 20 | 20 cd 0d 05 5a 09 c9 20 |t%)..P. | ...Z.. |
|00000e60| 31 30 31 0d 05 64 1b 20 | 20 e7 20 61 24 3d 22 51 |101..d. | . a$="Q|
|00000e70| 75 69 74 22 3a f2 66 69 | 6e 69 73 68 3a e0 0d 05 |uit":.fi|nish:...|
|00000e80| 6e 05 cb 0d 05 78 05 e1 | 0d 05 82 05 20 0d 05 8c |n....x..|.... ...|
|00000e90| 0a dd 20 f2 70 61 74 0d | 05 96 0c c8 95 20 6d 6f |.. .pat.|..... mo|
|00000ea0| 72 65 25 0d 05 a0 1d 20 | 20 6f 78 30 25 3d 28 71 |re%.... | ox0%=(q|
|00000eb0| 25 21 32 38 2d 28 62 78 | 25 2b 38 29 29 81 36 38 |%!28-(bx|%+8)).68|
|00000ec0| 0d 05 aa 2c 20 20 6f 78 | 31 25 3d 28 71 25 21 33 |..., ox|1%=(q%!3|
|00000ed0| 36 2d 28 62 78 25 2b 38 | 29 29 81 36 38 3a e7 6f |6-(bx%+8|)).68:.o|
|00000ee0| 78 31 25 3e 36 20 6f 78 | 31 25 3d 36 0d 05 b4 40 |x1%>6 ox|1%=6...@|
|00000ef0| 20 20 e7 6f 78 30 25 3c | 37 20 e3 5a 25 3d 6f 78 | .ox0%<|7 .Z%=ox|
|00000f00| 30 25 b8 6f 78 31 25 3a | f2 50 49 4c 45 28 41 24 |0%.ox1%:|.PILE(A$|
|00000f10| 28 5a 25 2b 31 29 2c 62 | 78 25 2b 38 2b 5a 25 2a |(Z%+1),b|x%+8+Z%*|
|00000f20| 36 38 2c 62 79 25 2d 39 | 36 29 3a ed 0d 05 be 2d |68,by%-9|6):....-|
|00000f30| 20 20 6f 78 30 25 3d 28 | 71 25 21 32 38 2d 62 78 | ox0%=(|q%!28-bx|
|00000f40| 25 2d 32 34 29 81 36 38 | 2d 37 3a e7 6f 78 30 25 |%-24).68|-7:.ox0%|
|00000f50| 3c 30 20 6f 78 30 25 3d | 30 0d 05 c8 2d 20 20 6f |<0 ox0%=|0...- o|
|00000f60| 78 31 25 3d 28 71 25 21 | 33 36 2d 62 78 25 2d 32 |x1%=(q%!|36-bx%-2|
|00000f70| 34 29 81 36 38 2d 37 3a | e7 6f 78 31 25 3e 33 20 |4).68-7:|.ox1%>3 |
|00000f80| 6f 78 31 25 3d 33 0d 05 | d2 4d 20 20 e7 6f 78 31 |ox1%=3..|.M .ox1|
|00000f90| 25 3e 2d 31 20 e7 6f 78 | 30 25 3c 34 20 e3 49 25 |%>-1 .ox|0%<4 .I%|
|00000fa0| 3d 6f 78 30 25 b8 6f 78 | 31 25 3a f2 43 41 52 44 |=ox0%.ox|1%:.CARD|
|00000fb0| 28 53 25 28 49 25 29 2c | 62 78 25 2b 28 37 2b 49 |(S%(I%),|bx%+(7+I|
|00000fc0| 25 29 2a 36 38 2b 32 34 | 2c 62 79 25 2d 31 32 38 |%)*68+24|,by%-128|
|00000fd0| 29 3a ed 0d 05 dc 10 20 | 20 e7 20 a9 50 41 43 4b |):..... | . .PACK|
|00000fe0| 24 20 8c 0d 05 e6 2b 20 | 20 20 20 c8 99 43 6f 6c |$ ....+ | ..Col|
|00000ff0| 25 2c 37 3a ec 62 78 25 | 2b 39 2a 36 38 2c 62 79 |%,7:.bx%|+9*68,by|
|00001000| 25 2d 32 38 30 3a f1 a9 | 50 41 43 4b 24 3b 0d 05 |%-280:..|PACK$;..|
|00001010| f0 51 20 20 20 20 e7 50 | 4c 41 43 45 3d a9 50 41 |.Q .P|LACE=.PA|
|00001020| 43 4b 24 20 f2 43 41 52 | 44 48 4f 4c 45 28 62 78 |CK$ .CAR|DHOLE(bx|
|00001030| 25 2b 32 34 2b 39 2a 36 | 38 2c 62 79 25 2d 32 35 |%+24+9*6|8,by%-25|
|00001040| 36 29 20 8b 20 f2 42 41 | 43 4b 28 62 78 25 2b 32 |6) . .BA|CK(bx%+2|
|00001050| 34 2b 39 2a 36 38 2c 62 | 79 25 2d 32 35 36 29 0d |4+9*68,b|y%-256).|
|00001060| 05 fa 5b 20 20 20 20 e7 | 50 4c 41 43 45 3e 30 20 |..[ .|PLACE>0 |
|00001070| f2 43 41 52 44 28 97 c1 | 50 41 43 4b 24 2c 50 4c |.CARD(..|PACK$,PL|
|00001080| 41 43 45 2c 31 29 2c 62 | 78 25 2b 32 34 2b 38 2a |ACE,1),b|x%+24+8*|
|00001090| 36 38 2c 62 79 25 2d 32 | 35 36 29 20 8b 20 f2 4e |68,by%-2|56) . .N|
|000010a0| 4f 43 41 52 44 28 62 78 | 25 2b 32 34 2b 38 2a 36 |OCARD(bx|%+24+8*6|
|000010b0| 38 2c 62 79 25 2d 32 35 | 36 29 0d 06 04 07 20 20 |8,by%-25|6).... |
|000010c0| cc 0d 06 0e 41 20 20 20 | 20 f2 4e 4f 43 41 52 44 |....A | .NOCARD|
|000010d0| 28 62 78 25 2b 32 34 2b | 39 2a 36 38 2c 62 79 25 |(bx%+24+|9*68,by%|
|000010e0| 2d 32 35 36 29 3a f2 4e | 4f 43 41 52 44 28 62 78 |-256):.N|OCARD(bx|
|000010f0| 25 2b 32 34 2b 38 2a 36 | 38 2c 62 79 25 2d 32 35 |%+24+8*6|8,by%-25|
|00001100| 36 29 0d 06 18 07 20 20 | cd 0d 06 22 1a 20 20 c8 |6).... |...". .|
|00001110| 99 20 47 65 74 52 25 2c | 2c 71 25 20 b8 20 6d 6f |. GetR%,|,q% . mo|
|00001120| 72 65 25 0d 06 2c 05 ce | 0d 06 36 05 e1 0d 06 40 |re%..,..|..6....@|
|00001130| 05 20 0d 06 4a 6d dd 20 | a4 63 72 65 61 74 65 5f |. ..Jm. |.create_|
|00001140| 77 69 6e 64 6f 77 28 63 | 78 30 25 2c 63 79 30 25 |window(c|x0%,cy0%|
|00001150| 2c 63 78 31 25 2c 63 79 | 31 25 2c 73 63 78 25 2c |,cx1%,cy|1%,scx%,|
|00001160| 73 63 79 25 2c 66 6c 61 | 67 73 25 2c 66 63 25 2c |scy%,fla|gs%,fc%,|
|00001170| 62 63 25 2c 73 78 30 25 | 2c 73 79 30 25 2c 73 78 |bc%,sx0%|,sy0%,sx|
|00001180| 31 25 2c 73 79 31 25 2c | 74 69 74 6c 65 66 25 2c |1%,sy1%,|titlef%,|
|00001190| 74 69 74 6c 65 24 2c 6e | 69 63 6f 6e 73 25 29 0d |title$,n|icons%).|
|000011a0| 06 54 41 21 71 25 3d 63 | 78 30 25 3a 71 25 21 34 |.TA!q%=c|x0%:q%!4|
|000011b0| 3d 63 79 30 25 3a 71 25 | 21 38 3d 63 78 31 25 3a |=cy0%:q%|!8=cx1%:|
|000011c0| 71 25 21 31 32 3d 63 79 | 31 25 3a 71 25 21 31 36 |q%!12=cy|1%:q%!16|
|000011d0| 3d 73 63 78 25 3a 71 25 | 21 32 30 3d 73 63 79 25 |=scx%:q%|!20=scy%|
|000011e0| 0d 06 5e 19 71 25 21 32 | 34 3d 2d 31 3a 71 25 21 |..^.q%!2|4=-1:q%!|
|000011f0| 32 38 3d 66 6c 61 67 73 | 25 0d 06 68 13 e7 66 63 |28=flags|%..h..fc|
|00001200| 25 3d 31 35 80 62 63 25 | 3d 31 35 8c 0d 06 72 2b |%=15.bc%|=15...r+|
|00001210| 20 20 71 25 3f 33 32 3d | 31 35 3a 71 25 3f 33 33 | q%?32=|15:q%?33|
|00001220| 3d 31 35 3a 71 25 3f 33 | 34 3d 66 63 25 3a 71 25 |=15:q%?3|4=fc%:q%|
|00001230| 3f 33 35 3d 62 63 25 0d | 06 7c 33 cc 20 71 25 3f |?35=bc%.|.|3. q%?|
|00001240| 33 32 3d 60 74 66 63 6f | 6c 3a 71 25 3f 33 33 3d |32=`tfco|l:q%?33=|
|00001250| 60 74 62 63 6f 6c 3a 71 | 25 3f 33 34 3d 66 63 25 |`tbcol:q|%?34=fc%|
|00001260| 3a 71 25 3f 33 35 3d 62 | 63 25 0d 06 86 05 cd 0d |:q%?35=b|c%......|
|00001270| 06 90 2f 71 25 3f 33 36 | 3d 60 73 63 6f 3a 71 25 |../q%?36|=`sco:q%|
|00001280| 3f 33 37 3d 60 73 63 69 | 3a 71 25 3f 33 38 3d 60 |?37=`sci|:q%?38=`|
|00001290| 74 62 63 6f 6c 32 3a 71 | 25 3f 33 39 3d 30 0d 06 |tbcol2:q|%?39=0..|
|000012a0| 9a 2f 71 25 21 34 30 3d | 73 78 30 25 3a 71 25 21 |./q%!40=|sx0%:q%!|
|000012b0| 34 34 3d 73 79 30 25 3a | 71 25 21 34 38 3d 73 78 |44=sy0%:|q%!48=sx|
|000012c0| 31 25 3a 71 25 21 35 32 | 3d 73 79 31 25 0d 06 a4 |1%:q%!52|=sy1%...|
|000012d0| 11 71 25 21 35 36 3d 74 | 69 74 6c 65 66 25 0d 06 |.q%!56=t|itlef%..|
|000012e0| ae 28 71 25 21 36 30 3d | 26 33 30 30 30 20 20 20 |.(q%!60=|&3000 |
|000012f0| 20 20 20 3a 20 f4 20 77 | 6f 72 6b 20 61 72 65 61 | : . w|ork area|
|00001300| 20 66 6c 61 67 73 0d 06 | b8 21 71 25 21 36 34 3d | flags..|.!q%!64=|
|00001310| 30 3a 71 25 21 36 38 3d | 30 20 20 3a 20 f4 20 72 |0:q%!68=|0 : . r|
|00001320| 65 73 65 72 76 65 64 0d | 06 c2 18 24 28 71 25 2b |eserved.|...$(q%+|
|00001330| 37 32 29 3d c0 74 69 74 | 6c 65 24 2c 31 31 29 0d |72)=.tit|le$,11).|
|00001340| 06 cc 11 71 25 21 38 34 | 3d 6e 69 63 6f 6e 73 25 |...q%!84|=nicons%|
|00001350| 0d 06 d6 29 ea 49 25 2c | 78 30 25 2c 79 30 25 2c |...).I%,|x0%,y0%,|
|00001360| 78 31 25 2c 79 31 25 2c | 66 25 2c 64 61 74 61 24 |x1%,y1%,|f%,data$|
|00001370| 3a 49 25 3d 71 25 2b 38 | 38 0d 06 e0 10 c8 95 20 |:I%=q%+8|8...... |
|00001380| 6e 69 63 6f 6e 73 25 3e | 30 0d 06 ea 28 20 20 f3 |nicons%>|0...( .|
|00001390| 20 78 30 25 2c 79 30 25 | 2c 78 31 25 2c 79 31 25 | x0%,y0%|,x1%,y1%|
|000013a0| 2c 66 25 2c 66 63 25 2c | 62 63 25 2c 64 61 74 61 |,f%,fc%,|bc%,data|
|000013b0| 24 0d 06 f4 2a 20 20 49 | 25 21 30 3d 78 30 25 3a |$...* I|%!0=x0%:|
|000013c0| 49 25 21 34 3d 79 30 25 | 3a 49 25 21 38 3d 78 31 |I%!4=y0%|:I%!8=x1|
|000013d0| 25 3a 49 25 21 31 32 3d | 79 31 25 0d 06 fe 25 20 |%:I%!12=|y1%...% |
|000013e0| 20 e7 20 28 66 25 80 26 | 34 30 29 3d 30 20 8c 20 | . (f%.&|40)=0 . |
|000013f0| 62 63 25 3d 66 63 25 2b | 28 62 63 25 3c 3c 34 29 |bc%=fc%+|(bc%<<4)|
|00001400| 0d 07 08 18 20 20 49 25 | 21 31 36 3d 66 25 2b 28 |.... I%|!16=f%+(|
|00001410| 62 63 25 3c 3c 32 34 29 | 0d 07 12 11 20 20 e7 28 |bc%<<24)|.... .(|
|00001420| 66 25 80 26 31 30 30 29 | 8c 0d 07 1c 40 20 20 20 |f%.&100)|....@ |
|00001430| 20 f3 20 4c 25 3a 42 25 | 3d a4 62 75 66 66 65 72 | . L%:B%|=.buffer|
|00001440| 28 4c 25 29 3a 49 25 21 | 32 30 3d 42 25 3a 24 42 |(L%):I%!|20=B%:$B|
|00001450| 25 3d 64 61 74 61 24 3a | 49 25 21 32 34 3d 2d 31 |%=data$:|I%!24=-1|
|00001460| 3a 49 25 21 32 38 3d 4c | 25 0d 07 26 07 20 20 cc |:I%!28=L|%..&. .|
|00001470| 0d 07 30 16 20 20 20 20 | 24 28 49 25 2b 32 30 29 |..0. |$(I%+20)|
|00001480| 3d 64 61 74 61 24 0d 07 | 3a 07 20 20 cd 0d 07 44 |=data$..|:. ...D|
|00001490| 20 20 20 49 25 3d 49 25 | 2b 33 32 3a 6e 69 63 6f | I%=I%|+32:nico|
|000014a0| 6e 73 25 3d 6e 69 63 6f | 6e 73 25 2d 31 0d 07 4e |ns%=nico|ns%-1..N|
|000014b0| 05 ce 0d 07 58 1d 20 c8 | 99 20 43 72 65 61 74 65 |....X. .|. Create|
|000014c0| 57 2c 2c 71 25 20 b8 20 | 68 61 6e 64 6c 65 25 0d |W,,q% . |handle%.|
|000014d0| 07 62 0c 3d 68 61 6e 64 | 6c 65 25 0d 07 6c 05 20 |.b.=hand|le%..l. |
|000014e0| 0d 07 76 15 dd 20 f2 66 | 72 6f 6e 74 28 68 61 6e |..v.. .f|ront(han|
|000014f0| 64 6c 65 25 29 0d 07 80 | 11 e7 68 61 6e 64 6c 65 |dle%)...|..handle|
|00001500| 25 3d 2d 31 8c e1 0d 07 | 8a 12 f2 67 65 74 77 28 |%=-1....|...getw(|
|00001510| 68 61 6e 64 6c 65 25 29 | 0d 07 94 36 f2 6f 70 65 |handle%)|...6.ope|
|00001520| 6e 5f 77 69 6e 64 6f 77 | 28 68 61 6e 64 6c 65 25 |n_window|(handle%|
|00001530| 2c 78 30 25 2c 79 30 25 | 2c 78 31 25 2c 79 31 25 |,x0%,y0%|,x1%,y1%|
|00001540| 2c 73 63 78 25 2c 73 63 | 79 25 2c 2d 31 29 0d 07 |,scx%,sc|y%,-1)..|
|00001550| 9e 05 e1 0d 07 a8 05 20 | 0d 07 b2 15 dd 20 f2 70 |....... |..... .p|
|00001560| 6f 70 75 70 28 68 61 6e | 64 6c 65 25 29 0d 07 bc |opup(han|dle%)...|
|00001570| 12 f2 67 65 74 77 28 68 | 61 6e 64 6c 65 25 29 0d |..getw(h|andle%).|
|00001580| 07 c6 30 78 6f 25 3d 6d | 6f 75 73 65 78 25 2d 28 |..0xo%=m|ousex%-(|
|00001590| 78 30 25 2b 78 31 25 29 | 2f 32 3a 79 6f 25 3d 6d |x0%+x1%)|/2:yo%=m|
|000015a0| 6f 75 73 65 79 25 2d 28 | 79 31 25 2b 36 34 29 0d |ousey%-(|y1%+64).|
|000015b0| 07 d0 46 f2 6f 70 65 6e | 5f 77 69 6e 64 6f 77 28 |..F.open|_window(|
|000015c0| 68 61 6e 64 6c 65 25 2c | 78 30 25 2b 78 6f 25 2c |handle%,|x0%+xo%,|
|000015d0| 79 30 25 2b 79 6f 25 2c | 78 31 25 2b 78 6f 25 2c |y0%+yo%,|x1%+xo%,|
|000015e0| 79 31 25 2b 79 6f 25 2c | 73 63 78 25 2c 73 63 79 |y1%+yo%,|scx%,scy|
|000015f0| 25 2c 2d 31 29 0d 07 da | 05 e1 0d 07 e4 05 20 0d |%,-1)...|...... .|
|00001600| 07 ee 16 dd 20 f2 72 65 | 6f 70 65 6e 28 68 61 6e |.... .re|open(han|
|00001610| 64 6c 65 25 29 0d 07 f8 | 12 f2 67 65 74 77 28 68 |dle%)...|..getw(h|
|00001620| 61 6e 64 6c 65 25 29 0d | 08 02 46 f2 6f 70 65 6e |andle%).|..F.open|
|00001630| 5f 77 69 6e 64 6f 77 28 | 68 61 6e 64 6c 65 25 2c |_window(|handle%,|
|00001640| 78 6f 25 2c 79 6f 25 2c | 78 31 25 2d 78 30 25 2b |xo%,yo%,|x1%-x0%+|
|00001650| 78 6f 25 2c 79 31 25 2d | 79 30 25 2b 79 6f 25 2c |xo%,y1%-|y0%+yo%,|
|00001660| 73 63 78 25 2c 73 63 79 | 25 2c 2d 31 29 0d 08 0c |scx%,scy|%,-1)...|
|00001670| 05 e1 0d 08 16 05 20 0d | 08 20 3e dd 20 f2 6f 70 |...... .|. >. .op|
|00001680| 65 6e 5f 77 69 6e 64 6f | 77 28 68 61 6e 64 6c 65 |en_windo|w(handle|
|00001690| 25 2c 78 30 25 2c 79 30 | 25 2c 78 31 25 2c 79 31 |%,x0%,y0|%,x1%,y1|
|000016a0| 25 2c 73 63 78 25 2c 73 | 63 79 25 2c 62 68 61 6e |%,scx%,s|cy%,bhan|
|000016b0| 64 6c 65 25 29 0d 08 2a | 11 e7 68 61 6e 64 6c 65 |dle%)..*|..handle|
|000016c0| 25 3d 2d 31 8c e1 0d 08 | 34 1f 71 25 21 30 3d 68 |%=-1....|4.q%!0=h|
|000016d0| 61 6e 64 6c 65 25 3a 71 | 25 21 32 38 3d 62 68 61 |andle%:q|%!28=bha|
|000016e0| 6e 64 6c 65 25 0d 08 3e | 29 71 25 21 34 3d 78 30 |ndle%..>|)q%!4=x0|
|000016f0| 25 3a 71 25 21 38 3d 79 | 30 25 3a 71 25 21 31 32 |%:q%!8=y|0%:q%!12|
|00001700| 3d 78 31 25 3a 71 25 21 | 31 36 3d 79 31 25 0d 08 |=x1%:q%!|16=y1%..|
|00001710| 48 19 71 25 21 32 30 3d | 73 63 78 25 3a 71 25 21 |H.q%!20=|scx%:q%!|
|00001720| 32 34 3d 73 63 79 25 0d | 08 52 10 c8 99 20 4f 70 |24=scy%.|.R... Op|
|00001730| 65 6e 57 2c 2c 71 25 0d | 08 5c 05 e1 0d 08 66 05 |enW,,q%.|.\....f.|
|00001740| 20 0d 08 70 14 dd 20 f2 | 67 65 74 77 28 68 61 6e | ..p.. .|getw(han|
|00001750| 64 6c 65 25 29 0d 08 7a | 1b 21 71 25 3d 68 61 6e |dle%)..z|.!q%=han|
|00001760| 64 6c 65 25 3a c8 99 20 | 47 65 74 57 2c 2c 71 25 |dle%:.. |GetW,,q%|
|00001770| 0d 08 84 2b f2 69 6e 66 | 6f 28 71 25 2b 34 29 3a |...+.inf|o(q%+4):|
|00001780| 62 68 61 6e 64 6c 65 25 | 3d 71 25 21 32 38 3a 66 |bhandle%|=q%!28:f|
|00001790| 6c 61 67 73 25 3d 71 25 | 21 33 32 0d 08 8e 05 e1 |lags%=q%|!32.....|
|000017a0| 0d 08 98 05 20 0d 08 a2 | 0f dd 20 f2 69 6e 66 6f |.... ...|.. .info|
|000017b0| 28 71 25 29 0d 08 ac 3d | 78 30 25 3d 21 71 25 3a |(q%)...=|x0%=!q%:|
|000017c0| 79 30 25 3d 71 25 21 34 | 3a 78 31 25 3d 71 25 21 |y0%=q%!4|:x1%=q%!|
|000017d0| 38 3a 79 31 25 3d 71 25 | 21 31 32 3a 73 63 78 25 |8:y1%=q%|!12:scx%|
|000017e0| 3d 71 25 21 31 36 3a 73 | 63 79 25 3d 71 25 21 32 |=q%!16:s|cy%=q%!2|
|000017f0| 30 0d 08 b6 1d 62 78 25 | 3d 78 30 25 2d 73 63 78 |0....bx%|=x0%-scx|
|00001800| 25 3a 62 79 25 3d 79 31 | 25 2d 73 63 79 25 0d 08 |%:by%=y1|%-scy%..|
|00001810| c0 05 e1 0d 08 ca 05 20 | 0d 08 d4 2a dd 20 f2 75 |....... |...*. .u|
|00001820| 70 64 61 74 65 28 68 61 | 6e 64 6c 65 25 2c 75 78 |pdate(ha|ndle%,ux|
|00001830| 30 25 2c 75 79 30 25 2c | 75 78 31 25 2c 75 79 31 |0%,uy0%,|ux1%,uy1|
|00001840| 25 29 0d 08 de 39 21 71 | 25 3d 68 61 6e 64 6c 65 |%)...9!q|%=handle|
|00001850| 25 3a 71 25 21 34 3d 75 | 78 30 25 3a 71 25 21 38 |%:q%!4=u|x0%:q%!8|
|00001860| 3d 75 79 30 25 3a 71 25 | 21 31 32 3d 75 78 31 25 |=uy0%:q%|!12=ux1%|
|00001870| 3a 71 25 21 31 36 3d 75 | 79 31 25 0d 08 e8 26 c8 |:q%!16=u|y1%...&.|
|00001880| 99 20 55 70 64 61 74 65 | 57 2c 2c 71 25 20 b8 20 |. Update|W,,q% . |
|00001890| 6d 6f 72 65 25 3a f2 69 | 6e 66 6f 28 71 25 2b 34 |more%:.i|nfo(q%+4|
|000018a0| 29 0d 08 f2 05 e1 0d 08 | fc 05 20 0d 09 06 1d dd |).......|.. .....|
|000018b0| 20 f2 72 65 64 72 61 77 | 5f 77 69 6e 64 6f 77 28 | .redraw|_window(|
|000018c0| 68 61 6e 64 6c 65 25 29 | 0d 09 10 13 e7 68 61 6e |handle%)|.....han|
|000018d0| 64 6c 65 25 3d 70 61 74 | 25 20 8c 0d 09 1a 0f 21 |dle%=pat|% .....!|
|000018e0| 71 25 3d 68 61 6e 64 6c | 65 25 0d 09 24 1a c8 99 |q%=handl|e%..$...|
|000018f0| 20 52 65 64 72 61 77 57 | 2c 2c 71 25 20 b8 20 6d | RedrawW|,,q% . m|
|00001900| 6f 72 65 25 0d 09 2e 0f | f2 69 6e 66 6f 28 71 25 |ore%....|.info(q%|
|00001910| 2b 34 29 0d 09 38 08 f2 | 70 61 74 0d 09 42 05 cd |+4)..8..|pat..B..|
|00001920| 0d 09 4c 05 e1 0d 09 56 | 05 20 0d 09 60 1c dd 20 |..L....V|. ..`.. |
|00001930| f2 63 6c 6f 73 65 5f 77 | 69 6e 64 6f 77 28 68 61 |.close_w|indow(ha|
|00001940| 6e 64 6c 65 25 29 0d 09 | 6a 1d 21 71 25 3d 68 61 |ndle%)..|j.!q%=ha|
|00001950| 6e 64 6c 65 25 3a c8 99 | 20 43 6c 6f 73 65 57 2c |ndle%:..| CloseW,|
|00001960| 2c 71 25 0d 09 74 05 e1 | 0d 09 7e 05 20 0d 09 88 |,q%..t..|..~. ...|
|00001970| 0b dd 20 f2 76 61 72 73 | 0d 09 92 1e 57 69 6d 70 |.. .vars|....Wimp|
|00001980| 20 20 20 20 3d 20 28 31 | 3c 3c 31 38 29 20 2b 20 | = (1|<<18) + |
|00001990| 28 33 3c 3c 36 29 0d 09 | 9c 14 43 72 65 61 74 65 |(3<<6)..|..Create|
|000019a0| 57 20 3d 20 57 69 6d 70 | 2b 31 0d 09 a6 14 4f 70 |W = Wimp|+1....Op|
|000019b0| 65 6e 57 20 20 20 3d 20 | 57 69 6d 70 2b 35 0d 09 |enW = |Wimp+5..|
|000019c0| b0 14 43 6c 6f 73 65 57 | 20 20 3d 20 57 69 6d 70 |..CloseW| = Wimp|
|000019d0| 2b 36 0d 09 ba 14 50 6f | 6c 6c 25 20 20 20 3d 20 |+6....Po|ll% = |
|000019e0| 57 69 6d 70 2b 37 0d 09 | c4 14 52 65 64 72 61 77 |Wimp+7..|..Redraw|
|000019f0| 57 20 3d 20 57 69 6d 70 | 2b 38 0d 09 ce 14 55 70 |W = Wimp|+8....Up|
|00001a00| 64 61 74 65 57 20 3d 20 | 57 69 6d 70 2b 39 0d 09 |dateW = |Wimp+9..|
|00001a10| d8 15 47 65 74 52 25 20 | 20 20 3d 20 57 69 6d 70 |..GetR% | = Wimp|
|00001a20| 2b 31 30 0d 09 e2 15 47 | 65 74 57 20 20 20 20 3d |+10....G|etW =|
|00001a30| 20 57 69 6d 70 2b 31 31 | 0d 09 ec 15 47 65 74 50 | Wimp+11|....GetP|
|00001a40| 20 20 20 20 3d 20 57 69 | 6d 70 2b 31 35 0d 09 f6 | = Wi|mp+15...|
|00001a50| 15 44 72 61 67 20 20 20 | 20 3d 20 57 69 6d 70 2b |.Drag | = Wimp+|
|00001a60| 31 36 0d 0a 00 15 43 72 | 4d 65 6e 75 20 20 3d 20 |16....Cr|Menu = |
|00001a70| 57 69 6d 70 2b 32 30 0d | 0a 0a 15 44 63 4d 65 6e |Wimp+20.|...DcMen|
|00001a80| 75 20 20 3d 20 57 69 6d | 70 2b 32 31 0d 0a 14 36 |u = Wim|p+21...6|
|00001a90| c8 99 20 22 4f 53 5f 53 | 57 49 4e 75 6d 62 65 72 |.. "OS_S|WINumber|
|00001aa0| 46 72 6f 6d 53 74 72 69 | 6e 67 22 2c 2c 22 4f 53 |FromStri|ng",,"OS|
|00001ab0| 5f 53 70 72 69 74 65 4f | 70 22 20 b8 20 73 70 6f |_SpriteO|p" . spo|
|00001ac0| 70 25 0d 0a 1e 38 c8 99 | 20 22 4f 53 5f 53 57 49 |p%...8..| "OS_SWI|
|00001ad0| 4e 75 6d 62 65 72 46 72 | 6f 6d 53 74 72 69 6e 67 |NumberFr|omString|
|00001ae0| 22 2c 2c 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f |",,"Wimp|_SetColo|
|00001af0| 75 72 22 20 b8 20 43 6f | 6c 25 0d 0a 28 3b c8 99 |ur" . Co|l%..(;..|
|00001b00| 20 22 4f 53 5f 53 57 49 | 4e 75 6d 62 65 72 46 72 | "OS_SWI|NumberFr|
|00001b10| 6f 6d 53 74 72 69 6e 67 | 22 2c 2c 22 57 69 6d 70 |omString|",,"Wimp|
|00001b20| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 20 b8 20 |_ForceRe|draw" . |
|00001b30| 66 72 65 64 25 0d 0a 32 | 05 e1 0d 0a 3c 05 20 0d |fred%..2|....<. .|
|00001b40| 0a 46 11 dd 20 f2 67 65 | 74 70 6f 69 6e 74 65 72 |.F.. .ge|tpointer|
|00001b50| 0d 0a 50 0f c8 99 20 47 | 65 74 50 2c 2c 71 25 0d |..P... G|etP,,q%.|
|00001b60| 0a 5a 48 6d 6f 75 73 65 | 78 25 3d 21 71 25 3a 6d |.ZHmouse|x%=!q%:m|
|00001b70| 6f 75 73 65 79 25 3d 71 | 25 21 34 3a 62 25 3d 71 |ousey%=q|%!4:b%=q|
|00001b80| 25 21 38 3a 68 61 6e 64 | 6c 65 25 3d 71 25 21 31 |%!8:hand|le%=q%!1|
|00001b90| 32 3a 69 63 6f 6e 25 3d | 71 25 21 31 36 3a 6f 62 |2:icon%=|q%!16:ob|
|00001ba0| 25 3d 71 25 21 32 30 0d | 0a 64 05 e1 0d 0a 6e 05 |%=q%!20.|.d....n.|
|00001bb0| 20 0d 0a 78 0f dd 20 f2 | 65 72 72 6f 72 62 6f 78 | ..x.. .|errorbox|
|00001bc0| 0d 0a 82 0f c8 99 20 44 | 72 61 67 2c 2c 2d 31 0d |...... D|rag,,-1.|
|00001bd0| 0a 8c 30 21 62 75 66 66 | 65 72 25 3d 9f 3a 24 28 |..0!buff|er%=.:$(|
|00001be0| 62 75 66 66 65 72 25 2b | 34 29 3d f6 24 2b 22 20 |buffer%+|4)=.$+" |
|00001bf0| 61 74 20 6c 69 6e 65 20 | 22 2b c3 9e 2b bd 30 0d |at line |"+..+.0.|
|00001c00| 0a 96 2e c8 99 20 22 57 | 69 6d 70 5f 52 65 70 6f |..... "W|imp_Repo|
|00001c10| 72 74 45 72 72 6f 72 22 | 2c 62 75 66 66 65 72 25 |rtError"|,buffer%|
|00001c20| 2c 31 2c 22 50 61 74 69 | 65 6e 63 65 22 0d 0a a0 |,1,"Pati|ence"...|
|00001c30| 0d f2 66 69 6e 69 73 68 | 3a e0 0d 0a aa 05 e1 0d |..finish|:.......|
|00001c40| 0a b4 05 20 0d 0a be 11 | dd 20 a4 62 75 66 66 65 |... ....|. .buffe|
|00001c50| 72 28 4c 25 29 0d 0a c8 | 39 e7 63 75 72 62 75 66 |r(L%)...|9.curbuf|
|00001c60| 25 2b 4c 25 3e 62 75 66 | 66 65 72 25 2b 6d 61 78 |%+L%>buf|fer%+max|
|00001c70| 62 75 66 25 8c 20 85 31 | 30 30 2c 22 42 75 66 66 |buf%. .1|00,"Buff|
|00001c80| 65 72 20 73 70 61 63 65 | 20 66 75 6c 6c 22 0d 0a |er space| full"..|
|00001c90| d2 0f 63 75 72 62 75 66 | 25 2b 3d 4c 25 0d 0a dc |..curbuf|%+=L%...|
|00001ca0| 0f 3d 63 75 72 62 75 66 | 25 2d 4c 25 0d 0a e6 05 |.=curbuf|%-L%....|
|00001cb0| 20 0d 0a f0 0e dd 20 a4 | 69 63 6f 6e 62 61 72 0d | ..... .|iconbar.|
|00001cc0| 0a fa 0a 21 71 25 3d 2d | 31 0d 0b 04 23 71 25 21 |...!q%=-|1...#q%!|
|00001cd0| 34 3d 30 3a 71 25 21 38 | 3d 30 3a 71 25 21 31 32 |4=0:q%!8|=0:q%!12|
|00001ce0| 3d 36 38 3a 71 25 21 31 | 36 3d 36 38 0d 0b 0e 0f |=68:q%!1|6=68....|
|00001cf0| 71 25 21 32 30 3d 26 32 | 31 30 32 0d 0b 18 17 73 |q%!20=&2|102....s|
|00001d00| 70 6e 61 6d 65 24 3d 22 | 2d 50 61 74 69 65 6e 63 |pname$="|-Patienc|
|00001d10| 65 22 0d 0b 22 29 de 20 | 71 25 21 32 34 20 28 a9 |e".."). |q%!24 (.|
|00001d20| 73 70 6e 61 6d 65 24 2b | 31 29 3a 24 28 71 25 21 |spname$+|1):$(q%!|
|00001d30| 32 34 29 3d 73 70 6e 61 | 6d 65 24 0d 0b 2c 12 71 |24)=spna|me$..,.q|
|00001d40| 25 21 32 38 3d 73 70 72 | 69 74 65 73 25 0d 0b 36 |%!28=spr|ites%..6|
|00001d50| 14 71 25 21 33 32 3d a9 | 73 70 6e 61 6d 65 24 2b |.q%!32=.|spname$+|
|00001d60| 31 0d 0b 40 22 c8 99 20 | 22 57 69 6d 70 5f 43 72 |1..@".. |"Wimp_Cr|
|00001d70| 65 61 74 65 49 63 6f 6e | 22 2c 2c 71 25 20 b8 20 |eateIcon|",,q% . |
|00001d80| 69 63 25 0d 0b 4a 08 3d | 69 63 25 0d 0b 54 05 20 |ic%..J.=|ic%..T. |
|00001d90| 0d 0b 5e 0e dd 20 f2 53 | 48 55 46 46 4c 45 0d 0b |..^.. .S|HUFFLE..|
|00001da0| 68 1b 50 41 43 4b 24 3d | c4 35 32 2c 22 20 22 29 |h.PACK$=|.52," ")|
|00001db0| 3a 50 41 43 4b 24 3d 22 | 22 0d 0b 72 37 4b 25 3d |:PACK$="|"..r7K%=|
|00001dc0| 30 3a e3 49 25 3d 30 b8 | 33 3a e3 4a 25 3d 31 b8 |0:.I%=0.|3:.J%=1.|
|00001dd0| 31 33 3a 53 50 41 43 45 | 25 3f 4b 25 3d 49 25 2b |13:SPACE|%?K%=I%+|
|00001de0| 4a 25 2a 34 3a 4b 25 3d | 4b 25 2b 31 3a ed 3a ed |J%*4:K%=|K%+1:.:.|
|00001df0| 0d 0b 7c 24 e3 49 25 3d | 31 b8 35 32 3a f5 20 4a |..|$.I%=|1.52:. J|
|00001e00| 25 3d b3 28 35 32 29 2d | 31 3a fd 53 50 41 43 45 |%=.(52)-|1:.SPACE|
|00001e10| 25 3f 4a 25 0d 0b 86 29 | 50 41 43 4b 24 2b 3d bd |%?J%...)|PACK$+=.|
|00001e20| 28 53 50 41 43 45 25 3f | 4a 25 2b 31 32 38 29 3a |(SPACE%?|J%+128):|
|00001e30| 53 50 41 43 45 25 3f 4a | 25 3d 30 3a ed 0d 0b 90 |SPACE%?J|%=0:....|
|00001e40| 3c e3 49 25 3d 31 b8 37 | 3a 41 24 28 49 25 29 3d |<.I%=1.7|:A$(I%)=|
|00001e50| c0 50 41 43 4b 24 2c 37 | 2d 49 25 29 3a 41 24 28 |.PACK$,7|-I%):A$(|
|00001e60| 49 25 29 2b 3d bd 28 97 | c1 50 41 43 4b 24 2c 38 |I%)+=.(.|.PACK$,8|
|00001e70| 2d 49 25 29 80 31 32 37 | 29 0d 0b 9a 18 50 41 43 |-I%).127|)....PAC|
|00001e80| 4b 24 3d c1 50 41 43 4b | 24 2c 39 2d 49 25 29 3a |K$=.PACK|$,9-I%):|
|00001e90| ed 0d 0b a4 1d 50 4c 41 | 43 45 3d 30 3a 41 24 3d |.....PLA|CE=0:A$=|
|00001ea0| 50 41 43 4b 24 3a 50 41 | 43 4b 24 3d 22 22 0d 0b |PACK$:PA|CK$=""..|
|00001eb0| ae 26 e3 49 25 3d 31 b8 | a9 41 24 3a 50 41 43 4b |.&.I%=1.|.A$:PACK|
|00001ec0| 24 2b 3d bd 28 97 c1 41 | 24 2c 49 25 29 80 31 32 |$+=.(..A|$,I%).12|
|00001ed0| 37 29 3a ed 0d 0b b8 17 | e3 49 25 3d 30 b8 33 3a |7):.....|.I%=0.3:|
|00001ee0| 53 25 28 49 25 29 3d 49 | 25 3a ed 0d 0b c2 0a 70 |S%(I%)=I|%:.....p|
|00001ef0| 6c 61 79 3d b9 0d 0b cc | 05 e1 0d 0b d6 05 20 0d |lay=....|...... .|
|00001f00| 0b e0 15 dd 20 f2 43 41 | 52 44 28 4e 25 2c 58 25 |.... .CA|RD(N%,X%|
|00001f10| 2c 59 25 29 0d 0b ea 1e | c8 99 43 6f 6c 25 2c 37 |,Y%)....|..Col%,7|
|00001f20| 3a c8 93 20 c8 90 20 58 | 25 2c 59 25 2c 36 30 2c |:.. .. X|%,Y%,60,|
|00001f30| 38 33 0d 0b f4 22 c8 99 | 43 6f 6c 25 2c 30 3a c8 |83..."..|Col%,0:.|
|00001f40| 93 20 c8 90 20 58 25 2b | 34 2c 59 25 2b 34 2c 35 |. .. X%+|4,Y%+4,5|
|00001f50| 32 2c 37 35 0d 0b fe 45 | c8 99 20 73 70 6f 70 25 |2,75...E|.. spop%|
|00001f60| 2c 26 31 33 34 2c 73 70 | 72 69 74 65 73 25 2c 73 |,&134,sp|rites%,s|
|00001f70| 75 69 74 24 28 4e 25 80 | 33 29 2c 58 25 2b 31 36 |uit$(N%.|3),X%+16|
|00001f80| 2c 59 25 2b 38 2c 2c 66 | 61 63 74 6f 72 73 25 2c |,Y%+8,,f|actors%,|
|00001f90| 70 69 78 74 72 61 6e 73 | 25 0d 0c 08 49 c8 99 20 |pixtrans|%...I.. |
|00001fa0| 73 70 6f 70 25 2c 26 31 | 33 34 2c 73 70 72 69 74 |spop%,&1|34,sprit|
|00001fb0| 65 73 25 2c 22 73 22 2b | 73 75 69 74 24 28 4e 25 |es%,"s"+|suit$(N%|
|00001fc0| 80 33 29 2c 58 25 2b 34 | 2c 59 25 2b 35 36 2c 2c |.3),X%+4|,Y%+56,,|
|00001fd0| 66 61 63 74 6f 72 73 25 | 2c 70 69 78 74 72 61 6e |factors%|,pixtran|
|00001fe0| 73 25 0d 0c 12 2a e7 28 | 4e 25 20 82 20 4e 25 3e |s%...*.(|N% . N%>|
|00001ff0| 3e 31 29 20 80 20 31 20 | c8 99 43 6f 6c 25 2c 31 |>1) . 1 |..Col%,1|
|00002000| 31 20 8b 20 c8 99 43 6f | 6c 25 2c 37 0d 0c 1c 2a |1 . ..Co|l%,7...*|
|00002010| ec 58 25 2b 32 34 2c 59 | 25 2b 37 32 3a 4e 25 3d |.X%+24,Y|%+72:N%=|
|00002020| 4e 25 3e 3e 32 3a e7 4e | 25 3e 31 e7 4e 25 3c 31 |N%>>2:.N|%>1.N%<1|
|00002030| 31 f1 3b 4e 25 3b 0d 0c | 26 0e e7 4e 25 3d 31 f1 |1.;N%;..|&..N%=1.|
|00002040| 22 41 22 3b 0d 0c 30 0f | e7 4e 25 3d 31 31 f1 22 |"A";..0.|.N%=11."|
|00002050| 4a 22 3b 0d 0c 3a 0f e7 | 4e 25 3d 31 32 f1 22 51 |J";..:..|N%=12."Q|
|00002060| 22 3b 0d 0c 44 0f e7 4e | 25 3d 31 33 f1 22 4b 22 |";..D..N|%=13."K"|
|00002070| 3b 0d 0c 4e 05 e1 0d 0c | 58 05 20 0d 0c 62 19 dd |;..N....|X. ..b..|
|00002080| 20 f2 48 41 4c 46 43 41 | 52 44 28 4e 25 2c 58 25 | .HALFCA|RD(N%,X%|
|00002090| 2c 59 25 29 0d 0c 6c 21 | c8 99 43 6f 6c 25 2c 37 |,Y%)..l!|..Col%,7|
|000020a0| 3a c8 93 20 c8 90 20 58 | 25 2c 59 25 2b 34 30 2c |:.. .. X|%,Y%+40,|
|000020b0| 36 30 2c 34 33 0d 0c 76 | 23 c8 99 43 6f 6c 25 2c |60,43..v|#..Col%,|
|000020c0| 30 3a c8 93 20 c8 90 20 | 58 25 2b 34 2c 59 25 2b |0:.. .. |X%+4,Y%+|
|000020d0| 34 30 2c 35 32 2c 33 39 | 0d 0c 80 49 c8 99 20 73 |40,52,39|...I.. s|
|000020e0| 70 6f 70 25 2c 26 31 33 | 34 2c 73 70 72 69 74 65 |pop%,&13|4,sprite|
|000020f0| 73 25 2c 22 73 22 2b 73 | 75 69 74 24 28 4e 25 80 |s%,"s"+s|uit$(N%.|
|00002100| 33 29 2c 58 25 2b 34 2c | 59 25 2b 35 36 2c 2c 66 |3),X%+4,|Y%+56,,f|
|00002110| 61 63 74 6f 72 73 25 2c | 70 69 78 74 72 61 6e 73 |actors%,|pixtrans|
|00002120| 25 0d 0c 8a 2a e7 28 4e | 25 20 82 20 4e 25 3e 3e |%...*.(N|% . N%>>|
|00002130| 31 29 20 80 20 31 20 c8 | 99 43 6f 6c 25 2c 31 31 |1) . 1 .|.Col%,11|
|00002140| 20 8b 20 c8 99 43 6f 6c | 25 2c 37 0d 0c 94 2a ec | . ..Col|%,7...*.|
|00002150| 58 25 2b 32 34 2c 59 25 | 2b 37 32 3a 4e 25 3d 4e |X%+24,Y%|+72:N%=N|
|00002160| 25 3e 3e 32 3a e7 4e 25 | 3e 31 e7 4e 25 3c 31 31 |%>>2:.N%|>1.N%<11|
|00002170| f1 3b 4e 25 3b 0d 0c 9e | 0e e7 4e 25 3d 31 f1 22 |.;N%;...|..N%=1."|
|00002180| 41 22 3b 0d 0c a8 0f e7 | 4e 25 3d 31 31 f1 22 4a |A";.....|N%=11."J|
|00002190| 22 3b 0d 0c b2 0f e7 4e | 25 3d 31 32 f1 22 51 22 |";.....N|%=12."Q"|
|000021a0| 3b 0d 0c bc 0f e7 4e 25 | 3d 31 33 f1 22 4b 22 3b |;.....N%|=13."K";|
|000021b0| 0d 0c c6 05 e1 0d 0c d0 | 05 20 0d 0c da 12 dd 20 |........|. ..... |
|000021c0| f2 42 41 43 4b 28 58 25 | 2c 59 25 29 0d 0c e4 3b |.BACK(X%|,Y%)...;|
|000021d0| c8 99 20 73 70 6f 70 25 | 2c 26 31 33 34 2c 73 70 |.. spop%|,&134,sp|
|000021e0| 72 69 74 65 73 25 2c 22 | 62 61 63 6b 22 2c 58 25 |rites%,"|back",X%|
|000021f0| 2c 59 25 2c 2c 66 61 63 | 74 6f 72 73 25 2c 70 69 |,Y%,,fac|tors%,pi|
|00002200| 78 74 72 61 6e 73 25 0d | 0c ee 05 e1 0d 0c f8 05 |xtrans%.|........|
|00002210| 20 0d 0d 02 16 dd 20 f2 | 48 41 4c 46 42 41 43 4b | ..... .|HALFBACK|
|00002220| 28 58 25 2c 59 25 29 0d | 0d 0c 3e c8 99 20 73 70 |(X%,Y%).|..>.. sp|
|00002230| 6f 70 25 2c 26 31 33 34 | 2c 73 70 72 69 74 65 73 |op%,&134|,sprites|
|00002240| 25 2c 22 68 61 6c 66 22 | 2c 58 25 2c 59 25 2b 34 |%,"half"|,X%,Y%+4|
|00002250| 30 2c 2c 66 61 63 74 6f | 72 73 25 2c 70 69 78 74 |0,,facto|rs%,pixt|
|00002260| 72 61 6e 73 25 0d 0d 16 | 05 e1 0d 0d 20 05 20 0d |rans%...|.... . .|
|00002270| 0d 2a 14 dd 20 f2 4e 4f | 43 41 52 44 28 58 25 2c |.*.. .NO|CARD(X%,|
|00002280| 59 25 29 0d 0d 34 23 c8 | 99 43 6f 6c 25 2c 60 77 |Y%)..4#.|.Col%,`w|
|00002290| 62 63 6f 6c 3a c8 93 20 | c8 90 20 58 25 2c 59 25 |bcol:.. |.. X%,Y%|
|000022a0| 2c 36 30 2c 38 33 0d 0d | 3e 05 e1 0d 0d 48 05 20 |,60,83..|>....H. |
|000022b0| 0d 0d 52 16 dd 20 f2 43 | 41 52 44 48 4f 4c 45 28 |..R.. .C|ARDHOLE(|
|000022c0| 58 25 2c 59 25 29 0d 0d | 5c 1e c8 99 43 6f 6c 25 |X%,Y%)..|\...Col%|
|000022d0| 2c 33 3a c8 93 20 c8 90 | 20 58 25 2c 59 25 2c 36 |,3:.. ..| X%,Y%,6|
|000022e0| 30 2c 38 33 0d 0d 66 05 | e1 0d 0d 70 05 20 0d 0d |0,83..f.|...p. ..|
|000022f0| 7a 15 dd 20 f2 50 49 4c | 45 28 41 24 2c 58 25 2c |z.. .PIL|E(A$,X%,|
|00002300| 59 25 29 0d 0d 84 0c e7 | a9 41 24 3d 30 20 e1 0d |Y%).....|.A$=0 ..|
|00002310| 0d 8e 10 ea 49 25 3a e7 | a9 41 24 3e 31 20 8c 0d |....I%:.|.A$>1 ..|
|00002320| 0d 98 1b e3 49 25 3d 31 | b8 a9 41 24 2d 31 3a 4a |....I%=1|..A$-1:J|
|00002330| 25 3d 97 c1 41 24 2c 49 | 25 29 0d 0d a2 32 e7 4a |%=..A$,I|%)...2.J|
|00002340| 25 3e 31 32 37 20 f2 48 | 41 4c 46 42 41 43 4b 28 |%>127 .H|ALFBACK(|
|00002350| 58 25 2c 59 25 29 20 8b | 20 f2 48 41 4c 46 43 41 |X%,Y%) .| .HALFCA|
|00002360| 52 44 28 4a 25 2c 58 25 | 2c 59 25 29 0d 0d ac 0c |RD(J%,X%|,Y%)....|
|00002370| 59 25 2d 3d 34 30 3a ed | 0d 0d b6 05 cd 0d 0d c0 |Y%-=40:.|........|
|00002380| 37 4a 25 3d 97 c1 41 24 | 2c a9 41 24 29 3a e7 4a |7J%=..A$|,.A$):.J|
|00002390| 25 3e 31 32 37 20 f2 42 | 41 43 4b 28 58 25 2c 59 |%>127 .B|ACK(X%,Y|
|000023a0| 25 29 20 8b 20 f2 43 41 | 52 44 28 4a 25 2c 58 25 |%) . .CA|RD(J%,X%|
|000023b0| 2c 59 25 29 0d 0d ca 05 | e1 0d 0d d4 05 20 0d 0d |,Y%)....|..... ..|
|000023c0| de 16 dd 20 f2 52 45 4d | 43 41 52 44 53 28 49 25 |... .REM|CARDS(I%|
|000023d0| 2c 4a 25 29 0d 0d e8 12 | ea 54 25 3a 54 25 3d a9 |,J%)....|.T%:T%=.|
|000023e0| 41 24 28 49 25 29 0d 0d | f2 19 41 24 28 49 25 29 |A$(I%)..|..A$(I%)|
|000023f0| 3d c0 41 24 28 49 25 29 | 2c 54 25 2d 4a 25 29 0d |=.A$(I%)|,T%-J%).|
|00002400| 0d fc 39 e7 a9 41 24 28 | 49 25 29 20 41 24 28 49 |..9..A$(|I%) A$(I|
|00002410| 25 29 3d c0 41 24 28 49 | 25 29 2c a9 41 24 28 49 |%)=.A$(I|%),.A$(I|
|00002420| 25 29 2d 31 29 2b bd 28 | 97 c2 41 24 28 49 25 29 |%)-1)+.(|..A$(I%)|
|00002430| 2c 31 29 80 31 32 37 29 | 0d 0e 06 3d f2 75 70 64 |,1).127)|...=.upd|
|00002440| 61 74 65 28 70 61 74 25 | 2c 38 2b 28 49 25 2d 31 |ate(pat%|,8+(I%-1|
|00002450| 29 2a 36 38 2c 2d 38 30 | 2d 54 25 2a 34 30 2c 38 |)*68,-80|-T%*40,8|
|00002460| 2b 49 25 2a 36 38 2c 34 | 30 2d a9 41 24 28 49 25 |+I%*68,4|0-.A$(I%|
|00002470| 29 2a 34 30 29 0d 0e 10 | 0c c8 95 20 6d 6f 72 65 |)*40)...|... more|
|00002480| 25 0d 0e 1a 2c 20 20 da | 3a f2 50 49 4c 45 28 41 |%..., .|:.PILE(A|
|00002490| 24 28 49 25 29 2c 62 78 | 25 2b 38 2b 28 49 25 2d |$(I%),bx|%+8+(I%-|
|000024a0| 31 29 2a 36 38 2c 62 79 | 25 2d 39 36 29 0d 0e 24 |1)*68,by|%-96)..$|
|000024b0| 1a 20 20 c8 99 20 47 65 | 74 52 25 2c 2c 71 25 20 |. .. Ge|tR%,,q% |
|000024c0| b8 20 6d 6f 72 65 25 0d | 0e 2e 07 20 20 ce 0d 0e |. more%.|... ...|
|000024d0| 38 05 e1 0d 0e 42 05 20 | 0d 0e 4c 0b dd 20 f2 4e |8....B. |..L.. .N|
|000024e0| 45 58 54 0d 0e 56 12 e7 | a9 50 41 43 4b 24 3d 30 |EXT..V..|.PACK$=0|
|000024f0| 20 ef 37 3a e1 0d 0e 60 | 19 e7 50 4c 41 43 45 3d | .7:...`|..PLACE=|
|00002500| a9 50 41 43 4b 24 20 50 | 4c 41 43 45 3d 30 0d 0e |.PACK$ P|LACE=0..|
|00002510| 6a 3d 4e 31 24 3d c1 50 | 41 43 4b 24 2c 50 4c 41 |j=N1$=.P|ACK$,PLA|
|00002520| 43 45 2b 33 2c 31 29 2b | c1 50 41 43 4b 24 2c 50 |CE+3,1)+|.PACK$,P|
|00002530| 4c 41 43 45 2b 32 2c 31 | 29 2b c1 50 41 43 4b 24 |LACE+2,1|)+.PACK$|
|00002540| 2c 50 4c 41 43 45 2b 31 | 2c 31 29 0d 0e 74 2b 50 |,PLACE+1|,1)..t+P|
|00002550| 41 43 4b 24 3d c0 50 41 | 43 4b 24 2c 50 4c 41 43 |ACK$=.PA|CK$,PLAC|
|00002560| 45 29 2b 4e 31 24 2b c1 | 50 41 43 4b 24 2c 50 4c |E)+N1$+.|PACK$,PL|
|00002570| 41 43 45 2b 34 29 0d 0e | 7e 0f 50 4c 41 43 45 2b |ACE+4)..|~.PLACE+|
|00002580| 3d a9 4e 31 24 0d 0e 88 | 27 c1 50 41 43 4b 24 2c |=.N1$...|'.PACK$,|
|00002590| 50 4c 41 43 45 29 3d bd | 28 97 c1 50 41 43 4b 24 |PLACE)=.|(..PACK$|
|000025a0| 2c 50 4c 41 43 45 29 80 | 31 32 37 29 0d 0e 92 2c |,PLACE).|127)...,|
|000025b0| f2 75 70 64 61 74 65 28 | 70 61 74 25 2c 32 34 2b |.update(|pat%,24+|
|000025c0| 38 2a 36 38 2c 2d 32 35 | 36 2c 32 34 2b 31 30 2a |8*68,-25|6,24+10*|
|000025d0| 36 38 2c 2d 31 34 34 29 | 0d 0e 9c 08 f2 70 61 74 |68,-144)|.....pat|
|000025e0| 0d 0e a6 05 e1 0d 0e b0 | 05 20 0d 0e ba 0f dd 20 |........|. ..... |
|000025f0| f2 46 52 4f 4d 28 41 24 | 29 0d 0e c4 10 e7 a4 46 |.FROM(A$|)......F|
|00002600| 52 4f 4d 28 41 24 29 20 | e1 0d 0e ce 1d 71 25 21 |ROM(A$) |.....q%!|
|00002610| 32 30 3d 70 61 74 25 3a | c8 99 20 47 65 74 57 2c |20=pat%:|.. GetW,|
|00002620| 2c 71 25 2b 32 30 0d 0e | d8 13 21 71 25 3d 70 61 |,q%+20..|..!q%=pa|
|00002630| 74 25 3a 71 25 21 34 3d | 35 0d 0e e2 46 71 25 21 |t%:q%!4=|5...Fq%!|
|00002640| 38 3d 6d 6f 75 73 65 78 | 25 2d 33 30 3a 71 25 21 |8=mousex|%-30:q%!|
|00002650| 31 32 3d 6d 6f 75 73 65 | 79 25 2d 34 30 3a 71 25 |12=mouse|y%-40:q%|
|00002660| 21 31 36 3d 6d 6f 75 73 | 65 78 25 2b 33 30 3a 71 |!16=mous|ex%+30:q|
|00002670| 25 21 32 30 3d 6d 6f 75 | 73 65 79 25 2b 34 30 0d |%!20=mou|sey%+40.|
|00002680| 0e ec 0f c8 99 20 44 72 | 61 67 2c 2c 71 25 0d 0e |..... Dr|ag,,q%..|
|00002690| f6 05 e1 0d 0f 00 05 20 | 0d 0f 0a 0f dd 20 a4 46 |....... |..... .F|
|000026a0| 52 4f 4d 28 41 24 29 0d | 0f 14 2d 53 52 43 24 3d |ROM(A$).|..-SRC$=|
|000026b0| 41 24 3a e7 41 24 3d 22 | 50 22 20 e7 50 4c 41 43 |A$:.A$="|P" .PLAC|
|000026c0| 45 3d 30 20 84 20 a9 50 | 41 43 4b 24 3d 30 20 ef |E=0 . .P|ACK$=0 .|
|000026d0| 37 3a 3d b9 0d 0f 1e 20 | e7 41 24 3c 3e 22 50 22 |7:=.... |.A$<>"P"|
|000026e0| e7 a9 41 24 28 97 41 24 | 2d 36 34 29 3d 30 20 ef |..A$(.A$|-64)=0 .|
|000026f0| 37 3a 3d b9 0d 0f 28 06 | 3d a3 0d 0f 32 05 20 0d |7:=...(.|=...2. .|
|00002700| 0f 3c 10 dd 20 f2 54 4f | 28 41 24 2c 42 24 29 0d |.<.. .TO|(A$,B$).|
|00002710| 0f 46 16 e7 41 24 3c 3e | 22 50 22 20 41 25 3d 97 |.F..A$<>|"P" A%=.|
|00002720| 41 24 2d 36 34 0d 0f 50 | 0a 42 25 3d 97 42 24 0d |A$-64..P|.B%=.B$.|
|00002730| 0f 5a 0d e7 42 25 3d 97 | 22 53 22 8c 0d 0f 64 3a |.Z..B%=.|"S"...d:|
|00002740| 20 20 e7 41 24 3d 22 50 | 22 20 43 41 52 44 3d 97 | .A$="P|" CARD=.|
|00002750| c1 50 41 43 4b 24 2c 50 | 4c 41 43 45 29 20 8b 20 |.PACK$,P|LACE) . |
|00002760| 43 41 52 44 3d 97 c1 41 | 24 28 41 25 29 2c a9 41 |CARD=..A|$(A%),.A|
|00002770| 24 28 41 25 29 29 0d 0f | 6e 26 20 20 49 25 3d 43 |$(A%))..|n& I%=C|
|00002780| 41 52 44 20 80 20 33 3a | e7 43 41 52 44 3c 3e 53 |ARD . 3:|.CARD<>S|
|00002790| 25 28 49 25 29 2b 34 20 | ef 37 3a e1 0d 0f 78 34 |%(I%)+4 |.7:...x4|
|000027a0| 20 20 53 25 28 49 25 29 | 3d 43 41 52 44 3a e7 41 | S%(I%)|=CARD:.A|
|000027b0| 24 3d 22 50 22 20 f2 52 | 45 4d 50 41 43 4b 20 8b |$="P" .R|EMPACK .|
|000027c0| 20 f2 52 45 4d 43 41 52 | 44 53 28 41 25 2c 31 29 | .REMCAR|DS(A%,1)|
|000027d0| 0d 0f 82 12 20 20 f2 54 | 4f 53 54 41 43 4b 28 49 |.... .T|OSTACK(I|
|000027e0| 25 29 0d 0f 8c 05 cc 0d | 0f 96 1b 20 20 e7 42 25 |%)......|... .B%|
|000027f0| 3c 97 22 41 22 84 42 25 | 3e 97 22 47 22 20 ef 37 |<."A".B%|>."G" .7|
|00002800| 3a e1 0d 0f a0 33 20 20 | 43 41 52 44 54 3d 97 c2 |:....3 |CARDT=..|
|00002810| 41 24 28 42 25 2d 36 34 | 29 2c 31 29 3a 59 4c 45 |A$(B%-64|),1):YLE|
|00002820| 4e 3d a9 41 24 28 42 25 | 2d 36 34 29 3a e7 41 24 |N=.A$(B%|-64):.A$|
|00002830| 3d 22 50 22 8c 0d 0f aa | 28 20 20 20 20 43 41 52 |="P"....|( CAR|
|00002840| 44 3d 97 c1 50 41 43 4b | 24 2c 50 4c 41 43 45 29 |D=..PACK|$,PLACE)|
|00002850| 3a e7 a4 43 48 4b 3d 30 | 20 ef 37 3a e1 0d 0f b4 |:..CHK=0| .7:....|
|00002860| 21 20 20 20 20 41 24 28 | 42 25 2d 36 34 29 2b 3d |! A$(|B%-64)+=|
|00002870| bd 43 41 52 44 3a f2 52 | 45 4d 50 41 43 4b 0d 0f |.CARD:.R|EMPACK..|
|00002880| be 07 20 20 cc 0d 0f c8 | 3d 20 20 20 20 43 25 3d |.. ....|= C%=|
|00002890| 30 3a 44 25 3d 30 3a f5 | 20 44 25 2b 3d 31 3a 43 |0:D%=0:.| D%+=1:C|
|000028a0| 41 52 44 3d 97 c1 41 24 | 28 41 25 29 2c 44 25 29 |ARD=..A$|(A%),D%)|
|000028b0| 3a fd a4 43 48 4b 20 84 | 44 25 3e a9 41 24 28 41 |:..CHK .|D%>.A$(A|
|000028c0| 25 29 0d 0f d2 18 20 20 | 20 20 e7 44 25 3e a9 41 |%).... | .D%>.A|
|000028d0| 24 28 41 25 29 20 ef 37 | 3a e1 0d 0f dc 2c 20 20 |$(A%) .7|:...., |
|000028e0| 20 20 51 25 3d a9 41 24 | 28 42 25 2d 36 34 29 3a | Q%=.A$|(B%-64):|
|000028f0| 41 24 28 42 25 2d 36 34 | 29 2b 3d c1 41 24 28 41 |A$(B%-64|)+=.A$(A|
|00002900| 25 29 2c 44 25 29 0d 0f | e6 22 20 20 20 20 f2 52 |%),D%)..|." .R|
|00002910| 45 4d 43 41 52 44 53 28 | 41 25 2c a9 41 24 28 41 |EMCARDS(|A%,.A$(A|
|00002920| 25 29 2d 44 25 2b 31 29 | 0d 0f f0 07 20 20 cd 0d |%)-D%+1)|.... ..|
|00002930| 0f fa 4b 20 20 f2 75 70 | 64 61 74 65 28 70 61 74 |..K .up|date(pat|
|00002940| 25 2c 38 2b 28 42 25 2d | 97 22 41 22 29 2a 36 38 |%,8+(B%-|."A")*68|
|00002950| 2c 2d 31 32 30 2d a9 41 | 24 28 42 25 2d 36 34 29 |,-120-.A|$(B%-64)|
|00002960| 2a 34 30 2c 38 2b 28 42 | 25 2d 36 34 29 2a 36 38 |*40,8+(B|%-64)*68|
|00002970| 2c 2d 59 4c 45 4e 2a 34 | 30 29 0d 10 04 0e 20 20 |,-YLEN*4|0).... |
|00002980| c8 95 20 6d 6f 72 65 25 | 0d 10 0e 30 20 20 20 20 |.. more%|...0 |
|00002990| f2 50 49 4c 45 28 41 24 | 28 42 25 2d 36 34 29 2c |.PILE(A$|(B%-64),|
|000029a0| 62 78 25 2b 38 2b 28 42 | 25 2d 36 35 29 2a 36 38 |bx%+8+(B|%-65)*68|
|000029b0| 2c 62 79 25 2d 39 36 29 | 0d 10 18 1c 20 20 20 20 |,by%-96)|.... |
|000029c0| c8 99 20 47 65 74 52 25 | 2c 2c 71 25 20 b8 20 6d |.. GetR%|,,q% . m|
|000029d0| 6f 72 65 25 0d 10 22 07 | 20 20 ce 0d 10 2c 05 cd |ore%..".| ...,..|
|000029e0| 0d 10 36 05 e1 0d 10 40 | 05 20 0d 10 4a 0e dd 20 |..6....@|. ..J.. |
|000029f0| f2 52 45 4d 50 41 43 4b | 0d 10 54 30 50 4c 41 43 |.REMPACK|..T0PLAC|
|00002a00| 45 2d 3d 31 3a 50 41 43 | 4b 24 3d c0 50 41 43 4b |E-=1:PAC|K$=.PACK|
|00002a10| 24 2c 50 4c 41 43 45 29 | 2b c1 50 41 43 4b 24 2c |$,PLACE)|+.PACK$,|
|00002a20| 50 4c 41 43 45 2b 32 29 | 0d 10 5e 2f f2 75 70 64 |PLACE+2)|..^/.upd|
|00002a30| 61 74 65 28 70 61 74 25 | 2c 32 34 2b 38 2a 36 38 |ate(pat%|,24+8*68|
|00002a40| 2c 2d 32 38 30 2d 33 32 | 2c 32 30 2b 31 30 2a 36 |,-280-32|,20+10*6|
|00002a50| 38 2c 2d 31 34 30 29 0d | 10 68 0c c8 95 20 6d 6f |8,-140).|.h... mo|
|00002a60| 72 65 25 0d 10 72 07 20 | 20 da 0d 10 7c 10 20 20 |re%..r. | ...|. |
|00002a70| e7 20 a9 50 41 43 4b 24 | 20 8c 0d 10 86 2b 20 20 |. .PACK$| ....+ |
|00002a80| 20 20 c8 99 43 6f 6c 25 | 2c 37 3a ec 62 78 25 2b | ..Col%|,7:.bx%+|
|00002a90| 39 2a 36 38 2c 62 79 25 | 2d 32 38 30 3a f1 a9 50 |9*68,by%|-280:..P|
|00002aa0| 41 43 4b 24 3b 0d 10 90 | 51 20 20 20 20 e7 50 4c |ACK$;...|Q .PL|
|00002ab0| 41 43 45 3d a9 50 41 43 | 4b 24 20 f2 43 41 52 44 |ACE=.PAC|K$ .CARD|
|00002ac0| 48 4f 4c 45 28 62 78 25 | 2b 32 34 2b 39 2a 36 38 |HOLE(bx%|+24+9*68|
|00002ad0| 2c 62 79 25 2d 32 35 36 | 29 20 8b 20 f2 42 41 43 |,by%-256|) . .BAC|
|00002ae0| 4b 28 62 78 25 2b 32 34 | 2b 39 2a 36 38 2c 62 79 |K(bx%+24|+9*68,by|
|00002af0| 25 2d 32 35 36 29 0d 10 | 9a 5b 20 20 20 20 e7 50 |%-256)..|.[ .P|
|00002b00| 4c 41 43 45 3e 30 20 f2 | 43 41 52 44 28 97 c1 50 |LACE>0 .|CARD(..P|
|00002b10| 41 43 4b 24 2c 50 4c 41 | 43 45 2c 31 29 2c 62 78 |ACK$,PLA|CE,1),bx|
|00002b20| 25 2b 32 34 2b 38 2a 36 | 38 2c 62 79 25 2d 32 35 |%+24+8*6|8,by%-25|
|00002b30| 36 29 20 8b 20 f2 4e 4f | 43 41 52 44 28 62 78 25 |6) . .NO|CARD(bx%|
|00002b40| 2b 32 34 2b 38 2a 36 38 | 2c 62 79 25 2d 32 35 36 |+24+8*68|,by%-256|
|00002b50| 29 0d 10 a4 07 20 20 cc | 0d 10 ae 41 20 20 20 20 |).... .|...A |
|00002b60| f2 4e 4f 43 41 52 44 28 | 62 78 25 2b 32 34 2b 39 |.NOCARD(|bx%+24+9|
|00002b70| 2a 36 38 2c 62 79 25 2d | 32 35 36 29 3a f2 4e 4f |*68,by%-|256):.NO|
|00002b80| 43 41 52 44 28 62 78 25 | 2b 32 34 2b 38 2a 36 38 |CARD(bx%|+24+8*68|
|00002b90| 2c 62 79 25 2d 32 35 36 | 29 0d 10 b8 07 20 20 cd |,by%-256|).... .|
|00002ba0| 0d 10 c2 1a 20 20 c8 99 | 20 47 65 74 52 25 2c 2c |.... ..| GetR%,,|
|00002bb0| 71 25 20 b8 20 6d 6f 72 | 65 25 0d 10 cc 05 ce 0d |q% . mor|e%......|
|00002bc0| 10 d6 05 e1 0d 10 e0 05 | 20 0d 10 ea 21 dd 20 a4 |........| ...!. .|
|00002bd0| 43 48 4b 20 e7 43 41 52 | 44 54 3d 2d 31 20 8c 3d |CHK .CAR|DT=-1 .=|
|00002be0| 43 41 52 44 20 81 34 3d | 31 33 0d 10 f4 27 43 54 |CARD .4=|13...'CT|
|00002bf0| 3d 28 43 41 52 44 54 20 | 82 20 43 41 52 44 29 80 |=(CARDT |. CARD).|
|00002c00| 33 3a e7 43 54 3d 30 20 | 84 20 43 54 3d 33 20 3d |3:.CT=0 |. CT=3 =|
|00002c10| a3 0d 10 fe 17 3d 43 41 | 52 44 54 20 81 34 3d 43 |.....=CA|RDT .4=C|
|00002c20| 41 52 44 20 81 34 2b 31 | 0d 11 08 05 20 0d 11 12 |ARD .4+1|.... ...|
|00002c30| 12 dd 20 f2 54 4f 53 54 | 41 43 4b 28 49 25 29 0d |.. .TOST|ACK(I%).|
|00002c40| 11 1c 34 f2 75 70 64 61 | 74 65 28 70 61 74 25 2c |..4.upda|te(pat%,|
|00002c50| 32 34 2b 28 37 2b 49 25 | 29 2a 36 38 2c 2d 31 32 |24+(7+I%|)*68,-12|
|00002c60| 38 2c 32 34 2b 28 38 2b | 49 25 29 2a 36 38 2c 2d |8,24+(8+|I%)*68,-|
|00002c70| 34 30 29 0d 11 26 0c c8 | 95 20 6d 6f 72 65 25 0d |40)..&..|. more%.|
|00002c80| 11 30 2c 20 20 f2 43 41 | 52 44 28 53 25 28 49 25 |.0, .CA|RD(S%(I%|
|00002c90| 29 2c 62 78 25 2b 28 37 | 2b 49 25 29 2a 36 38 2b |),bx%+(7|+I%)*68+|
|00002ca0| 32 34 2c 62 79 25 2d 31 | 32 38 29 0d 11 3a 1a 20 |24,by%-1|28)..:. |
|00002cb0| 20 c8 99 20 47 65 74 52 | 25 2c 2c 71 25 20 b8 20 | .. GetR|%,,q% . |
|00002cc0| 6d 6f 72 65 25 0d 11 44 | 05 ce 0d 11 4e 05 e1 0d |more%..D|....N...|
|00002cd0| 11 58 05 20 0d 11 62 12 | dd 20 f2 67 65 74 6d 6f |.X. ..b.|. .getmo|
|00002ce0| 64 65 69 6e 66 6f 0d 11 | 6c 44 c8 99 22 57 69 6d |deinfo..|lD.."Wim|
|00002cf0| 70 5f 52 65 61 64 50 69 | 78 54 72 61 6e 73 22 2c |p_ReadPi|xTrans",|
|00002d00| 26 31 30 30 2c 73 70 72 | 69 74 65 73 25 2c 22 63 |&100,spr|ites%,"c|
|00002d10| 6c 75 62 22 2c 2c 2c 2c | 66 61 63 74 6f 72 73 25 |lub",,,,|factors%|
|00002d20| 2c 70 69 78 74 72 61 6e | 73 25 0d 11 76 05 e1 0d |,pixtran|s%..v...|
|00002d30| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+
