home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / bb_exa.dms / in.adf < prev   
Amiga Disk Format (OFS)  |  1996-02-28  |  880.0 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: Amiga Disk Format (OFS) (archive/adfOFS).

You can browse this item here: in.adf

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert Amiga Disk Format (OFS) (archive/adfOFS) magic Supported
66% dexvert Amiga Disk Format (FFS) (archive/adfFFS) ext Supported
1% dexvert ABackup Disk Image (archive/abackupDiskImage) ext Unsupported
1% dexvert Ami-Back backup disk image (archive/amiBackBackupDiskImage) ext Unsupported
1% dexvert Amiga Hard Disk Image (PFS) (archive/amigaHardDiskPFS) ext Unsupported
1% dexvert Amiga Kickstart disk image (archive/amigaKickstartDiskImage) ext Unsupported
1% dexvert ESRI Arc/Info Binary Grid (other/esriArcInfoBinaryGrid) ext Unsupported
100% file Amiga DOS disk (DD 880 KiB), "Examples" default
99% file DIY-Thermocam raw data (Lepton 3.x), scale 0-8, spot sensor temperature -37758179275874238464.000000, unit celsius, color scheme 0, show scale bar, calibration: offset 0.000000, slope 4236914236564419344880885004643598336.000000 default (weak)
98% file data default
56% TrID Amiga Disk image File (OFS) default
42% TrID Amiga Disk image File (generic) default (weak)
1% TrID Memo File Apollo Database Engine default (weak)
0% TrID VXD Driver default (weak)
0% TrID Sybase iAnywhere database files default (weak)
100% siegfried fmt/1361 Amiga Disk File default
100% disktype Amiga OFS file system (non-intl.) Type "DOS\0" Size matches DD floppy default
100% xdgMime application/x-amiga-disk-format default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 4f 53 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |DOS.....|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 31 20 43 6f 6e 74 72 6f | 6c 20 44 69 73 6b 20 31 |1 Contro|l Disk 1|
|00000210| 20 43 6f 6e 74 72 6f 6c | 20 44 69 73 6b 20 31 20 | Control| Disk 1 |
|00000220| 43 6f 6e 74 72 6f 6c 20 | 44 69 73 6b 20 31 20 43 |Control |Disk 1 C|
|00000230| 6f 6e 74 72 6f 6c 20 44 | 69 73 6b 20 31 20 43 6f |ontrol D|isk 1 Co|
|00000240| 6e 74 72 6f 6c 20 44 69 | 73 6b 20 31 20 43 6f 6e |ntrol Di|sk 1 Con|
|00000250| 74 72 6f 6c 20 44 69 73 | 6b 20 31 20 43 6f 6e 74 |trol Dis|k 1 Cont|
|00000260| 72 6f 6c 20 44 69 73 6b | 20 31 20 43 6f 6e 74 72 |rol Disk| 1 Contr|
|00000270| 6f 6c 20 44 69 73 6b 20 | 31 20 43 6f 6e 74 72 6f |ol Disk |1 Contro|
|00000280| 6c 20 44 69 73 6b 20 31 | 20 43 6f 6e 74 72 6f 6c |l Disk 1| Control|
|00000290| 20 44 69 73 6b 20 31 20 | 43 6f 6e 74 72 6f 6c 20 | Disk 1 |Control |
|000002a0| 44 69 73 6b 20 31 20 43 | 6f 6e 74 72 6f 6c 20 44 |Disk 1 C|ontrol D|
|000002b0| 69 73 6b 20 31 20 43 6f | 6e 74 72 6f 6c 20 44 69 |isk 1 Co|ntrol Di|
|000002c0| 73 6b 20 31 20 43 6f 6e | 74 72 6f 6c 20 44 69 73 |sk 1 Con|trol Dis|
|000002d0| 6b 20 31 20 43 6f 6e 74 | 72 6f 6c 20 44 69 73 6b |k 1 Cont|rol Disk|
|000002e0| 20 31 20 43 6f 6e 74 72 | 6f 6c 20 44 69 73 6b 20 | 1 Contr|ol Disk |
|000002f0| 31 20 43 6f 6e 74 72 6f | 6c 20 44 69 73 6b 20 31 |1 Contro|l Disk 1|
|00000300| 20 43 6f 6e 74 72 6f 6c | 20 44 69 73 6b 20 31 20 | Control| Disk 1 |
|00000310| 43 6f 6e 74 72 6f 6c 20 | 44 69 73 6b 20 31 20 43 |Control |Disk 1 C|
|00000320| 6f 6e 74 72 6f 6c 20 44 | 69 73 6b 20 31 20 43 6f |ontrol D|isk 1 Co|
|00000330| 6e 74 72 6f 6c 20 44 69 | 73 6b 20 31 20 43 6f 6e |ntrol Di|sk 1 Con|
|00000340| 74 72 6f 6c 20 44 69 73 | 6b 20 31 20 43 6f 6e 74 |trol Dis|k 1 Cont|
|00000350| 72 6f 6c 20 44 69 73 6b | 20 31 20 43 6f 6e 74 72 |rol Disk| 1 Contr|
|00000360| 6f 6c 20 44 69 73 6b 20 | 31 20 43 6f 6e 74 72 6f |ol Disk |1 Contro|
|00000370| 6c 20 44 69 73 6b 20 31 | 20 43 6f 6e 74 72 6f 6c |l Disk 1| Control|
|00000380| 20 44 69 73 6b 20 31 20 | 43 6f 6e 74 72 6f 6c 20 | Disk 1 |Control |
|00000390| 44 69 73 6b 20 31 20 43 | 6f 6e 74 72 6f 6c 20 44 |Disk 1 C|ontrol D|
|000003a0| 69 73 6b 20 31 20 43 6f | 6e 74 72 6f 6c 20 44 69 |isk 1 Co|ntrol Di|
|000003b0| 73 6b 20 31 20 43 6f 6e | 74 72 6f 6c 20 44 69 73 |sk 1 Con|trol Dis|
|000003c0| 6b 20 31 20 43 6f 6e 74 | 72 6f 6c 20 44 69 73 6b |k 1 Cont|rol Disk|
|000003d0| 20 31 20 43 6f 6e 74 72 | 6f 6c 20 44 69 73 6b 20 | 1 Contr|ol Disk |
|000003e0| 31 20 43 6f 6e 74 72 6f | 6c 20 44 69 73 6b 20 31 |1 Contro|l Disk 1|
|000003f0| 20 43 6f 6e 74 72 6f 6c | 20 44 69 73 6b 20 31 20 | Control| Disk 1 |
|00000400| 00 00 00 08 00 00 03 de | 00 00 00 1f 00 00 01 e8 |........|........|
|00000410| 00 00 00 03 36 2f 45 1d | 20 20 20 20 20 20 20 20 |....6/E.| |
|00000420| 20 20 20 20 70 67 5f 76 | 2b 31 20 80 42 20 31 00 | pg_v|+1 .B 1.|
|00000430| 20 20 20 20 20 20 20 20 | 20 20 20 20 74 7b 79 6e | | t{yn|
|00000440| 24 28 70 67 5f 76 29 7d | 00 20 20 20 20 20 20 20 |$(pg_v)}|. |
|00000450| 20 20 20 80 0f 20 33 00 | 20 20 20 20 20 20 20 20 | .. 3.| |
|00000460| 20 20 20 20 70 67 5f 62 | 2b 31 20 80 42 20 31 00 | pg_b|+1 .B 1.|
|00000470| 20 20 20 20 20 20 20 20 | 20 20 20 20 74 7b 79 6e | | t{yn|
|00000480| 24 28 70 67 5f 62 29 7d | 00 20 20 20 20 20 20 20 |$(pg_b)}|. |
|00000490| 20 20 20 80 0f 20 35 00 | 20 20 20 20 20 20 20 20 | .. 5.| |
|000004a0| 20 20 20 20 80 0b 20 bc | 01 28 c6 14 28 32 2c 35 | .. .|.(..(2,5|
|000004b0| 29 29 00 20 20 20 20 20 | 20 20 20 20 20 20 20 80 |)). | .|
|000004c0| 22 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |". | |
|000004d0| c6 1b 20 32 2c 35 2c 22 | 31 22 3a c6 0b 20 32 2c |.. 2,5,"|1":.. 2,|
|000004e0| 35 00 20 20 20 20 20 20 | 20 20 20 20 20 20 80 c0 |5. | ..|
|000004f0| 00 20 20 20 20 20 20 20 | 20 20 20 80 0f 20 37 00 |. | .. 7.|
|00000500| 20 20 20 20 20 20 20 20 | 20 20 20 20 80 0b 20 bc | | .. .|
|00000510| 01 28 c6 14 28 32 2c 37 | 29 29 00 20 20 20 20 20 |.(..(2,7|)). |
|00000520| 20 20 20 20 20 20 20 80 | 22 00 20 20 20 20 20 20 | .|". |
|00000530| 20 20 20 20 20 20 20 20 | c6 1b 20 32 2c 37 2c 22 | |.. 2,7,"|
|00000540| 31 22 3a c6 0b 20 32 2c | 37 00 20 20 20 20 20 20 |1":.. 2,|7. |
|00000550| 20 20 20 20 20 20 80 c0 | 00 20 20 20 20 20 20 20 | ..|. |
|00000560| 20 20 20 80 0f 20 38 00 | 20 20 20 20 20 20 20 20 | .. 8.| |
|00000570| 20 20 20 20 77 72 2b 31 | 20 80 42 20 31 00 20 20 | wr+1| .B 1. |
|00000580| 20 20 20 20 20 20 20 20 | 20 20 75 7b 79 6e 24 28 | | u{yn$(|
|00000590| 77 72 29 2c 36 7d 00 20 | 20 20 20 20 20 20 20 20 |wr),6}. | |
|000005a0| 20 80 0f 20 39 00 20 20 | 20 20 20 20 20 20 20 20 | .. 9. | |
|000005b0| 20 20 68 72 2b 31 20 80 | 42 20 31 00 20 20 20 20 | hr+1 .|B 1. |
|000005c0| 20 20 20 20 20 20 20 20 | 75 7b 79 6e 24 28 68 72 | |u{yn$(hr|
|000005d0| 29 2c 37 7d 00 20 20 20 | 20 20 20 20 20 20 20 80 |),7}. | .|
|000005e0| 0f 20 31 30 30 20 20 3b | 6d 61 6b 65 00 20 20 20 |. 100 ;|make. |
|000005f0| 20 20 20 20 20 20 20 20 | 20 3b 00 20 20 20 20 20 | | ;. |
|00000600| 00 00 00 08 00 00 03 de | 00 00 00 20 00 00 01 e8 |........|... ....|
|00000610| 00 00 00 04 a7 c6 af 8f | 20 20 20 20 20 20 20 80 |........| .|
|00000620| 06 20 70 72 65 70 6d 61 | 6b 65 00 20 20 20 20 20 |. prepma|ke. |
|00000630| 20 20 20 20 20 20 20 3b | 00 20 20 20 20 20 20 20 | ;|. |
|00000640| 20 20 20 20 20 78 73 65 | 74 2e 71 3d bc 01 28 c6 | xse|t.q=..(.|
|00000650| 14 28 32 2c 34 29 29 2f | bc 01 28 c6 14 28 32 2c |.(2,4))/|..(..(2,|
|00000660| 35 29 29 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |5)). | |
|00000670| 79 73 65 74 2e 71 3d bc | 01 28 c6 14 28 32 2c 36 |yset.q=.|.(..(2,6|
|00000680| 29 29 2f bc 01 28 c6 14 | 28 32 2c 37 29 29 00 20 |))/..(..|(2,7)). |
|00000690| 20 20 20 20 20 20 20 20 | 20 20 20 3b 00 20 20 20 | | ;. |
|000006a0| 20 20 20 20 20 20 20 20 | 20 67 77 3d 36 00 20 20 | | gw=6. |
|000006b0| 20 20 20 20 20 20 20 20 | 20 20 67 68 3d 36 00 20 | | gh=6. |
|000006c0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 00 20 20 20 | | ;. |
|000006d0| 20 20 20 20 20 20 20 20 | 20 67 78 3d 31 36 30 2d | | gx=160-|
|000006e0| 67 77 20 80 7d 20 31 3a | 67 79 3d 38 38 2d 67 68 |gw .} 1:|gy=88-gh|
|000006f0| 20 80 7d 20 31 00 20 20 | 20 20 20 20 20 20 20 20 | .} 1. | |
|00000700| 20 20 3b 00 20 20 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00000710| c5 0c 20 67 78 2c 67 79 | 2c 67 78 2b 67 77 2d 31 |.. gx,gy|,gx+gw-1|
|00000720| 2c 67 79 2b 67 68 2d 31 | 2c 31 00 20 20 20 20 20 |,gy+gh-1|,1. |
|00000730| 20 20 20 20 20 20 20 3b | 00 20 20 20 20 20 20 20 | ;|. |
|00000740| 20 20 20 20 20 80 06 20 | 6d 61 6b 65 69 74 00 20 | .. |makeit. |
|00000750| 20 20 20 20 20 20 20 20 | 20 20 20 3b 00 20 20 20 | | ;. |
|00000760| 20 20 20 20 20 20 20 20 | 20 80 0b 20 65 78 3e 30 | | .. ex>0|
|00000770| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 80 |. | .|
|00000780| 0b 20 c0 08 28 67 61 64 | 73 28 29 29 00 20 20 20 |. ..(gad|s()). |
|00000790| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 80 06 20 | | .. |
|000007a0| 70 6f 73 69 74 00 20 20 | 20 20 20 20 20 20 20 20 |posit. | |
|000007b0| 20 20 20 20 20 20 3b 00 | 20 20 20 20 20 20 20 20 | ;.| |
|000007c0| 20 20 20 20 20 20 20 20 | 78 6c 3d 67 78 2b 35 2b | |xl=gx+5+|
|000007d0| 77 78 3a 79 6c 3d 67 79 | 2b 35 2b 77 79 00 20 20 |wx:yl=gy|+5+wy. |
|000007e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 00 | | ;.|
|000007f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000800| 00 00 00 08 00 00 03 de | 00 00 00 21 00 00 01 e8 |........|...!....|
|00000810| 00 00 00 05 07 50 55 90 | 80 06 20 73 68 6f 77 61 |.....PU.|.. showa|
|00000820| 62 6f 78 32 00 20 20 20 | 20 20 20 20 20 20 20 20 |box2. | |
|00000830| 20 20 20 20 20 80 bb 00 | 20 20 20 20 20 20 20 20 | ...| |
|00000840| 20 20 20 20 20 20 20 20 | 20 20 c5 02 3a 80 2c 20 | | ..:., |
|00000850| c5 01 20 c5 05 00 20 20 | 20 20 20 20 20 20 20 20 |.. ... | |
|00000860| 20 20 20 20 20 20 20 20 | 80 06 20 73 68 6f 77 61 | |.. showa|
|00000870| 62 6f 78 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |box. | |
|00000880| 20 20 20 20 20 20 80 06 | 20 73 68 6f 77 61 62 6f | ..| showabo|
|00000890| 78 32 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |x2. | |
|000008a0| 20 20 20 80 bc 20 c5 22 | 3d 31 00 20 20 20 20 20 | .. ."|=1. |
|000008b0| 20 20 20 20 20 20 20 20 | 20 20 20 80 06 20 73 68 | | .. sh|
|000008c0| 6f 77 61 62 6f 78 00 20 | 20 20 20 20 20 20 20 20 |owabox. | |
|000008d0| 20 20 20 20 20 20 20 67 | 77 3d 78 2d 77 78 2d 67 | g|w=x-wx-g|
|000008e0| 78 2b 31 3a 67 68 3d 79 | 2d 77 79 2d 67 79 2b 31 |x+1:gh=y|-wy-gy+1|
|000008f0| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000900| 20 2e 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .. | |
|00000910| 20 20 20 2e 6d 61 6b 65 | 70 72 6f 70 00 20 20 20 | .make|prop. |
|00000920| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2e 00 20 | | .. |
|00000930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 6b | | k|
|00000940| 3d 30 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |=0. | |
|00000950| 20 20 20 80 0b 20 70 67 | 5f 68 3d 30 20 80 21 20 | .. pg|_h=0 .! |
|00000960| 6b 3d 36 34 00 20 20 20 | 20 20 20 20 20 20 20 20 |k=64. | |
|00000970| 20 20 20 20 20 80 0b 20 | 70 67 5f 76 3d 30 20 80 | .. |pg_v=0 .|
|00000980| 21 20 6b 7c 31 32 38 00 | 20 20 20 20 20 20 20 20 |! k|128.| |
|00000990| 20 20 20 20 20 20 20 20 | 80 0b 20 70 67 5f 62 20 | |.. pg_b |
|000009a0| 80 21 20 6b 7c 32 35 36 | 00 20 20 20 20 20 20 20 |.! k|256|. |
|000009b0| 20 20 20 20 20 20 20 20 | 20 80 0b 20 77 72 3d 30 | | .. wr=0|
|000009c0| 20 80 21 20 6b 7c 38 00 | 20 20 20 20 20 20 20 20 | .! k|8.| |
|000009d0| 20 20 20 20 20 20 20 20 | 80 0b 20 68 72 3d 30 20 | |.. hr=0 |
|000009e0| 80 21 20 6b 7c 31 36 00 | 20 20 20 20 20 20 20 20 |.! k|16.| |
|000009f0| 20 20 20 20 20 20 20 20 | 3b 00 20 20 20 20 20 20 | |;. |
|00000a00| 00 00 00 08 00 00 03 de | 00 00 00 22 00 00 01 e8 |........|..."....|
|00000a10| 00 00 00 06 64 0e c2 ca | 20 20 20 20 20 20 20 20 |....d...| |
|00000a20| 20 20 5c 67 74 3d 32 2c | 67 78 2c 67 79 2c 67 77 | \gt=2,|gx,gy,gw|
|00000a30| 2c 67 68 2c 67 69 2c 67 | 66 7c 6b 00 20 20 20 20 |,gh,gi,g|f|k. |
|00000a40| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 00 20 20 | | ;. |
|00000a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 70 | | \p|
|00000a60| 67 5f 78 73 65 74 3d 78 | 73 65 74 2c 79 73 65 74 |g_xset=x|set,yset|
|00000a70| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000a80| 20 3b 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00000a90| 20 20 20 80 06 20 73 68 | 6f 77 6e 65 77 00 20 20 | .. sh|ownew. |
|00000aa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 00 | | ;.|
|00000ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 80 c0 | | ..|
|00000ac0| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 80 c0 00 |. | ...|
|00000ad0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 00 20 20 | | ;. |
|00000ae0| 20 20 20 20 20 20 20 20 | 80 0f 20 31 30 31 20 20 | |.. 101 |
|00000af0| 3b 63 61 6e 63 65 6c 00 | 20 20 20 20 20 20 20 20 |;cancel.| |
|00000b00| 20 20 20 20 65 78 3d 2d | 31 00 20 20 20 20 20 20 | ex=-|1. |
|00000b10| 20 20 20 20 80 02 20 80 | 0e 00 20 20 20 20 20 20 | .. .|.. |
|00000b20| 20 20 80 0f 20 35 31 32 | 00 20 20 20 20 20 20 20 | .. 512|. |
|00000b30| 20 20 20 65 78 3d 2d 31 | 00 20 20 20 20 20 20 20 | ex=-1|. |
|00000b40| 20 80 02 20 80 0e 00 20 | 20 20 20 20 20 80 bc 20 | .. ... | .. |
|00000b50| 65 78 00 20 20 20 20 20 | 20 80 06 20 66 77 32 00 |ex. | .. fw2.|
|00000b60| 20 20 20 20 20 20 80 2c | 20 c5 01 20 30 00 20 20 | .,| .. 0. |
|00000b70| 20 20 20 20 3b 00 20 20 | 20 20 80 0f 20 33 00 20 | ;. | .. 3. |
|00000b80| 20 20 20 20 20 3b 00 20 | 20 20 20 20 20 77 7b 22 | ;. | w{"|
|00000b90| 53 48 41 50 45 20 47 41 | 44 47 45 54 20 50 41 52 |SHAPE GA|DGET PAR|
|00000ba0| 41 4d 45 54 45 52 53 22 | 2c 33 7d 00 20 20 20 20 |AMETERS"|,3}. |
|00000bb0| 20 20 c5 10 20 30 2c 31 | 00 20 20 20 20 20 20 70 | .. 0,1|. p|
|00000bc0| 7b 22 54 4f 47 47 4c 45 | 3f 3a 22 7d 00 20 20 20 |{"TOGGLE|?:"}. |
|00000bd0| 20 20 20 70 7b 22 55 53 | 45 20 50 41 4c 45 54 54 | p{"US|E PALETT|
|00000be0| 45 3f 3a 22 7d 00 20 20 | 20 20 20 20 3b 00 20 20 |E?:"}. | ;. |
|00000bf0| 20 20 20 20 75 7b 74 6f | 67 67 24 28 69 67 5f 74 | u{to|gg$(ig_t|
|00000c00| 00 00 00 08 00 00 03 de | 00 00 00 23 00 00 01 e8 |........|...#....|
|00000c10| 00 00 00 07 15 c1 2e 44 | 6f 67 67 29 2c 31 7d 00 |.......D|ogg),1}.|
|00000c20| 20 20 20 20 20 20 75 7b | 79 6e 24 28 69 67 5f 75 | u{|yn$(ig_u|
|00000c30| 70 29 2c 32 7d 00 20 20 | 20 20 20 20 3b 00 20 20 |p),2}. | ;. |
|00000c40| 20 20 20 20 65 78 3d 30 | 00 20 20 20 20 20 20 80 | ex=0|. .|
|00000c50| bb 00 20 20 20 20 20 20 | 20 20 80 bb 00 20 20 20 |.. | ... |
|00000c60| 20 20 20 20 20 20 20 65 | 76 3d c5 02 00 20 20 20 | e|v=... |
|00000c70| 20 20 20 20 20 80 bc 20 | c5 05 3d 32 00 20 20 20 | .. |..=2. |
|00000c80| 20 20 20 20 20 80 0e 20 | 65 76 00 20 20 20 20 20 | .. |ev. |
|00000c90| 20 20 20 80 0f 20 36 34 | 00 20 20 20 20 20 20 20 | .. 64|. |
|00000ca0| 20 20 20 80 0e 20 c5 04 | 00 20 20 20 20 20 20 20 | .. ..|. |
|00000cb0| 20 20 20 80 0f 20 31 00 | 20 20 20 20 20 20 20 20 | .. 1.| |
|00000cc0| 20 20 20 20 69 67 5f 74 | 6f 67 67 2b 31 3a 80 0b | ig_t|ogg+1:..|
|00000cd0| 20 69 67 5f 74 6f 67 67 | 3d 33 20 80 21 20 69 67 | ig_togg|=3 .! ig|
|00000ce0| 5f 74 6f 67 67 3d 30 00 | 20 20 20 20 20 20 20 20 |_togg=0.| |
|00000cf0| 20 20 20 20 74 7b 74 6f | 67 67 24 28 69 67 5f 74 | t{to|gg$(ig_t|
|00000d00| 6f 67 67 29 7d 00 20 20 | 20 20 20 20 20 20 20 20 |ogg)}. | |
|00000d10| 80 0f 20 32 00 20 20 20 | 20 20 20 20 20 20 20 20 |.. 2. | |
|00000d20| 20 69 67 5f 75 70 2b 31 | 20 80 42 20 31 00 20 20 | ig_up+1| .B 1. |
|00000d30| 20 20 20 20 20 20 20 20 | 20 20 74 7b 79 6e 24 28 | | t{yn$(|
|00000d40| 69 67 5f 75 70 29 7d 00 | 20 20 20 20 20 20 20 20 |ig_up)}.| |
|00000d50| 20 20 80 0f 20 31 30 30 | 20 20 3b 6d 61 6b 65 00 | .. 100| ;make.|
|00000d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 00 20 20 | | ;. |
|00000d70| 20 20 20 20 20 20 20 20 | 20 20 74 65 78 74 24 3d | | text$=|
|00000d80| cc 01 28 22 49 46 46 20 | 42 72 75 73 68 20 6e 61 |..("IFF |Brush na|
|00000d90| 6d 65 22 2c 62 70 61 24 | 2c 62 66 69 24 29 00 20 |me",bpa$|,bfi$). |
|00000da0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 00 20 20 20 | | ;. |
|00000db0| 20 20 20 20 20 20 20 20 | 20 80 0b 20 74 65 78 74 | | .. text|
|00000dc0| 24 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |$. | |
|00000dd0| 3b 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |;. | |
|00000de0| 80 06 20 70 72 65 70 6d | 61 6b 65 00 20 20 20 20 |.. prepm|ake. |
|00000df0| 20 20 20 20 20 20 20 20 | 20 20 3b 00 20 20 20 20 | | ;. |
|00000e00| 00 00 00 08 00 00 03 de | 00 00 00 24 00 00 01 e8 |........|...$....|
|00000e10| 00 00 00 08 8d cf a0 94 | 20 20 20 20 20 20 20 20 |........| |
|00000e20| 20 20 80 b4 00 20 20 20 | 20 20 20 20 20 20 20 20 | ... | |
|00000e30| 20 20 20 20 20 80 b5 00 | 20 20 20 20 20 20 20 20 | ...| |
|00000e40| 20 20 20 20 20 20 20 20 | ff 8c 20 30 00 20 20 20 | |.. 0. |
|00000e50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 80 be 20 | | .. |
|00000e60| 80 0e 3a 80 be 20 80 0e | 00 20 20 20 20 20 20 20 |..:.. ..|. |
|00000e70| 20 20 20 20 20 20 20 20 | 20 80 05 20 73 66 61 69 | | .. sfai|
|00000e80| 6c 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |l. | |
|00000e90| 80 02 20 80 b4 00 20 20 | 20 20 20 20 20 20 20 20 |.. ... | |
|00000ea0| 20 20 20 20 3b 00 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00000eb0| 20 20 20 20 cd 01 20 30 | 2c 74 65 78 74 24 2c 30 | .. 0|,text$,0|
|00000ec0| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 80 |. | .|
|00000ed0| b5 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00000ee0| 80 0b 20 69 67 5f 75 70 | 3d 30 20 80 21 20 80 2c |.. ig_up|=0 .! .,|
|00000ef0| 20 ce 09 20 30 00 20 20 | 20 20 20 20 20 20 20 20 | .. 0. | |
|00000f00| 20 20 20 20 3b 00 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00000f10| 20 20 20 20 67 77 3d cd | 03 28 30 29 3a 67 68 3d | gw=.|.(0):gh=|
|00000f20| cd 04 28 30 29 00 20 20 | 20 20 20 20 20 20 20 20 |..(0). | |
|00000f30| 20 20 20 20 3b 00 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00000f40| 20 20 20 20 67 78 3d 31 | 36 30 2d 67 77 20 80 7d | gx=1|60-gw .}|
|00000f50| 20 31 3a 67 79 3d 38 38 | 2d 67 68 20 80 7d 20 31 | 1:gy=88|-gh .} 1|
|00000f60| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |. | ;|
|00000f70| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |. | s|
|00000f80| 68 61 2e 6c 3d 80 b8 20 | cd 0c 28 30 29 00 20 20 |ha.l=.. |..(0). |
|00000f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 62 70 73 3d | | bps=|
|00000fa0| da 02 2e 77 28 73 68 61 | 2b 34 29 00 20 20 20 20 |...w(sha|+4). |
|00000fb0| 20 20 20 20 20 20 20 20 | 20 20 80 0b 20 62 70 73 | | .. bps|
|00000fc0| 3e 64 65 20 80 21 20 da | 01 2e 77 20 73 68 61 2b |>de .! .|..w sha+|
|00000fd0| 34 2c 64 65 00 20 20 20 | 20 20 20 20 20 20 20 20 |4,de. | |
|00000fe0| 20 20 20 3b 00 20 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00000ff0| 20 20 20 cb 01 20 30 2c | 67 78 2c 67 79 2b 31 32 | .. 0,|gx,gy+12|
|00001000| 00 00 00 08 00 00 03 de | 00 00 00 25 00 00 01 e8 |........|...%....|
|00001010| 00 00 00 09 bc 34 a0 21 | 00 20 20 20 20 20 20 20 |.....4.!|. |
|00001020| 20 20 20 20 20 20 20 3b | 00 20 20 20 20 20 20 20 | ;|. |
|00001030| 20 20 20 20 20 20 20 da | 01 2e 77 20 73 68 61 2b | .|..w sha+|
|00001040| 34 2c 62 70 73 00 20 20 | 20 20 20 20 20 20 20 20 |4,bps. | |
|00001050| 20 20 20 20 3b 00 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00001060| 20 20 20 20 80 06 20 6d | 61 6b 65 69 74 00 20 20 | .. m|akeit. |
|00001070| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 00 20 20 | | ;. |
|00001080| 20 20 20 20 20 20 20 20 | 20 20 20 20 80 0b 20 65 | | .. e|
|00001090| 78 3e 30 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |x>0. | |
|000010a0| 20 20 20 20 80 0b 20 c0 | 08 28 67 61 64 73 28 29 | .. .|.(gads()|
|000010b0| 29 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |). | |
|000010c0| 20 20 20 20 80 06 20 70 | 6f 73 69 74 00 20 20 20 | .. p|osit. |
|000010d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2e | | .|
|000010e0| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|000010f0| 20 20 20 2e 6d 61 6b 65 | 73 68 61 70 65 00 20 20 | .make|shape. |
|00001100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001110| 2e 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00001120| 20 20 20 20 5c 67 74 3d | 33 2c 67 78 2c 67 79 2c | \gt=|3,gx,gy,|
|00001130| 67 77 2c 67 68 2c 67 69 | 2c 67 66 00 20 20 20 20 |gw,gh,gi|,gf. |
|00001140| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 00 | | ;.|
|00001150| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001160| 20 20 6b 3d 30 00 20 20 | 20 20 20 20 20 20 20 20 | k=0. | |
|00001170| 20 20 20 20 20 20 20 20 | 80 0b 20 69 67 5f 74 6f | |.. ig_to|
|00001180| 67 67 20 80 21 20 6b 3d | 31 3a 80 0b 20 69 67 5f |gg .! k=|1:.. ig_|
|00001190| 74 6f 67 67 3d 32 20 80 | 21 20 6b 20 80 ce 20 31 |togg=2 .|! k .. 1|
|000011a0| 35 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |5. | |
|000011b0| 20 20 20 20 3b 00 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|000011c0| 20 20 20 20 20 20 20 20 | 5c 69 67 5f 66 69 6c 65 | |\ig_file|
|000011d0| 3d 74 65 78 74 24 2c 6b | 00 20 20 20 20 20 20 20 |=text$,k|. |
|000011e0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 00 20 20 20 | | ;. |
|000011f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 72 | | r|
|00001200| 00 00 00 08 00 00 03 de | 00 00 00 26 00 00 01 e8 |........|...&....|
|00001210| 00 00 00 0a b8 cc 97 37 | 65 70 73 68 3d 2d 31 3a |.......7|epsh=-1:|
|00001220| 80 06 20 73 68 6f 77 6e | 65 77 00 20 20 20 20 20 |.. shown|ew. |
|00001230| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 00 20 | | ;. |
|00001240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 80 | | .|
|00001250| c0 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00001260| 80 c0 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|00001270| 20 3b 00 20 20 20 20 20 | 20 20 20 20 20 20 20 80 | ;. | .|
|00001280| c0 00 20 20 20 20 20 20 | 20 20 20 20 80 0f 20 31 |.. | .. 1|
|00001290| 30 31 20 20 3b 63 61 6e | 63 65 6c 00 20 20 20 20 |01 ;can|cel. |
|000012a0| 20 20 20 20 20 20 20 20 | 65 78 3d 2d 31 00 20 20 | |ex=-1. |
|000012b0| 20 20 20 20 20 20 20 20 | 80 02 20 80 0e 00 20 20 | |.. ... |
|000012c0| 20 20 20 20 20 20 80 0f | 20 35 31 32 00 20 20 20 | ..| 512. |
|000012d0| 20 20 20 20 20 20 20 65 | 78 3d 2d 31 00 20 20 20 | e|x=-1. |
|000012e0| 20 20 20 20 20 80 02 20 | 80 0e 00 20 20 20 20 20 | .. |... |
|000012f0| 20 80 bc 20 65 78 00 20 | 20 20 20 20 20 73 66 61 | .. ex. | sfa|
|00001300| 69 6c 00 20 20 20 20 20 | 20 80 06 20 66 77 32 00 |il. | .. fw2.|
|00001310| 20 20 20 20 20 20 80 2c | 20 c5 01 20 30 00 20 20 | .,| .. 0. |
|00001320| 20 20 20 20 3b 00 20 20 | 20 20 80 02 20 80 0e 00 | ;. | .. ...|
|00001330| 20 20 80 02 20 80 0e 00 | 80 0f 20 38 00 20 20 80 | .. ...|.. 8. .|
|00001340| 0b 20 c5 22 3d 31 20 3b | 6c 65 66 74 20 64 6f 77 |. ."=1 ;|left dow|
|00001350| 6e 00 20 20 20 20 65 78 | 3d cf 05 3a 65 79 3d cf |n. ex|=..:ey=.|
|00001360| 06 00 20 20 20 20 80 0b | 20 65 78 3e 3d 77 78 20 |.. ..| ex>=wx |
|00001370| 80 42 20 65 78 3c 77 78 | 2b 77 77 20 80 42 20 65 |.B ex<wx|+ww .B e|
|00001380| 79 3e 3d 77 79 20 80 42 | 20 65 79 3c 77 79 2b 77 |y>=wy .B| ey<wy+w|
|00001390| 68 00 20 20 20 20 20 20 | 3b 00 20 20 20 20 20 20 |h. |;. |
|000013a0| 80 0b 20 65 78 3e 3d 77 | 78 2b 77 77 2d 39 20 80 |.. ex>=w|x+ww-9 .|
|000013b0| 42 20 65 79 3e 3d 77 79 | 2b 77 68 2d 39 00 20 20 |B ey>=wy|+wh-9. |
|000013c0| 20 20 20 20 20 20 3b 00 | 20 20 20 20 20 20 20 20 | ;.| |
|000013d0| 3b 73 69 7a 65 20 77 69 | 6e 64 6f 77 21 00 20 20 |;size wi|ndow!. |
|000013e0| 20 20 20 20 20 20 3b 00 | 20 20 20 20 20 20 20 20 | ;.| |
|000013f0| 78 6f 3d 65 78 2d 77 77 | 3a 79 6f 3d 65 79 2d 77 |xo=ex-ww|:yo=ey-w|
|00001400| 00 00 00 08 00 00 03 de | 00 00 00 27 00 00 01 e8 |........|...'....|
|00001410| 00 00 00 0b 63 8a 52 22 | 68 00 20 20 20 20 20 20 |....c.R"|h. |
|00001420| 20 20 77 77 32 3d 77 77 | 3a 77 68 32 3d 77 68 00 | ww2=ww|:wh2=wh.|
|00001430| 20 20 20 20 20 20 20 20 | 3b 00 20 20 20 20 20 20 | |;. |
|00001440| 20 20 80 bb 00 20 20 20 | 20 20 20 20 20 20 20 c5 | ... | .|
|00001450| 02 00 20 20 20 20 20 20 | 20 20 20 20 78 3d bc 0a |.. | x=..|
|00001460| 28 cf 05 2d 78 6f 2c 39 | 2c 6d 77 2d 77 78 29 00 |(..-xo,9|,mw-wx).|
|00001470| 20 20 20 20 20 20 20 20 | 20 20 79 3d bc 0a 28 cf | | y=..(.|
|00001480| 06 2d 79 6f 2c 39 2c 6d | 68 2d 77 79 29 00 20 20 |.-yo,9,m|h-wy). |
|00001490| 20 20 20 20 20 20 20 20 | 80 06 20 73 68 6f 77 77 | |.. showw|
|000014a0| 69 6e 00 20 20 20 20 20 | 20 20 20 20 20 77 77 3d |in. | ww=|
|000014b0| 78 3a 77 68 3d 79 00 20 | 20 20 20 20 20 20 20 20 |x:wh=y. | |
|000014c0| 20 80 06 20 73 68 6f 77 | 77 69 6e 00 20 20 20 20 | .. show|win. |
|000014d0| 20 20 20 20 80 bc 20 c5 | 22 3d 35 00 20 20 20 20 | .. .|"=5. |
|000014e0| 20 20 20 20 3b 00 20 20 | 20 20 20 20 20 20 69 6e | ;. | in|
|000014f0| 77 2b 28 77 77 2d 77 77 | 32 29 3a 69 6e 68 2b 28 |w+(ww-ww|2):inh+(|
|00001500| 77 68 2d 77 68 32 29 00 | 20 20 20 20 20 20 20 20 |wh-wh2).| |
|00001510| 3b 00 20 20 20 20 20 20 | 20 20 c0 04 20 67 61 64 |;. | .. gad|
|00001520| 73 28 29 00 20 20 20 20 | 20 20 20 20 80 0c 20 c0 |s(). | .. .|
|00001530| 03 28 67 61 64 73 28 29 | 29 00 20 20 20 20 20 20 |.(gads()|). |
|00001540| 20 20 20 20 80 0b 20 5c | 67 66 20 80 cd 20 31 20 | .. \|gf .. 1 |
|00001550| 3b 72 65 6c 20 72 69 74 | 65 3f 00 20 20 20 20 20 |;rel rit|e?. |
|00001560| 20 20 20 20 20 20 20 5c | 67 78 2d 77 77 32 2b 77 | \|gx-ww2+w|
|00001570| 77 00 20 20 20 20 20 20 | 20 20 20 20 80 c0 00 20 |w. | ... |
|00001580| 20 20 20 20 20 20 20 20 | 20 80 0b 20 5c 67 66 20 | | .. \gf |
|00001590| 80 cd 20 32 20 3b 72 65 | 6c 20 62 6f 74 3f 00 20 |.. 2 ;re|l bot?. |
|000015a0| 20 20 20 20 20 20 20 20 | 20 20 20 5c 67 79 2d 77 | | \gy-w|
|000015b0| 68 32 2b 77 68 00 20 20 | 20 20 20 20 20 20 20 20 |h2+wh. | |
|000015c0| 80 c0 00 20 20 20 20 20 | 20 20 20 20 20 80 0b 20 |... | .. |
|000015d0| 5c 67 66 20 80 cd 20 33 | 20 3b 72 65 6c 20 77 69 |\gf .. 3| ;rel wi|
|000015e0| 64 74 68 3f 00 20 20 20 | 20 20 20 20 20 20 20 20 |dth?. | |
|000015f0| 20 5c 67 77 2d 77 77 32 | 2b 77 77 00 20 20 20 20 | \gw-ww2|+ww. |
|00001600| 00 00 00 08 00 00 03 de | 00 00 00 28 00 00 01 e8 |........|...(....|
|00001610| 00 00 00 0c 5f 71 96 d5 | 20 20 20 20 20 20 80 c0 |...._q..| ..|
|00001620| 00 20 20 20 20 20 20 20 | 20 20 20 80 0b 20 5c 67 |. | .. \g|
|00001630| 66 20 80 cd 20 34 20 3b | 72 65 6c 20 68 69 74 65 |f .. 4 ;|rel hite|
|00001640| 3f 00 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 67 |?. | \g|
|00001650| 68 2d 77 68 32 2b 77 68 | 00 20 20 20 20 20 20 20 |h-wh2+wh|. |
|00001660| 20 20 20 80 c0 00 20 20 | 20 20 20 20 20 20 80 c1 | ... | ..|
|00001670| 00 20 20 20 20 20 20 20 | 20 3b 00 20 20 20 20 20 |. | ;. |
|00001680| 20 20 20 80 06 20 73 68 | 6f 77 77 69 6e 3a 80 06 | .. sh|owwin:..|
|00001690| 20 73 68 6f 77 6e 65 77 | 00 20 20 20 20 20 20 20 | shownew|. |
|000016a0| 20 3b 00 20 20 20 20 20 | 20 80 22 00 20 20 20 20 | ;. | .". |
|000016b0| 20 20 20 20 3b 70 6f 73 | 73 69 62 6c 65 20 67 61 | ;pos|sible ga|
|000016c0| 64 67 65 74 20 6d 6f 76 | 65 21 00 20 20 20 20 20 |dget mov|e!. |
|000016d0| 20 20 20 c0 04 20 67 61 | 64 73 28 29 00 20 20 20 | .. ga|ds(). |
|000016e0| 20 20 20 20 20 80 0c 20 | c0 03 28 67 61 64 73 28 | .. |..(gads(|
|000016f0| 29 29 00 20 20 20 20 20 | 20 20 20 20 20 80 0b 20 |)). | .. |
|00001700| 65 78 3e 3d 5c 67 78 2b | 77 78 20 80 42 20 65 78 |ex>=\gx+|wx .B ex|
|00001710| 3c 5c 67 78 2b 5c 67 77 | 2b 77 78 20 80 42 20 65 |<\gx+\gw|+wx .B e|
|00001720| 79 3e 3d 5c 67 79 2b 77 | 79 20 80 42 20 65 79 3c |y>=\gy+w|y .B ey<|
|00001730| 5c 67 79 2b 5c 67 68 2b | 77 79 00 20 20 20 20 20 |\gy+\gh+|wy. |
|00001740| 20 20 20 20 20 20 20 3b | 6d 6f 76 65 20 61 20 67 | ;|move a g|
|00001750| 61 64 67 65 74 21 00 20 | 20 20 20 20 20 20 20 20 |adget!. | |
|00001760| 20 20 20 3b 00 20 20 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00001770| 20 73 72 63 2e 6c 3d 26 | 67 61 64 73 28 29 3a 64 | src.l=&|gads():d|
|00001780| 65 73 2e 6c 3d 26 74 65 | 6d 70 00 20 20 20 20 20 |es.l=&te|mp. |
|00001790| 20 20 20 20 20 20 20 80 | 06 20 63 6f 70 79 67 61 | .|. copyga|
|000017a0| 64 3a 73 72 63 3d 64 65 | 73 00 20 20 20 20 20 20 |d:src=de|s. |
|000017b0| 20 20 20 20 20 20 3b 00 | 20 20 20 20 20 20 20 20 | ;.| |
|000017c0| 20 20 20 20 cd 08 20 30 | 2c 5c 67 78 2b 77 78 2c | .. 0|,\gx+wx,|
|000017d0| 5c 67 79 2b 77 79 2c 5c | 67 77 2c 5c 67 68 00 3b |\gy+wy,\|gw,\gh.;|
|000017e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 42 6f 78 66 | | Boxf|
|000017f0| 20 5c 67 78 2b 77 78 2c | 5c 67 79 2b 77 79 2c 5c | \gx+wx,|\gy+wy,\|
|00001800| 00 00 00 08 00 00 03 de | 00 00 00 29 00 00 01 e8 |........|...)....|
|00001810| 00 00 00 0d c7 50 ef c0 | 67 78 2b 5c 67 77 2b 77 |.....P..|gx+\gw+w|
|00001820| 78 2d 31 2c 5c 67 79 2b | 5c 67 68 2b 77 79 2d 31 |x-1,\gy+|\gh+wy-1|
|00001830| 2c 30 00 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |,0. | ;|
|00001840| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 80 0b 20 |. | .. |
|00001850| 5c 67 74 3d 33 20 80 21 | 20 72 65 70 73 68 3d 2d |\gt=3 .!| repsh=-|
|00001860| 31 00 20 20 20 20 20 20 | 20 20 20 20 20 20 6e 69 |1. | ni|
|00001870| 3d 5c 67 69 3a c0 05 20 | 67 61 64 73 28 29 00 20 |=\gi:.. |gads(). |
|00001880| 20 20 20 20 20 20 20 20 | 20 20 20 3b 00 20 20 20 | | ;. |
|00001890| 20 20 20 20 20 20 20 20 | 20 c5 01 20 32 2c 30 2c | | .. 2,0,|
|000018a0| 30 2c 33 32 30 2c 31 36 | 2c 31 34 2c 22 50 41 53 |0,320,16|,14,"PAS|
|000018b0| 54 45 20 4d 4f 44 45 20 | 2d 20 52 49 47 48 54 20 |TE MODE |- RIGHT |
|000018c0| 42 55 54 54 4f 4e 20 54 | 4f 20 45 58 49 54 22 2c |BUTTON T|O EXIT",|
|000018d0| 31 2c 32 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |1,2. | |
|000018e0| 3b 00 20 20 20 20 20 20 | 20 20 20 20 20 20 80 06 |;. | ..|
|000018f0| 20 73 68 6f 77 6e 65 77 | 00 20 20 20 20 20 20 20 | shownew|. |
|00001900| 20 20 20 20 20 3b 00 20 | 20 20 20 20 20 20 20 20 | ;. | |
|00001910| 20 20 20 80 06 20 66 69 | 6e 64 68 69 00 20 20 20 | .. fi|ndhi. |
|00001920| 20 20 20 20 20 20 20 20 | 20 3b 00 20 20 20 20 20 | | ;. |
|00001930| 20 20 20 20 20 20 20 80 | bb 00 20 20 20 20 20 20 | .|.. |
|00001940| 20 20 20 20 20 20 20 20 | 80 06 20 70 6f 73 69 74 | |.. posit|
|00001950| 32 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2. | |
|00001960| 80 0b 20 6d 62 3d 31 00 | 20 20 20 20 20 20 20 20 |.. mb=1.| |
|00001970| 20 20 20 20 20 20 20 20 | 80 0b 20 c0 02 28 67 61 | |.. ..(ga|
|00001980| 64 73 28 29 29 00 20 20 | 20 20 20 20 20 20 20 20 |ds()). | |
|00001990| 20 20 20 20 20 20 20 20 | 64 65 73 3d 26 67 61 64 | |des=&gad|
|000019a0| 73 28 29 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |s(). | |
|000019b0| 20 20 20 20 20 20 80 06 | 20 63 6f 70 79 67 61 64 | ..| copygad|
|000019c0| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|000019d0| 20 20 20 5c 67 78 3d 67 | 78 2c 67 79 3a 5c 67 69 | \gx=g|x,gy:\gi|
|000019e0| 3d 6e 69 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |=ni. | |
|000019f0| 20 20 20 20 20 20 6e 69 | 2b 31 3a 80 0b 20 6e 69 | ni|+1:.. ni|
|00001a00| 00 00 00 08 00 00 03 de | 00 00 00 2a 00 00 01 e8 |........|...*....|
|00001a10| 00 00 00 0e ef 62 6f b9 | 3c 3d 68 6e 69 20 80 21 |.....bo.|<=hni .!|
|00001a20| 20 6e 69 3d 68 6e 69 2b | 31 00 20 20 20 20 20 20 | ni=hni+|1. |
|00001a30| 20 20 20 20 20 20 20 20 | 20 20 20 20 80 06 20 73 | | .. s|
|00001a40| 68 6f 77 6e 65 77 00 20 | 20 20 20 20 20 20 20 20 |hownew. | |
|00001a50| 20 20 20 20 20 20 20 80 | c0 00 20 20 20 20 20 20 | .|.. |
|00001a60| 20 20 20 20 20 20 20 20 | 80 c0 00 20 20 20 20 20 | |... |
|00001a70| 20 20 20 20 20 20 20 80 | bc 20 6d 62 3d 32 00 20 | .|. mb=2. |
|00001a80| 20 20 20 20 20 20 20 20 | 20 20 20 80 2b 20 c5 01 | | .+ ..|
|00001a90| 20 32 00 20 20 20 20 20 | 20 20 20 20 20 20 20 80 | 2. | .|
|00001aa0| 06 20 73 68 6f 77 6e 65 | 77 3a 80 05 20 62 64 6f |. showne|w:.. bdo|
|00001ab0| 6e 65 00 20 20 20 20 20 | 20 20 20 20 20 80 c0 00 |ne. | ...|
|00001ac0| 20 20 20 20 20 20 20 20 | 80 c1 00 20 20 20 20 20 | |... |
|00001ad0| 20 20 20 3b 00 20 20 20 | 20 20 20 20 20 3b 6d 6f | ;. | ;mo|
|00001ae0| 76 65 20 77 69 6e 64 6f | 77 20 61 72 6f 75 6e 64 |ve windo|w around|
|00001af0| 21 00 20 20 20 20 20 20 | 20 20 3b 00 20 20 20 20 |!. | ;. |
|00001b00| 20 20 20 20 78 6f 3d 65 | 78 2d 77 78 3a 79 6f 3d | xo=e|x-wx:yo=|
|00001b10| 65 79 2d 77 79 00 20 20 | 20 20 20 20 20 20 80 bb |ey-wy. | ..|
|00001b20| 00 20 20 20 20 20 20 20 | 20 20 20 c5 02 00 20 20 |. | ... |
|00001b30| 20 20 20 20 20 20 20 20 | 78 3d bc 0a 28 cf 05 2d | |x=..(..-|
|00001b40| 78 6f 2c 30 2c 6d 77 2d | 77 77 29 00 20 20 20 20 |xo,0,mw-|ww). |
|00001b50| 20 20 20 20 20 20 79 3d | bc 0a 28 cf 06 2d 79 6f | y=|..(..-yo|
|00001b60| 2c 30 2c 6d 68 2d 77 68 | 29 00 20 20 20 20 20 20 |,0,mh-wh|). |
|00001b70| 20 20 20 20 80 06 20 73 | 68 6f 77 77 69 6e 00 20 | .. s|howwin. |
|00001b80| 20 20 20 20 20 20 20 20 | 20 77 78 3d 78 3a 77 79 | | wx=x:wy|
|00001b90| 3d 79 00 20 20 20 20 20 | 20 20 20 20 20 80 06 20 |=y. | .. |
|00001ba0| 73 68 6f 77 77 69 6e 00 | 20 20 20 20 20 20 20 20 |showwin.| |
|00001bb0| 80 bc 20 c5 22 3d 35 00 | 20 20 20 20 20 20 20 20 |.. ."=5.| |
|00001bc0| 80 06 20 73 68 6f 77 77 | 69 6e 3a 80 06 20 76 69 |.. showw|in:.. vi|
|00001bd0| 65 77 77 69 6e 3a 80 06 | 20 73 68 6f 77 77 69 6e |ewwin:..| showwin|
|00001be0| 00 20 20 20 20 20 20 20 | 20 62 64 6f 6e 65 00 20 |. | bdone. |
|00001bf0| 20 20 20 20 20 80 c0 00 | 20 20 20 20 80 c0 00 20 | ...| ... |
|00001c00| 00 00 00 08 00 00 03 de | 00 00 00 2b 00 00 01 e8 |........|...+....|
|00001c10| 00 00 00 0f 8d 6e f7 3a | 20 80 c0 00 80 02 20 80 |.....n.:| ..... .|
|00001c20| 0e 00 80 05 20 6d 61 69 | 6e 00 00 3b 2a 2a 2a 2a |.... mai|n..;****|
|00001c30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001c40| 2a 20 53 55 42 52 4f 55 | 54 49 4e 45 53 20 2a 2a |* SUBROU|TINES **|
|00001c50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001c60| 2a 2a 00 00 73 75 73 73 | 77 00 80 0b 20 77 78 3e |**..suss|w... wx>|
|00001c70| 3d 6d 77 20 80 8a 20 77 | 78 3c 30 20 80 8a 20 77 |=mw .. w|x<0 .. w|
|00001c80| 78 2b 77 77 3e 6d 77 20 | 80 8a 20 77 79 3e 3d 6d |x+ww>mw |.. wy>=m|
|00001c90| 68 20 80 8a 20 77 79 3c | 30 20 80 8a 20 77 79 2b |h .. wy<|0 .. wy+|
|00001ca0| 77 68 3e 6d 68 00 20 20 | 77 77 3d bc 02 28 6d 77 |wh>mh. |ww=..(mw|
|00001cb0| 20 80 7d 20 31 29 3a 77 | 68 3d bc 02 28 6d 68 20 | .} 1):w|h=..(mh |
|00001cc0| 80 7d 20 31 29 00 20 20 | 77 78 3d bc 02 28 6d 77 |.} 1). |wx=..(mw|
|00001cd0| 2a 2e 32 35 29 3a 77 79 | 3d bc 02 28 6d 68 2a 2e |*.25):wy|=..(mh*.|
|00001ce0| 32 35 29 00 80 c0 00 80 | 07 00 00 71 77 69 6e 00 |25).....|...qwin.|
|00001cf0| c5 37 00 c5 01 20 31 2c | 77 78 2c 77 79 2c 77 77 |.7... 1,|wx,wy,ww|
|00001d00| 2c 77 68 2c 77 66 2c 77 | 74 24 2c 77 64 2c 77 62 |,wh,wf,w|t$,wd,wb|
|00001d10| 00 69 6e 77 3d c5 2d 3a | 69 6e 68 3d c5 2e 00 77 |.inw=.-:|inh=...w|
|00001d20| 6c 6f 3d c5 31 3a 77 74 | 6f 3d c5 30 00 80 07 00 |lo=.1:wt|o=.0....|
|00001d30| 00 80 08 20 61 7b 61 2e | 6c 7d 00 dd 81 20 dc 8c |... a{a.|l}... ..|
|00001d40| 28 61 29 00 80 02 20 80 | 08 00 00 80 09 2e 6c 20 |(a)... .|......l |
|00001d50| 62 7b 7d 00 80 09 20 80 | 07 20 dc 8e 28 dd 02 28 |b{}... .|. ..(..(|
|00001d60| 34 29 29 00 80 02 20 80 | 09 00 00 2e 64 6f 6c 6f |4))... .|....dolo|
|00001d70| 61 64 00 66 24 3d cc 01 | 28 22 46 69 6c 65 6e 61 |ad.f$=..|("Filena|
|00001d80| 6d 65 20 74 6f 20 6c 6f | 61 64 22 2c 66 70 61 24 |me to lo|ad",fpa$|
|00001d90| 2c 66 66 69 24 29 00 80 | 0b 20 66 24 00 20 20 80 |,ffi$)..|. f$. .|
|00001da0| 0b 20 be 11 28 30 2c 66 | 24 29 00 20 20 20 20 be |. ..(0,f|$). .|
|00001db0| 08 20 30 00 20 20 20 20 | 3b 00 20 20 20 20 73 74 |. 0. |;. st|
|00001dc0| 69 24 3d dd 01 28 31 36 | 30 29 00 20 20 20 20 73 |i$=..(16|0). s|
|00001dd0| 64 3d 62 7b 7d 3a 73 62 | 3d 62 7b 7d 3a 73 6d 3d |d=b{}:sb|=b{}:sm=|
|00001de0| 62 7b 7d 3a 6d 77 3d 62 | 7b 7d 3a 6d 68 3d 62 7b |b{}:mw=b|{}:mh=b{|
|00001df0| 7d 3a 64 65 3d 62 7b 7d | 00 20 20 20 20 3b 00 20 |}:de=b{}|. ;. |
|00001e00| 00 00 00 08 00 00 03 de | 00 00 00 2c 00 00 01 e8 |........|...,....|
|00001e10| 00 00 00 10 c6 de 86 0a | 20 20 20 77 66 3d 62 7b |........| wf=b{|
|00001e20| 7d 3a 77 74 24 3d dd 01 | 28 31 36 30 29 00 20 20 |}:wt$=..|(160). |
|00001e30| 20 20 77 64 3d 62 7b 7d | 3a 77 62 3d 62 7b 7d 3a | wd=b{}|:wb=b{}:|
|00001e40| 6d 69 6e 77 3d 62 7b 7d | 3a 6d 69 6e 68 3d 62 7b |minw=b{}|:minh=b{|
|00001e50| 7d 3a 6d 61 78 77 3d 62 | 7b 7d 3a 6d 61 78 68 3d |}:maxw=b|{}:maxh=|
|00001e60| 62 7b 7d 00 20 20 20 20 | 77 78 3d 62 7b 7d 3a 77 |b{}. |wx=b{}:w|
|00001e70| 79 3d 62 7b 7d 3a 77 77 | 3d 62 7b 7d 3a 77 68 3d |y=b{}:ww|=b{}:wh=|
|00001e80| 62 7b 7d 00 20 20 20 20 | 3b 00 20 20 20 20 69 6e |b{}. |;. in|
|00001e90| 77 3d 62 7b 7d 3a 69 6e | 68 3d 62 7b 7d 3a 77 6c |w=b{}:in|h=b{}:wl|
|00001ea0| 6f 3d 62 7b 7d 3a 77 74 | 6f 3d 62 7b 7d 00 20 20 |o=b{}:wt|o=b{}. |
|00001eb0| 20 20 3b 00 20 20 20 20 | 80 16 20 6b 3d 30 20 80 | ;. |.. k=0 .|
|00001ec0| 18 20 35 3a 73 70 28 6b | 29 3d 62 7b 7d 3a 80 17 |. 5:sp(k|)=b{}:..|
|00001ed0| 00 20 20 20 20 3b 00 20 | 20 20 20 80 16 20 6b 3d |. ;. | .. k=|
|00001ee0| 30 20 80 18 20 33 31 3a | ce 0a 20 31 2c 6b 2c 62 |0 .. 31:|.. 1,k,b|
|00001ef0| 7b 7d 2c 62 7b 7d 2c 62 | 7b 7d 3a 80 17 00 20 20 |{},b{},b|{}:... |
|00001f00| 20 20 3b 00 20 20 20 20 | c0 07 20 67 61 64 73 28 | ;. |.. gads(|
|00001f10| 29 3a 6e 67 61 64 73 3d | 62 7b 7d 00 20 20 20 20 |):ngads=|b{}. |
|00001f20| 3b 00 20 20 20 20 80 16 | 20 6b 3d 31 20 80 18 20 |;. ..| k=1 .. |
|00001f30| 6e 67 61 64 73 00 20 20 | 20 20 80 0b 20 c0 08 28 |ngads. | .. ..(|
|00001f40| 67 61 64 73 28 29 29 00 | 20 20 20 20 20 20 80 32 |gads()).| .2|
|00001f50| 20 5c 74 67 5f 74 65 78 | 74 3d 30 00 20 20 20 20 | \tg_tex|t=0. |
|00001f60| 20 20 80 32 20 5c 73 67 | 5f 74 65 78 74 3d 30 00 | .2 \sg|_text=0.|
|00001f70| 20 20 20 20 20 20 80 32 | 20 5c 69 67 5f 66 69 6c | .2| \ig_fil|
|00001f80| 65 3d 30 00 20 20 20 20 | 20 20 80 32 20 5c 77 74 |e=0. | .2 \wt|
|00001f90| 5f 74 65 78 74 3d 30 00 | 20 20 20 20 20 20 be 14 |_text=0.| ..|
|00001fa0| 20 30 2c 26 67 61 64 73 | 28 29 2c 80 2f 2e 61 67 | 0,&gads|(),./.ag|
|00001fb0| 61 64 67 65 74 00 20 20 | 20 20 20 20 da 01 2e 6c |adget. | ...l|
|00001fc0| 20 26 67 61 64 73 28 29 | 2b 80 2f 2e 61 67 61 64 | &gads()|+./.agad|
|00001fd0| 67 65 74 5c 74 67 5f 74 | 65 78 74 2c 30 00 20 20 |get\tg_t|ext,0. |
|00001fe0| 20 20 20 20 da 01 2e 6c | 20 26 67 61 64 73 28 29 | ...l| &gads()|
|00001ff0| 2b 80 2f 2e 61 67 61 64 | 67 65 74 5c 73 67 5f 74 |+./.agad|get\sg_t|
|00002000| 00 00 00 08 00 00 03 de | 00 00 00 2d 00 00 01 e8 |........|...-....|
|00002010| 00 00 00 11 ed 6a 56 03 | 65 78 74 2c 30 00 20 20 |.....jV.|ext,0. |
|00002020| 20 20 20 20 da 01 2e 6c | 20 26 67 61 64 73 28 29 | ...l| &gads()|
|00002030| 2b 80 2f 2e 61 67 61 64 | 67 65 74 5c 69 67 5f 66 |+./.agad|get\ig_f|
|00002040| 69 6c 65 2c 30 00 20 20 | 20 20 20 20 da 01 2e 6c |ile,0. | ...l|
|00002050| 20 26 67 61 64 73 28 29 | 2b 80 2f 2e 61 67 61 64 | &gads()|+./.agad|
|00002060| 67 65 74 5c 77 74 5f 74 | 65 78 74 2c 30 00 20 20 |get\wt_t|ext,0. |
|00002070| 20 20 20 20 5c 74 67 5f | 74 65 78 74 3d dd 01 28 | \tg_|text=..(|
|00002080| 32 35 36 29 00 20 20 20 | 20 20 20 5c 73 67 5f 74 |256). | \sg_t|
|00002090| 65 78 74 3d dd 01 28 32 | 35 36 29 00 20 20 20 20 |ext=..(2|56). |
|000020a0| 20 20 5c 69 67 5f 66 69 | 6c 65 3d dd 01 28 32 35 | \ig_fi|le=..(25|
|000020b0| 36 29 00 20 20 20 20 20 | 20 5c 77 74 5f 74 65 78 |6). | \wt_tex|
|000020c0| 74 3d dd 01 28 32 35 36 | 29 00 20 20 20 20 80 c0 |t=..(256|). ..|
|000020d0| 00 20 20 20 20 80 17 00 | 20 20 20 20 3b 00 20 20 |. ...| ;. |
|000020e0| 20 20 be 02 20 30 3a c5 | 11 20 30 00 20 20 20 20 | .. 0:.|. 0. |
|000020f0| 3b 00 20 20 80 22 00 20 | 20 20 20 ff 8c 20 30 00 |;. .". | .. 0.|
|00002100| 20 20 80 c0 00 80 c0 00 | 80 07 00 00 2e 64 6f 73 | ......|.....dos|
|00002110| 61 76 65 00 66 24 3d cc | 01 28 22 46 69 6c 65 6e |ave.f$=.|.("Filen|
|00002120| 61 6d 65 20 74 6f 20 73 | 61 76 65 22 2c 66 70 61 |ame to s|ave",fpa|
|00002130| 24 2c 66 66 69 24 29 00 | 80 0b 20 66 24 00 20 20 |$,ffi$).|.. f$. |
|00002140| 80 0b 20 be 12 28 30 2c | 66 24 29 00 20 20 20 20 |.. ..(0,|f$). |
|00002150| be 07 20 30 00 20 20 20 | 20 3b 00 20 20 20 20 dd |.. 0. | ;. .|
|00002160| 82 20 73 74 69 24 00 20 | 20 20 20 61 7b 73 64 7d |. sti$. | a{sd}|
|00002170| 3a 61 7b 73 62 7d 3a 61 | 7b 73 6d 7d 3a 61 7b 6d |:a{sb}:a|{sm}:a{m|
|00002180| 77 7d 3a 61 7b 6d 68 7d | 3a 61 7b 64 65 7d 00 20 |w}:a{mh}|:a{de}. |
|00002190| 20 20 20 3b 00 20 20 20 | 20 61 7b 77 66 7d 3a dd | ;. | a{wf}:.|
|000021a0| 82 20 77 74 24 00 20 20 | 20 20 61 7b 77 64 7d 3a |. wt$. | a{wd}:|
|000021b0| 61 7b 77 62 7d 3a 61 7b | 6d 69 6e 77 7d 3a 61 7b |a{wb}:a{|minw}:a{|
|000021c0| 6d 69 6e 68 7d 3a 61 7b | 6d 61 78 77 7d 3a 61 7b |minh}:a{|maxw}:a{|
|000021d0| 6d 61 78 68 7d 00 20 20 | 20 20 61 7b 77 78 7d 3a |maxh}. | a{wx}:|
|000021e0| 61 7b 77 79 7d 3a 61 7b | 77 77 7d 3a 61 7b 77 68 |a{wy}:a{|ww}:a{wh|
|000021f0| 7d 00 20 20 20 20 3b 00 | 20 20 20 20 61 7b 69 6e |}. ;.| a{in|
|00002200| 00 00 00 08 00 00 03 de | 00 00 00 2e 00 00 01 e8 |........|........|
|00002210| 00 00 00 12 a5 56 43 6a | 77 7d 3a 61 7b 69 6e 68 |.....VCj|w}:a{inh|
|00002220| 7d 3a 61 7b 77 6c 6f 7d | 3a 61 7b 77 74 6f 7d 00 |}:a{wlo}|:a{wto}.|
|00002230| 20 20 20 20 3b 00 20 20 | 20 20 80 16 20 6b 3d 30 | ;. | .. k=0|
|00002240| 20 80 18 20 35 3a 61 7b | 73 70 28 6b 29 7d 3a 80 | .. 5:a{|sp(k)}:.|
|00002250| 17 00 20 20 20 20 3b 00 | 20 20 20 20 80 16 20 6b |.. ;.| .. k|
|00002260| 3d 30 20 80 18 20 33 31 | 3a 61 7b ce 06 28 6b 29 |=0 .. 31|:a{..(k)|
|00002270| 7d 3a 61 7b ce 07 28 6b | 29 7d 3a 61 7b ce 08 28 |}:a{..(k|)}:a{..(|
|00002280| 6b 29 7d 3a 80 17 00 20 | 20 20 20 3b 00 20 20 20 |k)}:... | ;. |
|00002290| 20 61 7b 6e 67 61 64 73 | 7d 00 20 20 20 20 3b 00 | a{ngads|}. ;.|
|000022a0| 20 20 20 20 c0 04 20 67 | 61 64 73 28 29 00 20 20 | .. g|ads(). |
|000022b0| 20 20 80 0c 20 c0 03 28 | 67 61 64 73 28 29 29 00 | .. ..(|gads()).|
|000022c0| 20 20 20 20 20 20 be 13 | 20 30 2c 26 67 61 64 73 | ..| 0,&gads|
|000022d0| 28 29 2c 80 2f 2e 61 67 | 61 64 67 65 74 00 20 20 |(),./.ag|adget. |
|000022e0| 20 20 20 20 dd 82 20 5c | 74 67 5f 74 65 78 74 00 | .. \|tg_text.|
|000022f0| 20 20 20 20 20 20 dd 82 | 20 5c 73 67 5f 74 65 78 | ..| \sg_tex|
|00002300| 74 00 20 20 20 20 20 20 | dd 82 20 5c 69 67 5f 66 |t. |.. \ig_f|
|00002310| 69 6c 65 00 20 20 20 20 | 20 20 dd 82 20 5c 77 74 |ile. | .. \wt|
|00002320| 5f 74 65 78 74 00 20 20 | 20 20 80 c1 00 20 20 20 |_text. | ... |
|00002330| 20 3b 00 20 20 20 20 be | 02 20 30 3a c5 12 20 30 | ;. .|. 0:.. 0|
|00002340| 00 20 20 20 20 3b 00 20 | 20 80 22 00 20 20 20 20 |. ;. | .". |
|00002350| ff 8c 20 30 00 20 20 80 | c0 00 80 c0 00 80 07 00 |.. 0. .|........|
|00002360| 00 64 6f 73 6f 75 72 63 | 65 00 77 7b 22 43 52 45 |.dosourc|e.w{"CRE|
|00002370| 41 54 45 20 53 4f 55 52 | 43 45 20 43 4f 44 45 22 |ATE SOUR|CE CODE"|
|00002380| 2c 31 35 7d 00 c5 10 20 | 30 2c 31 00 70 7b 22 53 |,15}... |0,1.p{"S|
|00002390| 43 52 45 45 4e 23 3a 22 | 7d 00 70 7b 22 57 49 4e |CREEN#:"|}.p{"WIN|
|000023a0| 44 4f 57 23 3a 22 7d 00 | 70 7b 22 47 41 44 47 45 |DOW#:"}.|p{"GADGE|
|000023b0| 54 4c 49 53 54 23 3a 22 | 7d 00 70 7b 22 53 43 52 |TLIST#:"|}.p{"SCR|
|000023c0| 45 45 4e 20 53 4f 55 52 | 43 45 3f 3a 22 7d 00 70 |EEN SOUR|CE?:"}.p|
|000023d0| 7b 22 57 49 4e 44 4f 57 | 20 53 4f 55 52 43 45 3f |{"WINDOW| SOURCE?|
|000023e0| 3a 22 7d 00 70 7b 22 47 | 41 44 47 45 54 20 53 4f |:"}.p{"G|ADGET SO|
|000023f0| 55 52 43 45 3f 3a 22 7d | 00 3b 00 75 7b 79 6e 24 |URCE?:"}|.;.u{yn$|
|00002400| 00 00 00 08 00 00 03 de | 00 00 00 2f 00 00 01 e8 |........|.../....|
|00002410| 00 00 00 13 94 64 ae 4b | 28 73 65 73 29 2c 34 7d |.....d.K|(ses),4}|
|00002420| 00 75 7b 79 6e 24 28 77 | 69 73 29 2c 35 7d 00 75 |.u{yn$(w|is),5}.u|
|00002430| 7b 79 6e 24 28 67 61 73 | 29 2c 36 7d 00 3b 00 65 |{yn$(gas|),6}.;.e|
|00002440| 78 3d 30 00 80 bb 00 20 | 20 80 bb 00 20 20 20 20 |x=0.... | ... |
|00002450| 65 76 3d c5 02 00 20 20 | 80 bc 20 c5 05 3d 32 00 |ev=... |.. ..=2.|
|00002460| 20 20 80 0e 20 65 76 00 | 20 20 80 0f 20 36 34 00 | .. ev.| .. 64.|
|00002470| 20 20 20 20 80 0e 20 c5 | 04 00 20 20 20 20 80 0f | .. .|.. ..|
|00002480| 20 34 00 20 20 20 20 20 | 20 73 65 73 2b 31 20 80 | 4. | ses+1 .|
|00002490| 42 20 31 00 20 20 20 20 | 20 20 74 7b 79 6e 24 28 |B 1. | t{yn$(|
|000024a0| 73 65 73 29 7d 00 20 20 | 20 20 80 0f 20 35 00 20 |ses)}. | .. 5. |
|000024b0| 20 20 20 20 20 77 69 73 | 2b 31 20 80 42 20 31 00 | wis|+1 .B 1.|
|000024c0| 20 20 20 20 20 20 74 7b | 79 6e 24 28 77 69 73 29 | t{|yn$(wis)|
|000024d0| 7d 00 20 20 20 20 80 0f | 20 36 00 20 20 20 20 20 |}. ..| 6. |
|000024e0| 20 67 61 73 2b 31 20 80 | 42 20 31 00 20 20 20 20 | gas+1 .|B 1. |
|000024f0| 20 20 74 7b 79 6e 24 28 | 67 61 73 29 7d 00 20 20 | t{yn$(|gas)}. |
|00002500| 20 20 80 0f 20 31 30 30 | 00 20 20 20 20 20 20 73 | .. 100|. s|
|00002510| 63 69 6e 3d bc 01 28 c6 | 14 28 31 35 2c 31 29 29 |cin=..(.|.(15,1))|
|00002520| 00 20 20 20 20 20 20 77 | 69 6e 3d bc 01 28 c6 14 |. w|in=..(..|
|00002530| 28 31 35 2c 32 29 29 00 | 20 20 20 20 20 20 67 61 |(15,2)).| ga|
|00002540| 6e 3d bc 01 28 c6 14 28 | 31 35 2c 33 29 29 00 20 |n=..(..(|15,3)). |
|00002550| 20 20 20 20 20 65 78 3d | 2d 31 3a 80 06 20 6d 61 | ex=|-1:.. ma|
|00002560| 6b 65 73 6f 75 72 63 65 | 00 20 20 20 20 80 0f 20 |kesource|. .. |
|00002570| 31 30 31 00 20 20 20 20 | 20 20 65 78 3d 2d 31 00 |101. | ex=-1.|
|00002580| 20 20 20 20 80 02 20 80 | 0e 00 20 20 80 02 20 80 | .. .|.. .. .|
|00002590| 0e 00 80 bc 20 65 78 00 | 80 06 20 66 77 32 3a 80 |.... ex.|.. fw2:.|
|000025a0| 2c 20 c5 01 20 30 00 3b | 00 80 07 00 00 2e 6d 61 |, .. 0.;|......ma|
|000025b0| 6b 65 73 6f 75 72 63 65 | 20 3b 63 72 65 61 74 65 |kesource| ;create|
|000025c0| 20 73 6f 75 72 63 65 20 | 63 6f 64 65 21 00 3b 00 | source |code!.;.|
|000025d0| 66 24 3d cc 01 28 22 46 | 69 6c 65 6e 61 6d 65 20 |f$=..("F|ilename |
|000025e0| 66 6f 72 20 73 6f 75 72 | 63 65 20 63 6f 64 65 22 |for sour|ce code"|
|000025f0| 2c 73 70 61 24 2c 73 66 | 69 24 29 00 80 0b 20 66 |,spa$,sf|i$)... f|
|00002600| 00 00 00 08 00 00 03 de | 00 00 00 30 00 00 01 e8 |........|...0....|
|00002610| 00 00 00 14 3b 0b 7c 2c | 24 00 20 20 80 0b 20 be |....;.|,|$. .. .|
|00002620| 12 28 30 2c 66 24 29 00 | 20 20 20 20 be 07 20 30 |.(0,f$).| .. 0|
|00002630| 00 20 20 20 20 80 0b 20 | 67 61 73 3d 30 20 80 21 |. .. |gas=0 .!|
|00002640| 20 80 06 20 64 6f 67 61 | 64 67 65 74 73 00 20 20 | .. doga|dgets. |
|00002650| 20 20 80 0b 20 73 65 73 | 3d 30 20 80 21 20 80 06 | .. ses|=0 .! ..|
|00002660| 20 64 6f 73 63 72 65 65 | 6e 00 20 20 20 20 80 0b | doscree|n. ..|
|00002670| 20 77 69 73 3d 30 20 80 | 21 20 80 06 20 64 6f 77 | wis=0 .|! .. dow|
|00002680| 69 6e 64 6f 77 00 20 20 | 20 20 be 02 20 30 00 20 |indow. | .. 0. |
|00002690| 20 20 20 c5 12 20 32 00 | 20 20 80 22 00 20 20 20 | .. 2.| .". |
|000026a0| 20 ff 8c 20 30 00 20 20 | 80 c0 00 80 c0 00 80 07 | .. 0. |........|
|000026b0| 00 00 2e 64 6f 73 63 72 | 65 65 6e 20 20 3b 77 72 |...doscr|een ;wr|
|000026c0| 69 74 65 20 73 63 72 65 | 65 6e 20 73 74 75 66 66 |ite scre|en stuff|
|000026d0| 21 00 dd 82 20 22 22 00 | dd 81 20 22 53 63 72 65 |!... "".|.. "Scre|
|000026e0| 65 6e 20 22 2c 73 63 69 | 6e 2c 22 2c 30 2c 30 2c |en ",sci|n,",0,0,|
|000026f0| 22 2c 6d 77 2c 22 2c 22 | 2c 6d 68 2c 22 2c 22 2c |",mw,","|,mh,",",|
|00002700| 64 65 2c 22 2c 22 2c 66 | 6c 2c 22 2c 22 00 dd 82 |de,",",f|l,","...|
|00002710| 20 dc 86 28 33 34 29 2b | 73 74 69 24 2b dc 86 28 | ..(34)+|sti$+..(|
|00002720| 33 34 29 2c 22 2c 22 2c | 73 64 2c 22 2c 22 2c 73 |34),",",|sd,",",s|
|00002730| 62 00 6a 3d 30 00 80 16 | 20 6b 3d 30 20 80 18 20 |b.j=0...| k=0 .. |
|00002740| 6d 63 00 6a 2b 31 00 dd | 81 20 22 52 47 42 20 22 |mc.j+1..|. "RGB "|
|00002750| 2c 6b 2c 22 2c 22 2c ce | 06 28 6b 29 2c 22 2c 22 |,k,",",.|.(k),","|
|00002760| 2c ce 07 28 6b 29 2c 22 | 2c 22 2c ce 08 28 6b 29 |,..(k),"|,",..(k)|
|00002770| 00 80 0b 20 6a 26 33 3d | 30 20 80 8a 20 6b 3d 6d |... j&3=|0 .. k=m|
|00002780| 63 20 80 21 20 dd 82 20 | 22 22 20 80 22 20 dd 81 |c .! .. |"" ." ..|
|00002790| 20 22 3a 22 00 80 17 00 | 3b 00 80 07 00 00 2e 64 | ":"....|;......d|
|000027a0| 6f 77 69 6e 64 6f 77 00 | 3b 00 dd 82 20 22 22 00 |owindow.|;... "".|
|000027b0| dd 82 20 22 53 69 7a 65 | 4c 69 6d 69 74 73 20 22 |.. "Size|Limits "|
|000027c0| 2c 6d 69 6e 77 2c 22 2c | 22 2c 6d 69 6e 68 2c 22 |,minw,",|",minh,"|
|000027d0| 2c 22 2c 6d 61 78 77 2c | 22 2c 22 2c 6d 61 78 68 |,",maxw,|",",maxh|
|000027e0| 00 dd 81 20 22 57 69 6e | 64 6f 77 20 22 2c 77 69 |... "Win|dow ",wi|
|000027f0| 6e 2c 22 2c 22 2c 77 78 | 2c 22 2c 22 2c 77 79 2c |n,",",wx|,",",wy,|
|00002800| 00 00 00 08 00 00 03 de | 00 00 00 31 00 00 01 e8 |........|...1....|
|00002810| 00 00 00 15 86 1d 29 8e | 22 2c 22 2c 77 77 2c 22 |......).|",",ww,"|
|00002820| 2c 22 2c 77 68 2c 22 2c | 24 22 00 dd 81 20 dc 92 |,",wh,",|$"... ..|
|00002830| 28 dc 84 28 77 66 29 2c | 34 38 29 2c 22 2c 22 2c |(..(wf),|48),",",|
|00002840| dc 86 28 33 34 29 2c 77 | 74 24 2c dc 86 28 33 34 |..(34),w|t$,..(34|
|00002850| 29 2c 22 2c 22 2c 77 64 | 2c 22 2c 22 2c 77 62 00 |),",",wd|,",",wb.|
|00002860| 80 0b 20 67 61 73 3d 30 | 20 80 21 20 dd 81 20 22 |.. gas=0| .! .. "|
|00002870| 2c 22 2c 67 61 6e 00 dd | 82 20 22 22 00 74 78 74 |,",gan..|. "".txt|
|00002880| 66 3d 30 3a 80 06 20 6d | 61 6b 65 74 65 78 74 32 |f=0:.. m|aketext2|
|00002890| 00 3b 00 80 07 00 00 2e | 64 6f 67 61 64 67 65 74 |.;......|dogadget|
|000028a0| 73 00 dd 82 20 22 22 00 | 67 61 64 66 3d 30 3a 80 |s... "".|gadf=0:.|
|000028b0| 06 20 6d 61 6b 65 67 6c | 69 73 74 32 00 3b 00 80 |. makegl|ist2.;..|
|000028c0| 07 00 00 2e 64 6f 70 61 | 6c 65 74 74 65 00 80 06 |....dopa|lette...|
|000028d0| 20 73 65 74 70 72 6f 70 | 73 00 77 7b 22 53 43 52 | setprop|s.w{"SCR|
|000028e0| 45 45 4e 20 50 41 4c 45 | 54 54 45 22 2c 31 34 7d |EEN PALE|TTE",14}|
|000028f0| 00 c5 10 20 38 2c 39 38 | 2d 37 00 dd 82 20 22 52 |... 8,98|-7... "R|
|00002900| 45 44 20 20 3a 22 00 c5 | 10 20 38 2c c5 25 2b 38 |ED :"..|. 8,.%+8|
|00002910| 00 dd 82 20 22 47 52 45 | 45 4e 3a 22 00 c5 10 20 |... "GRE|EN:"... |
|00002920| 38 2c c5 25 2b 38 00 dd | 81 20 20 22 42 4c 55 45 |8,.%+8..|. "BLUE|
|00002930| 20 3a 22 00 80 06 20 73 | 68 6f 77 63 63 00 80 16 | :"... s|howcc...|
|00002940| 20 6b 3d 30 20 80 18 20 | 6d 63 32 00 ce 0a 20 32 | k=0 .. |mc2... 2|
|00002950| 2c 6b 2c ce 06 28 6b 29 | 2c ce 07 28 6b 29 2c ce |,k,..(k)|,..(k),.|
|00002960| 08 28 6b 29 00 80 17 00 | 65 78 3d 30 00 80 bb 00 |.(k)....|ex=0....|
|00002970| 20 20 80 bb 00 20 20 20 | 20 65 76 3d c5 02 00 20 | ... | ev=... |
|00002980| 20 80 bc 20 c5 05 3d 32 | 00 20 20 80 0e 20 65 76 | .. ..=2|. .. ev|
|00002990| 00 20 20 80 0f 20 36 34 | 00 20 20 20 20 80 0b 20 |. .. 64|. .. |
|000029a0| c5 04 3d 31 30 30 00 20 | 20 20 20 20 20 65 78 3d |..=100. | ex=|
|000029b0| 2d 31 00 20 20 20 20 20 | 20 80 16 20 6b 3d 30 20 |-1. | .. k=0 |
|000029c0| 80 18 20 6d 63 32 00 20 | 20 20 20 20 20 20 20 ce |.. mc2. | .|
|000029d0| 0a 20 31 2c 6b 2c ce 06 | 28 6b 29 2c ce 07 28 6b |. 1,k,..|(k),..(k|
|000029e0| 29 2c ce 08 28 6b 29 00 | 20 20 20 20 20 20 80 17 |),..(k).| ..|
|000029f0| 00 20 20 20 20 80 c0 00 | 20 20 20 20 80 0b 20 c5 |. ...| .. .|
|00002a00| 00 00 00 08 00 00 03 de | 00 00 00 32 00 00 01 e8 |........|...2....|
|00002a10| 00 00 00 16 7f b6 00 08 | 04 3d 31 30 31 00 20 20 |........|.=101. |
|00002a20| 20 20 20 20 65 78 3d 2d | 31 00 20 20 20 20 20 20 | ex=-|1. |
|00002a30| 80 2c 20 ce 09 20 32 00 | 20 20 20 20 80 c0 00 20 |., .. 2.| ... |
|00002a40| 20 20 20 80 0b 20 c5 04 | 3c 33 33 00 20 20 20 20 | .. ..|<33. |
|00002a50| 20 20 80 06 20 68 69 64 | 65 63 63 3a 63 63 3d c5 | .. hid|ecc:cc=.|
|00002a60| 04 2d 31 3a 80 06 20 73 | 68 6f 77 63 63 00 20 20 |.-1:.. s|howcc. |
|00002a70| 20 20 20 20 80 06 20 73 | 65 74 70 72 6f 70 73 3a | .. s|etprops:|
|00002a80| 80 06 20 73 68 6f 77 70 | 72 6f 70 73 00 20 20 20 |.. showp|rops. |
|00002a90| 20 80 c0 00 20 20 20 20 | 80 0b 20 c5 04 3e 36 34 | ... |.. ..>64|
|00002aa0| 20 80 42 20 c5 04 3c 36 | 38 20 80 21 20 80 06 20 | .B ..<6|8 .! .. |
|00002ab0| 72 65 61 64 70 72 6f 70 | 73 00 20 20 80 0f 20 33 |readprop|s. .. 3|
|00002ac0| 32 00 20 20 20 20 80 0b | 20 c5 04 3e 36 34 20 80 |2. ..| ..>64 .|
|00002ad0| 42 20 c5 04 3c 36 38 00 | 20 20 20 20 20 20 80 bb |B ..<68.| ..|
|00002ae0| 00 20 20 20 20 20 20 20 | 20 80 06 20 72 65 61 64 |. | .. read|
|00002af0| 70 72 6f 70 73 00 20 20 | 20 20 20 20 80 bc 20 c5 |props. | .. .|
|00002b00| 02 3d 36 34 00 20 20 20 | 20 80 c0 00 20 20 80 02 |.=64. | ... ..|
|00002b10| 20 80 0e 00 80 bc 20 65 | 78 00 80 06 20 66 77 32 | ..... e|x... fw2|
|00002b20| 3a 80 2c 20 c5 01 20 30 | 00 80 07 00 00 2e 68 69 |:., .. 0|......hi|
|00002b30| 64 65 63 63 00 79 3d bc | 02 28 63 63 20 80 7d 20 |decc.y=.|.(cc .} |
|00002b40| 34 29 2a 32 30 2b 32 32 | 2b c5 30 00 78 3d 63 63 |4)*20+22|+.0.x=cc|
|00002b50| 26 31 35 2a 31 38 2b 31 | 36 2b c5 31 00 c5 0c 20 |&15*18+1|6+.1... |
|00002b60| 78 2c 79 2c 78 2b 37 2c | 79 2b 32 2c 30 00 80 07 |x,y,x+7,|y+2,0...|
|00002b70| 00 00 2e 73 68 6f 77 63 | 63 00 79 3d bc 02 28 63 |...showc|c.y=..(c|
|00002b80| 63 20 80 7d 20 34 29 2a | 32 30 2b 32 32 2b c5 30 |c .} 4)*|20+22+.0|
|00002b90| 00 78 3d 63 63 26 31 35 | 2a 31 38 2b 31 36 2b c5 |.x=cc&15|*18+16+.|
|00002ba0| 31 00 c5 0c 20 78 2c 79 | 2c 78 2b 37 2c 79 2b 32 |1... x,y|,x+7,y+2|
|00002bb0| 2c 31 00 80 07 00 00 2e | 72 65 61 64 70 72 6f 70 |,1......|readprop|
|00002bc0| 73 00 ce 05 20 63 63 2c | c6 07 28 31 34 2c 36 35 |s... cc,|..(14,65|
|00002bd0| 29 2a 31 36 2c c6 07 28 | 31 34 2c 36 36 29 2a 31 |)*16,..(|14,66)*1|
|00002be0| 36 2c c6 07 28 31 34 2c | 36 37 29 2a 31 36 00 80 |6,..(14,|67)*16..|
|00002bf0| 07 00 00 2e 73 65 74 70 | 72 6f 70 73 00 c6 05 20 |....setp|rops... |
|00002c00| 00 00 00 08 00 00 03 de | 00 00 00 33 00 00 01 e8 |........|...3....|
|00002c10| 00 00 00 17 4b 36 67 f8 | 31 34 2c 36 35 2c ce 06 |....K6g.|14,65,..|
|00002c20| 28 63 63 29 2f 31 35 2c | 31 2f 31 36 00 c6 05 20 |(cc)/15,|1/16... |
|00002c30| 31 34 2c 36 36 2c ce 07 | 28 63 63 29 2f 31 35 2c |14,66,..|(cc)/15,|
|00002c40| 31 2f 31 36 00 c6 05 20 | 31 34 2c 36 37 2c ce 08 |1/16... |14,67,..|
|00002c50| 28 63 63 29 2f 31 35 2c | 31 2f 31 36 00 80 07 00 |(cc)/15,|1/16....|
|00002c60| 00 2e 73 68 6f 77 70 72 | 6f 70 73 00 c6 0b 20 32 |..showpr|ops... 2|
|00002c70| 2c 36 35 3a c6 0b 20 32 | 2c 36 36 3a c6 0b 20 32 |,65:.. 2|,66:.. 2|
|00002c80| 2c 36 37 3a 80 07 00 00 | 66 69 6e 64 68 69 00 68 |,67:....|findhi.h|
|00002c90| 6e 69 3d 2d 31 00 c0 04 | 20 67 61 64 73 28 29 00 |ni=-1...| gads().|
|00002ca0| 80 0c 20 c0 03 28 67 61 | 64 73 28 29 29 00 20 20 |.. ..(ga|ds()). |
|00002cb0| 80 0b 20 5c 67 69 3e 68 | 6e 69 20 80 21 20 68 6e |.. \gi>h|ni .! hn|
|00002cc0| 69 3d 5c 67 69 00 80 c1 | 00 80 07 00 00 63 6f 70 |i=\gi...|.....cop|
|00002cd0| 79 67 61 64 00 80 16 20 | 6b 3d 30 20 80 18 20 80 |ygad... |k=0 .. .|
|00002ce0| 2f 2e 61 67 61 64 67 65 | 74 2d 32 20 80 19 20 32 |/.agadge|t-2 .. 2|
|00002cf0| 00 da 01 2e 77 20 64 65 | 73 2b 6b 2c da 02 2e 77 |....w de|s+k,...w|
|00002d00| 28 73 72 63 2b 6b 29 00 | 80 17 3a 80 07 00 00 63 |(src+k).|..:....c|
|00002d10| 68 65 63 6b 64 65 00 6b | 3d 36 3a 80 0b 20 73 6d |heckde.k|=6:.. sm|
|00002d20| 26 31 20 80 21 20 6b 3d | 34 00 80 0b 20 64 65 3c |&1 .! k=|4... de<|
|00002d30| 31 20 80 21 20 64 65 3d | 31 3a 80 05 20 73 68 6f |1 .! de=|1:.. sho|
|00002d40| 77 64 65 20 80 22 20 80 | 0b 20 64 65 3e 6b 20 80 |wde ." .|. de>k .|
|00002d50| 21 20 64 65 3d 6b 3a 80 | 05 20 73 68 6f 77 64 65 |! de=k:.|. showde|
|00002d60| 00 80 07 00 00 73 68 6f | 77 64 65 00 c6 1b 20 31 |.....sho|wde... 1|
|00002d70| 33 2c 36 2c dd 83 28 64 | 65 29 00 c6 0b 20 32 2c |3,6,..(d|e)... 2,|
|00002d80| 36 3a 80 07 00 00 63 68 | 65 63 6b 6d 68 00 6b 3d |6:....ch|eckmh.k=|
|00002d90| bc 0c 3a 80 0b 20 73 6d | 3e 31 20 80 21 20 6b 2a |..:.. sm|>1 .! k*|
|00002da0| 32 00 80 0b 20 6d 68 3c | 33 32 20 80 21 20 6d 68 |2... mh<|32 .! mh|
|00002db0| 3d 33 32 3a 80 05 20 73 | 68 6f 77 6d 68 20 80 22 |=32:.. s|howmh ."|
|00002dc0| 20 80 0b 20 6d 68 3e 6b | 20 80 21 20 6d 68 3d 6b | .. mh>k| .! mh=k|
|00002dd0| 3a 80 05 20 73 68 6f 77 | 6d 68 00 80 07 00 00 73 |:.. show|mh.....s|
|00002de0| 68 6f 77 6d 68 00 c6 1b | 20 31 33 2c 35 2c dd 83 |howmh...| 13,5,..|
|00002df0| 28 6d 68 29 00 c6 0b 20 | 32 2c 35 3a 80 07 00 00 |(mh)... |2,5:....|
|00002e00| 00 00 00 08 00 00 03 de | 00 00 00 34 00 00 01 e8 |........|...4....|
|00002e10| 00 00 00 18 66 2f 1d 7f | 2e 70 72 65 70 6d 61 6b |....f/..|.prepmak|
|00002e20| 65 00 80 06 20 66 69 6e | 64 68 69 3a 80 0b 20 68 |e... fin|dhi:.. h|
|00002e30| 6e 69 3e 30 20 80 21 20 | 67 69 3d 68 6e 69 2b 31 |ni>0 .! |gi=hni+1|
|00002e40| 20 80 22 20 67 69 3d 31 | 00 c6 1b 20 31 30 2c 31 | ." gi=1|... 10,1|
|00002e50| 2c dd 83 28 67 69 29 00 | 77 7b 22 4d 41 4b 45 20 |,..(gi).|w{"MAKE |
|00002e60| 47 41 44 47 45 54 22 2c | 31 30 7d 00 c5 10 20 34 |GADGET",|10}... 4|
|00002e70| 2c 31 35 34 2d 37 3a dd | 81 20 22 49 44 3a 22 00 |,154-7:.|. "ID:".|
|00002e80| c5 10 20 39 32 2c 31 35 | 34 2d 37 3a dd 81 20 22 |.. 92,15|4-7:.. "|
|00002e90| 58 20 52 45 4c 3a 22 00 | c5 10 20 32 30 34 2c 31 |X REL:".|.. 204,1|
|00002ea0| 35 34 2d 37 3a dd 81 20 | 22 59 20 52 45 4c 3a 22 |54-7:.. |"Y REL:"|
|00002eb0| 00 3b 00 c5 10 20 31 34 | 34 2c 31 35 34 2d 37 3a |.;... 14|4,154-7:|
|00002ec0| dd 81 20 6c 72 24 28 6c | 72 29 00 c5 10 20 32 35 |.. lr$(l|r)... 25|
|00002ed0| 36 2c 31 35 34 2d 37 3a | dd 81 20 74 62 24 28 74 |6,154-7:|.. tb$(t|
|00002ee0| 62 29 00 3b 00 80 07 00 | 00 2e 70 6f 73 69 74 20 |b).;....|..posit |
|00002ef0| 3b 70 6f 73 69 74 69 6f | 6e 20 67 61 64 67 65 74 |;positio|n gadget|
|00002f00| 21 00 3b 00 cd 08 20 30 | 2c 67 78 2c 67 79 2b 31 |!.;... 0|,gx,gy+1|
|00002f10| 32 2c 67 77 2c 67 68 00 | 3b 00 80 06 20 66 77 32 |2,gw,gh.|;... fw2|
|00002f20| 00 3b 00 70 6f 73 69 74 | 32 3a c5 23 20 80 c6 00 |.;.posit|2:.# ...|
|00002f30| 3b 00 80 2c 20 c5 01 20 | 30 3a c5 1f 20 31 00 3b |;.., .. |0:.. 1.;|
|00002f40| 00 80 06 20 73 68 6f 77 | 77 69 6e 3a 80 06 20 73 |... show|win:.. s|
|00002f50| 68 6f 77 67 61 64 00 3b | 00 80 bb 00 20 20 c5 02 |howgad.;|.... ..|
|00002f60| 3a 80 2c 20 c5 01 20 c5 | 05 00 20 20 80 06 20 73 |:., .. .|.. .. s|
|00002f70| 68 6f 77 67 61 64 00 20 | 20 6d 62 3d c5 22 00 80 |howgad. | mb=."..|
|00002f80| bc 20 6d 62 3d 31 20 80 | 8a 20 6d 62 3d 32 00 c9 |. mb=1 .|. mb=2..|
|00002f90| 03 20 30 00 c5 23 20 80 | c5 00 80 07 00 00 73 68 |. 0..# .|......sh|
|00002fa0| 6f 77 67 61 64 00 c9 03 | 20 30 00 67 78 3d cf 05 |owgad...| 0.gx=..|
|00002fb0| 3a 67 79 3d cf 06 00 80 | 0b 20 67 78 2b cd 03 28 |:gy=....|. gx+..(|
|00002fc0| 30 29 3e 6d 77 20 80 21 | 20 67 78 3d 6d 77 2d cd |0)>mw .!| gx=mw-.|
|00002fd0| 03 28 30 29 00 80 0b 20 | 67 79 2b cd 04 28 30 29 |.(0)... |gy+..(0)|
|00002fe0| 3e 6d 68 20 80 21 20 67 | 79 3d 6d 68 2d cd 04 28 |>mh .! g|y=mh-..(|
|00002ff0| 30 29 00 c9 02 20 30 2c | 30 2c 67 78 2c 67 79 00 |0)... 0,|0,gx,gy.|
|00003000| 00 00 00 08 00 00 03 de | 00 00 00 35 00 00 01 e8 |........|...5....|
|00003010| 00 00 00 19 d0 8b 70 02 | 67 78 2d 77 78 3a 67 79 |......p.|gx-wx:gy|
|00003020| 2d 77 79 00 80 07 00 00 | 2e 6d 61 6b 65 69 74 00 |-wy.....|.makeit.|
|00003030| 80 bb 00 20 20 80 bb 00 | 20 20 20 20 65 76 3d c5 |... ...| ev=.|
|00003040| 02 00 20 20 80 bc 20 c5 | 05 3d 32 00 20 20 80 0e |.. .. .|.=2. ..|
|00003050| 20 65 76 00 20 20 80 0f | 20 36 34 00 20 20 20 20 | ev. ..| 64. |
|00003060| 80 0e 20 c5 04 00 20 20 | 20 20 80 0f 20 32 20 20 |.. ... | .. 2 |
|00003070| 3b 6c 65 66 74 2f 72 69 | 67 68 74 00 20 20 20 20 |;left/ri|ght. |
|00003080| 20 20 6c 72 2b 31 20 80 | 42 20 31 00 20 20 20 20 | lr+1 .|B 1. |
|00003090| 20 20 c5 10 20 31 34 34 | 2c 31 35 34 2d 37 3a dd | .. 144|,154-7:.|
|000030a0| 81 20 6c 72 24 28 6c 72 | 29 00 20 20 20 20 80 0f |. lr$(lr|). ..|
|000030b0| 20 33 20 20 3b 74 6f 70 | 2f 62 6f 74 74 6f 6d 00 | 3 ;top|/bottom.|
|000030c0| 20 20 20 20 20 20 74 62 | 2b 31 20 80 42 20 31 00 | tb|+1 .B 1.|
|000030d0| 20 20 20 20 20 20 c5 10 | 20 32 35 36 2c 31 35 34 | ..| 256,154|
|000030e0| 2d 37 3a dd 81 20 74 62 | 24 28 74 62 29 00 20 20 |-7:.. tb|$(tb). |
|000030f0| 20 20 80 0f 20 31 30 30 | 20 20 3b 6d 61 6b 65 21 | .. 100| ;make!|
|00003100| 00 20 20 20 20 20 20 67 | 69 3d bc 01 28 c6 14 28 |. g|i=..(..(|
|00003110| 31 30 2c 31 29 29 00 20 | 20 20 20 20 20 80 0b 20 |10,1)). | .. |
|00003120| 67 69 3d 30 20 80 21 20 | 80 06 20 62 61 64 69 64 |gi=0 .! |.. badid|
|00003130| 3a 80 05 20 73 65 6c 64 | 6f 6e 65 00 20 20 20 20 |:.. seld|one. |
|00003140| 20 20 3b 00 20 20 20 20 | 20 20 3b 63 68 65 63 6b | ;. | ;check|
|00003150| 20 67 61 64 67 65 74 20 | 49 44 20 64 6f 65 73 6e | gadget |ID doesn|
|00003160| 27 74 20 61 6c 72 65 61 | 64 79 20 65 78 69 73 74 |'t alrea|dy exist|
|00003170| 21 00 20 20 20 20 20 20 | 3b 00 20 20 20 20 20 20 |!. |;. |
|00003180| c0 04 20 67 61 64 73 28 | 29 00 20 20 20 20 20 20 |.. gads(|). |
|00003190| 80 0c 20 c0 03 28 67 61 | 64 73 28 29 29 00 20 20 |.. ..(ga|ds()). |
|000031a0| 20 20 20 20 20 20 80 0b | 20 5c 67 69 3d 67 69 20 | ..| \gi=gi |
|000031b0| 3b 6e 6f 20 63 61 6e 20 | 64 6f 21 00 20 20 20 20 |;no can |do!. |
|000031c0| 20 20 20 20 20 20 80 06 | 20 62 61 64 69 64 00 20 | ..| badid. |
|000031d0| 20 20 20 20 20 20 20 20 | 20 80 05 20 73 65 6c 64 | | .. seld|
|000031e0| 6f 6e 65 00 20 20 20 20 | 20 20 20 20 80 c0 00 20 |one. | ... |
|000031f0| 20 20 20 20 20 80 c1 00 | 20 20 20 20 20 20 3b 00 | ...| ;.|
|00003200| 00 00 00 08 00 00 03 de | 00 00 00 36 00 00 01 e8 |........|...6....|
|00003210| 00 00 00 1a 8a 99 f4 68 | 20 20 20 20 20 20 67 66 |.......h| gf|
|00003220| 3d 30 3a 80 0b 20 6c 72 | 20 80 21 20 67 66 3d 32 |=0:.. lr| .! gf=2|
|00003230| 00 20 20 20 20 20 20 80 | 0b 20 74 62 20 80 21 20 |. .|. tb .! |
|00003240| 67 66 7c 34 00 20 20 20 | 20 20 20 65 78 3d 31 00 |gf|4. | ex=1.|
|00003250| 20 20 20 20 20 20 73 65 | 6c 64 6f 6e 65 00 20 20 | se|ldone. |
|00003260| 20 20 80 0f 20 31 30 31 | 00 20 20 20 20 20 20 67 | .. 101|. g|
|00003270| 69 2d 31 3a 65 78 3d 2d | 31 00 20 20 20 20 80 02 |i-1:ex=-|1. ..|
|00003280| 20 80 0e 00 20 20 80 0f | 20 35 31 32 00 20 20 20 | ... ..| 512. |
|00003290| 20 65 78 3d 2d 31 00 20 | 20 80 02 20 80 0e 00 80 | ex=-1. | .. ....|
|000032a0| bc 20 65 78 00 80 07 00 | 00 62 61 64 69 64 20 3b |. ex....|.badid ;|
|000032b0| 62 61 64 20 67 61 64 67 | 65 74 20 49 44 20 65 72 |bad gadg|et ID er|
|000032c0| 72 6f 72 20 6d 65 73 73 | 61 67 65 00 3b 00 ff 8c |ror mess|age.;...|
|000032d0| 20 30 00 c6 1b 20 31 30 | 2c 31 2c 22 2a 42 41 44 | 0... 10|,1,"*BAD|
|000032e0| 2a 22 00 c6 0b 20 32 2c | 31 00 80 07 00 00 68 61 |*"... 2,|1.....ha|
|000032f0| 6e 64 6c 65 6a 61 6d 00 | 80 0b 20 67 61 64 66 00 |ndlejam.|.. gadf.|
|00003300| 20 20 c6 19 20 6a 3a c6 | 17 20 63 31 2c 63 32 00 | .. j:.|. c1,c2.|
|00003310| 80 22 00 20 20 6b 7a 3d | 30 00 20 20 80 0b 20 6a |.". kz=|0. .. j|
|00003320| 3c 3e 6c 6a 00 20 20 20 | 20 dd 81 20 22 47 61 64 |<>lj. | .. "Gad|
|00003330| 67 65 74 4a 61 6d 20 22 | 2c 6a 3a 6b 7a 3d 2d 31 |getJam "|,j:kz=-1|
|00003340| 00 20 20 80 c0 00 20 20 | 80 0b 20 63 31 3c 3e 6c |. ... |.. c1<>l|
|00003350| 63 31 20 80 8a 20 63 32 | 3c 3e 6c 63 32 00 20 20 |c1 .. c2|<>lc2. |
|00003360| 20 20 80 0b 20 6b 7a 20 | 80 21 20 dd 81 20 22 3a | .. kz |.! .. ":|
|00003370| 22 00 20 20 20 20 dd 81 | 20 22 47 61 64 67 65 74 |". ..| "Gadget|
|00003380| 50 65 6e 73 20 22 2c 63 | 31 2c 22 2c 22 2c 63 32 |Pens ",c|1,",",c2|
|00003390| 3a 6b 7a 3d 2d 31 00 20 | 20 80 c0 00 20 20 80 0b |:kz=-1. | ... ..|
|000033a0| 20 6b 7a 20 80 21 20 dd | 82 20 22 22 00 20 20 6c | kz .! .|. "". l|
|000033b0| 6a 3d 6a 3a 6c 63 31 3d | 63 31 3a 6c 63 32 3d 63 |j=j:lc1=|c1:lc2=c|
|000033c0| 32 00 80 c0 00 80 07 00 | 00 68 61 6e 64 6c 65 62 |2.......|.handleb|
|000033d0| 6f 72 64 00 80 0b 20 67 | 61 64 66 00 20 20 c6 11 |ord... g|adf. ..|
|000033e0| 20 80 c6 00 20 20 80 0b | 20 6b 20 20 3b 62 6f 72 | ... ..| k ;bor|
|000033f0| 64 65 72 3f 00 20 20 20 | 20 c6 11 20 80 c5 00 20 |der?. | .. ... |
|00003400| 00 00 00 08 00 00 03 de | 00 00 00 37 00 00 01 e8 |........|...7....|
|00003410| 00 00 00 1b 4c 1f 11 31 | 20 20 20 c6 18 20 62 31 |....L..1| .. b1|
|00003420| 2c 62 32 3a c6 11 20 62 | 78 2c 62 79 00 20 20 80 |,b2:.. b|x,by. .|
|00003430| c0 00 80 22 00 20 20 80 | 0b 20 6c 62 6f 00 20 20 |...". .|. lbo. |
|00003440| 20 20 6b 7a 3d 30 00 20 | 20 20 20 80 0b 20 62 6f | kz=0. | .. bo|
|00003450| 00 20 20 20 20 20 20 80 | 0b 20 6c 62 6f 3c 30 20 |. .|. lbo<0 |
|00003460| 80 21 20 dd 81 20 22 42 | 6f 72 64 65 72 73 20 4f |.! .. "B|orders O|
|00003470| 6e 22 3a 6b 7a 3d 2d 31 | 00 20 20 20 20 20 20 80 |n":kz=-1|. .|
|00003480| 0b 20 62 31 3c 3e 6c 62 | 31 20 80 8a 20 62 32 3c |. b1<>lb|1 .. b2<|
|00003490| 3e 6c 62 32 00 20 20 20 | 20 20 20 20 20 80 0b 20 |>lb2. | .. |
|000034a0| 6b 7a 20 80 21 20 dd 81 | 20 22 3a 22 00 20 20 20 |kz .! ..| ":". |
|000034b0| 20 20 20 20 20 dd 81 20 | 22 42 6f 72 64 65 72 50 | .. |"BorderP|
|000034c0| 65 6e 73 20 22 2c 62 31 | 2c 22 2c 22 2c 62 32 3a |ens ",b1|,",",b2:|
|000034d0| 6b 7a 3d 2d 31 00 20 20 | 20 20 20 20 20 20 6c 62 |kz=-1. | lb|
|000034e0| 31 3d 62 31 3a 6c 62 32 | 3d 62 32 00 20 20 20 20 |1=b1:lb2|=b2. |
|000034f0| 20 20 80 c0 00 20 20 20 | 20 20 20 80 0b 20 62 78 | ... | .. bx|
|00003500| 3c 3e 6c 62 78 20 80 8a | 20 62 79 3c 3e 6c 62 79 |<>lbx ..| by<>lby|
|00003510| 00 20 20 20 20 20 20 20 | 20 80 0b 20 6b 7a 20 80 |. | .. kz .|
|00003520| 21 20 dd 81 20 22 3a 22 | 00 20 20 20 20 20 20 20 |! .. ":"|. |
|00003530| 20 dd 81 20 22 42 6f 72 | 64 65 72 73 20 22 2c 62 | .. "Bor|ders ",b|
|00003540| 78 2c 22 2c 22 2c 62 79 | 3a 6b 7a 3d 2d 31 00 20 |x,",",by|:kz=-1. |
|00003550| 20 20 20 20 20 20 20 6c | 62 78 3d 62 78 3a 6c 62 | l|bx=bx:lb|
|00003560| 79 3d 62 79 00 20 20 20 | 20 20 20 80 c0 00 20 20 |y=by. | ... |
|00003570| 20 20 80 22 00 20 20 20 | 20 20 20 80 0b 20 6c 62 | .". | .. lb|
|00003580| 6f 3e 30 20 80 21 20 dd | 81 20 22 42 6f 72 64 65 |o>0 .! .|. "Borde|
|00003590| 72 73 20 4f 66 66 22 3a | 6b 7a 3d 2d 31 3a 6c 62 |rs Off":|kz=-1:lb|
|000035a0| 6f 3d 2d 31 00 20 20 20 | 20 80 c0 00 20 20 20 20 |o=-1. | ... |
|000035b0| 80 0b 20 6b 7a 20 80 21 | 20 dd 82 20 22 22 00 20 |.. kz .!| .. "". |
|000035c0| 20 80 22 00 20 20 20 20 | 80 0b 20 62 6f 00 20 20 | .". |.. bo. |
|000035d0| 20 20 20 20 dd 82 20 22 | 42 6f 72 64 65 72 73 20 | .. "|Borders |
|000035e0| 4f 6e 3a 42 6f 72 64 65 | 72 50 65 6e 73 20 22 2c |On:Borde|rPens ",|
|000035f0| 62 31 2c 22 2c 22 2c 62 | 32 2c 22 3a 42 6f 72 64 |b1,",",b|2,":Bord|
|00003600| 00 00 00 08 00 00 03 de | 00 00 00 38 00 00 01 e8 |........|...8....|
|00003610| 00 00 00 1c 21 fd 21 6e | 65 72 73 20 22 2c 62 78 |....!.!n|ers ",bx|
|00003620| 2c 22 2c 22 2c 62 79 00 | 20 20 20 20 20 20 6c 62 |,",",by.| lb|
|00003630| 78 3d 62 78 3a 6c 62 79 | 3d 62 79 3a 6c 62 31 3d |x=bx:lby|=by:lb1=|
|00003640| 62 31 3a 6c 62 32 3d 62 | 32 3a 6c 62 6f 3d 31 00 |b1:lb2=b|2:lbo=1.|
|00003650| 20 20 20 20 80 22 00 20 | 20 20 20 20 20 dd 82 20 | .". | .. |
|00003660| 22 42 6f 72 64 65 72 73 | 20 4f 66 66 22 00 20 20 |"Borders| Off". |
|00003670| 20 20 20 20 6c 62 6f 3d | 2d 31 00 20 20 20 20 80 | lbo=|-1. .|
|00003680| c0 00 20 20 80 c0 00 80 | c0 00 80 07 00 00 2e 6d |.. ....|.......m|
|00003690| 61 6b 65 67 6c 69 73 74 | 20 3b 6d 61 6b 65 67 61 |akeglist| ;makega|
|000036a0| 64 67 65 74 6c 69 73 74 | 20 31 31 21 00 3b 00 80 |dgetlist| 11!.;..|
|000036b0| 2b 20 c6 16 20 31 31 3a | 80 2c 20 c5 01 20 31 3a |+ .. 11:|., .. 1:|
|000036c0| 67 61 64 66 3d 2d 31 00 | 3b 00 6d 61 6b 65 67 6c |gadf=-1.|;.makegl|
|000036d0| 69 73 74 32 00 3b 00 6c | 62 78 3d 2d 31 3a 6c 62 |ist2.;.l|bx=-1:lb|
|000036e0| 79 3d 2d 31 3a 6c 62 31 | 3d 2d 31 3a 6c 62 32 3d |y=-1:lb1|=-1:lb2=|
|000036f0| 2d 31 3a 6c 6a 3d 2d 31 | 3a 6c 63 31 3d 2d 31 3a |-1:lj=-1|:lc1=-1:|
|00003700| 6c 63 32 3d 2d 31 00 6c | 62 6f 3d 30 00 73 68 6e |lc2=-1.l|bo=0.shn|
|00003710| 3d 30 00 6e 67 61 64 73 | 3d 30 00 3b 00 c0 04 20 |=0.ngads|=0.;... |
|00003720| 67 61 64 73 28 29 00 20 | 20 80 0c 20 c0 03 28 67 |gads(). | .. ..(g|
|00003730| 61 64 73 28 29 29 00 20 | 20 6e 67 61 64 73 2b 31 |ads()). | ngads+1|
|00003740| 00 20 20 3b 00 20 20 78 | 3d 5c 67 78 3a 79 3d 5c |. ;. x|=\gx:y=\|
|00003750| 67 79 00 20 20 3b 00 20 | 20 80 0b 20 77 66 26 24 |gy. ;. | .. wf&$|
|00003760| 34 30 30 00 20 20 20 20 | 78 2d 77 6c 6f 3a 79 2d |400. |x-wlo:y-|
|00003770| 77 74 6f 00 20 20 20 20 | 77 77 32 3d 69 6e 77 3a |wto. |ww2=inw:|
|00003780| 77 68 32 3d 69 6e 68 00 | 20 20 80 22 00 20 20 20 |wh2=inh.| .". |
|00003790| 20 77 77 32 3d 77 77 3a | 77 68 32 3d 77 68 00 20 | ww2=ww:|wh2=wh. |
|000037a0| 20 80 c0 00 20 20 3b 00 | 20 20 80 0b 20 5c 67 66 | ... ;.| .. \gf|
|000037b0| 20 80 cd 20 31 20 3b 72 | 65 6c 20 72 69 74 65 3f | .. 1 ;r|el rite?|
|000037c0| 00 20 20 20 20 78 2d 77 | 77 32 2b 31 00 20 20 80 |. x-w|w2+1. .|
|000037d0| c0 00 20 20 80 0b 20 5c | 67 66 20 80 cd 20 32 20 |.. .. \|gf .. 2 |
|000037e0| 3b 72 65 6c 20 62 6f 74 | 3f 00 20 20 20 20 79 2d |;rel bot|?. y-|
|000037f0| 77 68 32 2b 31 00 20 20 | 80 c0 00 20 20 3b 00 20 |wh2+1. |... ;. |
|00003800| 00 00 00 08 00 00 03 de | 00 00 00 39 00 00 01 e8 |........|...9....|
|00003810| 00 00 00 1d 47 61 6a 6f | 20 80 0e 20 5c 67 74 00 |....Gajo| .. \gt.|
|00003820| 20 20 3b 00 20 20 80 0f | 20 30 20 20 3b 74 65 78 | ;. ..| 0 ;tex|
|00003830| 74 20 67 61 64 67 65 74 | 00 20 20 20 20 3b 00 20 |t gadget|. ;. |
|00003840| 20 20 20 6a 3d 5c 74 67 | 5f 6a 61 6d 3a 63 31 3d | j=\tg|_jam:c1=|
|00003850| 5c 74 67 5f 63 31 3a 63 | 32 3d 5c 74 67 5f 63 32 |\tg_c1:c|2=\tg_c2|
|00003860| 00 20 20 20 20 80 06 20 | 68 61 6e 64 6c 65 6a 61 |. .. |handleja|
|00003870| 6d 00 20 20 20 20 3b 00 | 20 20 20 20 62 6f 3d 30 |m. ;.| bo=0|
|00003880| 20 3b 6e 6f 20 62 6f 72 | 64 65 72 73 21 00 20 20 | ;no bor|ders!. |
|00003890| 20 20 80 0b 20 5c 74 67 | 5f 66 6c 61 67 73 20 80 | .. \tg|_flags .|
|000038a0| cd 20 31 34 20 20 3b 62 | 6f 72 64 65 72 3f 00 20 |. 14 ;b|order?. |
|000038b0| 20 20 20 20 20 62 78 3d | 5c 74 67 5f 62 78 3a 62 | bx=|\tg_bx:b|
|000038c0| 79 3d 5c 74 67 5f 62 79 | 3a 62 31 3d 5c 74 67 5f |y=\tg_by|:b1=\tg_|
|000038d0| 62 31 3a 62 32 3d 5c 74 | 67 5f 62 32 3a 62 6f 3d |b1:b2=\t|g_b2:bo=|
|000038e0| 2d 31 00 20 20 20 20 80 | c0 00 20 20 20 20 80 06 |-1. .|.. ..|
|000038f0| 20 68 61 6e 64 6c 65 62 | 6f 72 64 00 20 20 20 20 | handleb|ord. |
|00003900| 3b 00 20 20 20 20 80 0b | 20 67 61 64 66 00 20 20 |;. ..| gadf. |
|00003910| 20 20 20 20 c6 01 20 31 | 31 2c 78 2c 79 2c 5c 74 | .. 1|1,x,y,\t|
|00003920| 67 5f 66 6c 61 67 73 26 | 31 7c 5c 67 66 2c 5c 67 |g_flags&|1|\gf,\g|
|00003930| 69 2c 5c 74 67 5f 74 65 | 78 74 00 20 20 20 20 20 |i,\tg_te|xt. |
|00003940| 20 80 0b 20 5c 74 67 5f | 66 6c 61 67 73 20 80 cd | .. \tg_|flags ..|
|00003950| 20 31 35 20 20 3b 74 6f | 67 67 6c 65 20 6f 6e 3f | 15 ;to|ggle on?|
|00003960| 00 20 20 20 20 20 20 20 | 20 c6 0e 20 31 31 2c 5c |. | .. 11,\|
|00003970| 67 69 2c 80 c5 00 20 20 | 20 20 20 20 80 c0 00 20 |gi,... | ... |
|00003980| 20 20 20 80 22 00 20 20 | 20 20 20 20 dd 81 20 22 | .". | .. "|
|00003990| 54 65 78 74 47 61 64 67 | 65 74 20 22 2c 67 61 6e |TextGadg|et ",gan|
|000039a0| 2c 22 2c 22 2c 78 2c 22 | 2c 22 2c 79 2c 22 2c 22 |,",",x,"|,",y,","|
|000039b0| 2c 5c 74 67 5f 66 6c 61 | 67 73 26 31 7c 5c 67 66 |,\tg_fla|gs&1|\gf|
|000039c0| 2c 22 2c 22 00 20 20 20 | 20 20 20 dd 82 20 5c 67 |,",". | .. \g|
|000039d0| 69 2c 22 2c 22 2c dc 86 | 28 33 34 29 2c 5c 74 67 |i,",",..|(34),\tg|
|000039e0| 5f 74 65 78 74 2c dc 86 | 28 33 34 29 00 20 20 20 |_text,..|(34). |
|000039f0| 20 20 20 80 0b 20 5c 74 | 67 5f 66 6c 61 67 73 20 | .. \t|g_flags |
|00003a00| 00 00 00 08 00 00 03 de | 00 00 00 3a 00 00 01 e8 |........|...:....|
|00003a10| 00 00 00 1e bd b8 da 35 | 80 cd 20 31 35 20 20 3b |.......5|.. 15 ;|
|00003a20| 74 6f 67 67 6c 65 3f 00 | 20 20 20 20 20 20 20 20 |toggle?.| |
|00003a30| dd 82 20 22 54 6f 67 67 | 6c 65 20 22 2c 67 61 6e |.. "Togg|le ",gan|
|00003a40| 2c 22 2c 22 2c 5c 67 69 | 2c 22 2c 4f 6e 22 00 20 |,",",\gi|,",On". |
|00003a50| 20 20 20 20 20 80 c0 00 | 20 20 20 20 80 c0 00 20 | ...| ... |
|00003a60| 20 20 20 3b 00 20 20 80 | 0f 20 31 20 20 3b 73 74 | ;. .|. 1 ;st|
|00003a70| 72 69 6e 67 20 67 61 64 | 67 65 74 00 20 20 20 20 |ring gad|get. |
|00003a80| 6b 3d 5c 67 77 3a 62 6f | 3d 30 00 20 20 20 20 80 |k=\gw:bo|=0. .|
|00003a90| 0b 20 5c 73 67 5f 66 6c | 61 67 73 00 20 20 20 20 |. \sg_fl|ags. |
|00003aa0| 20 20 62 31 3d 5c 73 67 | 5f 62 31 3a 62 32 3d 5c | b1=\sg|_b1:b2=\|
|00003ab0| 73 67 5f 62 32 3a 62 78 | 3d 5c 73 67 5f 62 78 3a |sg_b2:bx|=\sg_bx:|
|00003ac0| 62 79 3d 5c 73 67 5f 62 | 79 3a 62 6f 3d 2d 31 00 |by=\sg_b|y:bo=-1.|
|00003ad0| 20 20 20 20 20 20 6b 2d | 5c 73 67 5f 62 78 2d 5c | k-|\sg_bx-\|
|00003ae0| 73 67 5f 62 78 00 20 20 | 20 20 80 c0 00 20 20 20 |sg_bx. | ... |
|00003af0| 20 80 06 20 68 61 6e 64 | 6c 65 62 6f 72 64 00 20 | .. hand|lebord. |
|00003b00| 20 20 20 3b 00 20 20 20 | 20 80 0b 20 67 61 64 66 | ;. | .. gadf|
|00003b10| 00 20 20 20 20 20 20 c6 | 02 20 31 31 2c 78 2c 79 |. .|. 11,x,y|
|00003b20| 2c 5c 67 66 2c 5c 67 69 | 2c 5c 73 67 5f 6c 65 6e |,\gf,\gi|,\sg_len|
|00003b30| 67 74 68 2c 6b 00 20 20 | 20 20 20 20 80 0b 20 5c |gth,k. | .. \|
|00003b40| 73 67 5f 74 65 78 74 00 | 20 20 20 20 20 20 20 20 |sg_text.| |
|00003b50| c6 1b 20 31 31 2c 5c 67 | 69 2c 5c 73 67 5f 74 65 |.. 11,\g|i,\sg_te|
|00003b60| 78 74 00 20 20 20 20 20 | 20 80 c0 00 20 20 20 20 |xt. | ... |
|00003b70| 80 22 00 20 20 20 20 20 | 20 dd 81 20 22 53 74 72 |.". | .. "Str|
|00003b80| 69 6e 67 47 61 64 67 65 | 74 20 22 2c 67 61 6e 2c |ingGadge|t ",gan,|
|00003b90| 22 2c 22 2c 78 2c 22 2c | 22 2c 79 2c 22 2c 22 2c |",",x,",|",y,",",|
|00003ba0| 5c 67 66 2c 22 2c 22 2c | 5c 67 69 2c 22 2c 22 00 |\gf,",",|\gi,",".|
|00003bb0| 20 20 20 20 20 20 dd 82 | 20 5c 73 67 5f 6c 65 6e | ..| \sg_len|
|00003bc0| 67 74 68 2c 22 2c 22 2c | 6b 00 20 20 20 20 20 20 |gth,",",|k. |
|00003bd0| 80 0b 20 5c 73 67 5f 74 | 65 78 74 00 20 20 20 20 |.. \sg_t|ext. |
|00003be0| 20 20 20 20 dd 82 20 22 | 53 65 74 53 74 72 69 6e | .. "|SetStrin|
|00003bf0| 67 20 22 2c 67 61 6e 2c | 22 2c 22 2c 5c 67 69 2c |g ",gan,|",",\gi,|
|00003c00| 00 00 00 08 00 00 03 de | 00 00 00 3b 00 00 01 e8 |........|...;....|
|00003c10| 00 00 00 1f 3f fb 80 54 | 22 2c 22 2c dc 86 28 33 |....?..T|",",..(3|
|00003c20| 34 29 2c 5c 73 67 5f 74 | 65 78 74 2c dc 86 28 33 |4),\sg_t|ext,..(3|
|00003c30| 34 29 00 20 20 20 20 20 | 20 80 c0 00 20 20 20 20 |4). | ... |
|00003c40| 80 c0 00 20 20 20 20 3b | 00 20 20 80 0f 20 32 20 |... ;|. .. 2 |
|00003c50| 20 3b 70 72 6f 70 20 67 | 61 64 67 65 74 00 20 20 | ;prop g|adget. |
|00003c60| 20 20 3b 00 20 20 20 20 | 77 3d 5c 67 77 3a 68 3d | ;. |w=\gw:h=|
|00003c70| 5c 67 68 00 20 20 20 20 | 80 0b 20 5c 67 66 20 80 |\gh. |.. \gf .|
|00003c80| cd 20 33 20 3b 72 65 6c | 20 77 69 64 74 68 3f 00 |. 3 ;rel| width?.|
|00003c90| 20 20 20 20 20 20 77 2d | 77 77 32 00 20 20 20 20 | w-|ww2. |
|00003ca0| 80 c0 00 20 20 20 20 80 | 0b 20 5c 67 66 20 80 cd |... .|. \gf ..|
|00003cb0| 20 34 20 3b 72 65 6c 20 | 68 65 69 67 68 74 3f 00 | 4 ;rel |height?.|
|00003cc0| 20 20 20 20 20 20 68 2d | 77 68 32 00 20 20 20 20 | h-|wh2. |
|00003cd0| 80 c0 00 20 20 20 20 3b | 00 20 20 20 20 80 0b 20 |... ;|. .. |
|00003ce0| 67 61 64 66 00 20 20 20 | 20 20 20 c6 03 20 31 31 |gadf. | .. 11|
|00003cf0| 2c 78 2c 79 2c 5c 67 66 | 2c 5c 67 69 2c 77 2c 68 |,x,y,\gf|,\gi,w,h|
|00003d00| 00 20 20 20 20 80 22 00 | 20 20 20 20 20 20 dd 82 |. .".| ..|
|00003d10| 20 22 50 72 6f 70 47 61 | 64 67 65 74 20 22 2c 67 | "PropGa|dget ",g|
|00003d20| 61 6e 2c 22 2c 22 2c 78 | 2c 22 2c 22 2c 79 2c 22 |an,",",x|,",",y,"|
|00003d30| 2c 22 2c 5c 67 66 2c 22 | 2c 22 2c 5c 67 69 2c 22 |,",\gf,"|,",\gi,"|
|00003d40| 2c 22 2c 77 2c 22 2c 22 | 2c 68 00 20 20 20 20 80 |,",w,","|,h. .|
|00003d50| c0 00 20 20 20 20 3b 00 | 20 20 20 20 80 0b 20 5c |.. ;.| .. \|
|00003d60| 67 66 20 80 cd 20 36 00 | 20 20 20 20 20 20 80 0b |gf .. 6.| ..|
|00003d70| 20 67 61 64 66 00 20 20 | 20 20 20 20 20 20 c6 05 | gadf. | ..|
|00003d80| 20 31 31 2c 5c 67 69 2c | 30 2c 5c 70 67 5f 78 73 | 11,\gi,|0,\pg_xs|
|00003d90| 65 74 00 20 20 20 20 20 | 20 80 22 00 20 20 20 20 |et. | .". |
|00003da0| 20 20 20 20 dd 82 20 22 | 53 65 74 48 50 72 6f 70 | .. "|SetHProp|
|00003db0| 20 22 2c 67 61 6e 2c 22 | 2c 22 2c 5c 67 69 2c 22 | ",gan,"|,",\gi,"|
|00003dc0| 2c 30 2c 22 2c 5c 70 67 | 5f 78 73 65 74 00 20 20 |,0,",\pg|_xset. |
|00003dd0| 20 20 20 20 80 c0 00 20 | 20 20 20 80 c0 00 20 20 | ... | ... |
|00003de0| 20 20 80 0b 20 5c 67 66 | 20 80 cd 20 37 00 20 20 | .. \gf| .. 7. |
|00003df0| 20 20 20 20 80 0b 20 67 | 61 64 66 00 20 20 20 20 | .. g|adf. |
|00003e00| 00 00 00 08 00 00 03 de | 00 00 00 3c 00 00 01 e8 |........|...<....|
|00003e10| 00 00 00 20 ed ff bf f4 | 20 20 20 20 c6 06 20 31 |... ....| .. 1|
|00003e20| 31 2c 5c 67 69 2c 30 2c | 5c 70 67 5f 79 73 65 74 |1,\gi,0,|\pg_yset|
|00003e30| 00 20 20 20 20 20 20 80 | 22 00 20 20 20 20 20 20 |. .|". |
|00003e40| 20 20 dd 82 20 22 53 65 | 74 56 50 72 6f 70 20 22 | .. "Se|tVProp "|
|00003e50| 2c 67 61 6e 2c 22 2c 22 | 2c 5c 67 69 2c 22 2c 30 |,gan,","|,\gi,",0|
|00003e60| 2c 22 2c 5c 70 67 5f 79 | 73 65 74 00 20 20 20 20 |,",\pg_y|set. |
|00003e70| 20 20 80 c0 00 20 20 20 | 20 80 c0 00 20 20 20 20 | ... | ... |
|00003e80| 3b 00 20 20 80 0f 20 33 | 20 20 3b 73 68 61 70 65 |;. .. 3| ;shape|
|00003e90| 67 61 64 67 65 74 00 20 | 20 20 20 3b 00 20 20 20 |gadget. | ;. |
|00003ea0| 20 73 68 6e 2b 31 00 20 | 20 20 20 80 0b 20 67 61 | shn+1. | .. ga|
|00003eb0| 64 66 00 20 20 20 20 20 | 20 80 0b 20 72 65 70 73 |df. | .. reps|
|00003ec0| 68 00 20 20 20 20 20 20 | 20 20 cd 01 20 73 68 6e |h. | .. shn|
|00003ed0| 2c 5c 69 67 5f 66 69 6c | 65 00 20 20 20 20 20 20 |,\ig_fil|e. |
|00003ee0| 80 c0 00 20 20 20 20 20 | 20 c6 04 20 31 31 2c 78 |... | .. 11,x|
|00003ef0| 2c 79 2c 5c 69 67 5f 66 | 6c 61 67 73 26 31 7c 5c |,y,\ig_f|lags&1|\|
|00003f00| 67 66 2c 5c 67 69 2c 73 | 68 6e 00 20 20 20 20 20 |gf,\gi,s|hn. |
|00003f10| 20 80 0b 20 5c 69 67 5f | 66 6c 61 67 73 20 80 cd | .. \ig_|flags ..|
|00003f20| 20 31 35 00 20 20 20 20 | 20 20 20 20 c6 0e 20 31 | 15. | .. 1|
|00003f30| 31 2c 5c 67 69 2c 80 c5 | 00 20 20 20 20 20 20 80 |1,\gi,..|. .|
|00003f40| c0 00 20 20 20 20 80 22 | 00 20 20 20 20 20 20 dd |.. ."|. .|
|00003f50| 82 20 22 4c 6f 61 64 53 | 68 61 70 65 20 22 2c 73 |. "LoadS|hape ",s|
|00003f60| 68 6e 2c 22 2c 22 2c 5c | 69 67 5f 66 69 6c 65 00 |hn,",",\|ig_file.|
|00003f70| 20 20 20 20 20 20 dd 82 | 20 22 53 68 61 70 65 67 | ..| "Shapeg|
|00003f80| 61 64 67 65 74 20 22 2c | 67 61 6e 2c 22 2c 22 2c |adget ",|gan,",",|
|00003f90| 78 2c 22 2c 22 2c 79 2c | 22 2c 22 2c 5c 69 67 5f |x,",",y,|",",\ig_|
|00003fa0| 66 6c 61 67 73 26 31 7c | 5c 67 66 2c 22 2c 22 2c |flags&1||\gf,",",|
|00003fb0| 5c 67 69 2c 22 2c 22 2c | 73 68 6e 00 20 20 20 20 |\gi,",",|shn. |
|00003fc0| 20 20 80 0b 20 5c 69 67 | 5f 66 6c 61 67 73 20 80 | .. \ig|_flags .|
|00003fd0| cd 20 31 35 00 20 20 20 | 20 20 20 20 20 dd 82 20 |. 15. | .. |
|00003fe0| 22 54 6f 67 67 6c 65 20 | 22 2c 67 61 6e 2c 22 2c |"Toggle |",gan,",|
|00003ff0| 22 2c 5c 67 69 2c 22 2c | 4f 6e 22 00 20 20 20 20 |",\gi,",|On". |
|00004000| 00 00 00 08 00 00 03 de | 00 00 00 3d 00 00 01 e8 |........|...=....|
|00004010| 00 00 00 21 1f ec 1a 04 | 20 20 80 c0 00 20 20 20 |...!....| ... |
|00004020| 20 80 c0 00 20 20 20 20 | 3b 00 20 20 80 02 20 80 | ... |;. .. .|
|00004030| 0e 00 80 c1 00 72 65 70 | 73 68 3d 30 00 80 07 00 |.....rep|sh=0....|
|00004040| 00 2e 6d 61 6b 65 74 65 | 78 74 3a 74 78 74 66 3d |..makete|xt:txtf=|
|00004050| 2d 31 3a 80 2c 20 c5 01 | 20 31 00 3b 00 2e 6d 61 |-1:., ..| 1.;..ma|
|00004060| 6b 65 74 65 78 74 32 3a | 6c 6a 3d 2d 31 3a 6c 63 |ketext2:|lj=-1:lc|
|00004070| 31 3d 2d 31 3a 6c 63 32 | 3d 2d 31 00 3b 00 c0 04 |1=-1:lc2|=-1.;...|
|00004080| 20 67 61 64 73 28 29 00 | 80 0c 20 c0 03 28 67 61 | gads().|.. ..(ga|
|00004090| 64 73 28 29 29 00 20 20 | 80 0b 20 5c 67 74 3d 34 |ds()). |.. \gt=4|
|000040a0| 20 20 3b 77 69 6e 64 6f | 77 20 74 65 78 74 3f 00 | ;windo|w text?.|
|000040b0| 20 20 20 20 78 3d 5c 67 | 78 2d 77 6c 6f 3a 79 3d | x=\g|x-wlo:y=|
|000040c0| 5c 67 79 2d 77 74 6f 00 | 20 20 20 20 3b 00 20 20 |\gy-wto.| ;. |
|000040d0| 20 20 80 0b 20 74 78 74 | 66 00 20 20 20 20 20 20 | .. txt|f. |
|000040e0| c5 10 20 78 2c 79 00 20 | 20 20 20 20 20 c5 1d 20 |.. x,y. | .. |
|000040f0| 5c 77 74 5f 6a 61 6d 3a | c5 1c 20 5c 77 74 5f 63 |\wt_jam:|.. \wt_c|
|00004100| 31 2c 5c 77 74 5f 63 32 | 00 20 20 20 20 20 20 dd |1,\wt_c2|. .|
|00004110| 81 20 5c 77 74 5f 74 65 | 78 74 00 20 20 20 20 80 |. \wt_te|xt. .|
|00004120| 22 00 20 20 20 20 20 20 | dd 81 20 22 57 4c 6f 63 |". |.. "WLoc|
|00004130| 61 74 65 20 22 2c 78 2c | 22 2c 22 2c 79 00 20 20 |ate ",x,|",",y. |
|00004140| 20 20 20 20 80 0b 20 5c | 77 74 5f 6a 61 6d 3c 3e | .. \|wt_jam<>|
|00004150| 6c 6a 00 20 20 20 20 20 | 20 20 20 6c 6a 3d 5c 77 |lj. | lj=\w|
|00004160| 74 5f 6a 61 6d 00 20 20 | 20 20 20 20 20 20 dd 81 |t_jam. | ..|
|00004170| 20 22 3a 57 4a 61 6d 20 | 22 2c 6c 6a 00 20 20 20 | ":WJam |",lj. |
|00004180| 20 20 20 80 c0 00 20 20 | 20 20 20 20 80 0b 20 5c | ... | .. \|
|00004190| 77 74 5f 63 31 3c 3e 6c | 63 31 20 80 8a 20 5c 77 |wt_c1<>l|c1 .. \w|
|000041a0| 74 5f 63 32 3c 3e 6c 63 | 32 00 20 20 20 20 20 20 |t_c2<>lc|2. |
|000041b0| 20 20 6c 63 31 3d 5c 77 | 74 5f 63 31 3a 6c 63 32 | lc1=\w|t_c1:lc2|
|000041c0| 3d 5c 77 74 5f 63 32 00 | 20 20 20 20 20 20 20 20 |=\wt_c2.| |
|000041d0| dd 81 20 22 3a 57 43 6f | 6c 6f 75 72 20 22 2c 6c |.. ":WCo|lour ",l|
|000041e0| 63 31 2c 22 2c 22 2c 6c | 63 32 00 20 20 20 20 20 |c1,",",l|c2. |
|000041f0| 20 80 c0 00 20 20 20 20 | 20 20 dd 82 20 22 22 00 | ... | .. "".|
|00004200| 00 00 00 08 00 00 03 de | 00 00 00 3e 00 00 01 a4 |........|...>....|
|00004210| 00 00 00 00 66 d7 1e d4 | 20 20 20 20 20 20 dd 82 |....f...| ..|
|00004220| 20 22 50 72 69 6e 74 20 | 22 2c dc 86 28 33 34 29 | "Print |",..(34)|
|00004230| 2c 5c 77 74 5f 74 65 78 | 74 2c dc 86 28 33 34 29 |,\wt_tex|t,..(34)|
|00004240| 00 20 20 20 20 80 c0 00 | 20 20 80 c0 00 80 c1 00 |. ...| ......|
|00004250| c5 1d 20 31 3a c5 1c 20 | 31 2c 30 00 80 07 00 00 |.. 1:.. |1,0.....|
|00004260| 2e 76 69 65 77 77 69 6e | 32 00 c5 32 20 6d 69 6e |.viewwin|2..2 min|
|00004270| 77 2c 6d 69 6e 68 2c 6d | 61 78 77 2c 6d 61 78 68 |w,minh,m|axw,maxh|
|00004280| 00 c5 37 00 c5 01 20 31 | 2c 77 78 2c 77 79 2c 77 |..7... 1|,wx,wy,w|
|00004290| 77 2c 77 68 2c 77 66 2c | 77 74 24 2c 77 64 2c 77 |w,wh,wf,|wt$,wd,w|
|000042a0| 62 2c 31 31 00 69 6e 77 | 3d c5 2d 3a 69 6e 68 3d |b,11.inw|=.-:inh=|
|000042b0| c5 2e 00 77 6c 6f 3d c5 | 31 3a 77 74 6f 3d c5 30 |...wlo=.|1:wto=.0|
|000042c0| 00 c4 02 20 30 3a 80 05 | 20 6d 61 6b 65 74 65 78 |... 0:..| maketex|
|000042d0| 74 00 00 00 66 77 32 3a | 80 2b 20 c5 01 20 32 3a |t...fw2:|.+ .. 2:|
|000042e0| c5 37 00 3b 00 76 69 65 | 77 77 69 6e 00 80 06 20 |.7.;.vie|wwin... |
|000042f0| 76 69 65 77 77 69 6e 32 | 00 da 01 2e 6c 20 da 02 |viewwin2|....l ..|
|00004300| 2e 6c 28 80 b8 20 c5 01 | 28 31 29 29 2b 36 32 2c |.l(.. ..|(1))+62,|
|00004310| 30 3a 80 07 00 00 73 68 | 6f 77 61 62 6f 78 32 3a |0:....sh|owabox2:|
|00004320| 78 3d cf 05 3a 79 3d cf | 06 00 2e 73 68 6f 77 61 |x=..:y=.|...showa|
|00004330| 62 6f 78 00 80 0b 20 78 | 3c 78 6c 20 80 21 20 78 |box... x|<xl .! x|
|00004340| 3d 78 6c 00 80 0b 20 79 | 3c 79 6c 20 80 21 20 79 |=xl... y|<yl .! y|
|00004350| 3d 79 6c 00 bb 83 20 67 | 78 2b 77 78 2c 67 79 2b |=yl... g|x+wx,gy+|
|00004360| 77 79 2c 78 2c 79 2c 2d | 31 3a 80 07 00 00 2e 73 |wy,x,y,-|1:.....s|
|00004370| 68 6f 77 6e 65 77 00 80 | 06 20 6d 61 6b 65 67 6c |hownew..|. makegl|
|00004380| 69 73 74 3a 80 06 20 76 | 69 65 77 77 69 6e 00 3b |ist:.. v|iewwin.;|
|00004390| 00 2e 73 68 6f 77 77 69 | 6e 00 3b 00 bb 83 20 77 |..showwi|n.;... w|
|000043a0| 78 2c 77 79 2c 77 78 2b | 77 77 2d 31 2c 77 79 2b |x,wy,wx+|ww-1,wy+|
|000043b0| 77 68 2d 31 2c 2d 31 00 | 80 07 00 00 da 01 2e 6c |wh-1,-1.|.......l|
|000043c0| 20 26 67 61 64 73 28 29 | 2b 80 2f 2e 61 67 61 64 | &gads()|+./.agad|
|000043d0| 67 65 74 5c 74 67 5f 74 | 65 78 74 2c 30 00 20 20 |get\tg_t|ext,0. |
|000043e0| 20 20 20 20 da 01 2e 6c | 20 26 67 61 64 73 28 29 | ...l| &gads()|
|000043f0| 2b 80 2f 2e 61 67 61 64 | 67 65 74 5c 73 67 5f 74 |+./.agad|get\sg_t|
|00004400| 00 00 00 08 00 00 03 df | 00 00 00 01 00 00 01 e8 |........|........|
|00004410| 00 00 00 23 ed da 4b b2 | 3b 00 3b 20 49 6e 74 75 |...#..K.|;.; Intu|
|00004420| 69 74 6f 6f 6c 73 20 76 | 20 32 2e 30 31 00 3b 00 |itools v| 2.01.;.|
|00004430| 3b 20 28 63 29 31 39 39 | 34 20 41 63 69 64 20 53 |; (c)199|4 Acid S|
|00004440| 6f 66 74 77 61 72 65 00 | 3b 00 3b 20 46 6f 72 20 |oftware.|;.; For |
|00004450| 42 55 4d 20 73 75 62 73 | 63 72 69 62 65 72 73 20 |BUM subs|cribers |
|00004460| 6f 6e 6c 79 21 00 3b 00 | 00 3b 20 75 73 65 73 20 |only!.;.|.; uses |
|00004470| 74 77 6f 20 73 63 72 65 | 65 6e 73 20 77 69 74 68 |two scre|ens with|
|00004480| 20 73 61 6d 65 20 62 69 | 74 6d 61 70 20 73 6f 20 | same bi|tmap so |
|00004490| 75 73 65 72 20 64 65 66 | 69 6e 65 64 20 77 69 6e |user def|ined win|
|000044a0| 64 6f 77 73 00 3b 20 74 | 68 61 74 20 61 72 65 20 |dows.; t|hat are |
|000044b0| 6f 70 65 6e 65 64 20 6f | 6e 20 62 61 63 6b 20 73 |opened o|n back s|
|000044c0| 63 72 65 65 6e 20 63 61 | 6e 20 62 65 20 76 69 65 |creen ca|n be vie|
|000044d0| 77 65 64 20 6f 6e 20 66 | 72 6f 6e 74 00 00 3b 20 |wed on f|ront..; |
|000044e0| 77 69 6e 64 6f 77 20 30 | 26 31 20 75 73 65 64 20 |window 0|&1 used |
|000044f0| 66 6f 72 20 75 69 20 32 | 20 6f 6e 20 66 6f 72 20 |for ui 2| on for |
|00004500| 75 73 65 72 20 64 65 66 | 69 6e 65 64 20 28 69 64 |user def|ined (id|
|00004510| 2b 32 29 00 3b 20 67 61 | 64 67 65 74 6c 69 73 74 |+2).; ga|dgetlist|
|00004520| 73 20 61 72 65 20 65 71 | 75 61 6c 20 74 6f 20 74 |s are eq|ual to t|
|00004530| 68 65 20 77 69 6e 64 6f | 77 20 74 68 65 79 20 61 |he windo|w they a|
|00004540| 70 70 65 61 72 20 6f 6e | 00 00 3b 20 77 6f 72 6b |ppear on|..; work|
|00004550| 6f 75 74 20 66 6c 61 67 | 73 20 66 6f 72 20 67 61 |out flag|s for ga|
|00004560| 64 67 65 74 73 00 3b 20 | 73 6f 72 74 20 6f 75 74 |dgets.; |sort out|
|00004570| 20 66 6f 6e 74 73 20 66 | 6f 72 20 77 69 6e 64 6f | fonts f|or windo|
|00004580| 77 00 3b 20 64 65 6c 65 | 74 65 20 67 61 64 67 65 |w.; dele|te gadge|
|00004590| 74 00 00 3b 20 77 69 6e | 64 6f 77 20 72 65 71 75 |t..; win|dow requ|
|000045a0| 65 73 74 65 72 00 3b 20 | 70 75 74 20 64 69 76 69 |ester.; |put divi|
|000045b0| 64 65 73 20 69 6e 20 6e | 75 6d 65 72 69 63 20 70 |des in n|umeric p|
|000045c0| 61 72 61 6d 65 74 65 72 | 73 20 65 67 20 31 2f 31 |arameter|s eg 1/1|
|000045d0| 36 00 3b 20 67 65 6e 65 | 72 61 74 65 20 62 6c 69 |6.; gene|rate bli|
|000045e0| 74 7a 32 20 63 6f 64 65 | 00 00 3b 20 2a 20 6e 6f |tz2 code|..; * no|
|000045f0| 20 63 6f 64 65 20 67 65 | 6e 65 72 61 74 65 64 20 | code ge|nerated |
|00004600| 00 00 00 08 00 00 03 df | 00 00 00 02 00 00 01 e8 |........|........|
|00004610| 00 00 00 24 c1 c8 fb 7c | 66 6f 72 20 73 68 61 70 |...$...||for shap|
|00004620| 65 20 67 61 64 67 65 74 | 73 00 3b 20 2a 20 67 74 |e gadget|s.; * gt|
|00004630| 6c 69 73 74 20 63 75 72 | 72 65 6e 74 6c 79 20 63 |list cur|rently c|
|00004640| 72 65 61 74 65 73 20 72 | 65 6d 6d 64 20 6c 69 6e |reates r|emmd lin|
|00004650| 65 00 3b 20 2a 20 63 6f | 6e 73 74 61 6e 74 20 73 |e.; * co|nstant s|
|00004660| 79 73 74 65 6d 20 6e 6f | 74 20 73 75 70 70 6f 72 |ystem no|t suppor|
|00004670| 74 65 64 20 61 73 20 79 | 65 74 00 00 76 65 72 24 |ted as y|et..ver$|
|00004680| 3d 22 49 6e 74 75 69 54 | 6f 6f 6c 73 20 76 32 2e |="IntuiT|ools v2.|
|00004690| 30 31 22 00 00 80 32 20 | 70 61 24 3d 31 39 32 3a |01"...2 |pa$=192:|
|000046a0| 80 32 20 66 69 24 3d 31 | 39 32 00 80 32 20 70 63 |.2 fi$=1|92..2 pc|
|000046b0| 24 3d 31 39 32 3a 80 32 | 20 66 63 24 3d 31 39 32 |$=192:.2| fc$=192|
|000046c0| 00 00 80 01 20 2e 78 79 | 3a 78 2e 77 3a 79 2e 77 |.... .xy|:x.w:y.w|
|000046d0| 3a 80 02 20 80 01 00 00 | 80 01 20 2e 6f 62 6a 00 |:.. ....|.. .obj.|
|000046e0| 20 20 78 2e 77 3a 79 3a | 77 3a 68 20 20 20 20 20 | x.w:y:|w:h |
|000046f0| 20 20 20 20 20 20 20 3b | 70 6f 73 69 74 69 6f 6e | ;|position|
|00004700| 00 20 20 63 2e 78 79 5b | 38 5d 20 20 20 20 20 20 |. c.xy[|8] |
|00004710| 20 20 20 20 20 20 20 20 | 3b 68 61 6e 64 6c 65 73 | |;handles|
|00004720| 00 20 20 6f 62 6a 2e 77 | 20 20 20 20 20 20 20 20 |. obj.w| |
|00004730| 20 20 20 20 20 20 20 20 | 3b 77 69 6e 64 6f 77 3d | |;window=|
|00004740| 30 20 67 61 64 67 65 74 | 3d 31 00 20 20 69 64 2e |0 gadget|=1. id.|
|00004750| 77 00 20 20 6c 61 62 65 | 6c 24 3a 63 6f 6e 73 74 |w. labe|l$:const|
|00004760| 61 6e 74 24 00 20 20 67 | 74 79 70 65 2e 77 20 20 |ant$. g|type.w |
|00004770| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 67 61 64 | | ;gad|
|00004780| 67 65 74 74 79 70 65 20 | 30 3d 74 65 78 74 20 31 |gettype |0=text 1|
|00004790| 3d 73 74 72 69 6e 67 20 | 32 3d 70 72 6f 70 20 33 |=string |2=prop 3|
|000047a0| 3d 73 68 61 70 65 20 34 | 2e 2e 3d 67 74 00 20 20 |=shape 4|..=gt. |
|000047b0| 67 66 6c 61 67 73 2e 77 | 20 20 20 20 20 20 20 20 |gflags.w| |
|000047c0| 20 20 20 20 20 3b 66 6c | 61 67 73 20 66 69 65 6c | ;fl|ags fiel|
|000047d0| 64 20 63 6f 6d 70 69 6c | 65 64 20 66 72 6f 6d 20 |d compil|ed from |
|000047e0| 62 65 6c 6f 77 00 20 20 | 67 73 74 72 69 6e 67 2e |below. |gstring.|
|000047f0| 73 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 6d 61 |s | ;ma|
|00004800| 00 00 00 08 00 00 03 df | 00 00 00 03 00 00 01 e8 |........|........|
|00004810| 00 00 00 25 76 b5 b5 05 | 69 6e 20 73 74 72 69 6e |...%v...|in strin|
|00004820| 67 20 66 69 65 6c 64 20 | 28 69 6e 63 6c 75 64 65 |g field |(include|
|00004830| 73 20 7c 20 69 66 20 6e | 65 63 65 73 61 72 79 29 |s | if n|ecesary)|
|00004840| 00 20 20 66 6c 61 67 73 | 2e 77 5b 31 36 5d 00 20 |. flags|.w[16]. |
|00004850| 20 70 61 72 73 24 5b 38 | 5d 00 20 20 6e 61 72 73 | pars$[8|]. nars|
|00004860| 2e 71 5b 38 5d 00 20 20 | 2a 77 69 6e 2e 6f 62 6a |.q[8]. |*win.obj|
|00004870| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 69 66 | | ;if|
|00004880| 20 6e 6f 74 20 61 20 77 | 69 6e 64 6f 77 20 74 68 | not a w|indow th|
|00004890| 69 73 20 70 6f 69 6e 74 | 73 20 74 6f 20 61 20 77 |is point|s to a w|
|000048a0| 69 6e 64 6f 77 00 20 20 | 77 69 6e 69 64 2e 77 00 |indow. |winid.w.|
|000048b0| 20 20 6f 78 2e 77 3a 6f | 79 20 20 20 20 20 20 20 | ox.w:o|y |
|000048c0| 20 20 20 20 20 20 20 3b | 6f 66 66 73 65 74 20 66 | ;|offset f|
|000048d0| 72 6f 6d 20 77 69 6e 64 | 6f 77 00 20 20 63 30 24 |rom wind|ow. c0$|
|000048e0| 00 80 02 20 80 01 00 00 | 80 01 20 2e 70 72 6f 6a |... ....|.. .proj|
|000048f0| 00 20 20 77 2e 77 3a 68 | 2e 77 3a 64 2e 77 3a 6d |. w.w:h|.w:d.w:m|
|00004900| 2e 77 20 20 20 20 3b 73 | 63 72 65 65 6e 20 72 65 |.w ;s|creen re|
|00004910| 73 00 20 20 66 6f 6e 74 | 24 3a 68 65 69 67 68 74 |s. font|$:height|
|00004920| 2e 77 3a 73 74 79 6c 65 | 2e 77 00 20 20 6e 75 6d |.w:style|.w. num|
|00004930| 77 69 6e 2e 77 00 20 20 | 6e 75 6d 67 61 64 2e 77 |win.w. |numgad.w|
|00004940| 00 80 02 20 80 01 00 00 | 80 01 20 2e 73 69 6e 66 |... ....|.. .sinf|
|00004950| 6f 3a 69 64 2e 6c 3a 77 | 2e 6c 3a 68 2e 6c 3a 64 |o:id.l:w|.l:h.l:d|
|00004960| 2e 77 3a 6f 73 2e 77 3a | 73 63 2e 77 3a 62 77 2e |.w:os.w:|sc.w:bw.|
|00004970| 6c 3a 62 68 2e 6c 3a 80 | 02 20 80 01 00 80 01 20 |l:bh.l:.|. ..... |
|00004980| 2e 66 69 6e 66 6f 3a 6e | 61 6d 65 2e 73 3a 79 73 |.finfo:n|ame.s:ys|
|00004990| 69 7a 65 2e 77 3a 73 74 | 79 6c 65 2e 62 3a 66 6c |ize.w:st|yle.b:fl|
|000049a0| 61 67 73 3a 70 31 3a 70 | 32 3a 64 6d 3a 70 61 64 |ags:p1:p|2:dm:pad|
|000049b0| 3a 80 02 20 80 01 00 00 | 80 01 20 2e 74 73 74 3a |:.. ....|.. .tst:|
|000049c0| 61 2e 77 3a 63 24 3a 80 | 02 20 80 01 00 80 04 20 |a.w:c$:.|. ..... |
|000049d0| 80 b3 20 74 65 73 74 2e | 74 73 74 28 33 32 29 00 |.. test.|tst(32).|
|000049e0| 80 0c 20 c0 02 28 74 65 | 73 74 28 29 29 3a 74 65 |.. ..(te|st()):te|
|000049f0| 73 74 28 29 5c 63 3d 22 | 49 54 45 4d 22 2b dd 83 |st()\c="|ITEM"+..|
|00004a00| 00 00 00 08 00 00 03 df | 00 00 00 04 00 00 01 e8 |........|........|
|00004a10| 00 00 00 26 f4 b6 c2 07 | 28 69 29 3a 69 2b 31 3a |...&....|(i):i+1:|
|00004a20| 80 c1 00 00 80 08 20 64 | 72 61 77 62 6f 78 7b 2a |...... d|rawbox{*|
|00004a30| 67 2e 6f 62 6a 7d 00 20 | 20 80 ca 20 2a 67 00 20 |g.obj}. | .. *g. |
|00004a40| 20 78 3d 5c 78 3a 79 3d | 5c 79 00 20 20 5c 63 5b | x=\x:y=|\y. \c[|
|00004a50| 30 5d 5c 78 3d 78 2c 79 | 3a 5c 63 5b 31 5d 5c 78 |0]\x=x,y|:\c[1]\x|
|00004a60| 3d 78 2b 5c 77 2f 32 2d | 32 2c 79 3a 5c 63 5b 32 |=x+\w/2-|2,y:\c[2|
|00004a70| 5d 5c 78 3d 78 2b 5c 77 | 2d 36 2c 79 00 20 20 5c |]\x=x+\w|-6,y. \|
|00004a80| 63 5b 33 5d 5c 78 3d 78 | 2c 79 2b 5c 68 2f 32 2d |c[3]\x=x|,y+\h/2-|
|00004a90| 31 3a 5c 63 5b 34 5d 5c | 78 3d 78 2b 5c 77 2d 36 |1:\c[4]\|x=x+\w-6|
|00004aa0| 2c 79 2b 5c 68 2f 32 2d | 31 00 20 20 5c 63 5b 35 |,y+\h/2-|1. \c[5|
|00004ab0| 5d 5c 78 3d 78 2c 79 2b | 5c 68 2d 33 3a 5c 63 5b |]\x=x,y+|\h-3:\c[|
|00004ac0| 36 5d 5c 78 3d 78 2b 5c | 77 2f 32 2d 32 2c 79 2b |6]\x=x+\|w/2-2,y+|
|00004ad0| 5c 68 2d 33 00 20 20 5c | 63 5b 37 5d 5c 78 3d 78 |\h-3. \|c[7]\x=x|
|00004ae0| 2b 5c 77 2d 36 2c 79 2b | 5c 68 2d 33 00 20 20 80 |+\w-6,y+|\h-3. .|
|00004af0| ca 20 2a 67 5c 63 5b 69 | 5d 00 20 20 80 16 20 69 |. *g\c[i|]. .. i|
|00004b00| 3d 30 20 80 18 20 37 00 | 20 20 20 20 bb 84 20 5c |=0 .. 7.| .. \|
|00004b10| 78 2c 5c 79 2c 5c 78 2b | 35 2c 5c 79 2b 32 2c 2d |x,\y,\x+|5,\y+2,-|
|00004b20| 31 00 20 20 80 17 00 80 | 02 20 80 08 00 00 80 09 |1. ....|. ......|
|00004b30| 20 69 6e 70 75 74 7b 7d | 3a 80 09 20 80 07 20 bc | input{}|:.. .. .|
|00004b40| 01 28 dd 01 28 38 30 29 | 29 3a 80 02 20 80 09 00 |.(..(80)|):.. ...|
|00004b50| 00 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|00004b60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 00 00 80 01 20 2e |--------|--.... .|
|00004ba0| 67 61 64 00 20 20 6e 61 | 6d 65 24 00 20 20 6d 61 |gad. na|me$. ma|
|00004bb0| 73 6b 2e 77 00 20 20 70 | 61 72 73 24 5b 34 5d 00 |sk.w. p|ars$[4].|
|00004bc0| 80 02 20 80 01 00 00 80 | 04 20 67 74 2e 67 61 64 |.. .....|. gt.gad|
|00004bd0| 28 33 32 29 00 00 80 33 | 20 2e 70 72 6f 6a 20 70 |(32)...3| .proj p|
|00004be0| 00 80 33 20 2e 6f 62 6a | 20 2a 77 2c 2a 6f 20 20 |..3 .obj| *w,*o |
|00004bf0| 20 20 20 3b 77 68 6f 20 | 77 61 6e 74 73 20 70 72 | ;who |wants pr|
|00004c00| 00 00 00 08 00 00 03 df | 00 00 00 05 00 00 01 e8 |........|........|
|00004c10| 00 00 00 27 c2 b6 a7 a3 | 65 64 65 66 69 6e 65 64 |...'....|edefined|
|00004c20| 20 76 61 72 73 3f 00 00 | 80 33 20 2e 6c 20 6e 30 | vars?..|.3 .l n0|
|00004c30| 2c 6e 31 2c 6e 32 00 00 | 80 04 20 80 b3 20 71 2e |,n1,n2..|.. .. q.|
|00004c40| 6f 62 6a 28 35 30 29 00 | 00 c3 01 20 30 2c 22 74 |obj(50).|... 0,"t|
|00004c50| 6f 70 61 7a 2e 66 6f 6e | 74 22 2c 38 00 00 71 24 |opaz.fon|t",8..q$|
|00004c60| 3d dc 86 28 33 34 29 00 | 00 c5 35 20 24 31 30 20 |=..(34).|..5 $10 |
|00004c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004c80| 20 20 20 20 20 3b 67 65 | 74 20 6d 6f 75 73 65 20 | ;ge|t mouse |
|00004c90| 6d 6f 76 65 20 65 76 65 | 6e 74 73 00 80 06 20 69 |move eve|nts... i|
|00004ca0| 6e 69 74 67 75 69 00 80 | 06 20 69 6e 69 74 77 75 |nitgui..|. initwu|
|00004cb0| 69 00 80 06 20 69 6e 69 | 74 6d 65 6e 75 73 00 70 |i... ini|tmenus.p|
|00004cc0| 5c 77 3d 36 34 30 2c 32 | 35 36 2c 32 2c 24 38 30 |\w=640,2|56,2,$80|
|00004cd0| 30 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |00 | |
|00004ce0| 20 3b 64 65 66 61 75 6c | 74 20 70 72 6f 6a 65 63 | ;defaul|t projec|
|00004cf0| 74 20 73 65 74 75 70 00 | 70 5c 66 6f 6e 74 3d 22 |t setup.|p\font="|
|00004d00| 74 6f 70 61 7a 2e 66 6f | 6e 74 22 2c 38 2c 30 00 |topaz.fo|nt",8,0.|
|00004d10| 80 06 20 6e 75 73 63 72 | 65 65 6e 00 00 67 78 3d |.. nuscr|een..gx=|
|00004d20| 31 3a 67 79 3d 31 3a 61 | 75 74 6f 3d 30 20 20 20 |1:gy=1:a|uto=0 |
|00004d30| 20 20 20 3b 67 72 69 64 | 20 73 65 74 74 69 6e 67 | ;grid| setting|
|00004d40| 00 62 78 3d 34 3a 62 79 | 3d 32 20 20 20 20 20 20 |.bx=4:by|=2 |
|00004d50| 20 20 20 20 20 20 20 3b | 67 61 64 67 65 74 20 62 | ;|gadget b|
|00004d60| 6f 72 64 65 72 20 73 65 | 74 74 69 6e 67 73 00 6d |order se|ttings.m|
|00004d70| 6f 64 65 3d 30 00 00 2e | 6d 61 69 6e 00 20 20 80 |ode=0...|main. .|
|00004d80| bb 00 20 20 20 20 c5 11 | 20 30 00 20 20 20 20 65 |.. ..| 0. e|
|00004d90| 76 2e 6c 3d c5 02 00 20 | 20 20 20 80 0b 20 65 76 |v.l=... | .. ev|
|00004da0| 3d 24 38 20 80 21 20 80 | 06 20 68 69 74 6f 62 6a |=$8 .! .|. hitobj|
|00004db0| 65 63 74 00 20 20 20 20 | 80 0b 20 65 76 3d 24 31 |ect. |.. ev=$1|
|00004dc0| 30 30 00 20 20 20 20 20 | 20 80 0b 20 c5 07 3d 30 |00. | .. ..=0|
|00004dd0| 00 20 20 20 20 20 20 20 | 20 80 0b 20 c5 08 3d 30 |. | .. ..=0|
|00004de0| 20 80 21 20 80 06 20 64 | 6f 6c 6f 61 64 00 20 20 | .! .. d|oload. |
|00004df0| 20 20 20 20 20 20 80 0b | 20 c5 08 3d 31 20 80 21 | ..| ..=1 .!|
|00004e00| 00 00 00 08 00 00 03 df | 00 00 00 06 00 00 01 e8 |........|........|
|00004e10| 00 00 00 28 e1 82 27 d6 | 20 80 06 20 64 6f 73 61 |...(..'.| .. dosa|
|00004e20| 76 65 00 20 20 20 20 20 | 20 20 20 80 0b 20 c5 08 |ve. | .. ..|
|00004e30| 3d 32 20 80 21 20 80 06 | 20 67 65 74 73 63 72 65 |=2 .! ..| getscre|
|00004e40| 65 6e 00 20 20 20 20 20 | 20 20 20 80 0b 20 c5 08 |en. | .. ..|
|00004e50| 3d 33 20 80 21 20 80 06 | 20 67 65 74 66 6f 6e 74 |=3 .! ..| getfont|
|00004e60| 00 20 20 20 20 20 20 20 | 20 80 0b 20 c5 08 3d 35 |. | .. ..=5|
|00004e70| 20 80 21 20 80 06 20 74 | 65 73 74 73 63 72 65 65 | .! .. t|estscree|
|00004e80| 6e 00 20 20 20 20 20 20 | 20 20 80 0b 20 c5 08 3d |n. | .. ..=|
|00004e90| 36 20 80 21 20 80 06 20 | 63 72 65 61 74 65 63 6f |6 .! .. |createco|
|00004ea0| 64 65 00 20 20 20 20 20 | 20 20 20 80 0b 20 c5 08 |de. | .. ..|
|00004eb0| 3d 37 20 80 21 20 80 02 | 00 20 20 20 20 20 20 80 |=7 .! ..|. .|
|00004ec0| c0 00 20 20 20 20 20 20 | 80 0b 20 c5 07 3d 31 00 |.. |.. ..=1.|
|00004ed0| 20 20 20 20 20 20 20 20 | 80 0b 20 c5 08 3d 30 00 | |.. ..=0.|
|00004ee0| 20 20 20 20 20 20 20 20 | 20 20 80 0b 20 c4 0c 28 | | .. ..(|
|00004ef0| 30 2c 31 2c 30 29 20 80 | 21 20 67 78 3d 38 3a 67 |0,1,0) .|! gx=8:g|
|00004f00| 79 3d 34 20 80 22 20 67 | 78 3d 31 3a 67 79 3d 31 |y=4 ." g|x=1:gy=1|
|00004f10| 00 20 20 20 20 20 20 20 | 20 80 c0 00 20 20 20 20 |. | ... |
|00004f20| 20 20 20 20 80 0b 20 c5 | 08 3d 31 20 80 21 20 61 | .. .|.=1 .! a|
|00004f30| 75 74 6f 3d c4 0c 28 30 | 2c 31 2c 31 29 00 20 20 |uto=..(0|,1,1). |
|00004f40| 20 20 20 20 80 c0 00 20 | 20 20 20 20 20 80 0b 20 | ... | .. |
|00004f50| c5 07 3d 32 00 20 20 20 | 20 20 20 20 20 80 0b 20 |..=2. | .. |
|00004f60| c5 08 3d 30 20 80 21 20 | 80 06 20 61 64 64 77 69 |..=0 .! |.. addwi|
|00004f70| 6e 64 6f 77 00 20 20 20 | 20 20 20 20 20 80 0b 20 |ndow. | .. |
|00004f80| c5 08 3e 30 20 80 21 20 | 67 74 79 70 65 3d c5 08 |..>0 .! |gtype=..|
|00004f90| 2d 31 3a 80 06 20 61 64 | 64 67 61 64 67 65 74 00 |-1:.. ad|dgadget.|
|00004fa0| 20 20 20 20 20 20 80 c0 | 00 20 20 20 20 20 20 80 | ..|. .|
|00004fb0| 0b 20 c5 07 3d 33 00 20 | 20 20 20 20 20 20 20 67 |. ..=3. | g|
|00004fc0| 74 79 70 65 3d c5 08 2b | 34 3a 80 06 20 61 64 64 |type=..+|4:.. add|
|00004fd0| 67 61 64 67 65 74 00 20 | 20 20 20 20 20 80 c0 00 |gadget. | ...|
|00004fe0| 20 20 20 20 80 c0 00 20 | 20 80 c7 00 00 2e 63 72 | ... | .....cr|
|00004ff0| 65 61 74 65 63 6f 64 65 | 3a 00 20 20 80 2c 20 cf |eatecode|:. ., .|
|00005000| 00 00 00 08 00 00 03 df | 00 00 00 07 00 00 01 e8 |........|........|
|00005010| 00 00 00 29 ea f9 e0 72 | 01 20 31 3a 80 ca 20 71 |...)...r|. 1:.. q|
|00005020| 28 29 00 20 20 66 24 3d | a8 01 28 22 43 52 45 41 |(). f$=|..("CREA|
|00005030| 54 45 20 53 4f 55 52 43 | 45 20 43 4f 44 45 22 2c |TE SOURC|E CODE",|
|00005040| 70 63 24 2c 66 63 24 29 | 00 20 20 80 0b 20 be 12 |pc$,fc$)|. .. ..|
|00005050| 28 30 2c 66 24 29 00 20 | 20 20 20 be 07 20 30 00 |(0,f$). | .. 0.|
|00005060| 20 20 20 20 3b 00 20 20 | 20 20 c0 04 20 71 28 29 | ;. | .. q()|
|00005070| 00 20 20 20 20 80 0c 20 | c0 03 28 71 28 29 29 3a |. .. |..(q()):|
|00005080| dd 81 20 22 23 22 2b 5c | 63 6f 6e 73 74 61 6e 74 |.. "#"+\|constant|
|00005090| 2b 22 3d 22 2b dd 83 28 | 5c 69 64 29 2b dc 86 28 |+"="+..(|\id)+..(|
|000050a0| 30 29 3a 80 c1 00 20 20 | 20 20 dd 81 20 dc 86 28 |0):... | .. ..(|
|000050b0| 30 29 00 20 20 20 20 3b | 00 20 20 20 20 73 70 24 |0). ;|. sp$|
|000050c0| 3d dd 83 28 70 5c 77 29 | 2b 22 2c 22 2b dd 83 28 |=..(p\w)|+","+..(|
|000050d0| 70 5c 68 29 2b 22 2c 22 | 2b dd 83 28 70 5c 64 29 |p\h)+","|+..(p\d)|
|000050e0| 2b 22 2c 22 2b dd 83 28 | 70 5c 6d 29 00 20 20 20 |+","+..(|p\m). |
|000050f0| 20 dd 81 20 dc 8b 28 24 | 63 66 30 31 29 2b 22 20 | .. ..($|cf01)+" |
|00005100| 30 2c 30 2c 30 2c 22 2b | 73 70 24 2b 22 2c 22 2b |0,0,0,"+|sp$+","+|
|00005110| 71 24 2b 22 54 45 53 54 | 22 2b 71 24 2b 22 2c 30 |q$+"TEST|"+q$+",0|
|00005120| 2c 31 22 2b dc 86 28 30 | 29 00 20 20 20 20 3b 00 |,1"+..(0|). ;.|
|00005130| 20 20 20 20 c0 04 20 71 | 28 29 00 20 20 20 20 80 | .. q|(). .|
|00005140| 0c 20 c0 03 28 71 28 29 | 29 3a dd 81 20 5c 63 30 |. ..(q()|):.. \c0|
|00005150| 2b dc 86 28 30 29 3a 80 | c1 3a dd 81 20 dc 86 28 |+..(0):.|.:.. ..(|
|00005160| 30 29 00 20 20 20 20 3b | 00 20 20 20 20 be 02 20 |0). ;|. .. |
|00005170| 30 00 20 20 80 c0 00 20 | 20 80 07 00 00 2e 74 65 |0. ... | .....te|
|00005180| 73 74 73 63 72 65 65 6e | 3a 00 20 20 6d 6f 64 65 |stscreen|:. mode|
|00005190| 3d 31 3a 80 06 20 6e 75 | 73 63 72 65 65 6e 00 20 |=1:.. nu|screen. |
|000051a0| 20 80 bb 3a 65 76 2e 6c | 3d c5 02 3a 80 bc 20 65 | ..:ev.l|=..:.. e|
|000051b0| 76 3d 24 31 30 30 00 20 | 20 6d 6f 64 65 3d 30 3a |v=$100. | mode=0:|
|000051c0| 80 06 20 6e 75 73 63 72 | 65 65 6e 00 20 20 80 07 |.. nuscr|een. ..|
|000051d0| 00 00 2e 61 64 64 77 69 | 6e 64 6f 77 3a 00 20 20 |...addwi|ndow:. |
|000051e0| c5 28 3a 80 2c 20 c5 01 | 20 30 3a c5 3b 20 22 22 |.(:., ..| 0:.; ""|
|000051f0| 2c 22 41 44 44 20 57 49 | 4e 44 4f 57 20 42 59 20 |,"ADD WI|NDOW BY |
|00005200| 00 00 00 08 00 00 03 df | 00 00 00 08 00 00 01 e8 |........|........|
|00005210| 00 00 00 2a 7f eb 09 0f | 44 52 41 47 47 49 4e 47 |...*....|DRAGGING|
|00005220| 20 4d 4f 55 53 45 22 00 | 20 20 80 bb 3a 65 76 2e | MOUSE".| ..:ev.|
|00005230| 6c 3d c5 02 3a 80 bc 20 | 65 76 3d 24 38 20 20 20 |l=..:.. |ev=$8 |
|00005240| 20 20 3b 77 61 69 74 20 | 66 6f 72 20 62 75 74 74 | ;wait |for butt|
|00005250| 6f 6e 00 20 20 78 3d cf | 05 3a 79 3d cf 06 00 20 |on. x=.|.:y=... |
|00005260| 20 80 0b 20 c0 08 28 71 | 28 29 29 00 20 20 20 20 | .. ..(q|()). |
|00005270| 71 28 29 5c 6f 62 6a 3d | 30 3a 71 28 29 5c 69 64 |q()\obj=|0:q()\id|
|00005280| 3d 70 5c 6e 75 6d 77 69 | 6e 3a 70 5c 6e 75 6d 77 |=p\numwi|n:p\numw|
|00005290| 69 6e 2b 31 00 20 20 20 | 20 71 28 29 5c 78 3d 78 |in+1. | q()\x=x|
|000052a0| 2c 79 00 20 20 20 20 2a | 77 3d 71 28 29 3a 71 28 |,y. *|w=q():q(|
|000052b0| 29 5c 77 69 6e 3d 2a 77 | 3a 71 28 29 5c 77 69 6e |)\win=*w|:q()\win|
|000052c0| 69 64 3d 2a 77 5c 69 64 | 00 20 20 20 20 64 72 61 |id=*w\id|. dra|
|000052d0| 77 62 6f 78 7b 71 28 29 | 7d 00 20 20 20 20 69 3d |wbox{q()|}. i=|
|000052e0| 37 3a 80 06 20 73 69 7a | 65 6f 62 6a 65 63 74 00 |7:.. siz|eobject.|
|000052f0| 20 20 20 20 80 0b 20 71 | 28 29 5c 63 6f 6e 73 74 | .. q|()\const|
|00005300| 61 6e 74 3d 22 22 20 80 | 21 20 71 28 29 5c 63 6f |ant="" .|! q()\co|
|00005310| 6e 73 74 61 6e 74 3d 22 | 57 22 2b dd 83 28 70 5c |nstant="|W"+..(p\|
|00005320| 6e 75 6d 77 69 6e 29 00 | 20 20 20 20 80 0b 20 61 |numwin).| .. a|
|00005330| 75 74 6f 20 80 21 20 80 | 06 20 65 64 69 74 6f 62 |uto .! .|. editob|
|00005340| 6a 65 63 74 20 80 22 20 | 80 06 20 72 65 64 72 61 |ject ." |.. redra|
|00005350| 77 77 69 6e 64 6f 77 00 | 20 20 80 c0 00 20 20 c5 |wwindow.| ... .|
|00005360| 27 3a 80 2c 20 c5 01 20 | 30 3a c5 3b 20 22 22 2c |':., .. |0:.; "",|
|00005370| 76 65 72 24 3a 80 07 00 | 00 2e 61 64 64 67 61 64 |ver$:...|..addgad|
|00005380| 67 65 74 3a 00 20 20 80 | 0b 20 2a 77 3d 30 20 80 |get:. .|. *w=0 .|
|00005390| 21 20 cf 0d 20 31 3a 80 | 07 00 20 20 c5 28 3a 80 |! .. 1:.|.. .(:.|
|000053a0| 2c 20 c5 01 20 30 3a c5 | 3b 20 22 22 2c 22 41 44 |, .. 0:.|; "","AD|
|000053b0| 44 20 47 41 44 47 45 54 | 20 42 59 20 44 52 41 47 |D GADGET| BY DRAG|
|000053c0| 47 49 4e 47 20 4d 4f 55 | 53 45 22 00 20 20 80 ca |GING MOU|SE". ..|
|000053d0| 20 71 28 29 00 20 20 80 | bb 3a 65 76 2e 6c 3d c5 | q(). .|.:ev.l=.|
|000053e0| 02 3a 80 bc 20 65 76 3d | 24 38 20 20 20 20 20 3b |.:.. ev=|$8 ;|
|000053f0| 77 61 69 74 20 66 6f 72 | 20 62 75 74 74 6f 6e 00 |wait for| button.|
|00005400| 00 00 00 08 00 00 03 df | 00 00 00 09 00 00 01 e8 |........|........|
|00005410| 00 00 00 2b 46 a7 48 f2 | 20 20 78 3d cf 05 3a 79 |...+F.H.| x=..:y|
|00005420| 3d cf 06 00 20 20 c0 04 | 20 71 28 29 00 20 20 80 |=... ..| q(). .|
|00005430| 0c 20 c0 03 28 71 28 29 | 29 00 20 20 20 20 80 0b |. ..(q()|). ..|
|00005440| 20 b4 09 20 28 78 2c 79 | 2c 31 2c 31 2c 5c 78 2c | .. (x,y|,1,1,\x,|
|00005450| 5c 79 2c 5c 77 2c 5c 68 | 29 20 80 42 20 5c 6f 62 |\y,\w,\h|) .B \ob|
|00005460| 6a 3d 30 20 80 21 20 80 | 05 20 67 6f 74 77 69 6e |j=0 .! .|. gotwin|
|00005470| 00 20 20 80 c1 00 20 20 | cf 0d 20 31 3a c5 27 3a |. ... |.. 1:.':|
|00005480| 80 2c 20 c5 01 20 30 3a | c5 3b 20 22 22 2c 76 65 |., .. 0:|.; "",ve|
|00005490| 72 24 3a 80 07 00 67 6f | 74 77 69 6e 3a 00 20 20 |r$:...go|twin:. |
|000054a0| 2a 77 3d 5c 77 69 6e 00 | 20 20 80 0b 20 c0 06 28 |*w=\win.| .. ..(|
|000054b0| 71 28 29 29 00 20 20 20 | 20 71 28 29 5c 6f 62 6a |q()). | q()\obj|
|000054c0| 3d 31 3a 71 28 29 5c 69 | 64 3d 70 5c 6e 75 6d 67 |=1:q()\i|d=p\numg|
|000054d0| 61 64 3a 70 5c 6e 75 6d | 67 61 64 2b 31 00 20 20 |ad:p\num|gad+1. |
|000054e0| 20 20 71 28 29 5c 78 3d | 78 2c 79 00 20 20 20 20 | q()\x=|x,y. |
|000054f0| 71 28 29 5c 77 69 6e 3d | 2a 77 3a 71 28 29 5c 77 |q()\win=|*w:q()\w|
|00005500| 69 6e 69 64 3d 2a 77 5c | 69 64 00 20 20 20 20 71 |inid=*w\|id. q|
|00005510| 28 29 5c 67 74 79 70 65 | 3d 67 74 79 70 65 00 20 |()\gtype|=gtype. |
|00005520| 20 20 20 64 72 61 77 62 | 6f 78 7b 71 28 29 7d 00 | drawb|ox{q()}.|
|00005530| 20 20 20 20 69 3d 37 3a | 80 06 20 73 69 7a 65 6f | i=7:|.. sizeo|
|00005540| 62 6a 65 63 74 00 20 20 | 20 20 80 0b 20 71 28 29 |bject. | .. q()|
|00005550| 5c 63 6f 6e 73 74 61 6e | 74 3d 22 22 20 80 21 20 |\constan|t="" .! |
|00005560| 71 28 29 5c 63 6f 6e 73 | 74 61 6e 74 3d 22 47 22 |q()\cons|tant="G"|
|00005570| 2b dd 83 28 70 5c 6e 75 | 6d 67 61 64 29 00 20 20 |+..(p\nu|mgad). |
|00005580| 20 20 80 0b 20 61 75 74 | 6f 20 80 21 20 80 06 20 | .. aut|o .! .. |
|00005590| 65 64 69 74 6f 62 6a 65 | 63 74 20 80 22 20 80 06 |editobje|ct ." ..|
|000055a0| 20 72 65 64 72 61 77 77 | 69 6e 64 6f 77 00 20 20 | redraww|indow. |
|000055b0| 80 c0 00 20 20 c5 27 3a | 80 2c 20 c5 01 20 30 3a |... .':|., .. 0:|
|000055c0| c5 3b 20 22 22 2c 76 65 | 72 24 3a 80 07 00 00 2e |.; "",ve|r$:.....|
|000055d0| 68 69 74 6f 62 6a 65 63 | 74 3a 00 20 20 80 0b 20 |hitobjec|t:. .. |
|000055e0| c5 22 3d 31 00 20 20 20 | 20 78 3d cf 05 3a 79 3d |."=1. | x=..:y=|
|000055f0| cf 06 00 20 20 20 20 c0 | 04 20 71 28 29 00 20 20 |... .|. q(). |
|00005600| 00 00 00 08 00 00 03 df | 00 00 00 0a 00 00 01 e8 |........|........|
|00005610| 00 00 00 2c 86 7b 49 d2 | 20 20 80 0c 20 c0 03 28 |...,.{I.| .. ..(|
|00005620| 71 28 29 29 20 20 20 20 | 20 3b 63 68 65 63 6b 20 |q()) | ;check |
|00005630| 61 6c 6c 20 68 61 6e 64 | 6c 65 73 00 20 20 20 20 |all hand|les. |
|00005640| 20 20 80 16 20 69 3d 30 | 20 80 18 20 37 00 20 20 | .. i=0| .. 7. |
|00005650| 20 20 20 20 20 20 80 0b | 20 b4 09 20 28 78 2c 79 | ..| .. (x,y|
|00005660| 2c 31 2c 31 2c 71 28 29 | 5c 63 5b 69 5d 5c 78 2c |,1,1,q()|\c[i]\x,|
|00005670| 71 28 29 5c 63 5b 69 5d | 5c 79 2c 38 2c 34 29 00 |q()\c[i]|\y,8,4).|
|00005680| 20 20 20 20 20 20 20 20 | 20 20 2a 77 3d 71 28 29 | | *w=q()|
|00005690| 5c 77 69 6e 3a 74 74 3d | 30 3a 67 3d 30 3a 80 be |\win:tt=|0:g=0:..|
|000056a0| 20 80 16 3a 80 05 20 67 | 6f 74 68 69 74 00 20 20 | ..:.. g|othit. |
|000056b0| 20 20 20 20 20 20 80 c0 | 00 20 20 20 20 20 20 80 | ..|. .|
|000056c0| 17 00 20 20 20 20 80 c1 | 00 20 20 20 20 c0 04 20 |.. ..|. .. |
|000056d0| 71 28 29 00 20 20 20 20 | 80 0c 20 c0 03 28 71 28 |q(). |.. ..(q(|
|000056e0| 29 29 20 20 20 20 20 3b | 63 68 65 63 6b 20 69 6e |)) ;|check in|
|000056f0| 73 69 64 65 20 63 6f 6d | 70 6c 65 74 65 00 20 20 |side com|plete. |
|00005700| 20 20 20 20 80 0b 20 b4 | 09 20 28 78 2c 79 2c 31 | .. .|. (x,y,1|
|00005710| 2c 31 2c 71 28 29 5c 78 | 2c 71 28 29 5c 79 2c 71 |,1,q()\x|,q()\y,q|
|00005720| 28 29 5c 77 2c 71 28 29 | 5c 68 29 00 20 20 20 20 |()\w,q()|\h). |
|00005730| 20 20 20 20 2a 77 3d 71 | 28 29 5c 77 69 6e 3a 74 | *w=q|()\win:t|
|00005740| 74 3d 30 3a 67 3d 30 3a | 69 3d 2d 31 3a 80 05 20 |t=0:g=0:|i=-1:.. |
|00005750| 67 6f 74 68 69 74 00 20 | 20 20 20 20 20 80 c0 00 |gothit. | ...|
|00005760| 20 20 20 20 80 c1 00 20 | 20 80 c0 00 20 20 80 07 | ... | ... ..|
|00005770| 00 00 67 6f 74 68 69 74 | 3a 00 20 20 80 bb 20 20 |..gothit|:. .. |
|00005780| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005790| 20 20 20 20 3b 63 72 75 | 73 74 79 20 64 6f 75 62 | ;cru|sty doub|
|000057a0| 6c 65 20 63 6c 69 63 6b | 20 6d 65 63 68 61 6e 69 |le click| mechani|
|000057b0| 73 6d 00 20 20 20 20 80 | 37 3a 74 74 2b 31 3a 65 |sm. .|7:tt+1:e|
|000057c0| 76 2e 6c 3d c5 03 00 20 | 20 20 20 80 0b 20 65 76 |v.l=... | .. ev|
|000057d0| 3d 38 00 20 20 20 20 20 | 20 80 0b 20 c5 22 3d 31 |=8. | .. ."=1|
|000057e0| 20 80 21 20 80 05 20 65 | 64 69 74 6f 62 6a 65 63 | .! .. e|ditobjec|
|000057f0| 74 20 80 22 20 67 3d 31 | 00 20 20 20 20 80 c0 00 |t ." g=1|. ...|
|00005800| 00 00 00 08 00 00 03 df | 00 00 00 0b 00 00 01 e8 |........|........|
|00005810| 00 00 00 2d a8 af 63 ca | 20 20 80 bc 20 74 74 3d |...-..c.| .. tt=|
|00005820| 31 30 20 80 8a 20 28 65 | 76 3c 3e 38 20 80 42 20 |10 .. (e|v<>8 .B |
|00005830| 65 76 3c 3e 30 20 80 42 | 20 65 76 3c 3e 24 31 30 |ev<>0 .B| ev<>$10|
|00005840| 29 00 20 20 80 0b 20 67 | 3d 30 20 80 21 20 80 06 |). .. g|=0 .! ..|
|00005850| 20 73 69 7a 65 6f 62 6a | 65 63 74 00 20 20 80 06 | sizeobj|ect. ..|
|00005860| 20 72 65 64 72 61 77 77 | 69 6e 64 6f 77 00 20 20 | redraww|indow. |
|00005870| 80 07 00 00 2e 73 69 7a | 65 6f 62 6a 65 63 74 3a |.....siz|eobject:|
|00005880| 00 20 20 80 ca 20 71 28 | 29 00 20 20 80 bb 00 20 |. .. q(|). ... |
|00005890| 20 20 20 65 76 2e 6c 3d | c5 02 00 20 20 20 20 64 | ev.l=|... d|
|000058a0| 72 61 77 62 6f 78 7b 71 | 28 29 7d 00 20 20 20 20 |rawbox{q|()}. |
|000058b0| 6f 78 3d 78 3a 6f 79 3d | 79 3a 78 3d cf 05 3a 79 |ox=x:oy=|y:x=..:y|
|000058c0| 3d cf 06 3a 64 78 3d 78 | 2d 6f 78 3a 64 79 3d 79 |=..:dx=x|-ox:dy=y|
|000058d0| 2d 6f 79 00 20 20 20 20 | 80 0e 20 69 00 20 20 20 |-oy. |.. i. |
|000058e0| 20 20 20 80 0f 20 2d 31 | 3a 5c 78 2b 64 78 3a 5c | .. -1|:\x+dx:\|
|000058f0| 79 2b 64 79 00 20 20 20 | 20 20 20 80 0f 20 30 3a |y+dy. | .. 0:|
|00005900| 5c 78 2b 64 78 3a 5c 79 | 2b 64 79 3a 5c 77 2d 64 |\x+dx:\y|+dy:\w-d|
|00005910| 78 3a 5c 68 2d 64 79 00 | 20 20 20 20 20 20 80 0f |x:\h-dy.| ..|
|00005920| 20 31 3a 5c 79 2b 64 79 | 3a 5c 68 2d 64 79 00 20 | 1:\y+dy|:\h-dy. |
|00005930| 20 20 20 20 20 80 0f 20 | 32 3a 5c 79 2b 64 79 3a | .. |2:\y+dy:|
|00005940| 5c 77 2b 64 78 3a 5c 68 | 2d 64 79 00 20 20 20 20 |\w+dx:\h|-dy. |
|00005950| 20 20 80 0f 20 33 3a 5c | 78 2b 64 78 3a 5c 77 2d | .. 3:\|x+dx:\w-|
|00005960| 64 78 00 20 20 20 20 20 | 20 80 0f 20 34 3a 5c 77 |dx. | .. 4:\w|
|00005970| 2b 64 78 00 20 20 20 20 | 20 20 80 0f 20 35 3a 5c |+dx. | .. 5:\|
|00005980| 78 2b 64 78 3a 5c 77 2d | 64 78 3a 5c 68 2b 64 79 |x+dx:\w-|dx:\h+dy|
|00005990| 00 20 20 20 20 20 20 80 | 0f 20 36 3a 5c 68 2b 64 |. .|. 6:\h+d|
|000059a0| 79 00 20 20 20 20 20 20 | 80 0f 20 37 3a 5c 77 2b |y. |.. 7:\w+|
|000059b0| 64 78 3a 5c 68 2b 64 79 | 00 20 20 20 20 80 02 20 |dx:\h+dy|. .. |
|000059c0| 80 0e 00 20 20 20 20 5c | 77 3d bc 0a 28 5c 77 2c |... \|w=..(\w,|
|000059d0| 31 36 2c 31 30 32 34 29 | 3a 5c 68 3d bc 0a 28 5c |16,1024)|:\h=..(\|
|000059e0| 68 2c 38 2c 31 30 32 34 | 29 00 20 20 20 20 5c 78 |h,8,1024|). \x|
|000059f0| 3d bc 0a 28 5c 78 2c 30 | 2c 70 5c 77 2d 5c 77 29 |=..(\x,0|,p\w-\w)|
|00005a00| 00 00 00 08 00 00 03 df | 00 00 00 0c 00 00 01 e8 |........|........|
|00005a10| 00 00 00 2e ff 8a 71 b7 | 3a 5c 79 3d bc 0a 28 5c |......q.|:\y=..(\|
|00005a20| 79 2c 30 2c 70 5c 68 2d | 5c 68 29 00 20 20 20 20 |y,0,p\h-|\h). |
|00005a30| 64 72 61 77 62 6f 78 7b | 71 28 29 7d 00 20 20 80 |drawbox{|q()}. .|
|00005a40| bc 20 65 76 3d 24 38 00 | 20 20 64 72 61 77 62 6f |. ev=$8.| drawbo|
|00005a50| 78 7b 71 28 29 7d 20 20 | 20 20 20 3b 72 75 62 6f |x{q()} | ;rubo|
|00005a60| 75 74 00 20 20 80 0b 20 | 67 78 20 80 21 20 5c 78 |ut. .. |gx .! \x|
|00005a70| 3d bc 02 28 28 5c 78 2b | 67 78 2f 32 29 2f 67 78 |=..((\x+|gx/2)/gx|
|00005a80| 29 2a 67 78 3a 5c 77 3d | bc 02 28 28 5c 77 2b 67 |)*gx:\w=|..((\w+g|
|00005a90| 78 2f 32 29 2f 67 78 29 | 2a 67 78 00 20 20 80 0b |x/2)/gx)|*gx. ..|
|00005aa0| 20 67 79 20 80 21 20 5c | 79 3d bc 02 28 28 5c 79 | gy .! \|y=..((\y|
|00005ab0| 2b 67 79 2f 32 29 2f 67 | 79 29 2a 67 79 3a 5c 68 |+gy/2)/g|y)*gy:\h|
|00005ac0| 3d bc 02 28 28 5c 68 2b | 67 79 2f 32 29 2f 67 79 |=..((\h+|gy/2)/gy|
|00005ad0| 29 2a 67 79 00 20 20 5c | 78 3d bc 0a 28 5c 78 2c |)*gy. \|x=..(\x,|
|00005ae0| 30 2c 70 5c 77 2d 5c 77 | 29 3a 5c 79 3d bc 0a 28 |0,p\w-\w|):\y=..(|
|00005af0| 5c 79 2c 30 2c 70 5c 68 | 2d 5c 68 29 00 20 20 5c |\y,0,p\h|-\h). \|
|00005b00| 77 3d bc 0a 28 5c 77 2c | 31 36 2c 31 30 32 34 29 |w=..(\w,|16,1024)|
|00005b10| 3a 5c 68 3d bc 0a 28 5c | 68 2c 38 2c 31 30 32 34 |:\h=..(\|h,8,1024|
|00005b20| 29 00 20 20 80 0b 20 5c | 6f 62 6a 3d 31 00 20 20 |). .. \|obj=1. |
|00005b30| 20 20 5c 6f 78 3d 5c 78 | 2d 2a 77 5c 78 3a 5c 6f | \ox=\x|-*w\x:\o|
|00005b40| 79 3d 5c 79 2d 2a 77 5c | 79 00 20 20 20 20 80 0b |y=\y-*w\|y. ..|
|00005b50| 20 5c 67 74 79 70 65 3e | 33 20 80 21 20 5c 6f 79 | \gtype>|3 .! \oy|
|00005b60| 2d 70 5c 68 65 69 67 68 | 74 2d 33 3a 5c 6f 78 2d |-p\heigh|t-3:\ox-|
|00005b70| 34 00 20 20 80 c0 00 20 | 20 80 07 00 00 2e 72 65 |4. ... | .....re|
|00005b80| 64 72 61 77 77 69 6e 64 | 6f 77 3a 00 20 20 80 ca |drawwind|ow:. ..|
|00005b90| 20 2a 77 00 20 20 80 0b | 20 2a 77 3d 30 20 80 21 | *w. ..| *w=0 .!|
|00005ba0| 20 80 07 00 20 20 80 0b | 20 71 28 29 5c 6f 62 6a | ... ..| q()\obj|
|00005bb0| 3d 30 20 80 21 20 2a 77 | 3d 71 28 29 20 80 22 20 |=0 .! *w|=q() ." |
|00005bc0| 2a 77 3d 71 28 29 5c 77 | 69 6e 00 20 20 80 2b 20 |*w=q()\w|in. .+ |
|00005bd0| c5 01 20 2a 77 5c 69 64 | 2b 32 3a 80 2b 20 c6 16 |.. *w\id|+2:.+ ..|
|00005be0| 20 2a 77 5c 69 64 2b 32 | 3a 80 2b 20 c6 81 20 2a | *w\id+2|:.+ .. *|
|00005bf0| 77 5c 69 64 2b 32 00 20 | 20 c0 09 20 71 28 29 3a |w\id+2. | .. q():|
|00005c00| 00 00 00 08 00 00 03 df | 00 00 00 0d 00 00 01 e8 |........|........|
|00005c10| 00 00 00 2f f4 c4 4d ff | 80 06 20 63 61 6c 63 67 |.../..M.|.. calcg|
|00005c20| 61 64 73 3a c0 0a 20 71 | 28 29 00 20 20 80 2c 20 |ads:.. q|(). ., |
|00005c30| cf 01 20 6d 6f 64 65 20 | 20 20 20 3b 30 00 20 20 |.. mode | ;0. |
|00005c40| 3b 00 20 20 5c 78 3d bc | 0a 28 5c 78 2c 30 2c 70 |;. \x=.|.(\x,0,p|
|00005c50| 5c 77 2d 31 36 29 20 20 | 20 20 3b 65 6e 73 75 72 |\w-16) | ;ensur|
|00005c60| 65 20 77 69 6e 64 6f 77 | 20 69 73 20 6c 65 67 61 |e window| is lega|
|00005c70| 6c 00 20 20 5c 79 3d bc | 0a 28 5c 79 2c 30 2c 70 |l. \y=.|.(\y,0,p|
|00005c80| 5c 68 2d 34 29 00 20 20 | 5c 77 3d bc 0a 28 5c 77 |\h-4). |\w=..(\w|
|00005c90| 2c 30 2c 70 5c 77 2d 5c | 78 29 00 20 20 5c 68 3d |,0,p\w-\|x). \h=|
|00005ca0| bc 0a 28 5c 68 2c 30 2c | 70 5c 68 2d 5c 79 29 00 |..(\h,0,|p\h-\y).|
|00005cb0| 20 20 3b 00 20 20 c5 01 | 20 5c 69 64 2b 32 2c 5c | ;. ..| \id+2,\|
|00005cc0| 78 2c 5c 79 2c 5c 77 2c | 5c 68 2c 5c 67 66 6c 61 |x,\y,\w,|\h,\gfla|
|00005cd0| 67 73 2c 5c 67 73 74 72 | 69 6e 67 2c 31 2c 32 2c |gs,\gstr|ing,1,2,|
|00005ce0| 5c 69 64 2b 32 3a c4 02 | 20 6d 6f 64 65 00 20 20 |\id+2:..| mode. |
|00005cf0| c6 8e 20 5c 69 64 2b 32 | 2c 5c 69 64 2b 32 00 20 |.. \id+2|,\id+2. |
|00005d00| 20 80 0b 20 6d 6f 64 65 | 3d 30 00 20 20 20 20 c0 | .. mode|=0. .|
|00005d10| 09 20 71 28 29 00 20 20 | 20 20 c0 04 20 71 28 29 |. q(). | .. q()|
|00005d20| 3a 80 ca 20 71 28 29 00 | 20 20 20 20 80 0c 20 c0 |:.. q().| .. .|
|00005d30| 03 28 71 28 29 29 00 20 | 20 20 20 20 20 80 0b 20 |.(q()). | .. |
|00005d40| 5c 77 69 6e 3d 2a 77 00 | 20 20 20 20 20 20 20 20 |\win=*w.| |
|00005d50| 5c 78 3d 2a 77 5c 78 2b | 5c 6f 78 3a 5c 79 3d 2a |\x=*w\x+|\ox:\y=*|
|00005d60| 77 5c 79 2b 5c 6f 79 00 | 20 20 20 20 20 20 20 20 |w\y+\oy.| |
|00005d70| 80 0b 20 5c 67 74 79 70 | 65 3e 33 20 80 21 20 5c |.. \gtyp|e>3 .! \|
|00005d80| 79 2b 70 5c 68 65 69 67 | 68 74 2b 33 3a 5c 78 2b |y+p\heig|ht+3:\x+|
|00005d90| 34 00 20 20 20 20 20 20 | 20 20 64 72 61 77 62 6f |4. | drawbo|
|00005da0| 78 7b 71 28 29 7d 00 20 | 20 20 20 20 20 80 c0 00 |x{q()}. | ...|
|00005db0| 20 20 20 20 80 c1 00 20 | 20 20 20 c0 0a 20 71 28 | ... | .. q(|
|00005dc0| 29 00 20 20 80 c0 00 20 | 20 80 07 00 00 80 09 2e |). ... | .......|
|00005dd0| 73 20 74 6f 74 70 61 72 | 73 7b 2a 71 2e 6f 62 6a |s totpar|s{*q.obj|
|00005de0| 7d 20 3b 63 72 65 61 74 | 65 20 7c 20 73 65 70 61 |} ;creat|e | sepa|
|00005df0| 72 61 74 65 64 20 70 61 | 72 24 00 20 20 80 ca 20 |rated pa|r$. .. |
|00005e00| 00 00 00 08 00 00 03 df | 00 00 00 0e 00 00 01 e8 |........|........|
|00005e10| 00 00 00 30 5a 1a 59 ec | 2a 71 00 20 20 6d 61 78 |...0Z.Y.|*q. max|
|00005e20| 3d 30 3a 70 24 3d 22 22 | 3a 6e 3d 30 00 20 20 80 |=0:p$=""|:n=0. .|
|00005e30| 16 20 69 3d 30 20 80 18 | 20 37 00 20 20 20 20 6c |. i=0 ..| 7. l|
|00005e40| 3d dc 8f 28 5c 70 61 72 | 73 5b 69 5d 29 3a 80 0b |=..(\par|s[i]):..|
|00005e50| 20 6c 3e 30 20 80 21 20 | 6e 3d 69 00 20 20 20 20 | l>0 .! |n=i. |
|00005e60| 80 0b 20 6c 20 3e 20 6d | 61 78 20 80 21 20 6d 61 |.. l > m|ax .! ma|
|00005e70| 78 3d dc 8f 28 5c 70 61 | 72 73 5b 69 5d 29 00 20 |x=..(\pa|rs[i]). |
|00005e80| 20 80 17 00 20 20 80 0b | 20 6e 3e 30 00 20 20 20 | ... ..| n>0. |
|00005e90| 20 80 16 20 69 3d 30 20 | 80 18 20 6e 3a 70 24 2b | .. i=0 |.. n:p$+|
|00005ea0| 22 7c 22 2b dc 96 28 5c | 70 61 72 73 5b 69 5d 2c |"|"+..(\|pars[i],|
|00005eb0| 6d 61 78 29 3a 80 17 3a | 70 24 3d dc 83 28 70 24 |max):..:|p$=..(p$|
|00005ec0| 2c 32 29 00 20 20 80 22 | 00 20 20 20 20 70 24 3d |,2). ."|. p$=|
|00005ed0| 5c 70 61 72 73 5b 30 5d | 00 20 20 80 c0 00 20 20 |\pars[0]|. ... |
|00005ee0| 80 09 20 80 07 20 70 24 | 00 80 02 20 80 09 00 00 |.. .. p$|... ....|
|00005ef0| 3b 74 6f 67 67 6c 65 7c | 70 6f 73 30 2d 33 7c 73 |;toggle||pos0-3|s|
|00005f00| 65 6c 65 63 74 7c 73 6c | 69 64 65 72 7c 70 72 6f |elect|sl|ider|pro|
|00005f10| 70 62 6f 78 7c 6d 78 7c | 67 30 30 7c 67 74 6c 61 |pbox|mx||g00|gtla|
|00005f20| 62 6c 30 2d 33 7c 62 72 | 64 72 30 2e 2e 33 7c 67 |bl0-3|br|dr0..3|g|
|00005f30| 74 30 2e 2e 33 00 3b 20 | 20 30 20 20 20 20 20 20 |t0..3.; | 0 |
|00005f40| 20 31 20 20 20 20 20 20 | 32 20 20 20 20 20 20 33 | 1 |2 3|
|00005f50| 20 20 20 20 20 20 20 34 | 20 20 20 35 20 20 20 36 | 4| 5 6|
|00005f60| 20 20 20 20 20 20 37 20 | 20 20 20 20 20 38 2d 31 | 7 | 8-1|
|00005f70| 31 20 20 20 20 31 32 2d | 31 34 00 00 80 ca 20 71 |1 12-|14.... q|
|00005f80| 28 29 00 80 0d 20 70 32 | 20 dd 83 28 60 31 29 2b |()... p2| ..(`1)+|
|00005f90| 22 2c 22 2b dd 83 28 60 | 32 29 3a 80 02 20 80 0d |","+..(`|2):.. ..|
|00005fa0| 00 80 0d 20 70 33 20 dd | 83 28 60 31 29 2b 22 2c |... p3 .|.(`1)+",|
|00005fb0| 22 2b dd 83 28 60 32 29 | 2b 22 2c 22 2b dd 83 28 |"+..(`2)|+","+..(|
|00005fc0| 60 33 29 3a 80 02 20 80 | 0d 00 80 0d 20 70 34 20 |`3):.. .|.... p4 |
|00005fd0| dd 83 28 60 31 29 2b 22 | 2c 22 2b dd 83 28 60 32 |..(`1)+"|,"+..(`2|
|00005fe0| 29 2b 22 2c 22 2b dd 83 | 28 60 33 29 2b 22 2c 22 |)+","+..|(`3)+","|
|00005ff0| 2b dd 83 28 60 34 29 3a | 80 02 20 80 0d 00 80 0d |+..(`4):|.. .....|
|00006000| 00 00 00 08 00 00 03 df | 00 00 00 0f 00 00 01 e8 |........|........|
|00006010| 00 00 00 31 46 05 ad 5e | 20 67 74 20 77 77 24 2b |...1F..^| gt ww$+|
|00006020| 67 67 24 2b 21 70 34 7b | 5c 6f 78 2c 5c 6f 79 2c |gg$+!p4{|\ox,\oy,|
|00006030| 5c 77 2c 5c 68 7d 2b 22 | 2c 22 2b 71 24 2b 5c 6c |\w,\h}+"|,"+q$+\l|
|00006040| 61 62 65 6c 2b 71 24 2b | 22 2c 22 2b dd 83 28 5c |abel+q$+|","+..(\|
|00006050| 67 66 6c 61 67 73 29 3a | 80 02 20 80 0d 00 00 2e |gflags):|.. .....|
|00006060| 63 61 6c 63 67 61 64 73 | 3a 00 20 20 80 ca 20 71 |calcgads|:. .. q|
|00006070| 28 29 00 20 20 67 74 3d | 30 3a 62 62 3d 30 3a 77 |(). gt=|0:bb=0:w|
|00006080| 77 24 3d 22 20 23 22 2b | 2a 77 5c 63 6f 6e 73 74 |w$=" #"+|*w\const|
|00006090| 61 6e 74 2b 22 2c 22 00 | 20 20 c0 04 20 71 28 29 |ant+",".| .. q()|
|000060a0| 00 20 20 80 0c 20 c0 03 | 28 71 28 29 29 00 20 20 |. .. ..|(q()). |
|000060b0| 20 20 80 0b 20 5c 6f 62 | 6a 3d 31 20 80 42 20 5c | .. \ob|j=1 .B \|
|000060c0| 77 69 6e 3d 2a 77 00 20 | 20 20 20 20 20 67 67 24 |win=*w. | gg$|
|000060d0| 3d 22 23 22 2b 5c 63 6f | 6e 73 74 61 6e 74 2b 22 |="#"+\co|nstant+"|
|000060e0| 2c 22 00 20 20 20 20 20 | 20 80 0b 20 5c 67 74 79 |,". | .. \gty|
|000060f0| 70 65 3e 33 20 20 20 20 | 20 20 20 20 3b 67 61 64 |pe>3 | ;gad|
|00006100| 74 6f 6f 6c 73 21 00 20 | 20 20 20 20 20 20 20 67 |tools!. | g|
|00006110| 74 2b 31 00 20 20 20 20 | 20 20 20 20 5c 67 66 6c |t+1. | \gfl|
|00006120| 61 67 73 3d 32 5e 5c 66 | 6c 61 67 73 5b 37 5d 2b |ags=2^\f|lags[7]+|
|00006130| 5c 66 6c 61 67 73 5b 31 | 32 5d 2a 24 32 30 2b 5c |\flags[1|2]*$20+\|
|00006140| 66 6c 61 67 73 5b 31 33 | 5d 2a 24 38 30 2b 5c 66 |flags[13|]*$80+\f|
|00006150| 6c 61 67 73 5b 31 34 5d | 2a 24 31 30 30 00 20 20 |lags[14]|*$100. |
|00006160| 20 20 20 20 80 22 00 20 | 20 20 20 20 20 20 20 62 | .". | b|
|00006170| 62 2b 31 00 20 20 20 20 | 20 20 80 c0 00 20 20 20 |b+1. | ... |
|00006180| 20 20 20 80 0e 20 5c 67 | 74 79 70 65 00 20 20 20 | .. \g|type. |
|00006190| 20 20 20 20 20 80 0f 20 | 30 00 20 20 20 20 20 20 | .. |0. |
|000061a0| 20 20 20 20 5c 67 66 6c | 61 67 73 3d 5c 66 6c 61 | \gfl|ags=\fla|
|000061b0| 67 73 5b 30 5d 2b 5c 66 | 6c 61 67 73 5b 31 5d 2a |gs[0]+\f|lags[1]*|
|000061c0| 32 2b 5c 66 6c 61 67 73 | 5b 32 5d 2a 33 32 00 20 |2+\flags|[2]*32. |
|000061d0| 20 20 20 20 20 20 20 20 | 20 5c 67 73 74 72 69 6e | | \gstrin|
|000061e0| 67 3d 74 6f 74 70 61 72 | 73 7b 71 28 29 7d 3a 80 |g=totpar|s{q()}:.|
|000061f0| 0b 20 5c 67 73 74 72 69 | 6e 67 3d 22 22 20 80 21 |. \gstri|ng="" .!|
|00006200| 00 00 00 08 00 00 03 df | 00 00 00 10 00 00 01 e8 |........|........|
|00006210| 00 00 00 32 ac c3 f9 a0 | 20 5c 67 73 74 72 69 6e |...2....| \gstrin|
|00006220| 67 3d 22 20 22 00 20 20 | 20 20 20 20 20 20 20 20 |g=" ". | |
|00006230| c6 01 20 2a 77 5c 69 64 | 2b 32 2c 5c 6f 78 2c 5c |.. *w\id|+2,\ox,\|
|00006240| 6f 79 2c 5c 67 66 6c 61 | 67 73 2c 5c 69 64 2c 5c |oy,\gfla|gs,\id,\|
|00006250| 67 73 74 72 69 6e 67 00 | 20 20 20 20 20 20 20 20 |gstring.| |
|00006260| 20 20 5c 63 30 3d dc 8b | 28 24 63 36 30 31 29 2b | \c0=..|($c601)+|
|00006270| 77 77 24 2b 21 70 33 7b | 5c 6f 78 2c 5c 6f 79 2c |ww$+!p3{|\ox,\oy,|
|00006280| 5c 67 66 6c 61 67 73 7d | 2b 22 2c 22 2b 67 67 24 |\gflags}|+","+gg$|
|00006290| 2b 71 24 2b 5c 67 73 74 | 72 69 6e 67 2b 71 24 00 |+q$+\gst|ring+q$.|
|000062a0| 20 20 20 20 20 20 20 20 | 80 0f 20 31 00 20 20 20 | |.. 1. |
|000062b0| 20 20 20 20 20 20 20 5c | 67 66 6c 61 67 73 3d 5c | \|gflags=\|
|000062c0| 66 6c 61 67 73 5b 31 5d | 2a 32 2b 5c 66 6c 61 67 |flags[1]|*2+\flag|
|000062d0| 73 5b 32 5d 2a 33 32 3a | 6e 30 3d 5c 6e 61 72 73 |s[2]*32:|n0=\nars|
|000062e0| 5b 30 5d 3a 80 0b 20 6e | 30 3d 30 20 80 21 20 6e |[0]:.. n|0=0 .! n|
|000062f0| 30 3d 31 00 20 20 20 20 | 20 20 20 20 20 20 77 77 |0=1. | ww|
|00006300| 3d 5c 77 2d 62 78 2d 62 | 78 00 20 20 20 20 20 20 |=\w-bx-b|x. |
|00006310| 20 20 20 20 c6 02 20 2a | 77 5c 69 64 2b 32 2c 5c | .. *|w\id+2,\|
|00006320| 6f 78 2c 5c 6f 79 2c 5c | 67 66 6c 61 67 73 2c 5c |ox,\oy,\|gflags,\|
|00006330| 69 64 2c 6e 30 2c 77 77 | 00 20 20 20 20 20 20 20 |id,n0,ww|. |
|00006340| 20 20 20 5c 63 30 3d dc | 8b 28 24 63 36 30 32 29 | \c0=.|.($c602)|
|00006350| 2b 77 77 24 2b 21 70 33 | 7b 5c 6f 78 2c 5c 6f 79 |+ww$+!p3|{\ox,\oy|
|00006360| 2c 5c 67 66 6c 61 67 73 | 7d 2b 22 2c 22 2b 67 67 |,\gflags|}+","+gg|
|00006370| 24 2b 21 70 32 7b 6e 30 | 2c 77 77 7d 00 20 20 20 |$+!p2{n0|,ww}. |
|00006380| 20 20 20 20 20 80 0f 20 | 32 00 20 20 20 20 20 20 | .. |2. |
|00006390| 20 20 20 20 5c 67 66 6c | 61 67 73 3d 5c 66 6c 61 | \gfl|ags=\fla|
|000063a0| 67 73 5b 31 5d 2a 32 2b | 5c 66 6c 61 67 73 5b 32 |gs[1]*2+|\flags[2|
|000063b0| 5d 2a 33 32 2b 28 5c 66 | 6c 61 67 73 5b 33 5d 2b |]*32+(\f|lags[3]+|
|000063c0| 31 29 2a 36 34 2b 5c 66 | 6c 61 67 73 5b 34 5d 2a |1)*64+\f|lags[4]*|
|000063d0| 32 35 36 00 20 20 20 20 | 20 20 20 20 20 20 c6 03 |256. | ..|
|000063e0| 20 2a 77 5c 69 64 2b 32 | 2c 5c 6f 78 2c 5c 6f 79 | *w\id+2|,\ox,\oy|
|000063f0| 2c 5c 67 66 6c 61 67 73 | 2c 5c 69 64 2c 5c 77 2c |,\gflags|,\id,\w,|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.