home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1989-09-26 | 15.0 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1a f4 20 3e 20 | 21 51 75 61 72 74 65 74 |..... > |!Quartet|
|00000010| 2e 21 52 75 6e 49 6d 61 | 67 65 0d 00 14 30 f4 20 |.!RunIma|ge...0. |
|00000020| 28 43 29 20 62 79 20 41 | 6e 74 6f 6e 20 43 61 72 |(C) by A|nton Car|
|00000030| 76 65 72 20 28 61 70 63 | 40 75 6b 2e 61 63 2e 77 |ver (apc|@uk.ac.w|
|00000040| 61 72 77 69 63 6b 2e 63 | 73 29 0d 00 1e 11 f4 20 |arwick.c|s)..... |
|00000050| 41 75 67 75 73 74 20 31 | 39 38 39 0d 00 28 29 f4 |August 1|989..().|
|00000060| 20 53 65 65 20 22 52 65 | 61 64 4d 65 22 20 46 69 | See "Re|adMe" Fi|
|00000070| 6c 65 20 66 6f 72 20 69 | 6e 73 74 72 75 63 74 69 |le for i|nstructi|
|00000080| 6f 6e 73 2e 0d 00 32 04 | 0d 00 3c 10 ee 20 85 20 |ons...2.|..<.. . |
|00000090| f2 65 72 72 6f 72 3a e0 | 0d 00 46 10 64 75 6d 6d |.error:.|..F.dumm|
|000000a0| 79 25 3d b3 28 2d 91 29 | 0d 00 50 12 f2 65 6e 75 |y%=.(-.)|..P..enu|
|000000b0| 6d 65 72 61 74 65 5f 53 | 57 49 0d 00 5a 15 de 20 |merate_S|WI..Z.. |
|000000c0| 61 74 74 72 25 28 33 29 | 2c 68 69 25 28 33 29 0d |attr%(3)|,hi%(3).|
|000000d0| 00 64 0e f2 69 6e 69 74 | 5f 67 61 6d 65 0d 00 6e |.d..init|_game..n|
|000000e0| 1b de 20 73 74 72 69 6e | 67 25 20 32 35 35 2c 20 |.. strin|g% 255, |
|000000f0| 69 63 6f 6e 25 20 33 32 | 0d 00 78 1b de 20 62 6c |icon% 32|..x.. bl|
|00000100| 6f 63 6b 25 20 26 32 30 | 30 2c 20 6d 65 6e 75 25 |ock% &20|0, menu%|
|00000110| 20 35 33 0d 00 82 1b de | 20 66 61 63 74 6f 72 73 | 53.....| factors|
|00000120| 25 20 31 35 2c 20 70 69 | 78 73 25 20 31 35 0d 00 |% 15, pi|xs% 15..|
|00000130| 8c 1e de 20 78 5f 6c 69 | 73 74 25 20 32 32 30 2c |... x_li|st% 220,|
|00000140| 20 79 5f 6c 69 73 74 25 | 20 32 32 30 0d 00 96 10 | y_list%| 220....|
|00000150| de 20 6c 69 74 74 6c 65 | 25 20 32 30 0d 00 a0 3b |. little|% 20...;|
|00000160| 63 75 62 65 25 3d 30 3a | 73 70 68 65 72 65 25 3d |cube%=0:|sphere%=|
|00000170| 30 3a 72 65 64 72 61 77 | 25 3d 30 3a 75 70 64 61 |0:redraw|%=0:upda|
|00000180| 74 65 25 3d 30 3a 63 6c | 72 25 3d 30 3a 73 70 72 |te%=0:cl|r%=0:spr|
|00000190| 69 74 65 73 25 3d 30 0d | 00 aa 1a f2 66 69 6c 65 |ites%=0.|....file|
|000001a0| 28 63 75 62 65 25 2c 20 | 20 20 22 63 75 62 65 22 |(cube%, | "cube"|
|000001b0| 29 0d 00 b4 1c f2 66 69 | 6c 65 28 73 70 68 65 72 |).....fi|le(spher|
|000001c0| 65 25 2c 20 22 73 70 68 | 65 72 65 22 29 0d 00 be |e%, "sph|ere")...|
|000001d0| 1c f2 66 69 6c 65 28 72 | 65 64 72 61 77 25 2c 20 |..file(r|edraw%, |
|000001e0| 22 72 65 64 72 61 77 22 | 29 0d 00 c8 1c f2 66 69 |"redraw"|).....fi|
|000001f0| 6c 65 28 75 70 64 61 74 | 65 25 2c 20 22 75 70 64 |le(updat|e%, "upd|
|00000200| 61 74 65 22 29 0d 00 d2 | 1b f2 66 69 6c 65 28 63 |ate")...|..file(c|
|00000210| 6c 72 25 2c 20 20 20 20 | 22 63 6c 65 61 72 22 29 |lr%, |"clear")|
|00000220| 0d 00 dc 25 f2 73 70 72 | 69 74 65 5f 66 69 6c 65 |...%.spr|ite_file|
|00000230| 28 73 70 72 69 74 65 73 | 25 2c 20 22 53 70 72 69 |(sprites|%, "Spri|
|00000240| 74 65 73 22 29 0d 00 e6 | 1b 6e 6f 5f 73 70 72 69 |tes")...|.no_spri|
|00000250| 74 65 73 25 3d 20 73 70 | 72 69 74 65 73 25 21 34 |tes%= sp|rites%!4|
|00000260| 0d 00 f0 28 e7 20 6e 6f | 5f 73 70 72 69 74 65 73 |...(. no|_sprites|
|00000270| 25 3c 3d 30 20 8c 20 85 | 20 30 2c 22 4e 6f 20 53 |%<=0 . .| 0,"No S|
|00000280| 70 72 69 74 65 73 21 22 | 0d 00 fa 19 de 20 73 70 |prites!"|..... sp|
|00000290| 25 20 28 6e 6f 5f 73 70 | 72 69 74 65 73 25 2a 34 |% (no_sp|rites%*4|
|000002a0| 29 0d 01 04 0f f2 69 6e | 69 74 69 61 6c 69 73 65 |).....in|itialise|
|000002b0| 0d 01 0e 14 f2 69 6e 69 | 74 69 61 6c 69 73 65 5f |.....ini|tialise_|
|000002c0| 77 69 6d 70 0d 01 18 0f | f2 73 74 61 72 74 5f 67 |wimp....|.start_g|
|000002d0| 61 6d 65 0d 01 22 0c 71 | 75 69 74 25 3d 20 a3 0d |ame..".q|uit%= ..|
|000002e0| 01 2c 18 ee 20 85 20 e7 | 20 a4 77 69 6d 70 65 72 |.,.. . .| .wimper|
|000002f0| 72 6f 72 20 8c 20 e0 0d | 01 36 05 f5 0d 01 40 11 |ror . ..|.6....@.|
|00000300| 20 20 20 f2 6d 61 69 6e | 5f 6c 6f 6f 70 0d 01 4a | .main|_loop..J|
|00000310| 0b fd 20 71 75 69 74 25 | 0d 01 54 0f f2 63 6c 6f |.. quit%|..T..clo|
|00000320| 73 65 5f 64 6f 77 6e 0d | 01 5e 05 e0 0d 01 68 16 |se_down.|.^....h.|
|00000330| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000340| 2a 2a 0d 01 72 1f dd 20 | f2 66 69 6c 65 28 f8 20 |**..r.. |.file(. |
|00000350| 61 6c 6c 6f 63 25 2c 66 | 69 6c 65 6e 61 6d 65 24 |alloc%,f|ilename$|
|00000360| 29 0d 01 7c 12 ea 20 66 | 6f 75 6e 64 25 2c 73 69 |)..|.. f|ound%,si|
|00000370| 7a 65 25 0d 01 86 3b c8 | 99 20 46 69 6c 65 25 2c |ze%...;.|. File%,|
|00000380| 35 2c 22 3c 71 75 61 72 | 74 65 74 24 64 69 72 3e |5,"<quar|tet$dir>|
|00000390| 2e 22 2b 66 69 6c 65 6e | 61 6d 65 24 20 b8 20 66 |."+filen|ame$ . f|
|000003a0| 6f 75 6e 64 25 2c 2c 2c | 2c 73 69 7a 65 25 0d 01 |ound%,,,|,size%..|
|000003b0| 90 21 e7 20 66 6f 75 6e | 64 25 3c 3e 31 20 8c 20 |.!. foun|d%<>1 . |
|000003c0| 85 20 30 2c 22 4e 6f 74 | 20 46 6f 75 6e 64 22 0d |. 0,"Not| Found".|
|000003d0| 01 9a 12 de 20 61 6c 6c | 6f 63 25 20 73 69 7a 65 |.... all|oc% size|
|000003e0| 25 0d 01 a4 34 c8 99 20 | 46 69 6c 65 25 2c 26 46 |%...4.. |File%,&F|
|000003f0| 46 2c 22 3c 71 75 61 72 | 74 65 74 24 64 69 72 3e |F,"<quar|tet$dir>|
|00000400| 2e 22 2b 66 69 6c 65 6e | 61 6d 65 24 2c 61 6c 6c |."+filen|ame$,all|
|00000410| 6f 63 25 2c 30 0d 01 ae | 05 e1 0d 01 b8 04 0d 01 |oc%,0...|........|
|00000420| c2 26 dd 20 f2 73 70 72 | 69 74 65 5f 66 69 6c 65 |.&. .spr|ite_file|
|00000430| 28 f8 20 61 6c 6c 6f 63 | 25 2c 66 69 6c 65 6e 61 |(. alloc|%,filena|
|00000440| 6d 65 24 29 0d 01 cc 12 | ea 20 66 6f 75 6e 64 25 |me$)....|. found%|
|00000450| 2c 73 69 7a 65 25 0d 01 | d6 3b c8 99 20 46 69 6c |,size%..|.;.. Fil|
|00000460| 65 25 2c 35 2c 22 3c 71 | 75 61 72 74 65 74 24 64 |e%,5,"<q|uartet$d|
|00000470| 69 72 3e 2e 22 2b 66 69 | 6c 65 6e 61 6d 65 24 20 |ir>."+fi|lename$ |
|00000480| b8 20 66 6f 75 6e 64 25 | 2c 2c 2c 2c 73 69 7a 65 |. found%|,,,,size|
|00000490| 25 0d 01 e0 21 e7 20 66 | 6f 75 6e 64 25 3c 3e 31 |%...!. f|ound%<>1|
|000004a0| 20 8c 20 85 20 30 2c 22 | 4e 6f 74 20 46 6f 75 6e | . . 0,"|Not Foun|
|000004b0| 64 22 0d 01 ea 15 de 20 | 61 6c 6c 6f 63 25 20 73 |d"..... |alloc% s|
|000004c0| 69 7a 65 25 2b 31 36 0d | 01 f4 17 61 6c 6c 6f 63 |ize%+16.|...alloc|
|000004d0| 25 21 30 3d 20 20 73 69 | 7a 65 25 2b 31 36 0d 01 |%!0= si|ze%+16..|
|000004e0| fe 10 61 6c 6c 6f 63 25 | 21 34 3d 20 20 30 0d 02 |..alloc%|!4= 0..|
|000004f0| 08 11 61 6c 6c 6f 63 25 | 21 38 3d 20 20 31 36 0d |..alloc%|!8= 16.|
|00000500| 02 12 11 61 6c 6c 6f 63 | 25 21 31 32 3d 20 31 36 |...alloc|%!12= 16|
|00000510| 0d 02 1c 37 c8 99 20 53 | 70 72 69 74 65 4f 70 25 |...7.. S|priteOp%|
|00000520| 2c 26 32 30 41 2c 61 6c | 6c 6f 63 25 2c 22 3c 71 |,&20A,al|loc%,"<q|
|00000530| 75 61 72 74 65 74 24 64 | 69 72 3e 2e 22 2b 66 69 |uartet$d|ir>."+fi|
|00000540| 6c 65 6e 61 6d 65 24 0d | 02 26 05 e1 0d 02 30 04 |lename$.|.&....0.|
|00000550| 0d 02 3a 14 dd 20 f2 65 | 6e 75 6d 65 72 61 74 65 |..:.. .e|numerate|
|00000560| 5f 53 57 49 0d 02 44 11 | 77 69 6d 70 25 3d 20 26 |_SWI..D.|wimp%= &|
|00000570| 34 30 30 43 30 0d 02 4e | 1a 49 6e 69 74 69 61 6c |400C0..N|.Initial|
|00000580| 69 73 65 25 3d 20 20 20 | 20 20 77 69 6d 70 25 0d |ise%= | wimp%.|
|00000590| 02 58 1c 43 72 65 61 74 | 65 57 69 6e 64 6f 77 25 |.X.Creat|eWindow%|
|000005a0| 3d 20 20 20 77 69 6d 70 | 25 2b 31 0d 02 62 1c 43 |= wimp|%+1..b.C|
|000005b0| 72 65 61 74 65 49 63 6f | 6e 25 3d 20 20 20 20 20 |reateIco|n%= |
|000005c0| 77 69 6d 70 25 2b 32 0d | 02 6c 1c 44 65 6c 65 74 |wimp%+2.|.l.Delet|
|000005d0| 65 57 69 6e 64 6f 77 25 | 3d 20 20 20 77 69 6d 70 |eWindow%|= wimp|
|000005e0| 25 2b 33 0d 02 76 1c 4f | 70 65 6e 57 69 6e 64 6f |%+3..v.O|penWindo|
|000005f0| 77 25 3d 20 20 20 20 20 | 77 69 6d 70 25 2b 35 0d |w%= |wimp%+5.|
|00000600| 02 80 1c 43 6c 6f 73 65 | 57 69 6e 64 6f 77 25 3d |...Close|Window%=|
|00000610| 20 20 20 20 77 69 6d 70 | 25 2b 36 0d 02 8a 1c 50 | wimp|%+6....P|
|00000620| 6f 6c 6c 25 3d 20 20 20 | 20 20 20 20 20 20 20 20 |oll%= | |
|00000630| 77 69 6d 70 25 2b 37 0d | 02 94 1c 52 65 64 72 61 |wimp%+7.|...Redra|
|00000640| 77 57 69 6e 64 6f 77 25 | 3d 20 20 20 77 69 6d 70 |wWindow%|= wimp|
|00000650| 25 2b 38 0d 02 9e 1c 55 | 70 64 61 74 65 57 69 6e |%+8....U|pdateWin|
|00000660| 64 6f 77 25 3d 20 20 20 | 77 69 6d 70 25 2b 39 0d |dow%= |wimp%+9.|
|00000670| 02 a8 1d 47 65 74 52 65 | 63 74 61 6e 67 6c 65 25 |...GetRe|ctangle%|
|00000680| 3d 20 20 20 77 69 6d 70 | 25 2b 31 30 0d 02 b2 1d |= wimp|%+10....|
|00000690| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 25 3d |GetWindo|wState%=|
|000006a0| 20 77 69 6d 70 25 2b 31 | 31 0d 02 bc 1d 50 6f 69 | wimp%+1|1....Poi|
|000006b0| 6e 74 65 72 49 6e 66 6f | 25 3d 20 20 20 20 77 69 |nterInfo|%= wi|
|000006c0| 6d 70 25 2b 31 35 0d 02 | c6 1e 53 65 74 43 61 72 |mp%+15..|..SetCar|
|000006d0| 65 74 25 3d 20 20 20 20 | 20 20 20 77 69 6d 70 25 |et%= | wimp%|
|000006e0| 2b 26 31 32 0d 02 d0 1e | 47 65 74 43 61 72 65 74 |+&12....|GetCaret|
|000006f0| 25 3d 20 20 20 20 20 20 | 20 77 69 6d 70 25 2b 26 |%= | wimp%+&|
|00000700| 31 33 0d 02 da 1e 43 72 | 65 61 74 65 4d 65 6e 75 |13....Cr|eateMenu|
|00000710| 25 3d 20 20 20 20 20 77 | 69 6d 70 25 2b 26 31 34 |%= w|imp%+&14|
|00000720| 0d 02 e4 1e 44 65 63 6f | 64 65 4d 65 6e 75 25 3d |....Deco|deMenu%=|
|00000730| 20 20 20 20 20 77 69 6d | 70 25 2b 26 31 35 0d 02 | wim|p%+&15..|
|00000740| ee 1e 50 6f 69 6e 74 65 | 72 53 68 61 70 65 25 3d |..Pointe|rShape%=|
|00000750| 20 20 20 77 69 6d 70 25 | 2b 26 31 38 0d 02 f8 1e | wimp%|+&18....|
|00000760| 43 6c 6f 73 65 44 6f 77 | 6e 25 3d 20 20 20 20 20 |CloseDow|n%= |
|00000770| 20 77 69 6d 70 25 2b 26 | 31 44 0d 03 02 1e 52 65 | wimp%+&|1D....Re|
|00000780| 70 6f 72 74 45 72 72 6f | 72 25 3d 20 20 20 20 77 |portErro|r%= w|
|00000790| 69 6d 70 25 2b 26 31 46 | 0d 03 0c 1e 53 65 74 43 |imp%+&1F|....SetC|
|000007a0| 6f 6c 6f 75 72 25 3d 20 | 20 20 20 20 20 77 69 6d |olour%= | wim|
|000007b0| 70 25 2b 26 32 36 0d 03 | 16 1e 52 65 61 64 50 69 |p%+&26..|..ReadPi|
|000007c0| 78 54 72 61 6e 73 25 3d | 20 20 20 77 69 6d 70 25 |xTrans%=| wimp%|
|000007d0| 2b 26 32 44 0d 03 20 18 | 53 70 72 69 74 65 4f 70 |+&2D.. .|SpriteOp|
|000007e0| 25 3d 20 20 20 20 20 20 | 20 26 32 45 0d 03 2a 18 |%= | &2E..*.|
|000007f0| 46 69 6c 65 25 3d 20 20 | 20 20 20 20 20 20 20 20 |File%= | |
|00000800| 20 26 30 38 0d 03 34 05 | e1 0d 03 3e 04 0d 03 48 | &08..4.|...>...H|
|00000810| 16 dd 20 f2 69 6e 69 74 | 69 61 6c 69 73 65 5f 77 |.. .init|ialise_w|
|00000820| 69 6d 70 0d 03 52 12 24 | 62 6c 6f 63 6b 25 3d 22 |imp..R.$|block%="|
|00000830| 54 41 53 4b 22 0d 03 5c | 39 c8 99 20 49 6e 69 74 |TASK"..\|9.. Init|
|00000840| 69 61 6c 69 73 65 25 2c | 32 30 30 2c 21 62 6c 6f |ialise%,|200,!blo|
|00000850| 63 6b 25 2c 22 51 75 61 | 72 74 65 74 22 20 b8 20 |ck%,"Qua|rtet" . |
|00000860| 76 65 72 73 69 6f 6e 25 | 2c 74 61 73 6b 25 0d 03 |version%|,task%..|
|00000870| 66 42 e7 20 76 65 72 73 | 69 6f 6e 25 3c 32 30 30 |fB. vers|ion%<200|
|00000880| 20 8c 20 85 20 30 2c 22 | 57 69 6d 70 20 76 65 72 | . . 0,"|Wimp ver|
|00000890| 73 69 6f 6e 20 32 2e 30 | 20 72 65 71 75 69 72 65 |sion 2.0| require|
|000008a0| 64 2c 20 52 49 53 43 20 | 4f 53 20 6f 6e 6c 79 22 |d, RISC |OS only"|
|000008b0| 0d 03 70 1f 73 70 25 21 | 28 30 29 3d 73 70 72 69 |..p.sp%!|(0)=spri|
|000008c0| 74 65 73 25 2b 73 70 72 | 69 74 65 73 25 21 38 0d |tes%+spr|ites%!8.|
|000008d0| 03 7a 23 e3 20 5a 25 3d | 30 20 b8 20 28 6e 6f 5f |.z#. Z%=|0 . (no_|
|000008e0| 73 70 72 69 74 65 73 25 | 2d 32 29 3c 3c 32 20 88 |sprites%|-2)<<2 .|
|000008f0| 20 34 0d 03 84 26 20 20 | 20 73 70 25 21 28 5a 25 | 4...& | sp%!(Z%|
|00000900| 2b 34 29 3d 73 70 25 21 | 28 5a 25 29 2b 21 28 73 |+4)=sp%!|(Z%)+!(s|
|00000910| 70 25 21 28 5a 25 29 29 | 0d 03 8e 05 ed 0d 03 98 |p%!(Z%))|........|
|00000920| 08 f7 20 2b 30 0d 03 a2 | 15 e3 20 5a 25 3d 20 30 |.. +0...|.. Z%= 0|
|00000930| 20 b8 20 32 36 34 20 88 | 20 34 0d 03 ac 12 20 20 | . 264 .| 4.... |
|00000940| 20 f3 20 62 6c 6f 63 6b | 25 21 5a 25 0d 03 b6 05 | . block|%!Z%....|
|00000950| ed 0d 03 c0 18 62 6c 6f | 63 6b 25 21 36 34 3d 20 |.....blo|ck%!64= |
|00000960| 20 73 70 72 69 74 65 73 | 25 0d 03 ca 22 24 28 62 | sprites|%..."$(b|
|00000970| 6c 6f 63 6b 25 2b 37 32 | 29 3d 20 20 22 51 75 61 |lock%+72|)= "Qua|
|00000980| 72 74 65 74 22 2b bd 28 | 31 33 29 0d 03 d4 20 24 |rtet"+.(|13)... $|
|00000990| 28 62 6c 6f 63 6b 25 2b | 31 31 32 29 3d 20 22 53 |(block%+|112)= "S|
|000009a0| 63 6f 72 65 22 2b bd 28 | 31 33 29 0d 03 de 21 24 |core"+.(|13)...!$|
|000009b0| 28 62 6c 6f 63 6b 25 2b | 31 34 38 29 3d 20 22 50 |(block%+|148)= "P|
|000009c0| 69 65 63 65 73 22 2b bd | 28 31 33 29 0d 03 e8 22 |ieces"+.|(13)..."|
|000009d0| 24 28 62 6c 6f 63 6b 25 | 2b 31 38 34 29 3d 20 22 |$(block%|+184)= "|
|000009e0| 43 6c 65 61 72 65 64 22 | 2b bd 28 31 33 29 0d 03 |Cleared"|+.(13)..|
|000009f0| f2 20 24 28 62 6c 6f 63 | 6b 25 2b 32 32 30 29 3d |. $(bloc|k%+220)=|
|00000a00| 20 22 4c 65 76 65 6c 22 | 2b bd 28 31 33 29 0d 03 | "Level"|+.(13)..|
|00000a10| fc 23 24 28 62 6c 6f 63 | 6b 25 2b 32 35 36 29 3d |.#$(bloc|k%+256)=|
|00000a20| 20 22 48 69 20 53 63 6f | 72 65 22 2b bd 28 31 33 | "Hi Sco|re"+.(13|
|00000a30| 29 0d 04 06 25 c8 99 20 | 43 72 65 61 74 65 57 69 |)...%.. |CreateWi|
|00000a40| 6e 64 6f 77 25 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ndow%,,b|lock% . |
|00000a50| 77 69 6e 5f 68 25 0d 04 | 10 0e e3 20 5a 25 3d 30 |win_h%..|... Z%=0|
|00000a60| 20 b8 20 34 0d 04 1a 1d | 3f 28 62 6c 6f 63 6b 25 | . 4....|?(block%|
|00000a70| 2b 38 38 2b 5a 25 2a 33 | 32 29 3d 77 69 6e 5f 68 |+88+Z%*3|2)=win_h|
|00000a80| 25 0d 04 24 05 ed 0d 04 | 2e 45 21 69 63 6f 6e 25 |%..$....|.E!icon%|
|00000a90| 3d 20 2d 31 20 3a 20 69 | 63 6f 6e 25 21 34 3d 20 |= -1 : i|con%!4= |
|00000aa0| 30 20 3a 20 69 63 6f 6e | 25 21 38 3d 20 30 20 3a |0 : icon|%!8= 0 :|
|00000ab0| 20 69 63 6f 6e 25 21 31 | 32 3d 20 36 38 20 3a 20 | icon%!1|2= 68 : |
|00000ac0| 69 63 6f 6e 25 21 31 36 | 3d 36 38 0d 04 38 13 69 |icon%!16|=68..8.i|
|00000ad0| 63 6f 6e 25 21 32 30 3d | 20 26 32 31 30 32 0d 04 |con%!20=| &2102..|
|00000ae0| 42 10 de 20 69 63 6f 6e | 62 61 72 25 20 38 0d 04 |B.. icon|bar% 8..|
|00000af0| 4c 1e 24 69 63 6f 6e 62 | 61 72 25 3d 20 22 69 63 |L.$iconb|ar%= "ic|
|00000b00| 6f 6e 62 61 72 22 2b bd | 28 31 33 29 0d 04 56 15 |onbar"+.|(13)..V.|
|00000b10| 69 63 6f 6e 25 21 32 34 | 3d 20 73 70 25 21 28 30 |icon%!24|= sp%!(0|
|00000b20| 29 0d 04 60 16 69 63 6f | 6e 25 21 32 38 3d 20 73 |)..`.ico|n%!28= s|
|00000b30| 70 72 69 74 65 73 25 0d | 04 6a 0f 69 63 6f 6e 25 |prites%.|.j.icon%|
|00000b40| 21 33 32 3d 20 30 0d 04 | 74 23 c8 99 20 43 72 65 |!32= 0..|t#.. Cre|
|00000b50| 61 74 65 49 63 6f 6e 25 | 2c 2c 69 63 6f 6e 25 20 |ateIcon%|,,icon% |
|00000b60| b8 20 69 63 6f 6e 5f 68 | 25 0d 04 7e 11 f2 6d 6f |. icon_h|%..~..mo|
|00000b70| 64 65 5f 63 68 61 6e 67 | 65 64 0d 04 88 05 e1 0d |de_chang|ed......|
|00000b80| 04 92 04 0d 04 9c 22 dc | 20 37 30 30 2c 32 30 30 |......".| 700,200|
|00000b90| 2c 31 31 39 36 2c 38 36 | 31 2c 30 2c 30 2c 2d 31 |,1196,86|1,0,0,-1|
|00000ba0| 2c 26 31 30 33 0d 04 a6 | 2f dc 20 26 30 30 30 37 |,&103...|/. &0007|
|00000bb0| 30 32 30 37 2c 26 30 30 | 30 43 30 30 30 30 2c 30 |0207,&00|0C0000,0|
|00000bc0| 2c 30 2c 34 39 36 2c 36 | 36 31 2c 26 32 37 30 30 |,0,496,6|61,&2700|
|00000bd0| 30 30 31 39 0d 04 b0 17 | dc 20 26 41 30 30 30 2c |0019....|. &A000,|
|00000be0| 30 2c 30 2c 30 2c 30 2c | 30 2c 30 0d 04 ba 27 dc |0,0,0,0,|0,0...'.|
|00000bf0| 20 30 2c 33 35 32 2c 35 | 30 30 2c 34 39 36 2c 35 | 0,352,5|00,496,5|
|00000c00| 35 30 2c 26 30 37 30 30 | 30 30 31 39 2c 30 2c 30 |50,&0700|0019,0,0|
|00000c10| 2c 30 0d 04 c4 27 dc 20 | 30 2c 33 35 32 2c 34 30 |,0...'. |0,352,40|
|00000c20| 30 2c 34 39 36 2c 34 35 | 30 2c 26 30 37 30 30 30 |0,496,45|0,&07000|
|00000c30| 30 31 39 2c 30 2c 30 2c | 30 0d 04 ce 27 dc 20 30 |019,0,0,|0...'. 0|
|00000c40| 2c 33 35 32 2c 33 30 30 | 2c 34 39 36 2c 33 35 30 |,352,300|,496,350|
|00000c50| 2c 26 30 37 30 30 30 30 | 31 39 2c 30 2c 30 2c 30 |,&070000|19,0,0,0|
|00000c60| 0d 04 d8 27 dc 20 30 2c | 33 35 32 2c 32 30 30 2c |...'. 0,|352,200,|
|00000c70| 34 39 36 2c 32 35 30 2c | 26 30 37 30 30 30 30 31 |496,250,|&0700001|
|00000c80| 39 2c 30 2c 30 2c 30 0d | 04 e2 27 dc 20 30 2c 33 |9,0,0,0.|..'. 0,3|
|00000c90| 35 32 2c 31 30 30 2c 34 | 39 36 2c 31 35 30 2c 26 |52,100,4|96,150,&|
|00000ca0| 30 37 30 30 30 30 31 39 | 2c 30 2c 30 2c 30 0d 04 |07000019|,0,0,0..|
|00000cb0| ec 04 0d 04 f6 10 dd 20 | f2 6d 61 69 6e 5f 6c 6f |....... |.main_lo|
|00000cc0| 6f 70 0d 05 00 1f c8 99 | 20 50 6f 6c 6c 25 2c 30 |op......| Poll%,0|
|00000cd0| 2c 62 6c 6f 63 6b 25 20 | b8 20 72 65 61 73 6f 6e |,block% |. reason|
|00000ce0| 25 0d 05 0a 10 c8 8e 20 | 72 65 61 73 6f 6e 25 20 |%...... |reason% |
|00000cf0| ca 0d 05 14 17 20 20 20 | c9 20 31 3a 20 f2 72 65 |..... |. 1: .re|
|00000d00| 64 72 61 77 5f 72 65 71 | 0d 05 1e 15 20 20 20 c9 |draw_req|.... .|
|00000d10| 20 32 3a 20 f2 6f 70 65 | 6e 5f 72 65 71 0d 05 28 | 2: .ope|n_req..(|
|00000d20| 16 20 20 20 c9 20 33 3a | 20 f2 63 6c 6f 73 65 5f |. . 3:| .close_|
|00000d30| 72 65 71 0d 05 32 1c 20 | 20 20 c9 20 34 3a 20 f2 |req..2. | . 4: .|
|00000d40| 70 6f 69 6e 74 65 72 5f | 6c 65 61 76 69 6e 67 0d |pointer_|leaving.|
|00000d50| 05 3c 1d 20 20 20 c9 20 | 35 3a 20 f2 70 6f 69 6e |.<. . |5: .poin|
|00000d60| 74 65 72 5f 65 6e 74 65 | 72 69 6e 67 0d 05 46 12 |ter_ente|ring..F.|
|00000d70| 20 20 20 c9 20 36 3a 20 | f2 63 6c 69 63 6b 0d 05 | . 6: |.click..|
|00000d80| 50 28 20 20 20 c9 20 37 | 3a 20 85 20 30 2c 22 55 |P( . 7|: . 0,"U|
|00000d90| 73 65 72 20 44 72 61 67 | 20 6e 6f 74 20 65 78 70 |ser Drag| not exp|
|00000da0| 65 63 74 65 64 22 0d 05 | 5a 18 20 20 20 c9 20 38 |ected"..|Z. . 8|
|00000db0| 3a 20 f2 6b 65 79 5f 70 | 72 65 73 73 65 64 0d 05 |: .key_p|ressed..|
|00000dc0| 64 18 20 20 20 c9 20 39 | 3a 20 f2 6d 65 6e 75 5f |d. . 9|: .menu_|
|00000dd0| 73 65 6c 65 63 74 0d 05 | 6e 18 20 20 20 c9 20 31 |select..|n. . 1|
|00000de0| 37 2c 31 38 3a 20 f2 72 | 65 63 65 69 76 65 0d 05 |7,18: .r|eceive..|
|00000df0| 78 05 cb 0d 05 82 0c e7 | 20 65 6e 64 25 20 8c 0d |x.......| end% ..|
|00000e00| 05 8c 1d 20 20 20 e7 20 | 91 3e 65 6e 64 5f 74 25 |... . |.>end_t%|
|00000e10| 20 8c 20 f2 65 6e 64 5f | 67 61 6d 65 0d 05 96 05 | . .end_|game....|
|00000e20| cc 0d 05 a0 18 20 20 20 | e7 20 75 70 64 61 74 65 |..... |. update|
|00000e30| 5f 6c 65 76 65 6c 25 20 | 8c 0d 05 aa 24 20 20 20 |_level% |....$ |
|00000e40| 20 20 20 e7 20 91 3e 6c | 65 76 65 6c 5f 74 25 20 | . .>l|evel_t% |
|00000e50| 8c 20 f2 6e 65 78 74 5f | 6c 65 76 65 6c 0d 05 b4 |. .next_|level...|
|00000e60| 08 20 20 20 cc 0d 05 be | 17 20 20 20 20 20 20 e7 |. ....|. .|
|00000e70| 20 73 65 6c 65 63 74 65 | 64 25 20 8c 0d 05 c8 20 | selecte|d% .... |
|00000e80| 20 20 20 20 20 20 20 20 | 20 e7 20 28 64 72 6f 70 | | . (drop|
|00000e90| 25 20 84 20 91 3e 74 31 | 25 29 20 8c 0d 05 d2 15 |% . .>t1|%) .....|
|00000ea0| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 70 6c 61 | | .pla|
|00000eb0| 79 0d 05 dc 3b 20 20 20 | 20 20 20 20 20 20 20 20 |y...; | |
|00000ec0| 20 63 74 25 2b 3d 31 3a | 20 e7 20 63 74 25 3d 33 | ct%+=1:| . ct%=3|
|00000ed0| 30 30 20 8c 20 63 74 25 | 3d 30 3a e7 20 74 31 25 |00 . ct%|=0:. t1%|
|00000ee0| 3e 31 30 20 8c 20 74 69 | 25 2d 3d 31 0d 05 e6 0e |>10 . ti|%-=1....|
|00000ef0| 20 20 20 20 20 20 20 20 | 20 cc 0d 05 f0 18 20 20 | | ..... |
|00000f00| 20 20 20 20 20 20 20 20 | 20 20 f2 63 6f 6e 74 72 | | .contr|
|00000f10| 6f 6c 0d 05 fa 0e 20 20 | 20 20 20 20 20 20 20 cd |ol.... | .|
|00000f20| 0d 06 04 0b 20 20 20 20 | 20 20 cd 0d 06 0e 08 20 |.... | ..... |
|00000f30| 20 20 cd 0d 06 18 05 cd | 0d 06 22 05 e1 0d 06 2c | ......|.."....,|
|00000f40| 04 0d 06 36 0e dd 20 f2 | 63 6f 6e 74 72 6f 6c 0d |...6.. .|control.|
|00000f50| 06 40 08 ea 20 43 25 0d | 06 4a 15 e7 20 a6 2d 39 |.@.. C%.|.J.. .-9|
|00000f60| 39 20 8c 20 64 72 6f 70 | 25 3d 20 b9 0d 06 54 1c |9 . drop|%= ...T.|
|00000f70| c8 99 20 50 6f 69 6e 74 | 65 72 49 6e 66 6f 25 2c |.. Point|erInfo%,|
|00000f80| 2c 73 74 72 69 6e 67 25 | 0d 06 5e 16 62 75 74 74 |,string%|..^.butt|
|00000f90| 6f 6e 25 3d 20 73 74 72 | 69 6e 67 25 21 38 0d 06 |on%= str|ing%!8..|
|00000fa0| 68 1b e7 20 62 75 74 74 | 6f 6e 25 3c 3e 6f 6c 64 |h.. butt|on%<>old|
|00000fb0| 62 75 74 74 6f 6e 25 20 | 8c 0d 06 72 25 20 20 20 |button% |...r% |
|00000fc0| 64 65 6c 61 79 25 3d 91 | 2b 32 35 3a 6f 6c 64 62 |delay%=.|+25:oldb|
|00000fd0| 75 74 74 6f 6e 25 3d 62 | 75 74 74 6f 6e 25 0d 06 |utton%=b|utton%..|
|00000fe0| 7c 05 cc 0d 06 86 28 20 | 20 20 e7 20 91 3c 64 65 ||.....( | . .<de|
|00000ff0| 6c 61 79 25 20 8c 20 6f | 6c 64 62 75 74 74 6f 6e |lay% . o|ldbutton|
|00001000| 25 3d 62 75 74 74 6f 6e | 25 3a e1 0d 06 90 05 cd |%=button|%:......|
|00001010| 0d 06 9a 08 43 25 3d 30 | 0d 06 a4 13 e7 20 62 75 |....C%=0|..... bu|
|00001020| 74 74 6f 6e 25 3d 30 20 | 8c 20 e1 0d 06 ae 2b f2 |tton%=0 |. ....+.|
|00001030| 73 68 6f 77 70 69 65 63 | 65 28 70 69 65 63 65 25 |showpiec|e(piece%|
|00001040| 2c 6f 72 69 65 6e 74 25 | 2c 49 25 2c 4a 25 2c 63 |,orient%|,I%,J%,c|
|00001050| 6c 65 61 72 25 29 0d 06 | b8 18 e7 20 28 62 75 74 |lear%)..|... (but|
|00001060| 74 6f 6e 25 20 80 20 34 | 29 3c 3e 30 20 8c 0d 06 |ton% . 4|)<>0 ...|
|00001070| c2 2d 20 20 20 e7 20 a4 | 73 61 66 65 28 70 69 65 |.- . .|safe(pie|
|00001080| 63 65 25 2c 6f 72 69 65 | 6e 74 25 2c 49 25 2d 31 |ce%,orie|nt%,I%-1|
|00001090| 2c 4a 25 29 20 8c 20 43 | 25 3d 31 0d 06 cc 05 cd |,J%) . C|%=1.....|
|000010a0| 0d 06 d6 18 e7 20 28 62 | 75 74 74 6f 6e 25 20 80 |..... (b|utton% .|
|000010b0| 20 31 29 3c 3e 30 20 8c | 0d 06 e0 2d 20 20 20 e7 | 1)<>0 .|...- .|
|000010c0| 20 a4 73 61 66 65 28 70 | 69 65 63 65 25 2c 6f 72 | .safe(p|iece%,or|
|000010d0| 69 65 6e 74 25 2c 49 25 | 2b 31 2c 4a 25 29 20 8c |ient%,I%|+1,J%) .|
|000010e0| 20 43 25 3d 32 0d 06 ea | 05 cd 0d 06 f4 18 e7 20 | C%=2...|....... |
|000010f0| 28 62 75 74 74 6f 6e 25 | 20 80 20 32 29 3c 3e 30 |(button%| . 2)<>0|
|00001100| 20 8c 0d 06 fe 31 20 20 | 20 e7 20 a4 73 61 66 65 | ....1 | . .safe|
|00001110| 28 70 69 65 63 65 25 2c | 28 6f 72 69 65 6e 74 25 |(piece%,|(orient%|
|00001120| 2b 31 29 83 34 2c 49 25 | 2c 4a 25 29 20 8c 20 43 |+1).4,I%|,J%) . C|
|00001130| 25 3d 33 0d 07 08 05 cd | 0d 07 12 0b c8 8e 20 43 |%=3.....|...... C|
|00001140| 25 20 ca 0d 07 1c 0f c9 | 20 31 20 3a 20 49 25 2d |% ......| 1 : I%-|
|00001150| 3d 31 0d 07 26 0f c9 20 | 32 20 3a 20 49 25 2b 3d |=1..&.. |2 : I%+=|
|00001160| 31 0d 07 30 21 c9 20 33 | 20 3a 20 6f 72 69 65 6e |1..0!. 3| : orien|
|00001170| 74 25 3d 28 6f 72 69 65 | 6e 74 25 2b 31 29 20 83 |t%=(orie|nt%+1) .|
|00001180| 20 34 0d 07 3a 05 cb 0d | 07 44 2d f2 73 68 6f 77 | 4..:...|.D-.show|
|00001190| 70 69 65 63 65 28 70 69 | 65 63 65 25 2c 6f 72 69 |piece(pi|ece%,ori|
|000011a0| 65 6e 74 25 2c 49 25 2c | 4a 25 2c 70 69 65 63 65 |ent%,I%,|J%,piece|
|000011b0| 25 2b 31 29 0d 07 4e 12 | f2 75 70 64 61 74 65 5f |%+1)..N.|.update_|
|000011c0| 77 69 6e 64 6f 77 0d 07 | 58 05 e1 0d 07 62 04 0d |window..|X....b..|
|000011d0| 07 6c 0e dd 20 f2 72 65 | 63 65 69 76 65 0d 07 76 |.l.. .re|ceive..v|
|000011e0| 20 20 20 20 e7 20 62 6c | 6f 63 6b 25 21 31 36 3d | . bl|ock%!16=|
|000011f0| 30 20 8c 20 71 75 69 74 | 25 3d b9 3a e1 0d 07 80 |0 . quit|%=.:....|
|00001200| 29 20 20 20 e7 20 62 6c | 6f 63 6b 25 21 31 36 3d |) . bl|ock%!16=|
|00001210| 26 34 30 30 43 31 20 8c | 20 f2 6d 6f 64 65 5f 63 |&400C1 .| .mode_c|
|00001220| 68 61 6e 67 65 64 0d 07 | 8a 05 e1 0d 07 94 04 0d |hanged..|........|
|00001230| 07 9e 13 dd 20 f2 6d 6f | 64 65 5f 63 68 61 6e 67 |.... .mo|de_chang|
|00001240| 65 64 0d 07 a8 3c c8 99 | 20 52 65 61 64 50 69 78 |ed...<..| ReadPix|
|00001250| 54 72 61 6e 73 25 2c 26 | 32 30 30 2c 73 70 72 69 |Trans%,&|200,spri|
|00001260| 74 65 73 25 2c 73 70 25 | 21 28 34 29 2c 2c 2c 2c |tes%,sp%|!(4),,,,|
|00001270| 66 61 63 74 6f 72 73 25 | 2c 70 69 78 73 25 0d 07 |factors%|,pixs%..|
|00001280| b2 05 e1 0d 07 bc 04 0d | 07 c6 11 dd 20 f2 63 6c |........|.... .cl|
|00001290| 6f 73 65 5f 64 6f 77 6e | 0d 07 d0 12 24 62 6c 6f |ose_down|....$blo|
|000012a0| 63 6b 25 3d 22 54 41 53 | 4b 22 0d 07 da 1f c8 99 |ck%="TAS|K"......|
|000012b0| 20 43 6c 6f 73 65 44 6f | 77 6e 25 2c 74 61 73 6b | CloseDo|wn%,task|
|000012c0| 25 2c 21 62 6c 6f 63 6b | 25 0d 07 e4 05 e1 0d 07 |%,!block|%.......|
|000012d0| ee 04 0d 07 f8 0c dd 20 | f2 65 72 72 6f 72 0d 08 |....... |.error..|
|000012e0| 02 09 ee 20 85 20 87 0d | 08 0c 07 eb 20 33 0d 08 |... . ..|.... 3..|
|000012f0| 16 16 f1 20 f6 24 3b 22 | 20 61 74 20 6c 69 6e 65 |... .$;"| at line|
|00001300| 20 22 3b 9e 0d 08 20 05 | e1 0d 08 2a 04 0d 08 34 | ";... .|...*...4|
|00001310| 10 dd 20 a4 77 69 6d 70 | 65 72 72 6f 72 0d 08 3e |.. .wimp|error..>|
|00001320| 0d 21 62 6c 6f 63 6b 25 | 3d 9f 0d 08 48 24 24 28 |.!block%|=...H$$(|
|00001330| 62 6c 6f 63 6b 25 2b 34 | 29 3d f6 24 2b 22 20 61 |block%+4|)=.$+" a|
|00001340| 74 20 6c 69 6e 65 20 22 | 2b c3 9e 2b bd 30 0d 08 |t line "|+..+.0..|
|00001350| 52 33 c8 99 20 52 65 70 | 6f 72 74 45 72 72 6f 72 |R3.. Rep|ortError|
|00001360| 25 2c 62 6c 6f 63 6b 25 | 2c 33 2c 22 51 75 61 72 |%,block%|,3,"Quar|
|00001370| 74 65 74 22 20 b8 20 2c | 72 65 73 70 6f 6e 73 65 |tet" . ,|response|
|00001380| 25 0d 08 5c 27 e7 20 72 | 65 73 70 6f 6e 73 65 25 |%..\'. r|esponse%|
|00001390| 3d 32 20 8c 20 f2 63 6c | 6f 73 65 5f 64 6f 77 6e |=2 . .cl|ose_down|
|000013a0| 3a 3d b9 20 8b 20 3d a3 | 0d 08 66 04 0d 08 70 11 |:=. . =.|..f...p.|
|000013b0| dd 20 f2 72 65 64 72 61 | 77 5f 72 65 71 0d 08 7a |. .redra|w_req..z|
|000013c0| 1c e7 20 62 6c 6f 63 6b | 25 21 30 20 3c 3e 20 77 |.. block|%!0 <> w|
|000013d0| 69 6e 5f 68 25 20 8c 20 | e1 0d 08 84 24 c8 99 20 |in_h% . |....$.. |
|000013e0| 52 65 64 72 61 77 57 69 | 6e 64 6f 77 25 2c 2c 62 |RedrawWi|ndow%,,b|
|000013f0| 6c 6f 63 6b 25 20 b8 20 | 66 6c 61 67 25 0d 08 8e |lock% . |flag%...|
|00001400| 0c c8 95 20 66 6c 61 67 | 25 0d 08 98 49 20 20 20 |... flag|%...I |
|00001410| f2 72 65 64 72 61 77 28 | 62 6c 6f 63 6b 25 21 32 |.redraw(|block%!2|
|00001420| 38 2c 62 6c 6f 63 6b 25 | 21 33 32 2c 62 6c 6f 63 |8,block%|!32,bloc|
|00001430| 6b 25 21 33 36 2c 62 6c | 6f 63 6b 25 21 34 30 2c |k%!36,bl|ock%!40,|
|00001440| 62 6c 6f 63 6b 25 21 34 | 2c 62 6c 6f 63 6b 25 21 |block%!4|,block%!|
|00001450| 38 29 0d 08 a2 27 20 20 | 20 c8 99 20 47 65 74 52 |8)...' | .. GetR|
|00001460| 65 63 74 61 6e 67 6c 65 | 25 2c 2c 62 6c 6f 63 6b |ectangle|%,,block|
|00001470| 25 20 b8 20 66 6c 61 67 | 25 0d 08 ac 05 ce 0d 08 |% . flag|%.......|
|00001480| b6 05 e1 0d 08 c0 04 0d | 08 ca 24 dd 20 f2 72 65 |........|..$. .re|
|00001490| 64 72 61 77 28 78 31 25 | 2c 79 31 25 2c 78 32 25 |draw(x1%|,y1%,x2%|
|000014a0| 2c 79 32 25 2c 69 25 2c | 6a 25 29 0d 08 d4 29 78 |,y2%,i%,|j%)...)x|
|000014b0| 31 25 2d 3d 69 25 20 3a | 20 79 31 25 2d 3d 6a 25 |1%-=i% :| y1%-=j%|
|000014c0| 20 3a 20 78 32 25 2d 3d | 69 25 20 3a 20 79 32 25 | : x2%-=|i% : y2%|
|000014d0| 2d 3d 6a 25 0d 08 de 24 | e7 20 78 31 25 3c 32 31 |-=j%...$|. x1%<21|
|000014e0| 20 8c 20 f2 73 70 72 69 | 74 65 28 34 2b 69 25 2c | . .spri|te(4+i%,|
|000014f0| 31 32 2b 6a 25 2c 38 29 | 0d 08 e8 0f e7 20 78 32 |12+j%,8)|..... x2|
|00001500| 25 3e 33 33 39 20 8c 0d | 08 f2 1e 20 20 20 f2 73 |%>339 ..|... .s|
|00001510| 70 72 69 74 65 28 33 34 | 30 2b 69 25 2c 31 32 2b |prite(34|0+i%,12+|
|00001520| 6a 25 2c 38 29 0d 08 fc | 17 20 20 20 f2 73 68 6f |j%,8)...|. .sho|
|00001530| 77 61 74 74 72 28 69 25 | 2c 6a 25 29 0d 09 06 16 |wattr(i%|,j%)....|
|00001540| 20 20 20 c8 99 20 53 65 | 74 43 6f 6c 6f 75 72 25 | .. Se|tColour%|
|00001550| 2c 37 0d 09 10 1f 20 20 | 20 ec 20 33 38 34 2b 69 |,7.... | . 384+i|
|00001560| 25 2c 36 33 36 2b 6a 25 | 3a f1 22 53 63 6f 72 65 |%,636+j%|:."Score|
|00001570| 22 0d 09 1a 20 20 20 20 | ec 20 33 37 36 2b 69 25 |"... |. 376+i%|
|00001580| 2c 34 38 33 2b 6a 25 3a | f1 22 50 69 65 63 65 73 |,483+j%:|."Pieces|
|00001590| 22 0d 09 24 21 20 20 20 | ec 20 33 36 38 2b 69 25 |"..$! |. 368+i%|
|000015a0| 2c 33 33 30 2b 6a 25 3a | f1 22 43 6c 65 61 72 65 |,330+j%:|."Cleare|
|000015b0| 64 22 0d 09 2e 1f 20 20 | 20 ec 20 33 38 34 2b 69 |d".... | . 384+i|
|000015c0| 25 2c 31 37 37 2b 6a 25 | 3a f1 22 4c 65 76 65 6c |%,177+j%|:."Level|
|000015d0| 22 0d 09 38 05 cd 0d 09 | 42 23 e7 20 79 31 25 3c |"..8....|B#. y1%<|
|000015e0| 32 31 20 8c 20 f2 73 70 | 72 69 74 65 28 38 2b 69 |21 . .sp|rite(8+i|
|000015f0| 25 2c 34 2b 6a 25 2c 39 | 29 0d 09 4c 27 78 31 25 |%,4+j%,9|)..L'x1%|
|00001600| 3d 28 78 31 25 2d 32 30 | 29 20 81 20 33 32 3a 78 |=(x1%-20|) . 32:x|
|00001610| 32 25 3d 28 78 32 25 2b | 31 32 29 20 81 20 33 32 |2%=(x2%+|12) . 32|
|00001620| 0d 09 56 27 79 31 25 3d | 28 79 31 25 2d 32 30 29 |..V'y1%=|(y1%-20)|
|00001630| 20 81 20 33 32 3a 79 32 | 25 3d 28 79 32 25 2b 31 | . 32:y2|%=(y2%+1|
|00001640| 32 29 20 81 20 33 32 0d | 09 60 34 e7 20 78 32 25 |2) . 32.|.`4. x2%|
|00001650| 3c 30 20 84 20 79 32 25 | 3c 30 20 84 20 78 31 25 |<0 . y2%|<0 . x1%|
|00001660| 3e 3d 77 69 64 74 68 25 | 20 84 20 79 31 25 3e 3d |>=width%| . y1%>=|
|00001670| 68 65 69 67 68 74 25 20 | 8c 20 e1 0d 09 6a 13 e7 |height% |. ...j..|
|00001680| 20 78 31 25 3c 30 20 8c | 20 78 31 25 3d 30 0d 09 | x1%<0 .| x1%=0..|
|00001690| 74 13 e7 20 79 31 25 3c | 30 20 8c 20 79 31 25 3d |t.. y1%<|0 . y1%=|
|000016a0| 30 0d 09 7e 20 e7 20 78 | 32 25 3e 3d 77 69 64 74 |0..~ . x|2%>=widt|
|000016b0| 68 25 20 8c 20 78 32 25 | 3d 77 69 64 74 68 25 2d |h% . x2%|=width%-|
|000016c0| 31 0d 09 88 22 e7 20 79 | 32 25 3e 3d 68 65 69 67 |1...". y|2%>=heig|
|000016d0| 68 74 25 20 8c 20 79 32 | 25 3d 68 65 69 67 68 74 |ht% . y2|%=height|
|000016e0| 25 2d 31 0d 09 92 3c 6c | 69 74 74 6c 65 25 21 30 |%-1...<l|ittle%!0|
|000016f0| 3d 78 31 25 3a 6c 69 74 | 74 6c 65 25 21 34 3d 79 |=x1%:lit|tle%!4=y|
|00001700| 31 25 3a 6c 69 74 74 6c | 65 25 21 38 3d 78 32 25 |1%:littl|e%!8=x2%|
|00001710| 3a 6c 69 74 74 6c 65 25 | 21 31 32 3d 79 32 25 0d |:little%|!12=y2%.|
|00001720| 09 9c 4c 41 25 3d 6c 69 | 74 74 6c 65 25 3a 42 25 |..LA%=li|ttle%:B%|
|00001730| 3d 73 70 72 69 74 65 73 | 25 3a 43 25 3d 73 70 25 |=sprites|%:C%=sp%|
|00001740| 3a 44 25 3d 69 25 3a 45 | 25 3d 6a 25 3a 46 25 3d |:D%=i%:E|%=j%:F%=|
|00001750| 62 6f 61 72 64 25 3a 47 | 25 3d 66 61 63 74 6f 72 |board%:G|%=factor|
|00001760| 73 25 3a 48 25 3d 70 69 | 78 73 25 0d 09 a6 0d d6 |s%:H%=pi|xs%.....|
|00001770| 20 72 65 64 72 61 77 25 | 0d 09 b0 37 e7 20 75 70 | redraw%|...7. up|
|00001780| 64 61 74 65 5f 65 6e 64 | 25 20 8c 20 f2 6d 65 73 |date_end|% . .mes|
|00001790| 73 61 67 65 28 69 25 2c | 6a 25 2c 22 47 20 41 20 |sage(i%,|j%,"G A |
|000017a0| 4d 20 45 22 2c 22 4f 20 | 56 20 45 20 52 22 29 0d |M E","O |V E R").|
|000017b0| 09 ba 3b e7 20 75 70 64 | 61 74 65 5f 6c 65 76 65 |..;. upd|ate_leve|
|000017c0| 6c 25 20 8c 20 f2 6d 65 | 73 73 61 67 65 28 69 25 |l% . .me|ssage(i%|
|000017d0| 2c 6a 25 2c 22 4e 20 45 | 20 58 20 54 22 2c 22 4c |,j%,"N E| X T","L|
|000017e0| 20 45 20 56 20 45 20 4c | 22 29 0d 09 c4 05 e1 0d | E V E L|")......|
|000017f0| 09 ce 04 0d 09 d8 15 f4 | 20 6f 6c 64 20 72 65 64 |........| old red|
|00001800| 72 61 77 20 63 6f 64 65 | 0d 09 e2 13 f4 20 69 25 |raw code|..... i%|
|00001810| 2b 3d 32 30 3a 6a 25 2b | 3d 32 30 0d 09 ec 17 f4 |+=20:j%+|=20.....|
|00001820| 20 46 4f 52 20 59 25 3d | 79 31 25 20 54 4f 20 79 | FOR Y%=|y1% TO y|
|00001830| 32 25 0d 09 f6 1a f4 20 | 20 20 20 46 4f 52 20 58 |2%..... | FOR X|
|00001840| 25 3d 78 31 25 20 54 4f | 20 78 32 25 0d 0a 00 3c |%=x1% TO| x2%...<|
|00001850| f4 20 20 20 20 20 20 20 | 50 52 4f 43 73 70 72 69 |. |PROCspri|
|00001860| 74 65 28 28 58 25 3c 3c | 35 29 2b 69 25 2c 28 59 |te((X%<<|5)+i%,(Y|
|00001870| 25 3c 3c 35 29 2b 6a 25 | 2c 46 4e 62 6f 61 72 64 |%<<5)+j%|,FNboard|
|00001880| 28 58 25 2c 59 25 29 29 | 0d 0a 0a 0e f4 20 20 20 |(X%,Y%))|..... |
|00001890| 20 4e 45 58 54 2c 0d 0a | 14 04 0d 0a 1e 16 dd 20 | NEXT,..|....... |
|000018a0| f2 73 68 6f 77 61 74 74 | 72 28 69 25 2c 6a 25 29 |.showatt|r(i%,j%)|
|000018b0| 0d 0a 28 0e e3 20 5a 25 | 3d 30 20 b8 20 33 0d 0a |..(.. Z%|=0 . 3..|
|000018c0| 32 11 41 24 3d c3 61 74 | 74 72 25 28 5a 25 29 0d |2.A$=.at|tr%(Z%).|
|000018d0| 0a 3c 13 c8 99 20 53 65 | 74 43 6f 6c 6f 75 72 25 |.<... Se|tColour%|
|000018e0| 2c 37 0d 0a 46 28 ec 20 | 34 32 34 2d a9 28 41 24 |,7..F(. |424-.(A$|
|000018f0| 29 2a 38 2b 69 25 2c 35 | 38 35 2d 31 35 33 2a 5a |)*8+i%,5|85-153*Z|
|00001900| 25 2b 6a 25 20 3a 20 f1 | 41 24 0d 0a 50 0f 41 24 |%+j% : .|A$..P.A$|
|00001910| 3d c3 68 69 25 28 5a 25 | 29 0d 0a 5a 13 c8 99 20 |=.hi%(Z%|)..Z... |
|00001920| 53 65 74 43 6f 6c 6f 75 | 72 25 2c 32 0d 0a 64 28 |SetColou|r%,2..d(|
|00001930| ec 20 34 32 34 2d a9 28 | 41 24 29 2a 38 2b 69 25 |. 424-.(|A$)*8+i%|
|00001940| 2c 35 33 34 2d 31 35 33 | 2a 5a 25 2b 6a 25 20 3a |,534-153|*Z%+j% :|
|00001950| 20 f1 41 24 0d 0a 6e 05 | ed 0d 0a 78 05 e1 0d 0a | .A$..n.|...x....|
|00001960| 82 04 0d 0a 8c 17 dd 20 | f2 73 70 72 69 74 65 28 |....... |.sprite(|
|00001970| 78 25 2c 79 25 2c 6e 25 | 29 0d 0a 96 40 c8 99 20 |x%,y%,n%|)...@.. |
|00001980| 53 70 72 69 74 65 4f 70 | 25 2c 26 32 33 34 2c 73 |SpriteOp|%,&234,s|
|00001990| 70 72 69 74 65 73 25 2c | 73 70 25 21 28 6e 25 3c |prites%,|sp%!(n%<|
|000019a0| 3c 32 29 2c 78 25 2c 79 | 25 2c 2c 66 61 63 74 6f |<2),x%,y|%,,facto|
|000019b0| 72 73 25 2c 70 69 78 73 | 25 0d 0a a0 05 e1 0d 0a |rs%,pixs|%.......|
|000019c0| aa 04 0d 0a b4 0c dd 20 | f2 63 6c 69 63 6b 0d 0a |....... |.click..|
|000019d0| be 28 e7 20 62 6c 6f 63 | 6b 25 21 31 32 3d 77 69 |.(. bloc|k%!12=wi|
|000019e0| 6e 5f 68 25 20 8c 20 f2 | 77 69 6e 64 6f 77 5f 63 |n_h% . .|window_c|
|000019f0| 6c 69 63 6b 3a e1 0d 0a | c8 31 e7 20 62 6c 6f 63 |lick:...|.1. bloc|
|00001a00| 6b 25 21 31 36 3c 3e 69 | 63 6f 6e 5f 68 25 20 8c |k%!16<>i|con_h% .|
|00001a10| 20 85 20 30 2c 22 55 6e | 65 78 70 65 63 74 65 64 | . 0,"Un|expected|
|00001a20| 20 43 6c 69 63 6b 22 0d | 0a d2 15 62 75 74 74 6f | Click".|...butto|
|00001a30| 6e 73 25 3d 62 6c 6f 63 | 6b 25 21 38 0d 0a dc 26 |ns%=bloc|k%!8...&|
|00001a40| e7 20 28 62 75 74 74 6f | 6e 73 25 20 80 20 35 29 |. (butto|ns% . 5)|
|00001a50| 3c 3e 30 20 8c 20 f2 6f | 70 65 6e 5f 77 69 6e 64 |<>0 . .o|pen_wind|
|00001a60| 6f 77 0d 0a e6 29 e7 20 | 28 62 75 74 74 6f 6e 73 |ow...). |(buttons|
|00001a70| 25 20 80 20 32 29 3c 3e | 30 20 8c 20 f2 6d 65 6e |% . 2)<>|0 . .men|
|00001a80| 75 28 62 6c 6f 63 6b 25 | 21 30 29 0d 0a f0 05 e1 |u(block%|!0).....|
|00001a90| 0d 0a fa 04 0d 0b 04 13 | dd 20 f2 77 69 6e 64 6f |........|. .windo|
|00001aa0| 77 5f 63 6c 69 63 6b 0d | 0b 0e 13 e7 20 73 65 6c |w_click.|.... sel|
|00001ab0| 65 63 74 65 64 25 20 8c | 20 e1 0d 0b 18 1c c8 99 |ected% .| .......|
|00001ac0| 20 50 6f 69 6e 74 65 72 | 49 6e 66 6f 25 2c 2c 73 | Pointer|Info%,,s|
|00001ad0| 74 72 69 6e 67 25 0d 0b | 22 16 62 75 74 74 6f 6e |tring%..|".button|
|00001ae0| 25 3d 20 73 74 72 69 6e | 67 25 21 38 0d 0b 2c 24 |%= strin|g%!8..,$|
|00001af0| 64 65 6c 61 79 25 3d 91 | 2b 33 30 20 3a 20 6f 6c |delay%=.|+30 : ol|
|00001b00| 64 62 75 74 74 6f 6e 25 | 3d 62 75 74 74 6f 6e 25 |dbutton%|=button%|
|00001b10| 0d 0b 36 10 73 65 6c 65 | 63 74 65 64 25 3d 20 b9 |..6.sele|cted%= .|
|00001b20| 0d 0b 40 2c e7 20 ac 20 | 70 6c 61 79 69 6e 67 25 |..@,. . |playing%|
|00001b30| 20 8c 20 f2 73 74 61 72 | 74 5f 67 61 6d 65 20 3a | . .star|t_game :|
|00001b40| 20 70 6c 61 79 69 6e 67 | 25 3d 20 b9 0d 0b 4a 12 | playing|%= ...J.|
|00001b50| 21 62 6c 6f 63 6b 25 3d | 77 69 6e 5f 68 25 0d 0b |!block%=|win_h%..|
|00001b60| 54 2e c8 99 20 47 65 74 | 57 69 6e 64 6f 77 53 74 |T... Get|WindowSt|
|00001b70| 61 74 65 25 2c 2c 62 6c | 6f 63 6b 25 20 3a 20 62 |ate%,,bl|ock% : b|
|00001b80| 6c 6f 63 6b 25 21 32 38 | 3d 20 2d 31 0d 0b 5e 1a |lock%!28|= -1..^.|
|00001b90| c8 99 20 4f 70 65 6e 57 | 69 6e 64 6f 77 25 2c 2c |.. OpenW|indow%,,|
|00001ba0| 62 6c 6f 63 6b 25 0d 0b | 68 22 c8 99 20 53 65 74 |block%..|h".. Set|
|00001bb0| 43 61 72 65 74 25 2c 77 | 69 6e 5f 68 25 2c 2d 31 |Caret%,w|in_h%,-1|
|00001bc0| 2c 30 2c 30 2c 30 2c 30 | 0d 0b 72 2a c8 99 20 50 |,0,0,0,0|..r*.. P|
|00001bd0| 6f 69 6e 74 65 72 53 68 | 61 70 65 25 2c 32 2c 63 |ointerSh|ape%,2,c|
|00001be0| 75 62 65 25 2b 31 39 2c | 32 34 2c 31 32 2c 31 32 |ube%+19,|24,12,12|
|00001bf0| 2c 36 0d 0b 7c 05 e1 0d | 0b 86 04 0d 0b 90 10 dd |,6..|...|........|
|00001c00| 20 f2 69 6e 69 74 5f 67 | 61 6d 65 0d 0b 9a 39 77 | .init_g|ame...9w|
|00001c10| 69 64 74 68 25 3d 20 31 | 30 20 3a 20 68 65 69 67 |idth%= 1|0 : heig|
|00001c20| 68 74 25 3d 20 32 30 20 | 3a 20 6e 6f 5f 70 69 65 |ht%= 20 |: no_pie|
|00001c30| 63 65 73 25 3d 20 37 20 | 3a 20 63 6c 65 61 72 25 |ces%= 7 |: clear%|
|00001c40| 3d 20 31 30 0d 0b a4 3d | 6c 69 73 74 25 3d 2d 31 |= 10...=|list%=-1|
|00001c50| 20 3a 20 62 6c 6f 63 6b | 73 25 3d 20 34 20 3a 20 | : block|s%= 4 : |
|00001c60| 6d 61 78 5f 6c 65 76 65 | 6c 73 25 3d 20 31 31 20 |max_leve|ls%= 11 |
|00001c70| 3a 20 6c 65 76 65 6c 5f | 62 6c 6f 63 6b 25 3d 31 |: level_|block%=1|
|00001c80| 31 0d 0b ae 34 73 63 6f | 72 65 25 3d 20 30 20 3a |1...4sco|re%= 0 :|
|00001c90| 20 70 69 65 63 65 73 25 | 3d 20 31 20 3a 20 63 6c | pieces%|= 1 : cl|
|00001ca0| 65 61 72 65 64 25 3d 20 | 32 20 3a 20 6c 65 76 65 |eared%= |2 : leve|
|00001cb0| 6c 25 3d 20 33 0d 0b b8 | 3e 68 69 25 28 73 63 6f |l%= 3...|>hi%(sco|
|00001cc0| 72 65 25 29 3d 30 3a 68 | 69 25 28 70 69 65 63 65 |re%)=0:h|i%(piece|
|00001cd0| 73 25 29 3d 30 3a 68 69 | 25 28 63 6c 65 61 72 65 |s%)=0:hi|%(cleare|
|00001ce0| 64 25 29 3d 30 3a 68 69 | 25 28 6c 65 76 65 6c 25 |d%)=0:hi|%(level%|
|00001cf0| 29 3d 31 0d 0b c2 1d de | 20 62 6f 61 72 64 25 20 |)=1.....| board% |
|00001d00| 28 77 69 64 74 68 25 2a | 68 65 69 67 68 74 25 29 |(width%*|height%)|
|00001d10| 0d 0b cc 1a de 20 73 63 | 6f 72 65 25 28 6e 6f 5f |..... sc|ore%(no_|
|00001d20| 70 69 65 63 65 73 25 2d | 31 29 0d 0b d6 4b de 20 |pieces%-|1)...K. |
|00001d30| 78 5f 70 69 65 63 65 25 | 28 6e 6f 5f 70 69 65 63 |x_piece%|(no_piec|
|00001d40| 65 73 25 2d 31 2c 62 6c | 6f 63 6b 73 25 2d 31 2c |es%-1,bl|ocks%-1,|
|00001d50| 33 29 2c 79 5f 70 69 65 | 63 65 25 28 6e 6f 5f 70 |3),y_pie|ce%(no_p|
|00001d60| 69 65 63 65 73 25 2d 31 | 2c 62 6c 6f 63 6b 73 25 |ieces%-1|,blocks%|
|00001d70| 2d 31 2c 33 29 0d 0b e0 | 43 de 20 6e 75 6d 25 28 |-1,3)...|C. num%(|
|00001d80| 6d 61 78 5f 6c 65 76 65 | 6c 73 25 2d 32 29 2c 78 |max_leve|ls%-2),x|
|00001d90| 25 28 31 32 2c 6d 61 78 | 5f 6c 65 76 65 6c 73 25 |%(12,max|_levels%|
|00001da0| 2d 32 29 2c 79 25 28 31 | 32 2c 6d 61 78 5f 6c 65 |-2),y%(1|2,max_le|
|00001db0| 76 65 6c 73 25 2d 32 29 | 0d 0b ea 08 f7 20 2b 30 |vels%-2)|..... +0|
|00001dc0| 0d 0b f4 1d e3 20 70 69 | 65 63 65 25 3d 30 20 b8 |..... pi|ece%=0 .|
|00001dd0| 20 6e 6f 5f 70 69 65 63 | 65 73 25 2d 31 0d 0b fe | no_piec|es%-1...|
|00001de0| 16 20 20 f3 20 73 63 6f | 72 65 25 28 70 69 65 63 |. . sco|re%(piec|
|00001df0| 65 25 29 0d 0c 08 15 20 | 20 e3 20 6f 72 69 65 6e |e%).... | . orien|
|00001e00| 74 25 3d 30 20 b8 20 33 | 0d 0c 12 1a 20 20 20 20 |t%=0 . 3|.... |
|00001e10| e3 20 62 25 3d 30 20 b8 | 20 62 6c 6f 63 6b 73 25 |. b%=0 .| blocks%|
|00001e20| 2d 31 0d 0c 1c 43 20 20 | 20 20 20 20 f3 20 78 5f |-1...C | . x_|
|00001e30| 70 69 65 63 65 25 28 70 | 69 65 63 65 25 2c 62 25 |piece%(p|iece%,b%|
|00001e40| 2c 6f 72 69 65 6e 74 25 | 29 2c 79 5f 70 69 65 63 |,orient%|),y_piec|
|00001e50| 65 25 28 70 69 65 63 65 | 25 2c 62 25 2c 6f 72 69 |e%(piece|%,b%,ori|
|00001e60| 65 6e 74 25 29 0d 0c 26 | 0b 20 20 20 20 ed 2c 2c |ent%)..&|. .,,|
|00001e70| 0d 0c 30 1a e3 20 5a 25 | 3d 30 20 b8 20 6d 61 78 |..0.. Z%|=0 . max|
|00001e80| 5f 6c 65 76 65 6c 73 25 | 2d 32 0d 0c 3a 11 20 20 |_levels%|-2..:. |
|00001e90| 20 f3 20 6e 75 6d 25 28 | 5a 25 29 0d 0c 44 1a 20 | . num%(|Z%)..D. |
|00001ea0| 20 20 e3 20 58 25 3d 30 | 20 b8 20 6e 75 6d 25 28 | . X%=0| . num%(|
|00001eb0| 5a 25 29 2d 31 0d 0c 4e | 1f 20 20 20 20 20 20 f3 |Z%)-1..N|. .|
|00001ec0| 20 78 25 28 58 25 2c 5a | 25 29 2c 79 25 28 58 25 | x%(X%,Z|%),y%(X%|
|00001ed0| 2c 5a 25 29 0d 0c 58 09 | 20 20 20 ed 2c 0d 0c 62 |,Z%)..X.| .,..b|
|00001ee0| 05 e1 0d 0c 6c 04 0d 0c | 76 07 dc 20 34 0d 0c 80 |....l...|v.. 4...|
|00001ef0| 1b dc 20 30 2c 30 2c 20 | 20 30 2c 31 2c 20 20 31 |.. 0,0, | 0,1, 1|
|00001f00| 2c 30 2c 20 20 31 2c 31 | 0d 0c 8a 1b dc 20 30 2c |,0, 1,1|..... 0,|
|00001f10| 30 2c 20 20 30 2c 31 2c | 20 20 31 2c 30 2c 20 20 |0, 0,1,| 1,0, |
|00001f20| 31 2c 31 0d 0c 94 1b dc | 20 30 2c 30 2c 20 20 30 |1,1.....| 0,0, 0|
|00001f30| 2c 31 2c 20 20 31 2c 30 | 2c 20 20 31 2c 31 0d 0c |,1, 1,0|, 1,1..|
|00001f40| 9e 1b dc 20 30 2c 30 2c | 20 20 30 2c 31 2c 20 20 |... 0,0,| 0,1, |
|00001f50| 31 2c 30 2c 20 20 31 2c | 31 0d 0c a8 04 0d 0c b2 |1,0, 1,|1.......|
|00001f60| 07 dc 20 32 0d 0c bc 1b | dc 20 30 2c 30 2c 20 20 |.. 2....|. 0,0, |
|00001f70| 31 2c 30 2c 20 20 32 2c | 30 2c 20 20 33 2c 30 0d |1,0, 2,|0, 3,0.|
|00001f80| 0c c6 1b dc 20 31 2c 2d | 31 2c 20 31 2c 30 2c 20 |.... 1,-|1, 1,0, |
|00001f90| 20 31 2c 31 2c 20 20 31 | 2c 32 0d 0c d0 1b dc 20 | 1,1, 1|,2..... |
|00001fa0| 30 2c 30 2c 20 20 31 2c | 30 2c 20 20 32 2c 30 2c |0,0, 1,|0, 2,0,|
|00001fb0| 20 20 33 2c 30 0d 0c da | 1b dc 20 31 2c 2d 31 2c | 3,0...|.. 1,-1,|
|00001fc0| 20 31 2c 30 2c 20 20 31 | 2c 31 2c 20 20 31 2c 32 | 1,0, 1|,1, 1,2|
|00001fd0| 0d 0c e4 04 0d 0c ee 07 | dc 20 33 0d 0c f8 1b dc |........|. 3.....|
|00001fe0| 20 30 2c 30 2c 20 20 31 | 2c 30 2c 20 20 32 2c 30 | 0,0, 1|,0, 2,0|
|00001ff0| 2c 20 20 32 2c 31 0d 0d | 02 1b dc 20 30 2c 31 2c |, 2,1..|... 0,1,|
|00002000| 20 20 31 2c 2d 31 2c 20 | 31 2c 30 2c 20 20 31 2c | 1,-1, |1,0, 1,|
|00002010| 31 0d 0d 0c 1b dc 20 30 | 2c 2d 31 2c 20 30 2c 30 |1..... 0|,-1, 0,0|
|00002020| 2c 20 20 31 2c 30 2c 20 | 20 32 2c 30 0d 0d 16 1c |, 1,0, | 2,0....|
|00002030| dc 20 31 2c 2d 31 2c 20 | 31 2c 30 2c 20 20 31 2c |. 1,-1, |1,0, 1,|
|00002040| 31 2c 20 20 32 2c 2d 31 | 0d 0d 20 04 0d 0d 2a 07 |1, 2,-1|.. ...*.|
|00002050| dc 20 33 0d 0d 34 1b dc | 20 30 2c 30 2c 20 20 31 |. 3..4..| 0,0, 1|
|00002060| 2c 30 2c 20 20 32 2c 2d | 31 2c 20 32 2c 30 0d 0d |,0, 2,-|1, 2,0..|
|00002070| 3e 1b dc 20 31 2c 2d 31 | 2c 20 31 2c 30 2c 20 20 |>.. 1,-1|, 1,0, |
|00002080| 31 2c 31 2c 20 20 32 2c | 31 0d 0d 48 1b dc 20 30 |1,1, 2,|1..H.. 0|
|00002090| 2c 30 2c 20 20 30 2c 31 | 2c 20 20 31 2c 30 2c 20 |,0, 0,1|, 1,0, |
|000020a0| 20 32 2c 30 0d 0d 52 1b | dc 20 30 2c 2d 31 2c 20 | 2,0..R.|. 0,-1, |
|000020b0| 31 2c 2d 31 2c 20 31 2c | 30 2c 20 20 31 2c 31 0d |1,-1, 1,|0, 1,1.|
|000020c0| 0d 5c 04 0d 0d 66 07 dc | 20 31 0d 0d 70 1b dc 20 |.\...f..| 1..p.. |
|000020d0| 31 2c 2d 31 2c 20 31 2c | 30 2c 20 20 31 2c 31 2c |1,-1, 1,|0, 1,1,|
|000020e0| 20 20 32 2c 30 0d 0d 7a | 1b dc 20 30 2c 30 2c 20 | 2,0..z|.. 0,0, |
|000020f0| 20 31 2c 30 2c 20 20 31 | 2c 31 2c 20 20 32 2c 30 | 1,0, 1|,1, 2,0|
|00002100| 0d 0d 84 1b dc 20 30 2c | 30 2c 20 20 31 2c 2d 31 |..... 0,|0, 1,-1|
|00002110| 2c 20 31 2c 30 2c 20 20 | 31 2c 31 0d 0d 8e 1b dc |, 1,0, |1,1.....|
|00002120| 20 30 2c 30 2c 20 20 31 | 2c 2d 31 2c 20 31 2c 30 | 0,0, 1|,-1, 1,0|
|00002130| 2c 20 20 32 2c 30 0d 0d | 98 04 0d 0d a2 07 dc 20 |, 2,0..|....... |
|00002140| 35 0d 0d ac 1b dc 20 30 | 2c 30 2c 20 20 30 2c 31 |5..... 0|,0, 0,1|
|00002150| 2c 20 20 31 2c 2d 31 2c | 20 31 2c 30 0d 0d b6 1b |, 1,-1,| 1,0....|
|00002160| dc 20 30 2c 2d 31 2c 20 | 31 2c 2d 31 2c 20 31 2c |. 0,-1, |1,-1, 1,|
|00002170| 30 2c 20 20 32 2c 30 0d | 0d c0 1b dc 20 30 2c 30 |0, 2,0.|.... 0,0|
|00002180| 2c 20 20 30 2c 31 2c 20 | 20 31 2c 2d 31 2c 20 31 |, 0,1, | 1,-1, 1|
|00002190| 2c 30 0d 0d ca 1b dc 20 | 30 2c 2d 31 2c 20 31 2c |,0..... |0,-1, 1,|
|000021a0| 2d 31 2c 20 31 2c 30 2c | 20 20 32 2c 30 0d 0d d4 |-1, 1,0,| 2,0...|
|000021b0| 04 0d 0d de 07 dc 20 35 | 0d 0d e8 1b dc 20 30 2c |...... 5|..... 0,|
|000021c0| 2d 31 2c 20 30 2c 30 2c | 20 20 31 2c 30 2c 20 20 |-1, 0,0,| 1,0, |
|000021d0| 31 2c 31 0d 0d f2 1c dc | 20 30 2c 30 2c 20 20 31 |1,1.....| 0,0, 1|
|000021e0| 2c 2d 31 2c 20 31 2c 30 | 2c 20 20 32 2c 2d 31 0d |,-1, 1,0|, 2,-1.|
|000021f0| 0d fc 1b dc 20 30 2c 2d | 31 2c 20 30 2c 30 2c 20 |.... 0,-|1, 0,0, |
|00002200| 20 31 2c 30 2c 20 20 31 | 2c 31 0d 0e 06 1c dc 20 | 1,0, 1|,1..... |
|00002210| 30 2c 30 2c 20 20 31 2c | 2d 31 2c 20 31 2c 30 2c |0,0, 1,|-1, 1,0,|
|00002220| 20 20 32 2c 2d 31 0d 0e | 10 04 0d 0e 1a 1c dc 20 | 2,-1..|....... |
|00002230| 34 2c 20 20 31 2c 32 2c | 20 33 2c 32 2c 20 36 2c |4, 1,2,| 3,2, 6,|
|00002240| 32 2c 20 38 2c 32 0d 0e | 24 1c dc 20 34 2c 20 20 |2, 8,2..|$.. 4, |
|00002250| 31 2c 32 2c 20 33 2c 33 | 2c 20 36 2c 32 2c 20 38 |1,2, 3,3|, 6,2, 8|
|00002260| 2c 33 0d 0e 2e 26 dc 20 | 36 2c 20 20 31 2c 31 2c |,3...&. |6, 1,1,|
|00002270| 20 31 2c 33 2c 20 31 2c | 35 2c 20 38 2c 31 2c 20 | 1,3, 1,|5, 8,1, |
|00002280| 38 2c 33 2c 20 38 2c 35 | 0d 0e 38 30 dc 20 38 2c |8,3, 8,5|..80. 8,|
|00002290| 20 20 31 2c 32 2c 20 33 | 2c 32 2c 20 36 2c 32 2c | 1,2, 3|,2, 6,2,|
|000022a0| 20 38 2c 32 2c 20 31 2c | 35 2c 20 33 2c 35 2c 20 | 8,2, 1,|5, 3,5, |
|000022b0| 36 2c 35 2c 20 38 2c 35 | 0d 0e 42 1c dc 20 34 2c |6,5, 8,5|..B.. 4,|
|000022c0| 20 20 32 2c 38 2c 20 33 | 2c 39 2c 20 36 2c 39 2c | 2,8, 3|,9, 6,9,|
|000022d0| 20 37 2c 38 0d 0e 4c 30 | dc 20 38 2c 20 20 31 2c | 7,8..L0|. 8, 1,|
|000022e0| 32 2c 20 33 2c 32 2c 20 | 36 2c 32 2c 20 38 2c 32 |2, 3,2, |6,2, 8,2|
|000022f0| 2c 20 32 2c 35 2c 20 34 | 2c 35 2c 20 35 2c 35 2c |, 2,5, 4|,5, 5,5,|
|00002300| 20 37 2c 35 0d 0e 56 30 | dc 20 38 2c 20 20 31 2c | 7,5..V0|. 8, 1,|
|00002310| 32 2c 20 32 2c 33 2c 20 | 33 2c 34 2c 20 34 2c 35 |2, 2,3, |3,4, 4,5|
|00002320| 2c 20 35 2c 35 2c 20 36 | 2c 34 2c 20 37 2c 33 2c |, 5,5, 6|,4, 7,3,|
|00002330| 20 38 2c 32 0d 0e 60 20 | dc 20 34 2c 20 20 32 2c | 8,2..` |. 4, 2,|
|00002340| 31 35 2c 20 33 2c 31 34 | 2c 20 37 2c 31 35 2c 20 |15, 3,14|, 7,15, |
|00002350| 38 2c 31 34 0d 0e 6a 36 | dc 20 38 2c 20 20 32 2c |8,14..j6|. 8, 2,|
|00002360| 35 2c 20 33 2c 31 30 2c | 20 36 2c 31 30 2c 20 38 |5, 3,10,| 6,10, 8|
|00002370| 2c 35 2c 20 32 2c 31 35 | 2c 20 37 2c 31 35 2c 20 |,5, 2,15|, 7,15, |
|00002380| 33 2c 31 35 2c 20 36 2c | 31 35 0d 0e 74 48 dc 20 |3,15, 6,|15..tH. |
|00002390| 31 32 2c 20 30 2c 32 2c | 20 32 2c 32 2c 20 35 2c |12, 0,2,| 2,2, 5,|
|000023a0| 32 2c 20 37 2c 32 2c 20 | 31 2c 36 2c 20 33 2c 36 |2, 7,2, |1,6, 3,6|
|000023b0| 2c 20 36 2c 36 2c 20 38 | 2c 36 2c 20 32 2c 31 30 |, 6,6, 8|,6, 2,10|
|000023c0| 2c 20 34 2c 31 30 2c 20 | 37 2c 31 30 2c 20 39 2c |, 4,10, |7,10, 9,|
|000023d0| 31 30 0d 0e 7e 46 dc 20 | 31 32 2c 20 31 2c 32 2c |10..~F. |12, 1,2,|
|000023e0| 20 33 2c 32 2c 20 36 2c | 32 2c 20 38 2c 32 2c 20 | 3,2, 6,|2, 8,2, |
|000023f0| 32 2c 35 2c 20 34 2c 35 | 2c 20 35 2c 35 2c 20 37 |2,5, 4,5|, 5,5, 7|
|00002400| 2c 35 2c 20 33 2c 38 2c | 20 36 2c 38 2c 20 34 2c |,5, 3,8,| 6,8, 4,|
|00002410| 31 31 2c 20 35 2c 31 31 | 0d 0e 88 04 0d 0e 92 10 |11, 5,11|........|
|00002420| dd 20 f2 6e 65 77 5f 70 | 69 65 63 65 0d 0e 9c 2d |. .new_p|iece...-|
|00002430| 70 69 65 63 65 25 3d 20 | b3 28 6e 6f 5f 70 69 65 |piece%= |.(no_pie|
|00002440| 63 65 73 25 29 2d 31 20 | 3a 20 6f 72 69 65 6e 74 |ces%)-1 |: orient|
|00002450| 25 3d 20 b3 28 34 29 2d | 31 0d 0e a6 47 49 25 3d |%= .(4)-|1...GI%=|
|00002460| 20 b3 28 77 69 64 74 68 | 25 2b 78 5f 70 69 65 63 | .(width|%+x_piec|
|00002470| 65 25 28 70 69 65 63 65 | 25 2c 30 2c 6f 72 69 65 |e%(piece|%,0,orie|
|00002480| 6e 74 25 29 2d 78 5f 70 | 69 65 63 65 25 28 70 69 |nt%)-x_p|iece%(pi|
|00002490| 65 63 65 25 2c 33 2c 6f | 72 69 65 6e 74 25 29 29 |ece%,3,o|rient%))|
|000024a0| 0d 0e b0 25 49 25 2d 3d | 20 31 2b 78 5f 70 69 65 |...%I%-=| 1+x_pie|
|000024b0| 63 65 25 28 70 69 65 63 | 65 25 2c 30 2c 6f 72 69 |ce%(piec|e%,0,ori|
|000024c0| 65 6e 74 25 29 0d 0e ba | 11 4a 25 3d 20 68 65 69 |ent%)...|.J%= hei|
|000024d0| 67 68 74 25 2b 32 0d 0e | c4 05 e1 0d 0e ce 04 0d |ght%+2..|........|
|000024e0| 0e d8 21 dd 20 a4 73 61 | 66 65 28 70 69 65 63 65 |..!. .sa|fe(piece|
|000024f0| 25 2c 6f 72 69 65 6e 74 | 25 2c 69 25 2c 6a 25 29 |%,orient|%,i%,j%)|
|00002500| 0d 0e e2 0b ea 20 52 25 | 2c 5a 25 0d 0e ec 08 52 |..... R%|,Z%....R|
|00002510| 25 3d a3 0d 0e f6 16 e3 | 20 5a 25 3d 30 20 b8 20 |%=......| Z%=0 . |
|00002520| 62 6c 6f 63 6b 73 25 2d | 31 0d 0f 00 55 20 52 25 |blocks%-|1...U R%|
|00002530| 3d 52 25 20 84 20 a4 63 | 6f 6c 6c 69 64 65 64 28 |=R% . .c|ollided(|
|00002540| 78 5f 70 69 65 63 65 25 | 28 70 69 65 63 65 25 2c |x_piece%|(piece%,|
|00002550| 5a 25 2c 6f 72 69 65 6e | 74 25 29 2b 69 25 2c 79 |Z%,orien|t%)+i%,y|
|00002560| 5f 70 69 65 63 65 25 28 | 70 69 65 63 65 25 2c 5a |_piece%(|piece%,Z|
|00002570| 25 2c 6f 72 69 65 6e 74 | 25 29 2b 6a 25 29 0d 0f |%,orient|%)+j%)..|
|00002580| 0a 05 ed 0d 0f 14 09 3d | ac 20 52 25 0d 0f 1e 04 |.......=|. R%....|
|00002590| 0d 0f 28 16 dd 20 a4 63 | 6f 6c 6c 69 64 65 64 28 |..(.. .c|ollided(|
|000025a0| 78 25 2c 79 25 29 0d 0f | 32 23 e7 20 78 25 3c 30 |x%,y%)..|2#. x%<0|
|000025b0| 20 84 20 78 25 3e 3d 77 | 69 64 74 68 25 20 84 20 | . x%>=w|idth% . |
|000025c0| 79 25 3c 30 20 8c 20 3d | b9 0d 0f 3c 16 e7 20 79 |y%<0 . =|...<.. y|
|000025d0| 25 3e 3d 68 65 69 67 68 | 74 25 20 8c 20 3d a3 0d |%>=heigh|t% . =..|
|000025e0| 0f 46 1a 3d a4 62 6f 61 | 72 64 28 78 25 2c 79 25 |.F.=.boa|rd(x%,y%|
|000025f0| 29 3c 3e 63 6c 65 61 72 | 25 0d 0f 50 04 0d 0f 5a |)<>clear|%..P...Z|
|00002600| 23 dd 20 a4 6c 61 6e 64 | 65 64 28 70 69 65 63 65 |#. .land|ed(piece|
|00002610| 25 2c 6f 72 69 65 6e 74 | 25 2c 69 25 2c 6a 25 29 |%,orient|%,i%,j%)|
|00002620| 0d 0f 64 14 ea 20 5a 25 | 2c 52 25 2c 58 25 2c 59 |..d.. Z%|,R%,X%,Y|
|00002630| 25 2c 45 25 0d 0f 6e 0d | 52 25 3d a3 3a 45 25 3d |%,E%..n.|R%=.:E%=|
|00002640| a3 0d 0f 78 16 e3 20 5a | 25 3d 30 20 b8 20 62 6c |...x.. Z|%=0 . bl|
|00002650| 6f 63 6b 73 25 2d 31 0d | 0f 82 4a 20 20 20 58 25 |ocks%-1.|..J X%|
|00002660| 3d 69 25 2b 78 5f 70 69 | 65 63 65 25 28 70 69 65 |=i%+x_pi|ece%(pie|
|00002670| 63 65 25 2c 5a 25 2c 6f | 72 69 65 6e 74 25 29 3a |ce%,Z%,o|rient%):|
|00002680| 59 25 3d 79 5f 70 69 65 | 63 65 25 28 70 69 65 63 |Y%=y_pie|ce%(piec|
|00002690| 65 25 2c 5a 25 2c 6f 72 | 69 65 6e 74 25 29 2b 6a |e%,Z%,or|ient%)+j|
|000026a0| 25 0d 0f 8c 0f 20 20 20 | e7 20 59 25 3d 30 20 8c |%.... |. Y%=0 .|
|000026b0| 0d 0f 96 0e 20 20 20 20 | 20 20 52 25 3d b9 0d 0f |.... | R%=...|
|000026c0| a0 08 20 20 20 cc 0d 0f | aa 39 20 20 20 20 20 20 |.. ...|.9 |
|000026d0| e7 20 59 25 3c 3d 68 65 | 69 67 68 74 25 20 8c 20 |. Y%<=he|ight% . |
|000026e0| 52 25 3d 52 25 20 84 20 | a4 62 6f 61 72 64 28 58 |R%=R% . |.board(X|
|000026f0| 25 2c 59 25 2d 31 29 3c | 3e 63 6c 65 61 72 25 0d |%,Y%-1)<|>clear%.|
|00002700| 0f b4 1e 20 20 20 20 20 | 20 e7 20 59 25 3e 3d 68 |... | . Y%>=h|
|00002710| 65 69 67 68 74 25 20 8c | 20 45 25 3d b9 0d 0f be |eight% .| E%=....|
|00002720| 08 20 20 20 cd 0d 0f c8 | 05 ed 0d 0f d2 10 65 6e |. ....|......en|
|00002730| 64 25 3d 45 25 20 80 20 | 52 25 0d 0f dc 07 3d 52 |d%=E% . |R%....=R|
|00002740| 25 0d 0f e6 04 0d 0f f0 | 13 dd 20 a4 63 6f 6d 70 |%.......|.. .comp|
|00002750| 6c 65 74 65 28 79 25 29 | 0d 0f fa 08 ea 20 5a 25 |lete(y%)|..... Z%|
|00002760| 0d 10 04 16 e7 20 79 25 | 3e 3d 68 65 69 67 68 74 |..... y%|>=height|
|00002770| 25 20 8c 20 3d a3 0d 10 | 0e 08 5a 25 3d 30 0d 10 |% . =...|..Z%=0..|
|00002780| 18 34 c8 95 20 a4 62 6f | 61 72 64 28 5a 25 2c 79 |.4.. .bo|ard(Z%,y|
|00002790| 25 29 3c 3e 63 6c 65 61 | 72 25 20 80 20 5a 25 3c |%)<>clea|r% . Z%<|
|000027a0| 77 69 64 74 68 25 2d 31 | 3a 5a 25 3d 5a 25 2b 31 |width%-1|:Z%=Z%+1|
|000027b0| 3a ce 0d 10 22 2a 3d 28 | 5a 25 3d 77 69 64 74 68 |:..."*=(|Z%=width|
|000027c0| 25 2d 31 29 20 80 20 a4 | 62 6f 61 72 64 28 5a 25 |%-1) . .|board(Z%|
|000027d0| 2c 79 25 29 3c 3e 63 6c | 65 61 72 25 0d 10 2c 04 |,y%)<>cl|ear%..,.|
|000027e0| 0d 10 36 10 dd 20 f2 63 | 6c 65 61 72 28 6a 25 29 |..6.. .c|lear(j%)|
|000027f0| 0d 10 40 15 f2 61 74 74 | 72 28 63 6c 65 61 72 65 |..@..att|r(cleare|
|00002800| 64 25 2c 31 29 0d 10 4a | 14 f2 61 74 74 72 28 73 |d%,1)..J|..attr(s|
|00002810| 63 6f 72 65 25 2c 31 30 | 29 0d 10 54 3c e7 20 28 |core%,10|)..T<. (|
|00002820| 61 74 74 72 25 28 63 6c | 65 61 72 65 64 25 29 20 |attr%(cl|eared%) |
|00002830| 83 20 35 30 29 3d 30 20 | 80 20 61 74 74 72 25 28 |. 50)=0 |. attr%(|
|00002840| 6c 65 76 65 6c 25 29 3c | 6d 61 78 5f 6c 65 76 65 |level%)<|max_leve|
|00002850| 6c 73 25 20 8c 0d 10 5e | 15 20 20 20 6e 65 78 74 |ls% ...^|. next|
|00002860| 5f 6c 65 76 65 6c 25 3d | 20 b9 0d 10 68 05 cd 0d |_level%=| ...h...|
|00002870| 10 72 25 41 25 3d 78 5f | 6c 69 73 74 25 2b 6c 69 |.r%A%=x_|list%+li|
|00002880| 73 74 25 3a 42 25 3d 79 | 5f 6c 69 73 74 25 2b 6c |st%:B%=y|_list%+l|
|00002890| 69 73 74 25 0d 10 7c 1e | 6c 69 73 74 25 2b 3d 77 |ist%..|.|list%+=w|
|000028a0| 69 64 74 68 25 2a 28 68 | 65 69 67 68 74 25 2d 6a |idth%*(h|eight%-j|
|000028b0| 25 29 0d 10 86 25 43 25 | 3d 68 65 69 67 68 74 25 |%)...%C%|=height%|
|000028c0| 3a 44 25 3d 62 6f 61 72 | 64 25 3a 45 25 3d 6a 25 |:D%=boar|d%:E%=j%|
|000028d0| 3a d6 20 63 6c 72 25 0d | 10 90 05 e1 0d 10 9a 04 |:. clr%.|........|
|000028e0| 0d 10 a4 16 dd 20 f2 70 | 6c 61 63 65 28 6e 25 2c |..... .p|lace(n%,|
|000028f0| 69 25 2c 6a 25 29 0d 10 | ae 15 e7 20 6a 25 3e 3d |i%,j%)..|... j%>=|
|00002900| 68 65 69 67 68 74 25 20 | 8c 20 e1 0d 10 b8 1d 62 |height% |. .....b|
|00002910| 6f 61 72 64 25 3f 28 69 | 25 2b 6a 25 2a 77 69 64 |oard%?(i|%+j%*wid|
|00002920| 74 68 25 29 3d 20 6e 25 | 0d 10 c2 0c 6c 69 73 74 |th%)= n%|....list|
|00002930| 25 2b 3d 31 0d 10 cc 32 | e7 20 6c 69 73 74 25 3e |%+=1...2|. list%>|
|00002940| 32 32 30 20 8c 20 85 20 | 30 2c 22 53 75 62 73 63 |220 . . |0,"Subsc|
|00002950| 72 69 70 74 20 77 61 79 | 20 6f 75 74 20 6f 66 20 |ript way| out of |
|00002960| 6f 72 64 65 72 22 0d 10 | d6 15 78 5f 6c 69 73 74 |order"..|..x_list|
|00002970| 25 3f 6c 69 73 74 25 3d | 20 69 25 0d 10 e0 15 79 |%?list%=| i%....y|
|00002980| 5f 6c 69 73 74 25 3f 6c | 69 73 74 25 3d 20 6a 25 |_list%?l|ist%= j%|
|00002990| 0d 10 ea 05 e1 0d 10 f4 | 04 0d 10 fe 2a dd 20 a4 |........|....*. .|
|000029a0| 62 6f 61 72 64 28 69 25 | 2c 6a 25 29 3d 20 62 6f |board(i%|,j%)= bo|
|000029b0| 61 72 64 25 3f 28 69 25 | 2b 6a 25 2a 77 69 64 74 |ard%?(i%|+j%*widt|
|000029c0| 68 25 29 0d 11 08 04 0d | 11 12 1b dd 20 f2 63 6c |h%).....|.... .cl|
|000029d0| 65 61 72 5f 61 73 5f 61 | 70 70 72 6f 70 72 69 61 |ear_as_a|ppropria|
|000029e0| 74 65 0d 11 1c 1e ea 20 | 5a 25 2c 6a 25 2c 63 6f |te..... |Z%,j%,co|
|000029f0| 6d 70 6c 65 74 65 25 2c | 6c 6f 77 25 2c 68 69 25 |mplete%,|low%,hi%|
|00002a00| 0d 11 26 27 63 6f 6d 70 | 6c 65 74 65 25 3d 20 a3 |..&'comp|lete%= .|
|00002a10| 20 3a 20 6c 6f 77 25 3d | 68 65 69 67 68 74 25 20 | : low%=|height% |
|00002a20| 3a 20 68 69 25 3d 30 0d | 11 30 12 6e 65 78 74 5f |: hi%=0.|.0.next_|
|00002a30| 6c 65 76 65 6c 25 3d 20 | a3 0d 11 3a 16 e3 20 5a |level%= |...:.. Z|
|00002a40| 25 3d 30 20 b8 20 62 6c | 6f 63 6b 73 25 2d 31 0d |%=0 . bl|ocks%-1.|
|00002a50| 11 44 29 20 20 20 6a 25 | 3d 20 4a 25 2b 79 5f 70 |.D) j%|= J%+y_p|
|00002a60| 69 65 63 65 25 28 70 69 | 65 63 65 25 2c 5a 25 2c |iece%(pi|ece%,Z%,|
|00002a70| 6f 72 69 65 6e 74 25 29 | 0d 11 4e 1b 20 20 20 e7 |orient%)|..N. .|
|00002a80| 20 6a 25 3c 6c 6f 77 25 | 20 8c 20 6c 6f 77 25 3d | j%<low%| . low%=|
|00002a90| 20 6a 25 0d 11 58 19 20 | 20 20 e7 20 6a 25 3e 68 | j%..X. | . j%>h|
|00002aa0| 69 25 20 8c 20 68 69 25 | 3d 20 6a 25 0d 11 62 05 |i% . hi%|= j%..b.|
|00002ab0| ed 0d 11 6c 0d 5a 25 3d | 6c 6f 77 25 3a f5 0d 11 |...l.Z%=|low%:...|
|00002ac0| 76 15 e7 20 a4 63 6f 6d | 70 6c 65 74 65 28 5a 25 |v.. .com|plete(Z%|
|00002ad0| 29 20 8c 0d 11 80 11 20 | 20 20 f2 63 6c 65 61 72 |) ..... | .clear|
|00002ae0| 28 5a 25 29 0d 11 8a 15 | 20 20 20 f2 75 70 64 61 |(Z%)....| .upda|
|00002af0| 74 65 5f 77 69 6e 64 6f | 77 0d 11 94 0d 20 20 20 |te_windo|w.... |
|00002b00| 68 69 25 2d 3d 31 0d 11 | 9e 05 cc 0d 11 a8 0c 20 |hi%-=1..|....... |
|00002b10| 20 20 5a 25 2b 3d 31 0d | 11 b2 05 cd 0d 11 bc 0c | Z%+=1.|........|
|00002b20| fd 20 5a 25 3e 68 69 25 | 0d 11 c6 13 e7 20 6e 65 |. Z%>hi%|..... ne|
|00002b30| 78 74 5f 6c 65 76 65 6c | 25 20 8c 0d 11 d0 17 20 |xt_level|% ..... |
|00002b40| 20 20 75 70 64 61 74 65 | 5f 6c 65 76 65 6c 25 3d | update|_level%=|
|00002b50| 20 b9 0d 11 da 15 20 20 | 20 6c 65 76 65 6c 5f 74 | ..... | level_t|
|00002b60| 25 3d 91 2b 31 30 30 0d | 11 e4 16 20 20 20 f2 61 |%=.+100.|... .a|
|00002b70| 74 74 72 28 6c 65 76 65 | 6c 25 2c 31 29 0d 11 ee |ttr(leve|l%,1)...|
|00002b80| 05 cd 0d 11 f8 05 e1 0d | 12 02 04 0d 12 0c 29 dd |........|......).|
|00002b90| 20 f2 73 68 6f 77 70 69 | 65 63 65 28 70 69 65 63 | .showpi|ece(piec|
|00002ba0| 65 25 2c 6f 72 69 65 6e | 74 25 2c 69 25 2c 6a 25 |e%,orien|t%,i%,j%|
|00002bb0| 2c 6e 25 29 0d 12 16 08 | ea 20 5a 25 0d 12 20 16 |,n%)....|. Z%.. .|
|00002bc0| e3 20 5a 25 3d 30 20 b8 | 20 62 6c 6f 63 6b 73 25 |. Z%=0 .| blocks%|
|00002bd0| 2d 31 0d 12 2a 4f 20 20 | 20 f2 70 6c 61 63 65 28 |-1..*O | .place(|
|00002be0| 6e 25 2c 69 25 2b 78 5f | 70 69 65 63 65 25 28 70 |n%,i%+x_|piece%(p|
|00002bf0| 69 65 63 65 25 2c 5a 25 | 2c 6f 72 69 65 6e 74 25 |iece%,Z%|,orient%|
|00002c00| 29 2c 6a 25 2b 79 5f 70 | 69 65 63 65 25 28 70 69 |),j%+y_p|iece%(pi|
|00002c10| 65 63 65 25 2c 5a 25 2c | 6f 72 69 65 6e 74 25 29 |ece%,Z%,|orient%)|
|00002c20| 29 0d 12 34 05 ed 0d 12 | 3e 05 e1 0d 12 48 04 0d |)..4....|>....H..|
|00002c30| 12 52 0b dd 20 f2 70 6c | 61 79 0d 12 5c 2b f2 73 |.R.. .pl|ay..\+.s|
|00002c40| 68 6f 77 70 69 65 63 65 | 28 70 69 65 63 65 25 2c |howpiece|(piece%,|
|00002c50| 6f 72 69 65 6e 74 25 2c | 49 25 2c 4a 25 2c 63 6c |orient%,|I%,J%,cl|
|00002c60| 65 61 72 25 29 0d 12 66 | 25 e7 20 a4 6c 61 6e 64 |ear%)..f|%. .land|
|00002c70| 65 64 28 70 69 65 63 65 | 25 2c 6f 72 69 65 6e 74 |ed(piece|%,orient|
|00002c80| 25 2c 49 25 2c 4a 25 29 | 20 8c 0d 12 70 30 20 20 |%,I%,J%)| ...p0 |
|00002c90| 20 f2 73 68 6f 77 70 69 | 65 63 65 28 70 69 65 63 | .showpi|ece(piec|
|00002ca0| 65 25 2c 6f 72 69 65 6e | 74 25 2c 49 25 2c 4a 25 |e%,orien|t%,I%,J%|
|00002cb0| 2c 70 69 65 63 65 25 2b | 31 29 0d 12 7a 22 20 20 |,piece%+|1)..z" |
|00002cc0| 20 f2 61 74 74 72 28 70 | 69 65 63 65 73 25 2c 31 | .attr(p|ieces%,1|
|00002cd0| 29 20 3a 20 64 72 6f 70 | 25 3d 20 a3 0d 12 84 24 |) : drop|%= ....$|
|00002ce0| 20 20 20 f2 61 74 74 72 | 28 73 63 6f 72 65 25 2c | .attr|(score%,|
|00002cf0| 20 73 63 6f 72 65 25 28 | 70 69 65 63 65 25 29 29 | score%(|piece%))|
|00002d00| 0d 12 8e 1c 20 20 20 f2 | 63 6c 65 61 72 5f 61 73 |.... .|clear_as|
|00002d10| 5f 61 70 70 72 6f 70 72 | 69 61 74 65 0d 12 98 11 |_appropr|iate....|
|00002d20| 20 20 20 f2 6e 65 77 5f | 70 69 65 63 65 0d 12 a2 | .new_|piece...|
|00002d30| 05 cd 0d 12 ac 09 4a 25 | 2d 3d 31 0d 12 b6 0e e7 |......J%|-=1.....|
|00002d40| 20 ac 20 65 6e 64 25 20 | 8c 0d 12 c0 40 20 20 20 | . end% |....@ |
|00002d50| e7 20 a4 6c 61 6e 64 65 | 64 28 70 69 65 63 65 25 |. .lande|d(piece%|
|00002d60| 2c 6f 72 69 65 6e 74 25 | 2c 49 25 2c 4a 25 29 20 |,orient%|,I%,J%) |
|00002d70| 8c 20 74 31 25 3d 91 2b | 33 2a 74 69 25 20 8b 20 |. t1%=.+|3*ti% . |
|00002d80| 74 31 25 3d 91 2b 74 69 | 25 0d 12 ca 05 cd 0d 12 |t1%=.+ti|%.......|
|00002d90| d4 2d f2 73 68 6f 77 70 | 69 65 63 65 28 70 69 65 |.-.showp|iece(pie|
|00002da0| 63 65 25 2c 6f 72 69 65 | 6e 74 25 2c 49 25 2c 4a |ce%,orie|nt%,I%,J|
|00002db0| 25 2c 70 69 65 63 65 25 | 2b 31 29 0d 12 de 2b e7 |%,piece%|+1)...+.|
|00002dc0| 20 65 6e 64 25 20 8c 20 | 75 70 64 61 74 65 5f 65 | end% . |update_e|
|00002dd0| 6e 64 25 3d 20 b9 20 3a | 20 65 6e 64 5f 74 25 3d |nd%= . :| end_t%=|
|00002de0| 20 91 2b 31 30 30 0d 12 | e8 12 f2 75 70 64 61 74 | .+100..|...updat|
|00002df0| 65 5f 77 69 6e 64 6f 77 | 0d 12 f2 05 e1 0d 12 fc |e_window|........|
|00002e00| 04 0d 13 06 14 dd 20 f2 | 75 70 64 61 74 65 5f 77 |...... .|update_w|
|00002e10| 69 6e 64 6f 77 0d 13 10 | 14 ea 20 5a 25 2c 58 25 |indow...|.. Z%,X%|
|00002e20| 2c 59 25 2c 69 25 2c 6a | 25 0d 13 1a 34 21 73 74 |,Y%,i%,j|%...4!st|
|00002e30| 72 69 6e 67 25 3d 20 77 | 69 6e 5f 68 25 20 3a 20 |ring%= w|in_h% : |
|00002e40| 73 74 72 69 6e 67 25 21 | 34 3d 20 32 30 20 3a 20 |string%!|4= 20 : |
|00002e50| 73 74 72 69 6e 67 25 21 | 38 3d 20 32 32 0d 13 24 |string%!|8= 22..$|
|00002e60| 23 73 74 72 69 6e 67 25 | 21 31 32 3d 33 34 30 20 |#string%|!12=340 |
|00002e70| 3a 20 73 74 72 69 6e 67 | 25 21 31 36 3d 36 36 30 |: string|%!16=660|
|00002e80| 0d 13 2e 23 e7 20 75 70 | 64 61 74 65 5f 61 74 74 |...#. up|date_att|
|00002e90| 72 25 20 8c 20 73 74 72 | 69 6e 67 25 21 31 32 3d |r% . str|ing%!12=|
|00002ea0| 34 39 32 0d 13 38 25 c8 | 99 20 55 70 64 61 74 65 |492..8%.|. Update|
|00002eb0| 57 69 6e 64 6f 77 25 2c | 2c 73 74 72 69 6e 67 25 |Window%,|,string%|
|00002ec0| 20 b8 20 66 6c 61 67 25 | 0d 13 42 21 69 25 3d 20 | . flag%|..B!i%= |
|00002ed0| 73 74 72 69 6e 67 25 21 | 34 20 3a 20 6a 25 3d 20 |string%!|4 : j%= |
|00002ee0| 73 74 72 69 6e 67 25 21 | 38 0d 13 4c 0c c8 95 20 |string%!|8..L... |
|00002ef0| 66 6c 61 67 25 0d 13 56 | 18 20 20 20 e7 20 75 70 |flag%..V|. . up|
|00002f00| 64 61 74 65 5f 63 6c 72 | 25 20 8c 20 da 0d 13 60 |date_clr|% . ...`|
|00002f10| 2e 20 20 20 e7 20 6c 69 | 73 74 25 3e 3d 30 20 8c |. . li|st%>=0 .|
|00002f20| 20 f2 75 70 64 61 74 65 | 5f 62 6f 61 72 64 28 69 | .update|_board(i|
|00002f30| 25 2b 32 30 2c 6a 25 2b | 32 30 29 0d 13 6a 17 20 |%+20,j%+|20)..j. |
|00002f40| 20 20 e7 20 75 70 64 61 | 74 65 5f 61 74 74 72 25 | . upda|te_attr%|
|00002f50| 20 8c 0d 13 74 19 20 20 | 20 20 20 20 c8 99 20 53 | ...t. | .. S|
|00002f60| 65 74 43 6f 6c 6f 75 72 | 25 2c 30 0d 13 7e 27 20 |etColour|%,0..~' |
|00002f70| 20 20 20 20 20 c8 93 20 | c8 90 20 33 35 36 2b 69 | .. |.. 356+i|
|00002f80| 25 2c 20 35 30 34 2b 6a | 25 2c 20 31 34 30 2c 20 |%, 504+j|%, 140, |
|00002f90| 38 38 0d 13 88 27 20 20 | 20 20 20 20 c8 93 20 c8 |88...' | .. .|
|00002fa0| 90 20 33 35 36 2b 69 25 | 2c 20 33 35 31 2b 6a 25 |. 356+i%|, 351+j%|
|00002fb0| 2c 20 31 34 30 2c 20 38 | 38 0d 13 92 27 20 20 20 |, 140, 8|8...' |
|00002fc0| 20 20 20 c8 93 20 c8 90 | 20 33 35 36 2b 69 25 2c | .. ..| 356+i%,|
|00002fd0| 20 32 30 34 2b 6a 25 2c | 20 31 34 30 2c 20 38 38 | 204+j%,| 140, 88|
|00002fe0| 0d 13 9c 27 20 20 20 20 | 20 20 c8 93 20 c8 90 20 |...' | .. .. |
|00002ff0| 33 35 36 2b 69 25 2c 20 | 20 35 31 2b 6a 25 2c 20 |356+i%, | 51+j%, |
|00003000| 31 34 30 2c 20 38 38 0d | 13 a6 19 20 20 20 20 20 |140, 88.|... |
|00003010| 20 c8 99 20 53 65 74 43 | 6f 6c 6f 75 72 25 2c 37 | .. SetC|olour%,7|
|00003020| 0d 13 b0 1a 20 20 20 20 | 20 20 f2 73 68 6f 77 61 |.... | .showa|
|00003030| 74 74 72 28 69 25 2c 6a | 25 29 0d 13 ba 08 20 20 |ttr(i%,j|%).... |
|00003040| 20 cd 0d 13 c4 16 20 20 | 20 e7 20 75 70 64 61 74 | ..... | . updat|
|00003050| 65 5f 65 6e 64 25 20 8c | 0d 13 ce 2d 20 20 20 20 |e_end% .|...- |
|00003060| 20 20 f2 6d 65 73 73 61 | 67 65 28 69 25 2c 6a 25 | .messa|ge(i%,j%|
|00003070| 2c 22 47 20 41 20 4d 20 | 45 22 2c 22 4f 20 56 20 |,"G A M |E","O V |
|00003080| 45 20 52 22 29 0d 13 d8 | 08 20 20 20 cd 0d 13 e2 |E R")...|. ....|
|00003090| 18 20 20 20 e7 20 75 70 | 64 61 74 65 5f 6c 65 76 |. . up|date_lev|
|000030a0| 65 6c 25 20 8c 0d 13 ec | 2f 20 20 20 20 20 20 f2 |el% ....|/ .|
|000030b0| 6d 65 73 73 61 67 65 28 | 69 25 2c 6a 25 2c 22 4e |message(|i%,j%,"N|
|000030c0| 20 45 20 58 20 54 22 2c | 22 4c 20 45 20 56 20 45 | E X T",|"L E V E|
|000030d0| 20 4c 22 29 0d 13 f6 08 | 20 20 20 cd 0d 14 00 28 | L")....| ....(|
|000030e0| 20 20 20 c8 99 20 47 65 | 74 52 65 63 74 61 6e 67 | .. Ge|tRectang|
|000030f0| 6c 65 25 2c 2c 73 74 72 | 69 6e 67 25 20 b8 20 66 |le%,,str|ing% . f|
|00003100| 6c 61 67 25 0d 14 0a 05 | ce 0d 14 14 2f 6c 69 73 |lag%....|..../lis|
|00003110| 74 25 3d 2d 31 20 3a 20 | 75 70 64 61 74 65 5f 61 |t%=-1 : |update_a|
|00003120| 74 74 72 25 3d 20 a3 20 | 3a 20 75 70 64 61 74 65 |ttr%= . |: update|
|00003130| 5f 63 6c 72 25 3d 20 a3 | 0d 14 1e 05 e1 0d 14 28 |_clr%= .|.......(|
|00003140| 04 0d 14 32 1a dd 20 f2 | 75 70 64 61 74 65 5f 62 |...2.. .|update_b|
|00003150| 6f 61 72 64 28 69 25 2c | 6a 25 29 0d 14 3c 2b 6c |oard(i%,|j%)..<+l|
|00003160| 69 74 74 6c 65 25 21 30 | 3d 69 25 3a 6c 69 74 74 |ittle%!0|=i%:litt|
|00003170| 6c 65 25 21 34 3d 6a 25 | 3a 6c 69 74 74 6c 65 25 |le%!4=j%|:little%|
|00003180| 21 38 3d 73 70 25 0d 14 | 46 39 41 25 3d 6c 69 73 |!8=sp%..|F9A%=lis|
|00003190| 74 25 3a 42 25 3d 73 70 | 72 69 74 65 73 25 3a 43 |t%:B%=sp|rites%:C|
|000031a0| 25 3d 6c 69 74 74 6c 65 | 25 3a 44 25 3d 78 5f 6c |%=little|%:D%=x_l|
|000031b0| 69 73 74 25 3a 45 25 3d | 79 5f 6c 69 73 74 25 0d |ist%:E%=|y_list%.|
|000031c0| 14 50 19 46 25 3d 62 6f | 61 72 64 25 3a 47 25 3d |.P.F%=bo|ard%:G%=|
|000031d0| 66 61 63 74 6f 72 73 25 | 0d 14 5a 0c 48 25 3d 70 |factors%|..Z.H%=p|
|000031e0| 69 78 73 25 0d 14 64 0d | d6 20 75 70 64 61 74 65 |ixs%..d.|. update|
|000031f0| 25 0d 14 6e 05 e1 0d 14 | 78 04 0d 14 82 1b dd 20 |%..n....|x...... |
|00003200| f2 6d 65 73 73 61 67 65 | 28 69 25 2c 6a 25 2c 41 |.message|(i%,j%,A|
|00003210| 24 2c 42 24 29 0d 14 8c | 17 20 20 20 c8 99 20 53 |$,B$)...|. .. S|
|00003220| 65 74 43 6f 6c 6f 75 72 | 25 2c 31 31 0d 14 96 22 |etColour|%,11..."|
|00003230| 20 20 20 c8 93 20 c8 90 | 20 31 30 30 2b 69 25 2c | .. ..| 100+i%,|
|00003240| 32 36 30 2b 6a 25 2c 31 | 37 32 2c 31 36 30 0d 14 |260+j%,1|72,160..|
|00003250| a0 16 20 20 20 c8 99 20 | 53 65 74 43 6f 6c 6f 75 |.. .. |SetColou|
|00003260| 72 25 2c 37 0d 14 aa 1f | 20 20 20 c8 93 20 31 30 |r%,7....| .. 10|
|00003270| 30 2b 69 25 2c 32 36 30 | 2b 6a 25 2c 31 37 32 2c |0+i%,260|+j%,172,|
|00003280| 31 36 30 0d 14 b4 16 20 | 20 20 c8 99 20 53 65 74 |160.... | .. Set|
|00003290| 43 6f 6c 6f 75 72 25 2c | 38 0d 14 be 25 20 20 20 |Colour%,|8...% |
|000032a0| ec 20 31 38 36 2b 69 25 | 2d a9 28 41 24 29 2a 38 |. 186+i%|-.(A$)*8|
|000032b0| 2c 33 39 30 2b 6a 25 20 | 3a 20 f1 20 41 24 0d 14 |,390+j% |: . A$..|
|000032c0| c8 25 20 20 20 ec 20 31 | 38 36 2b 69 25 2d a9 28 |.% . 1|86+i%-.(|
|000032d0| 42 24 29 2a 38 2c 33 32 | 36 2b 6a 25 20 3a 20 f1 |B$)*8,32|6+j% : .|
|000032e0| 20 42 24 0d 14 d2 16 20 | 20 20 c8 99 20 53 65 74 | B$.... | .. Set|
|000032f0| 43 6f 6c 6f 75 72 25 2c | 37 0d 14 dc 05 e1 0d 14 |Colour%,|7.......|
|00003300| e6 11 dd 20 f2 73 74 61 | 72 74 5f 67 61 6d 65 0d |... .sta|rt_game.|
|00003310| 14 f0 0c 64 72 6f 70 25 | 3d 20 a3 0d 14 fa 46 61 |...drop%|= ....Fa|
|00003320| 74 74 72 25 28 73 63 6f | 72 65 25 29 3d 30 3a 61 |ttr%(sco|re%)=0:a|
|00003330| 74 74 72 25 28 70 69 65 | 63 65 73 25 29 3d 30 3a |ttr%(pie|ces%)=0:|
|00003340| 61 74 74 72 25 28 63 6c | 65 61 72 65 64 25 29 3d |attr%(cl|eared%)=|
|00003350| 30 3a 61 74 74 72 25 28 | 6c 65 76 65 6c 25 29 3d |0:attr%(|level%)=|
|00003360| 31 0d 15 04 29 f2 6e 65 | 77 5f 70 69 65 63 65 20 |1...).ne|w_piece |
|00003370| 3a 20 65 6e 64 25 3d 20 | a3 20 3a 20 75 70 64 61 |: end%= |. : upda|
|00003380| 74 65 5f 61 74 74 72 25 | 3d a3 0d 15 0e 33 75 70 |te_attr%|=....3up|
|00003390| 64 61 74 65 5f 65 6e 64 | 25 3d 20 a3 20 3a 20 75 |date_end|%= . : u|
|000033a0| 70 64 61 74 65 5f 6c 65 | 76 65 6c 25 3d 20 a3 20 |pdate_le|vel%= . |
|000033b0| 3a 20 6c 65 76 65 6c 5f | 74 25 3d 20 91 0d 15 18 |: level_|t%= ....|
|000033c0| 41 74 31 25 3d 91 20 3a | 20 64 65 6c 61 79 25 3d |At1%=. :| delay%=|
|000033d0| 91 20 3a 20 74 6d 25 3d | 32 34 20 3a 20 74 69 25 |. : tm%=|24 : ti%|
|000033e0| 3d 74 6d 25 20 3a 20 63 | 74 25 3d 30 20 3a 20 20 |=tm% : c|t%=0 : |
|000033f0| 75 70 64 61 74 65 5f 63 | 6c 72 25 3d 20 b9 0d 15 |update_c|lr%= ...|
|00003400| 22 0d 65 6e 64 5f 74 25 | 3d 20 91 0d 15 2c 0c 6c |".end_t%|= ...,.l|
|00003410| 69 73 74 25 3d 2d 31 0d | 15 36 1f e3 20 58 25 3d |ist%=-1.|.6.. X%=|
|00003420| 30 20 b8 20 28 77 69 64 | 74 68 25 29 2a 28 68 65 |0 . (wid|th%)*(he|
|00003430| 69 67 68 74 25 29 0d 15 | 40 18 20 20 20 62 6f 61 |ight%)..|@. boa|
|00003440| 72 64 25 3f 58 25 3d 20 | 63 6c 65 61 72 25 0d 15 |rd%?X%= |clear%..|
|00003450| 4a 05 ed 0d 15 54 12 f2 | 75 70 64 61 74 65 5f 77 |J....T..|update_w|
|00003460| 69 6e 64 6f 77 0d 15 5e | 13 75 70 64 61 74 65 5f |indow..^|.update_|
|00003470| 61 74 74 72 25 3d 20 b9 | 0d 15 68 12 f2 75 70 64 |attr%= .|..h..upd|
|00003480| 61 74 65 5f 77 69 6e 64 | 6f 77 0d 15 72 05 e1 0d |ate_wind|ow..r...|
|00003490| 15 7c 04 0d 15 86 11 dd | 20 f2 6e 65 78 74 5f 6c |.|......| .next_l|
|000034a0| 65 76 65 6c 0d 15 90 12 | 74 6d 25 2d 3d 31 3a 74 |evel....|tm%-=1:t|
|000034b0| 69 25 3d 74 6d 25 0d 15 | 9a 19 64 72 6f 70 25 3d |i%=tm%..|..drop%=|
|000034c0| 20 a3 20 3a 20 f2 6e 65 | 77 5f 70 69 65 63 65 0d | . : .ne|w_piece.|
|000034d0| 15 a4 3a 74 31 25 3d 20 | 91 20 3a 20 64 65 6c 61 |..:t1%= |. : dela|
|000034e0| 79 25 3d 20 91 20 3a 20 | 75 70 64 61 74 65 5f 63 |y%= . : |update_c|
|000034f0| 6c 72 25 3d 20 b9 20 3a | 20 75 70 64 61 74 65 5f |lr%= . :| update_|
|00003500| 6c 65 76 65 6c 25 3d 20 | a3 0d 15 ae 1f e3 20 58 |level%= |...... X|
|00003510| 25 3d 30 20 b8 20 28 77 | 69 64 74 68 25 29 2a 28 |%=0 . (w|idth%)*(|
|00003520| 68 65 69 67 68 74 25 29 | 0d 15 b8 17 20 20 20 62 |height%)|.... b|
|00003530| 6f 61 72 64 25 3f 58 25 | 3d 63 6c 65 61 72 25 0d |oard%?X%|=clear%.|
|00003540| 15 c2 05 ed 0d 15 cc 18 | 6c 65 76 25 3d 61 74 74 |........|lev%=att|
|00003550| 72 25 28 6c 65 76 65 6c | 25 29 2d 32 0d 15 d6 16 |r%(level|%)-2....|
|00003560| 6c 69 73 74 25 3d 6e 75 | 6d 25 28 6c 65 76 25 29 |list%=nu|m%(lev%)|
|00003570| 2d 31 0d 15 e0 12 e3 20 | 5a 25 3d 30 20 b8 20 6c |-1..... |Z%=0 . l|
|00003580| 69 73 74 25 0d 15 ea 33 | 20 20 20 f2 70 6c 61 63 |ist%...3| .plac|
|00003590| 65 28 6c 65 76 65 6c 5f | 62 6c 6f 63 6b 25 2c 78 |e(level_|block%,x|
|000035a0| 25 28 5a 25 2c 6c 65 76 | 25 29 2c 79 25 28 5a 25 |%(Z%,lev|%),y%(Z%|
|000035b0| 2c 6c 65 76 25 29 29 0d | 15 f4 05 ed 0d 15 fe 12 |,lev%)).|........|
|000035c0| f2 75 70 64 61 74 65 5f | 77 69 6e 64 6f 77 0d 16 |.update_|window..|
|000035d0| 08 05 e1 0d 16 12 04 0d | 16 1c 12 dd 20 f2 6f 70 |........|.... .op|
|000035e0| 65 6e 5f 77 69 6e 64 6f | 77 0d 16 26 0f e7 20 6f |en_windo|w..&.. o|
|000035f0| 70 65 6e 25 20 8c 20 e1 | 0d 16 30 3b 21 62 6c 6f |pen% . .|..0;!blo|
|00003600| 63 6b 25 3d 20 77 69 6e | 5f 68 25 20 3a 20 6f 70 |ck%= win|_h% : op|
|00003610| 65 6e 25 3d 20 b9 20 3a | 20 73 65 6c 65 63 74 65 |en%= . :| selecte|
|00003620| 64 25 3d 20 a3 20 3a 20 | 70 6c 61 79 69 6e 67 25 |d%= . : |playing%|
|00003630| 3d 20 a3 0d 16 3a 1e c8 | 99 20 47 65 74 57 69 6e |= ...:..|. GetWin|
|00003640| 64 6f 77 53 74 61 74 65 | 25 2c 2c 62 6c 6f 63 6b |dowState|%,,block|
|00003650| 25 0d 16 44 1a c8 99 20 | 4f 70 65 6e 57 69 6e 64 |%..D... |OpenWind|
|00003660| 6f 77 25 2c 2c 62 6c 6f | 63 6b 25 0d 16 4e 05 e1 |ow%,,blo|ck%..N..|
|00003670| 0d 16 58 04 0d 16 62 11 | dd 20 f2 69 6e 69 74 69 |..X...b.|. .initi|
|00003680| 61 6c 69 73 65 0d 16 6c | 29 6f 70 65 6e 25 3d 20 |alise..l|)open%= |
|00003690| a3 20 3a 20 70 6c 61 79 | 69 6e 67 25 3d 20 a3 20 |. : play|ing%= . |
|000036a0| 3a 20 73 65 6c 65 63 74 | 65 64 25 3d 20 a3 0d 16 |: select|ed%= ...|
|000036b0| 76 1d 62 75 74 74 6f 6e | 25 3d 20 30 20 3a 20 6f |v.button|%= 0 : o|
|000036c0| 6c 64 62 75 74 74 6f 6e | 25 3d 30 0d 16 80 05 e1 |ldbutton|%=0.....|
|000036d0| 0d 16 8a 04 0d 16 94 0f | dd 20 f2 6d 65 6e 75 28 |........|. .menu(|
|000036e0| 78 25 29 0d 16 9e 1a 24 | 6d 65 6e 75 25 3d 22 51 |x%)....$|menu%="Q|
|000036f0| 75 61 72 74 65 74 22 2b | bd 28 31 33 29 0d 16 a8 |uartet"+|.(13)...|
|00003700| 32 6d 65 6e 75 25 3f 31 | 32 3d 37 20 20 3a 6d 65 |2menu%?1|2=7 :me|
|00003710| 6e 75 25 3f 31 33 3d 32 | 20 3a 6d 65 6e 75 25 3f |nu%?13=2| :menu%?|
|00003720| 31 34 3d 37 3a 6d 65 6e | 75 25 3f 31 35 3d 30 0d |14=7:men|u%?15=0.|
|00003730| 16 b2 27 6d 65 6e 75 25 | 21 31 36 3d 31 31 36 3a |..'menu%|!16=116:|
|00003740| 6d 65 6e 75 25 21 32 30 | 3d 33 32 3a 6d 65 6e 75 |menu%!20|=32:menu|
|00003750| 25 21 32 34 3d 38 0d 16 | bc 48 6d 65 6e 75 25 21 |%!24=8..|.Hmenu%!|
|00003760| 32 38 3d 30 20 20 3a 6d | 65 6e 75 25 21 33 32 3d |28=0 :m|enu%!32=|
|00003770| 30 20 3a 6d 65 6e 75 25 | 21 33 36 3d 26 30 37 30 |0 :menu%|!36=&070|
|00003780| 30 33 30 31 39 3a 24 28 | 6d 65 6e 75 25 2b 34 30 |03019:$(|menu%+40|
|00003790| 29 3d 22 49 6e 66 6f 22 | 2b bd 28 31 33 29 0d 16 |)="Info"|+.(13)..|
|000037a0| c6 48 6d 65 6e 75 25 21 | 32 38 3d 26 38 30 3a 6d |.Hmenu%!|28=&80:m|
|000037b0| 65 6e 75 25 21 33 32 3d | 30 20 3a 6d 65 6e 75 25 |enu%!32=|0 :menu%|
|000037c0| 21 33 36 3d 26 30 37 30 | 30 33 30 31 39 3a 24 28 |!36=&070|03019:$(|
|000037d0| 6d 65 6e 75 25 2b 34 30 | 29 3d 22 51 75 69 74 22 |menu%+40|)="Quit"|
|000037e0| 2b bd 28 31 33 29 0d 16 | d0 23 c8 99 20 43 72 65 |+.(13)..|.#.. Cre|
|000037f0| 61 74 65 4d 65 6e 75 25 | 2c 2c 6d 65 6e 75 25 2c |ateMenu%|,,menu%,|
|00003800| 78 25 2d 38 30 2c 31 33 | 36 0d 16 da 05 e1 0d 16 |x%-80,13|6.......|
|00003810| e4 04 0d 16 ee 0f dd 20 | f2 6f 70 65 6e 5f 72 65 |....... |.open_re|
|00003820| 71 0d 16 f8 1a c8 99 20 | 4f 70 65 6e 57 69 6e 64 |q...... |OpenWind|
|00003830| 6f 77 25 2c 2c 62 6c 6f | 63 6b 25 0d 17 02 05 e1 |ow%,,blo|ck%.....|
|00003840| 0d 17 0c 04 0d 17 16 10 | dd 20 f2 63 6c 6f 73 65 |........|. .close|
|00003850| 5f 72 65 71 0d 17 20 0f | 72 65 73 70 6f 6e 63 65 |_req.. .|responce|
|00003860| 25 3d 31 0d 17 2a 10 e7 | 20 70 6c 61 79 69 6e 67 |%=1..*..| playing|
|00003870| 25 20 8c 0d 17 34 11 20 | 20 20 21 73 74 72 69 6e |% ...4. | !strin|
|00003880| 67 25 3d 30 0d 17 3e 39 | 20 20 20 24 28 73 74 72 |g%=0..>9| $(str|
|00003890| 69 6e 67 25 2b 34 29 3d | 22 47 61 6d 65 20 73 74 |ing%+4)=|"Game st|
|000038a0| 69 6c 6c 20 69 6e 20 70 | 72 6f 67 72 65 73 73 2e |ill in p|rogress.|
|000038b0| 20 53 74 69 6c 6c 20 71 | 75 69 74 3f 22 0d 17 48 | Still q|uit?"..H|
|000038c0| 37 20 20 20 c8 99 20 52 | 65 70 6f 72 74 45 72 72 |7 .. R|eportErr|
|000038d0| 6f 72 25 2c 73 74 72 69 | 6e 67 25 2c 33 2c 22 51 |or%,stri|ng%,3,"Q|
|000038e0| 75 61 72 74 65 74 22 20 | b8 20 2c 72 65 73 70 6f |uartet" |. ,respo|
|000038f0| 6e 63 65 25 0d 17 52 05 | cd 0d 17 5c 44 e7 20 72 |nce%..R.|...\D. r|
|00003900| 65 73 70 6f 6e 63 65 25 | 3c 3e 32 20 8c 20 c8 99 |esponce%|<>2 . ..|
|00003910| 20 43 6c 6f 73 65 57 69 | 6e 64 6f 77 25 2c 2c 62 | CloseWi|ndow%,,b|
|00003920| 6c 6f 63 6b 25 3a f2 69 | 6e 69 74 69 61 6c 69 73 |lock%:.i|nitialis|
|00003930| 65 3a f2 73 74 61 72 74 | 5f 67 61 6d 65 0d 17 66 |e:.start|_game..f|
|00003940| 05 e1 0d 17 70 04 0d 17 | 7a 16 dd 20 f2 70 6f 69 |....p...|z.. .poi|
|00003950| 6e 74 65 72 5f 6c 65 61 | 76 69 6e 67 0d 17 84 11 |nter_lea|ving....|
|00003960| e7 20 73 65 6c 65 63 74 | 65 64 25 20 8c 0d 17 8e |. select|ed% ....|
|00003970| 13 20 20 20 73 65 6c 65 | 63 74 65 64 25 3d 20 a3 |. sele|cted%= .|
|00003980| 0d 17 98 21 20 20 20 c8 | 99 20 53 65 74 43 61 72 |...! .|. SetCar|
|00003990| 65 74 25 2c 2d 31 2c 2d | 31 2c 30 2c 30 2c 30 2c |et%,-1,-|1,0,0,0,|
|000039a0| 30 0d 17 a2 05 cd 0d 17 | ac 21 c8 99 20 50 6f 69 |0.......|.!.. Poi|
|000039b0| 6e 74 65 72 53 68 61 70 | 65 25 2c 31 2c 2d 31 2c |nterShap|e%,1,-1,|
|000039c0| 30 2c 30 2c 30 2c 30 0d | 17 b6 05 e1 0d 17 c0 04 |0,0,0,0.|........|
|000039d0| 0d 17 ca 0f dd 20 f2 65 | 6e 64 5f 67 61 6d 65 0d |..... .e|nd_game.|
|000039e0| 17 d4 11 e7 20 73 65 6c | 65 63 74 65 64 25 20 8c |.... sel|ected% .|
|000039f0| 0d 17 de 13 20 20 20 73 | 65 6c 65 63 74 65 64 25 |.... s|elected%|
|00003a00| 3d 20 a3 0d 17 e8 21 20 | 20 20 c8 99 20 53 65 74 |= ....! | .. Set|
|00003a10| 43 61 72 65 74 25 2c 2d | 31 2c 2d 31 2c 30 2c 30 |Caret%,-|1,-1,0,0|
|00003a20| 2c 30 2c 30 0d 17 f2 2f | 20 20 20 c8 99 20 50 6f |,0,0.../| .. Po|
|00003a30| 69 6e 74 65 72 53 68 61 | 70 65 25 2c 32 2c 73 70 |interSha|pe%,2,sp|
|00003a40| 68 65 72 65 25 2b 31 39 | 2c 32 34 2c 31 32 2c 31 |here%+19|,24,12,1|
|00003a50| 32 2c 36 0d 17 fc 05 cd | 0d 18 06 18 70 6c 61 79 |2,6.....|....play|
|00003a60| 69 6e 67 25 3d 20 a3 20 | 3a 20 65 6e 64 25 3d a3 |ing%= . |: end%=.|
|00003a70| 0d 18 10 05 e1 0d 18 1a | 04 0d 18 24 17 dd 20 f2 |........|...$.. .|
|00003a80| 70 6f 69 6e 74 65 72 5f | 65 6e 74 65 72 69 6e 67 |pointer_|entering|
|00003a90| 0d 18 2e 2c c8 99 20 50 | 6f 69 6e 74 65 72 53 68 |...,.. P|ointerSh|
|00003aa0| 61 70 65 25 2c 32 2c 73 | 70 68 65 72 65 25 2b 31 |ape%,2,s|phere%+1|
|00003ab0| 39 2c 32 34 2c 31 32 2c | 31 32 2c 36 0d 18 38 0c |9,24,12,|12,6..8.|
|00003ac0| 65 6e 64 5f 74 25 3d 91 | 0d 18 42 05 e1 0d 18 4c |end_t%=.|..B....L|
|00003ad0| 04 0d 18 56 12 dd 20 f2 | 6b 65 79 5f 70 72 65 73 |...V.. .|key_pres|
|00003ae0| 73 65 64 0d 18 60 42 e7 | 20 73 65 6c 65 63 74 65 |sed..`B.| selecte|
|00003af0| 64 25 20 80 20 62 6c 6f | 63 6b 25 21 30 3d 77 69 |d% . blo|ck%!0=wi|
|00003b00| 6e 5f 68 25 20 80 20 62 | 6c 6f 63 6b 25 21 32 34 |n_h% . b|lock%!24|
|00003b10| 3d 33 32 20 80 20 a6 2d | 39 39 20 8c 20 64 72 6f |=32 . .-|99 . dro|
|00003b20| 70 25 3d 20 b9 0d 18 6a | 05 e1 0d 18 74 04 0d 18 |p%= ...j|....t...|
|00003b30| 7e 12 dd 20 f2 6d 65 6e | 75 5f 73 65 6c 65 63 74 |~.. .men|u_select|
|00003b40| 0d 18 88 0c 71 75 69 74 | 25 3d 20 b9 0d 18 92 05 |....quit|%= .....|
|00003b50| e1 0d 18 9c 04 0d 18 a6 | 16 dd 20 f2 61 74 74 72 |........|.. .attr|
|00003b60| 28 6e 75 6d 25 2c 69 6e | 63 25 29 0d 18 b0 15 61 |(num%,in|c%)....a|
|00003b70| 74 74 72 25 28 6e 75 6d | 25 29 2b 3d 69 6e 63 25 |ttr%(num|%)+=inc%|
|00003b80| 0d 18 ba 33 e7 20 61 74 | 74 72 25 28 6e 75 6d 25 |...3. at|tr%(num%|
|00003b90| 29 3e 68 69 25 28 6e 75 | 6d 25 29 20 8c 20 68 69 |)>hi%(nu|m%) . hi|
|00003ba0| 25 28 6e 75 6d 25 29 3d | 61 74 74 72 25 28 6e 75 |%(num%)=|attr%(nu|
|00003bb0| 6d 25 29 0d 18 c4 13 75 | 70 64 61 74 65 5f 61 74 |m%)....u|pdate_at|
|00003bc0| 74 72 25 3d 20 b9 0d 18 | ce 05 e1 0d ff |tr%= ...|..... |
+--------+-------------------------+-------------------------+--------+--------+
