home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / program / basic / basic86 < prev    next >
ArcFS Archive  |  1995-10-01  |  6.8 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: ArcFS Archive (archive/arcFS).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | fc 00 00 00 5c 01 00 00 |Archive.|....\...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|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| 82 21 42 61 73 69 63 38 | 36 00 00 00 ff ff ff ff |.!Basic8|6.......|
|00000070| 41 fd ff ff b5 09 c5 29 | 30 00 00 00 ff ff ff ff |A......)|0.......|
|00000080| d8 00 00 80 82 21 48 65 | 6c 70 00 00 77 77 77 77 |.....!He|lp..wwww|
|00000090| 61 04 00 00 43 ff ff ff | bc ed ea 5b 03 00 77 a6 |a...C...|...[..w.|
|000000a0| 61 04 00 00 24 00 00 00 | 82 21 52 75 6e 00 00 00 |a...$...|.!Run...|
|000000b0| 77 77 77 77 2a 00 00 00 | 42 eb ff ff 90 38 d1 db |wwww*...|B....8..|
|000000c0| 03 00 7f 16 2a 00 00 00 | a9 04 00 00 82 21 52 75 |....*...|.....!Ru|
|000000d0| 6e 49 6d 61 67 65 00 77 | ad 12 00 00 42 fb ff ff |nImage.w|....B...|
|000000e0| da 43 d1 db 03 00 a1 b5 | ad 12 00 00 f7 04 00 00 |.C......|........|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 77 77 0c 02 00 00 |.!Sprite|s.ww....|
|00000100| 42 f9 ff ff 74 3b d1 db | 03 00 f7 d7 0c 02 00 00 |B...t;..|........|
|00000110| c8 17 00 00 00 00 00 01 | 18 00 00 00 77 77 77 77 |........|....wwww|
|00000120| 77 77 77 77 77 77 77 77 | 77 77 07 00 00 00 00 00 |wwwwwwww|ww......|
|00000130| e0 00 00 00 dc 98 9a 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 | f8 01 00 00 46 69 6c 65 |........|....File|
|00000160| 44 61 74 61 82 21 48 65 | 6c 70 00 00 77 77 77 77 |Data.!He|lp..wwww|
|00000170| 61 04 00 00 43 ff ff ff | bc ed ea 5b 03 00 77 a6 |a...C...|...[..w.|
|00000180| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 20 20 20 |********|****. |
|000001d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000001e0| 20 20 20 21 48 65 6c 70 | 20 66 69 6c 65 20 66 6f | !Help| file fo|
|000001f0| 72 20 21 42 61 73 69 63 | 38 36 0a 20 20 20 20 20 |r !Basic|86. |
|00000200| 20 20 20 20 20 20 42 69 | 67 20 50 68 69 6c 20 53 | Bi|g Phil S|
|00000210| 68 69 72 6c 65 79 2c 20 | 44 61 76 65 20 27 74 68 |hirley, |Dave 'th|
|00000220| 65 20 50 6f 69 6b 27 20 | 48 65 72 6e 65 2c 20 20 |e Poik' |Herne, |
|00000230| 20 20 4a 75 6c 79 20 27 | 39 30 0a 2a 2a 2a 2a 2a | July '|90.*****|
|00000240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000250| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000260| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000270| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000280| 2a 2a 2a 2a 2a 2a 2a 0a | 0a 57 48 41 54 20 49 54 |*******.|.WHAT IT|
|00000290| 20 44 4f 45 53 0a 20 20 | 20 20 20 20 41 73 20 74 | DOES. | As t|
|000002a0| 68 65 20 69 63 6f 6e 20 | 73 75 67 67 65 73 74 73 |he icon |suggests|
|000002b0| 20 62 75 74 20 74 68 65 | 20 6e 61 6d 65 20 64 6f | but the| name do|
|000002c0| 65 73 6e 27 74 20 28 73 | 75 62 74 6c 65 2c 20 65 |esn't (s|ubtle, e|
|000002d0| 68 3f 29 20 74 68 69 73 | 20 70 72 6f 67 72 61 6d |h?) this| program|
|000002e0| 0a 74 61 6b 65 73 20 42 | 61 73 69 63 38 36 20 66 |.takes B|asic86 f|
|000002f0| 69 6c 65 73 20 61 6e 64 | 20 63 6f 6e 76 65 72 74 |iles and| convert|
|00000300| 73 20 74 68 65 6d 20 74 | 6f 20 74 72 75 65 20 42 |s them t|o true B|
|00000310| 42 43 20 42 61 73 69 63 | 20 63 6f 64 65 2e 20 42 |BC Basic| code. B|
|00000320| 61 73 69 63 20 38 36 20 | 69 73 0a 74 68 65 20 76 |asic 86 |is.the v|
|00000330| 65 72 73 69 6f 6e 20 6f | 66 20 42 42 43 20 42 61 |ersion o|f BBC Ba|
|00000340| 73 69 63 20 75 73 65 64 | 20 6f 6e 20 74 68 65 20 |sic used| on the |
|00000350| 50 43 2c 20 61 6e 64 20 | 65 73 70 65 63 69 61 6c |PC, and |especial|
|00000360| 6c 79 20 74 68 65 20 52 | 4d 20 4e 69 6d 62 75 73 |ly the R|M Nimbus|
|00000370| 20 69 6e 0a 73 63 68 6f | 6f 6c 73 2c 20 77 68 69 | in.scho|ols, whi|
|00000380| 63 68 20 77 61 73 20 6f | 75 72 20 6d 6f 74 69 76 |ch was o|ur motiv|
|00000390| 65 20 66 6f 72 20 77 72 | 69 74 69 6e 67 20 69 74 |e for wr|iting it|
|000003a0| 2e 20 59 6f 75 20 77 69 | 6c 6c 20 6e 65 65 64 20 |. You wi|ll need |
|000003b0| 74 6f 20 68 61 76 65 0a | 74 72 61 6e 73 66 65 72 |to have.|transfer|
|000003c0| 72 65 64 20 74 68 65 20 | 66 69 6c 65 28 73 29 20 |red the |file(s) |
|000003d0| 79 6f 75 20 77 69 73 68 | 20 74 6f 20 63 6f 6e 76 |you wish| to conv|
|000003e0| 65 72 74 20 74 6f 20 74 | 68 65 20 41 72 63 20 62 |ert to t|he Arc b|
|000003f0| 79 20 61 20 73 75 69 74 | 61 62 6c 65 20 6d 65 74 |y a suit|able met|
|00000400| 68 6f 64 0a 28 69 65 20 | 73 65 72 69 61 6c 20 6c |hod.(ie |serial l|
|00000410| 69 6e 6b 2c 20 6f 72 20 | 76 69 61 20 50 43 44 69 |ink, or |via PCDi|
|00000420| 72 20 6f 72 20 4d 75 6c | 74 69 46 53 2c 20 4e 4f |r or Mul|tiFS, NO|
|00000430| 54 20 62 79 20 64 69 63 | 74 61 74 69 6f 6e 20 64 |T by dic|tation d|
|00000440| 6f 77 6e 20 74 68 65 20 | 27 70 68 6f 6e 65 0a 6f |own the |'phone.o|
|00000450| 72 20 74 72 61 6e 73 63 | 72 69 62 69 6e 67 20 61 |r transc|ribing a|
|00000460| 20 68 65 78 20 64 75 6d | 70 2e 2e 2e 29 20 54 68 | hex dum|p...) Th|
|00000470| 65 6e 20 64 72 61 67 20 | 79 6f 75 72 20 66 69 6c |en drag |your fil|
|00000480| 65 20 6f 6e 74 6f 20 74 | 68 65 20 42 61 73 69 63 |e onto t|he Basic|
|00000490| 38 36 20 69 63 6f 6e 20 | 61 6e 64 0a 64 72 61 67 |86 icon |and.drag|
|000004a0| 20 74 68 65 20 73 61 76 | 65 62 6f 78 20 74 6f 20 | the sav|ebox to |
|000004b0| 61 20 64 65 73 74 69 6e | 61 74 69 6f 6e 20 66 69 |a destin|ation fi|
|000004c0| 6c 65 72 20 77 69 6e 64 | 6f 77 2e 20 45 6e 64 20 |ler wind|ow. End |
|000004d0| 6f 66 20 70 72 6f 63 65 | 73 73 2e 20 46 69 6c 65 |of proce|ss. File|
|000004e0| 20 69 73 20 6e 6f 77 0a | 63 6f 6e 76 65 72 74 65 | is now.|converte|
|000004f0| 64 2e 20 4e 6f 20 65 72 | 72 6f 72 20 63 68 65 63 |d. No er|ror chec|
|00000500| 6b 69 6e 67 2c 20 73 6f | 20 64 6f 6e 27 74 20 62 |king, so| don't b|
|00000510| 65 20 61 20 62 75 72 6b | 20 61 6e 64 20 67 69 76 |e a burk| and giv|
|00000520| 65 20 69 74 20 49 6d 70 | 72 65 73 73 69 6f 6e 0a |e it Imp|ression.|
|00000530| 64 6f 63 75 6d 65 6e 74 | 73 20 74 6f 20 63 6f 6e |document|s to con|
|00000540| 76 65 72 74 20 6f 72 20 | 61 6e 79 74 68 69 6e 67 |vert or |anything|
|00000550| 2e 0a 0a 54 68 69 73 20 | 70 72 6f 67 72 61 6d 20 |...This |program |
|00000560| 69 73 20 70 75 62 6c 69 | 63 20 64 6f 6d 61 69 6e |is publi|c domain|
|00000570| 2c 20 61 6e 64 20 61 73 | 20 73 75 63 68 20 6d 61 |, and as| such ma|
|00000580| 79 20 62 65 20 66 72 65 | 65 6c 79 20 63 6f 70 69 |y be fre|ely copi|
|00000590| 65 64 20 61 6e 64 0a 64 | 69 73 74 72 69 62 75 74 |ed and.d|istribut|
|000005a0| 65 64 2c 20 70 72 6f 76 | 69 64 65 64 20 61 6c 6c |ed, prov|ided all|
|000005b0| 20 66 69 6c 65 73 20 61 | 72 65 20 70 72 65 73 65 | files a|re prese|
|000005c0| 72 76 65 64 2c 20 69 6e | 63 6c 75 64 69 6e 67 20 |rved, in|cluding |
|000005d0| 74 68 69 73 20 21 48 65 | 6c 70 20 66 69 6c 65 2e |this !He|lp file.|
|000005e0| 0a 46 69 6c 65 44 61 74 | 61 82 21 52 75 6e 00 00 |.FileDat|a.!Run..|
|000005f0| 00 77 77 77 77 2a 00 00 | 00 42 eb ff ff 90 38 d1 |.wwww*..|.B....8.|
|00000600| db 03 00 7f 16 57 69 6d | 70 53 6c 6f 74 20 31 36 |.....Wim|pSlot 16|
|00000610| 4b 20 31 36 4b 0a 52 75 | 6e 20 3c 4f 62 65 79 24 |K 16K.Ru|n <Obey$|
|00000620| 44 69 72 3e 2e 21 52 75 | 6e 49 6d 61 67 65 0a 46 |Dir>.!Ru|nImage.F|
|00000630| 69 6c 65 44 61 74 61 82 | 21 52 75 6e 49 6d 61 67 |ileData.|!RunImag|
|00000640| 65 00 77 ad 12 00 00 42 | fb ff ff da 43 d1 db 03 |e.w....B|....C...|
|00000650| 00 a1 b5 0d 00 00 0f f4 | 3e 21 52 75 6e 49 6d 61 |........|>!RunIma|
|00000660| 67 65 0d 00 5a 14 de 20 | 54 24 28 31 32 38 29 3a |ge..Z.. |T$(128):|
|00000670| f2 74 6f 6b 65 6e 0d 00 | 64 22 de 20 62 6c 6f 63 |.token..|d". bloc|
|00000680| 6b 20 32 35 36 2c 6d 65 | 6e 75 20 35 30 2c 6f 6c |k 256,me|nu 50,ol|
|00000690| 64 62 6c 6b 20 31 30 30 | 0d 00 6e 44 24 62 6c 6f |dblk 100|..nD$blo|
|000006a0| 63 6b 3d 22 54 41 53 4b | 22 3a c8 99 20 22 57 69 |ck="TASK|":.. "Wi|
|000006b0| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|000006c0| 30 30 2c 21 62 6c 6f 63 | 6b 2c 22 42 61 73 69 63 |00,!bloc|k,"Basic|
|000006d0| 38 36 74 6f 35 22 20 b8 | 20 2c 75 73 0d 00 78 22 |86to5" .| ,us..x"|
|000006e0| 66 69 6c 65 3d a4 77 69 | 6e 64 6f 77 3a de 20 6f |file=.wi|ndow:. o|
|000006f0| 6b 73 20 32 3a 24 6f 6b | 73 3d 22 4f 4b 22 0d 00 |ks 2:$ok|s="OK"..|
|00000700| 82 36 6f 6b 3d a4 69 63 | 6f 6e 28 66 69 6c 65 2c |.6ok=.ic|on(file,|
|00000710| 31 39 32 2c 2d 31 36 30 | 2c 32 33 38 2c 2d 31 31 |192,-160|,238,-11|
|00000720| 32 2c 26 43 37 30 31 39 | 31 33 44 2c 6f 6b 73 2c |2,&C7019|13D,oks,|
|00000730| 30 2c 33 29 0d 00 8c 21 | de 20 66 6e 61 6d 65 20 |0,3)...!|. fname |
|00000740| 32 35 35 2c 76 61 6c 69 | 64 20 33 2c 73 70 72 69 |255,vali|d 3,spri|
|00000750| 74 65 20 32 30 0d 00 96 | 10 24 76 61 6c 69 64 3d |te 20...|.$valid=|
|00000760| 22 61 7e 20 22 0d 00 a0 | 3e 6e 61 6d 65 3d a4 69 |"a~ "...|>name=.i|
|00000770| 63 6f 6e 28 66 69 6c 65 | 2c 31 30 2c 2d 31 36 30 |con(file|,10,-160|
|00000780| 2c 31 38 36 2c 2d 31 31 | 32 2c 26 37 30 30 46 31 |,186,-11|2,&700F1|
|00000790| 33 44 2c 66 6e 61 6d 65 | 2c 76 61 6c 69 64 2c 32 |3D,fname|,valid,2|
|000007a0| 35 36 29 0d 00 aa 3a 66 | 69 63 6f 6e 3d a4 69 63 |56)...:f|icon=.ic|
|000007b0| 6f 6e 28 66 69 6c 65 2c | 37 38 2c 2d 39 32 2c 31 |on(file,|78,-92,1|
|000007c0| 34 36 2c 2d 32 30 2c 26 | 44 37 30 30 36 31 30 32 |46,-20,&|D7006102|
|000007d0| 2c 73 70 72 69 74 65 2c | 31 2c 32 30 29 0d 00 b4 |,sprite,|1,20)...|
|000007e0| 24 de 20 73 70 72 69 74 | 65 32 20 32 30 3a 24 73 |$. sprit|e2 20:$s|
|000007f0| 70 72 69 74 65 32 3d 22 | 21 42 61 73 69 63 38 36 |prite2="|!Basic86|
|00000800| 22 0d 00 be 30 73 69 63 | 6f 6e 3d a4 69 63 6f 6e |"...0sic|on=.icon|
|00000810| 28 2d 31 2c 30 2c 30 2c | 36 38 2c 36 38 2c 26 33 |(-1,0,0,|68,68,&3|
|00000820| 31 30 32 2c 73 70 72 69 | 74 65 32 2c 31 2c 32 30 |102,spri|te2,1,20|
|00000830| 29 0d 00 c8 13 71 75 69 | 74 3d a3 3a 6d 79 72 65 |)....qui|t=.:myre|
|00000840| 66 3d 2d 31 0d 00 d2 0d | ee 85 20 f2 65 72 72 6f |f=-1....|.. .erro|
|00000850| 72 0d 00 dc 05 f5 0d 00 | e6 23 c8 99 20 22 57 69 |r.......|.#.. "Wi|
|00000860| 6d 70 5f 50 6f 6c 6c 22 | 2c 31 2c 62 6c 6f 63 6b |mp_Poll"|,1,block|
|00000870| 20 b8 20 72 65 61 73 6f | 6e 0d 00 f0 0f c8 8e 20 | . reaso|n...... |
|00000880| 72 65 61 73 6f 6e 20 ca | 0d 00 fa 23 c9 20 32 3a |reason .|...#. 2:|
|00000890| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|000008a0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 0d 01 04 17 c9 |dow",,bl|ock.....|
|000008b0| 20 36 3a f2 62 75 74 74 | 6f 6e 73 28 62 6c 6f 63 | 6:.butt|ons(bloc|
|000008c0| 6b 29 0d 01 0e 11 c9 20 | 37 3a f2 64 72 61 67 64 |k)..... |7:.dragd|
|000008d0| 6f 6e 65 0d 01 18 16 c9 | 20 38 3a f2 6b 65 79 28 |one.....| 8:.key(|
|000008e0| 62 6c 6f 63 6b 21 32 34 | 29 0d 01 22 0e c9 20 39 |block!24|)..".. 9|
|000008f0| 3a 71 75 69 74 3d b9 0d | 01 2c 1b c9 20 31 37 2c |:quit=..|.,.. 17,|
|00000900| 31 38 3a f2 72 65 63 65 | 69 76 65 28 62 6c 6f 63 |18:.rece|ive(bloc|
|00000910| 6b 29 0d 01 36 09 c9 20 | 31 39 3a 0d 01 40 05 cb |k)..6.. |19:..@..|
|00000920| 0d 01 4a 0a fd 20 71 75 | 69 74 0d 01 54 17 c8 99 |..J.. qu|it..T...|
|00000930| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e | "Wimp_C|loseDown|
|00000940| 22 0d 01 5e 05 e0 0d 01 | 72 10 dd f2 72 65 63 65 |"..^....|r...rece|
|00000950| 69 76 65 28 62 29 0d 01 | 7c 0d c8 8e 20 62 21 31 |ive(b)..||... b!1|
|00000960| 36 20 ca 0d 01 86 0e c9 | 20 30 3a 71 75 69 74 3d |6 ......| 0:quit=|
|00000970| b9 0d 01 90 08 c9 20 31 | 3a 0d 01 9a 14 c9 20 32 |...... 1|:..... 2|
|00000980| 3a f2 64 61 74 61 73 61 | 76 65 28 62 29 0d 01 a4 |:.datasa|ve(b)...|
|00000990| 14 c9 20 33 3a f2 64 61 | 74 61 6c 6f 61 64 28 62 |.. 3:.da|taload(b|
|000009a0| 29 0d 01 ae 08 c9 20 36 | 3a 0d 01 b8 08 c9 20 37 |)..... 6|:..... 7|
|000009b0| 3a 0d 01 c2 05 cb 0d 01 | cc 05 e1 0d 01 e0 0c dd |:.......|........|
|000009c0| f2 6b 65 79 28 6b 29 0d | 01 ea 0a c8 8e 20 6b 20 |.key(k).|..... k |
|000009d0| ca 0d 01 f4 18 c9 20 31 | 33 3a f2 73 61 76 65 69 |...... 1|3:.savei|
|000009e0| 74 28 24 66 6e 61 6d 65 | 29 0d 01 fe 31 c9 20 32 |t($fname|)...1. 2|
|000009f0| 37 3a 21 62 6c 6f 63 6b | 3d 66 69 6c 65 3a c8 99 |7:!block|=file:..|
|00000a00| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|00000a10| 6f 77 22 2c 2c 62 6c 6f | 63 6b 0d 02 08 1c 7f 3a |ow",,blo|ck.....:|
|00000a20| c8 99 20 22 57 69 6d 70 | 5f 50 72 6f 63 65 73 73 |.. "Wimp|_Process|
|00000a30| 4b 65 79 22 2c 6b 0d 02 | 12 05 cb 0d 02 1c 05 e1 |Key",k..|........|
|00000a40| 0d 02 30 10 dd f2 62 75 | 74 74 6f 6e 73 28 62 29 |..0...bu|ttons(b)|
|00000a50| 0d 02 3a 11 e7 20 28 62 | 21 38 20 80 20 32 29 20 |..:.. (b|!8 . 2) |
|00000a60| 8c 0d 02 44 16 e7 20 62 | 21 31 32 3d 2d 32 20 f2 |...D.. b|!12=-2 .|
|00000a70| 6d 65 6e 75 28 62 29 0d | 02 4e 05 cc 0d 02 58 23 |menu(b).|.N....X#|
|00000a80| e7 20 62 21 31 36 3d 66 | 69 63 6f 6e 20 80 20 28 |. b!16=f|icon . (|
|00000a90| 62 21 38 20 80 20 26 35 | 30 29 3c 3e 30 20 8c 0d |b!8 . &5|0)<>0 ..|
|00000aa0| 02 62 0b 21 62 3d 66 69 | 6c 65 0d 02 6c 1f c8 99 |.b.!b=fi|le..l...|
|00000ab0| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00000ac0| 53 74 61 74 65 22 2c 2c | 62 0d 02 76 1e 77 65 78 |State",,|b..v.wex|
|00000ad0| 3d 62 21 34 2d 62 21 32 | 30 3a 77 65 79 3d 62 21 |=b!4-b!2|0:wey=b!|
|00000ae0| 31 36 2d 62 21 32 34 0d | 02 80 0d 62 21 34 3d 66 |16-b!24.|...b!4=f|
|00000af0| 69 63 6f 6e 0d 02 8a 1d | c8 99 20 22 57 69 6d 70 |icon....|.. "Wimp|
|00000b00| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00000b10| 62 0d 02 94 11 21 62 3d | 66 69 6c 65 3a 62 21 34 |b....!b=|file:b!4|
|00000b20| 3d 35 0d 02 9e 1d 62 21 | 38 3d 62 21 38 2b 77 65 |=5....b!|8=b!8+we|
|00000b30| 78 3a 62 21 31 32 3d 62 | 21 31 32 2b 77 65 79 0d |x:b!12=b|!12+wey.|
|00000b40| 02 a8 1f 62 21 31 36 3d | 62 21 31 36 2b 77 65 78 |...b!16=|b!16+wex|
|00000b50| 3a 62 21 32 30 3d 62 21 | 32 30 2b 77 65 79 0d 02 |:b!20=b!|20+wey..|
|00000b60| b2 11 62 21 32 34 3d 30 | 3a 62 21 32 38 3d 30 0d |..b!24=0|:b!28=0.|
|00000b70| 02 bc 21 62 21 33 32 3d | 26 37 46 46 46 46 46 46 |..!b!32=|&7FFFFFF|
|00000b80| 46 3a 62 21 33 36 3d 26 | 37 46 46 46 46 46 46 46 |F:b!36=&|7FFFFFFF|
|00000b90| 0d 02 c6 18 c8 99 20 22 | 57 69 6d 70 5f 44 72 61 |...... "|Wimp_Dra|
|00000ba0| 67 42 6f 78 22 2c 2c 62 | 0d 02 d0 05 cd 0d 02 da |gBox",,b|........|
|00000bb0| 1f e7 20 62 21 31 36 3d | 6f 6b 20 8c 20 f2 73 61 |.. b!16=|ok . .sa|
|00000bc0| 76 65 69 74 28 24 66 6e | 61 6d 65 29 0d 02 e4 05 |veit($fn|ame)....|
|00000bd0| cd 0d 02 ee 05 e1 0d 03 | 02 0d dd f2 6d 65 6e 75 |........|....menu|
|00000be0| 28 62 29 0d 03 0c 16 24 | 6d 65 6e 75 3d 22 53 68 |(b)....$|menu="Sh|
|00000bf0| 69 72 6c 2b 44 61 76 65 | 22 0d 03 16 1e 6d 65 6e |irl+Dave|"....men|
|00000c00| 75 21 31 32 3d 26 37 30 | 32 30 37 3a 6d 65 6e 75 |u!12=&70|207:menu|
|00000c10| 21 31 36 3d 31 35 36 0d | 03 20 24 6d 65 6e 75 21 |!16=156.|. $menu!|
|00000c20| 32 30 3d 34 30 3a 6d 65 | 6e 75 21 32 34 3d 30 3a |20=40:me|nu!24=0:|
|00000c30| 6d 65 6e 75 21 32 38 3d | 26 38 30 0d 03 2a 1f 6d |menu!28=|&80..*.m|
|00000c40| 65 6e 75 21 33 32 3d 2d | 31 3a 6d 65 6e 75 21 33 |enu!32=-|1:menu!3|
|00000c50| 36 3d 26 37 30 30 30 30 | 32 31 0d 03 34 15 24 28 |6=&70000|21..4.$(|
|00000c60| 6d 65 6e 75 2b 34 30 29 | 3d 22 51 75 69 74 22 0d |menu+40)|="Quit".|
|00000c70| 03 3e 29 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |.>).. "W|imp_Crea|
|00000c80| 74 65 4d 65 6e 75 22 2c | 2c 6d 65 6e 75 2c 20 21 |teMenu",|,menu, !|
|00000c90| 62 2d 36 34 2c 31 33 36 | 0d 03 48 05 e1 0d 03 5c |b-64,136|..H....\|
|00000ca0| 0d dd 20 a4 77 69 6e 64 | 6f 77 0d 03 66 1a 21 62 |.. .wind|ow..f.!b|
|00000cb0| 6c 6f 63 6b 3d 39 30 30 | 3a 62 6c 6f 63 6b 21 34 |lock=900|:block!4|
|00000cc0| 3d 32 30 30 0d 03 70 1d | 62 6c 6f 63 6b 21 38 3d |=200..p.|block!8=|
|00000cd0| 31 31 34 36 3a 62 6c 6f | 63 6b 21 31 32 3d 33 36 |1146:blo|ck!12=36|
|00000ce0| 38 0d 03 7a 19 62 6c 6f | 63 6b 21 31 36 3d 30 3a |8..z.blo|ck!16=0:|
|00000cf0| 62 6c 6f 63 6b 21 32 30 | 3d 30 0d 03 84 1c 62 6c |block!20|=0....bl|
|00000d00| 6f 63 6b 21 32 34 3d 2d | 31 3a 62 6c 6f 63 6b 21 |ock!24=-|1:block!|
|00000d10| 32 38 3d 26 39 33 0d 03 | 8e 25 62 6c 6f 63 6b 21 |28=&93..|.%block!|
|00000d20| 33 32 3d 26 31 30 37 30 | 32 30 37 3a 62 6c 6f 63 |32=&1070|207:bloc|
|00000d30| 6b 21 33 36 3d 26 32 30 | 44 30 34 0d 03 98 1d 62 |k!36=&20|D04....b|
|00000d40| 6c 6f 63 6b 21 34 30 3d | 30 3a 62 6c 6f 63 6b 21 |lock!40=|0:block!|
|00000d50| 34 34 3d 2d 31 30 32 34 | 0d 03 a2 1c 62 6c 6f 63 |44=-1024|....bloc|
|00000d60| 6b 21 34 38 3d 31 32 38 | 30 3a 62 6c 6f 63 6b 21 |k!48=128|0:block!|
|00000d70| 35 32 3d 30 0d 03 ac 1b | 62 6c 6f 63 6b 21 35 36 |52=0....|block!56|
|00000d80| 3d 26 33 44 3a 62 6c 6f | 63 6b 21 36 30 3d 30 0d |=&3D:blo|ck!60=0.|
|00000d90| 03 b6 19 62 6c 6f 63 6b | 21 36 34 3d 31 3a 62 6c |...block|!64=1:bl|
|00000da0| 6f 63 6b 21 36 38 3d 30 | 0d 03 c0 25 62 6c 6f 63 |ock!68=0|...%bloc|
|00000db0| 6b 21 38 34 3d 30 3a 24 | 28 62 6c 6f 63 6b 2b 37 |k!84=0:$|(block+7|
|00000dc0| 32 29 3d 22 53 61 76 65 | 20 61 73 3a 22 0d 03 ca |2)="Save| as:"...|
|00000dd0| 2a c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |*.. "Wim|p_Create|
|00000de0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 20 b8 |Window",|,block .|
|00000df0| 20 68 61 6e 64 6c 65 0d | 03 d4 0b 3d 68 61 6e 64 | handle.|...=hand|
|00000e00| 6c 65 0d 03 e8 2e dd 20 | a4 69 63 6f 6e 28 77 69 |le..... |.icon(wi|
|00000e10| 6e 64 6f 77 2c 78 31 2c | 79 31 2c 78 32 2c 79 32 |ndow,x1,|y1,x2,y2|
|00000e20| 2c 66 6c 61 67 73 2c 69 | 31 2c 69 32 2c 69 33 29 |,flags,i|1,i2,i3)|
|00000e30| 0d 03 f2 1c 21 62 6c 6f | 63 6b 3d 77 69 6e 64 6f |....!blo|ck=windo|
|00000e40| 77 3a 62 6c 6f 63 6b 21 | 34 3d 78 31 0d 03 fc 1a |w:block!|4=x1....|
|00000e50| 62 6c 6f 63 6b 21 38 3d | 79 31 3a 62 6c 6f 63 6b |block!8=|y1:block|
|00000e60| 21 31 32 3d 78 32 0d 04 | 06 1e 62 6c 6f 63 6b 21 |!12=x2..|..block!|
|00000e70| 31 36 3d 79 32 3a 62 6c | 6f 63 6b 21 32 30 3d 66 |16=y2:bl|ock!20=f|
|00000e80| 6c 61 67 73 0d 04 10 1b | 62 6c 6f 63 6b 21 32 34 |lags....|block!24|
|00000e90| 3d 69 31 3a 62 6c 6f 63 | 6b 21 32 38 3d 69 32 0d |=i1:bloc|k!28=i2.|
|00000ea0| 04 1a 0f 62 6c 6f 63 6b | 21 33 32 3d 69 33 0d 04 |...block|!32=i3..|
|00000eb0| 24 28 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |$(.. "Wi|mp_Creat|
|00000ec0| 65 49 63 6f 6e 22 2c 2c | 62 6c 6f 63 6b 20 b8 20 |eIcon",,|block . |
|00000ed0| 68 61 6e 64 6c 65 0d 04 | 2e 0b 3d 68 61 6e 64 6c |handle..|..=handl|
|00000ee0| 65 0d 04 42 0f dd 20 f2 | 64 72 61 67 64 6f 6e 65 |e..B.. .|dragdone|
|00000ef0| 0d 04 4c 0d 74 79 70 65 | 3d 26 46 46 42 0d 04 56 |..L.type|=&FFB..V|
|00000f00| 23 c8 99 20 22 57 69 6d | 70 5f 47 65 74 50 6f 69 |#.. "Wim|p_GetPoi|
|00000f10| 6e 74 65 72 49 6e 66 6f | 22 2c 2c 62 6c 6f 63 6b |nterInfo|",,block|
|00000f20| 0d 04 60 1a 62 6c 6f 63 | 6b 21 32 30 3d 36 34 3a |..`.bloc|k!20=64:|
|00000f30| 62 6c 6f 63 6b 21 33 32 | 3d 30 0d 04 6a 20 62 6c |block!32|=0..j bl|
|00000f40| 6f 63 6b 21 33 36 3d 31 | 3a 62 6c 6f 63 6b 21 34 |ock!36=1|:block!4|
|00000f50| 30 3d 62 6c 6f 63 6b 21 | 31 32 0d 04 74 25 62 6c |0=block!|12..t%bl|
|00000f60| 6f 63 6b 21 34 34 3d 62 | 6c 6f 63 6b 21 31 36 3a |ock!44=b|lock!16:|
|00000f70| 62 6c 6f 63 6b 21 34 38 | 3d 21 62 6c 6f 63 6b 0d |block!48|=!block.|
|00000f80| 04 7e 14 62 6c 6f 63 6b | 21 35 32 3d 62 6c 6f 63 |.~.block|!52=bloc|
|00000f90| 6b 21 34 0d 04 88 1c 62 | 6c 6f 63 6b 21 35 36 3d |k!4....b|lock!56=|
|00000fa0| 30 3a 62 6c 6f 63 6b 21 | 36 30 3d 74 79 70 65 0d |0:block!|60=type.|
|00000fb0| 04 92 20 24 28 62 6c 6f | 63 6b 2b 36 34 29 3d a4 |.. $(blo|ck+64)=.|
|00000fc0| 6c 65 61 66 28 24 66 6e | 61 6d 65 29 2b bd 30 0d |leaf($fn|ame)+.0.|
|00000fd0| 04 9c 37 c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 |..7.. "W|imp_Send|
|00000fe0| 4d 65 73 73 61 67 65 22 | 2c 31 37 2c 62 6c 6f 63 |Message"|,17,bloc|
|00000ff0| 6b 2b 32 30 2c 62 6c 6f | 63 6b 21 31 32 2c 62 6c |k+20,blo|ck!12,bl|
|00001000| 6f 63 6b 21 31 36 0d 04 | a6 12 6d 79 72 65 66 3d |ock!16..|..myref=|
|00001010| 62 6c 6f 63 6b 21 32 38 | 0d 04 b0 05 e1 0d 04 c4 |block!28|........|
|00001020| 11 dd a4 6c 65 61 66 28 | 70 61 74 68 24 29 0d 04 |...leaf(|path$)..|
|00001030| ce 2e c8 95 20 a7 70 61 | 74 68 24 2c 22 2e 22 29 |.... .pa|th$,".")|
|00001040| 3a 70 61 74 68 24 3d c1 | 70 61 74 68 24 2c a7 70 |:path$=.|path$,.p|
|00001050| 61 74 68 24 2c 22 2e 22 | 29 2b 31 29 0d 04 d8 05 |ath$,"."|)+1)....|
|00001060| ce 0d 04 e2 0a 3d 70 61 | 74 68 24 0d 04 f6 0b dd |.....=pa|th$.....|
|00001070| f2 65 72 72 6f 72 0d 05 | 00 08 2a 46 58 33 0d 05 |.error..|..*FX3..|
|00001080| 0a 18 c8 99 22 57 69 6d | 70 5f 44 72 61 67 42 6f |...."Wim|p_DragBo|
|00001090| 78 22 2c 2c 2d 31 0d 05 | 14 38 21 62 6c 6f 63 6b |x",,-1..|.8!block|
|000010a0| 3d 9f 3a 24 28 62 6c 6f | 63 6b 2b 34 29 3d f6 24 |=.:$(blo|ck+4)=.$|
|000010b0| 2b 22 20 28 41 74 20 6c | 69 6e 65 20 6e 75 6d 62 |+" (At l|ine numb|
|000010c0| 65 72 20 22 2b c3 9e 2b | 22 29 22 2b bd 30 0d 05 |er "+..+|")"+.0..|
|000010d0| 1e 2d c8 99 22 57 69 6d | 70 5f 52 65 70 6f 72 74 |.-.."Wim|p_Report|
|000010e0| 45 72 72 6f 72 22 2c 62 | 6c 6f 63 6b 2c 31 2c 22 |Error",b|lock,1,"|
|000010f0| 42 61 73 69 63 38 36 74 | 6f 35 22 0d 05 28 05 e1 |Basic86t|o5"..(..|
|00001100| 0d 05 3c 11 dd f2 64 61 | 74 61 73 61 76 65 28 62 |..<...da|tasave(b|
|00001110| 29 0d 05 46 12 e7 20 62 | 21 31 32 3d 6d 79 72 65 |)..F.. b|!12=myre|
|00001120| 66 20 8c 0d 05 50 19 f2 | 73 61 76 65 69 74 28 a4 |f ...P..|saveit(.|
|00001130| 67 6e 61 6d 65 28 62 2b | 34 34 29 29 0d 05 5a 13 |gname(b+|44))..Z.|
|00001140| 62 21 31 32 3d 62 21 38 | 3a 62 21 31 36 3d 33 0d |b!12=b!8|:b!16=3.|
|00001150| 05 64 21 c8 99 22 57 69 | 6d 70 5f 53 65 6e 64 4d |.d!.."Wi|mp_SendM|
|00001160| 65 73 73 61 67 65 22 2c | 31 38 2c 62 2c 62 21 34 |essage",|18,b,b!4|
|00001170| 0d 05 6e 05 cd 0d 05 78 | 05 e1 0d 05 8c 11 dd f2 |..n....x|........|
|00001180| 64 61 74 61 6c 6f 61 64 | 28 62 29 0d 05 96 1d 66 |dataload|(b)....f|
|00001190| 66 24 3d a4 67 6e 61 6d | 65 28 62 2b 34 34 29 3a |f$=.gnam|e(b+44):|
|000011a0| 58 25 3d 8e 20 66 66 24 | 0d 05 a0 0a f2 70 6f 70 |X%=. ff$|.....pop|
|000011b0| 75 70 0d 05 aa 13 62 21 | 31 32 3d 62 21 38 3a 62 |up....b!|12=b!8:b|
|000011c0| 21 31 36 3d 34 0d 05 b4 | 21 c8 99 22 57 69 6d 70 |!16=4...|!.."Wimp|
|000011d0| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|000011e0| 2c 62 2c 62 21 34 0d 05 | be 05 cd 0d 05 c8 05 e1 |,b,b!4..|........|
|000011f0| 0d 05 dc 15 dd a4 67 6e | 61 6d 65 28 70 74 72 29 |......gn|ame(ptr)|
|00001200| 3a ea 20 66 24 0d 05 e6 | 1c c8 95 20 3f 70 74 72 |:. f$...|... ?ptr|
|00001210| 20 66 24 2b 3d bd 3f 70 | 74 72 3a 70 74 72 2b 3d | f$+=.?p|tr:ptr+=|
|00001220| 31 0d 05 f0 05 ce 0d 05 | fa 07 3d 66 24 0d 06 0e |1.......|..=f$...|
|00001230| 13 dd f2 73 61 76 65 69 | 74 28 6e 61 6d 65 24 29 |...savei|t(name$)|
|00001240| 0d 06 18 13 e7 20 a7 6e | 61 6d 65 24 2c 22 2e 22 |..... .n|ame$,"."|
|00001250| 29 20 8c 0d 06 22 0a f2 | 38 36 74 6f 35 0d 06 2c |) ..."..|86to5..,|
|00001260| 0e 21 6d 65 6e 75 3d 66 | 69 6c 65 0d 06 36 1f c8 |.!menu=f|ile..6..|
|00001270| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |. "Wimp_|CloseWin|
|00001280| 64 6f 77 22 2c 2c 6d 65 | 6e 75 0d 06 40 3f cc 20 |dow",,me|nu..@?. |
|00001290| 24 62 6c 6f 63 6b 3d 22 | 20 20 20 20 54 6f 20 73 |$block="| To s|
|000012a0| 61 76 65 2c 20 64 72 61 | 67 20 74 68 65 20 69 63 |ave, dra|g the ic|
|000012b0| 6f 6e 20 74 6f 20 61 20 | 64 69 72 65 63 74 6f 72 |on to a |director|
|000012c0| 79 20 76 69 65 77 65 72 | 22 0d 06 4a 2e c8 99 20 |y viewer|"..J... |
|000012d0| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|000012e0| 72 22 2c 62 6c 6f 63 6b | 2c 31 2c 22 42 61 73 69 |r",block|,1,"Basi|
|000012f0| 63 38 36 74 6f 35 22 0d | 06 54 05 cd 0d 06 5e 05 |c86to5".|.T....^.|
|00001300| e1 0d 06 72 0b dd f2 70 | 6f 70 75 70 0d 06 7c 12 |...r...p|opup..|.|
|00001310| 66 6e 24 3d a4 6c 65 61 | 66 28 66 66 24 29 0d 06 |fn$=.lea|f(ff$)..|
|00001320| 86 17 66 6d 24 3d c0 66 | 66 24 2c a9 66 66 24 2d |..fm$=.f|f$,.ff$-|
|00001330| a9 66 6e 24 29 0d 06 90 | 1f 24 66 6e 61 6d 65 3d |.fn$)...|.$fname=|
|00001340| 66 6d 24 2b 66 6e 24 3a | 21 6f 6c 64 62 6c 6b 3d |fm$+fn$:|!oldblk=|
|00001350| 66 69 6c 65 0d 06 9a 16 | 24 73 70 72 69 74 65 3d |file....|$sprite=|
|00001360| 22 66 69 6c 65 5f 66 66 | 62 22 0d 06 a4 24 c8 99 |"file_ff|b"...$..|
|00001370| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00001380| 53 74 61 74 65 22 2c 2c | 6f 6c 64 62 6c 6b 0d 06 |State",,|oldblk..|
|00001390| ae 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |. .. "Wi|mp_OpenW|
|000013a0| 69 6e 64 6f 77 22 2c 2c | 6f 6c 64 62 6c 6b 0d 06 |indow",,|oldblk..|
|000013b0| b8 35 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 43 61 |.5.. "Wi|mp_SetCa|
|000013c0| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 66 69 6c |retPosit|ion",fil|
|000013d0| 65 2c 6e 61 6d 65 2c 2c | 2c 2d 31 2c a9 24 66 6e |e,name,,|,-1,.$fn|
|000013e0| 61 6d 65 0d 06 c2 05 e1 | 0d 06 d6 0b dd f2 38 36 |ame.....|......86|
|000013f0| 74 6f 35 0d 06 e0 22 ea | 20 43 25 2c 69 6e 76 2c |to5...".| C%,inv,|
|00001400| 44 25 2c 74 24 2c 4c 2c | 54 24 2c 6e 6f 31 2c 6e |D%,t$,L,|T$,no1,n|
|00001410| 6f 32 2c 6e 6f 0d 06 ea | 09 69 6e 76 3d a3 0d 06 |o2,no...|.inv=...|
|00001420| f4 14 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |...."Hou|rglass_O|
|00001430| 6e 22 0d 06 fe 0a 2a 46 | 58 33 2c 36 0d 07 08 0b |n"....*F|X3,6....|
|00001440| 43 25 3d 8e 66 66 24 0d | 07 12 15 ff 28 22 53 50 |C%=.ff$.|....("SP|
|00001450| 4f 4f 4c 20 22 2b 6e 61 | 6d 65 24 29 0d 07 1c 05 |OOL "+na|me$)....|
|00001460| f5 0d 07 26 0f cf 23 43 | 25 3d 8f 23 43 25 2b 31 |...&..#C|%=.#C%+1|
|00001470| 0d 07 30 2b 6e 6f 31 3d | 9a 23 43 25 3a 6e 6f 32 |..0+no1=|.#C%:no2|
|00001480| 3d 9a 23 43 25 3a 6e 6f | 3d 6e 6f 31 2b 28 6e 6f |=.#C%:no|=no1+(no|
|00001490| 32 2a 32 35 36 29 3a f1 | 6e 6f 3b 0d 07 3a 05 f5 |2*256):.|no;..:..|
|000014a0| 0d 07 44 0b 44 25 3d 9a | 23 43 25 0d 07 4e 37 e7 |..D.D%=.|#C%..N7.|
|000014b0| 20 44 25 3d 26 32 32 20 | 80 20 69 6e 76 3d a3 20 | D%=&22 |. inv=. |
|000014c0| 8c 20 69 6e 76 3d b9 20 | 8b 20 e7 20 44 25 3d 26 |. inv=. |. . D%=&|
|000014d0| 32 32 20 80 20 69 6e 76 | 3d b9 20 8c 20 69 6e 76 |22 . inv|=. . inv|
|000014e0| 3d a3 0d 07 58 17 e7 20 | 69 6e 76 20 8c 20 ef 20 |=...X.. |inv . . |
|000014f0| 44 25 3a e5 20 8d 74 4a | 47 0d 07 62 1a e7 20 44 |D%:. .tJ|G..b.. D|
|00001500| 25 3e 33 31 20 80 20 44 | 25 3c 31 32 37 20 8c 20 |%>31 . D|%<127 . |
|00001510| ef 44 25 0d 07 6c 17 e7 | 20 44 25 3d 26 38 44 20 |.D%..l..| D%=&8D |
|00001520| 8c 20 f2 6c 69 6e 65 72 | 65 66 0d 07 76 19 e7 20 |. .liner|ef..v.. |
|00001530| 44 25 3e 26 37 46 20 f1 | 54 24 28 44 25 2d 26 37 |D%>&7F .|T$(D%-&7|
|00001540| 46 29 3b 0d 07 80 11 e7 | 20 44 25 3d 26 30 44 20 |F);.....| D%=&0D |
|00001550| ef 20 31 33 0d 07 8a 0c | fd 20 44 25 3d 26 30 44 |. 13....|. D%=&0D|
|00001560| 0d 07 94 11 fd a2 23 43 | 25 3c 3d 8f 23 43 25 2b |......#C|%<=.#C%+|
|00001570| 33 0d 07 9e 0a 2a 53 50 | 4f 4f 4c 0d 07 a8 15 c8 |3....*SP|OOL.....|
|00001580| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 |."Hourgl|ass_Off"|
|00001590| 0d 07 b2 20 ff 28 22 53 | 45 54 54 59 50 45 20 22 |... .("S|ETTYPE "|
|000015a0| 2b 6e 61 6d 65 24 2b 22 | 20 42 41 53 49 43 22 29 |+name$+"| BASIC")|
|000015b0| 0d 07 bc 08 2a 46 58 33 | 0d 07 c6 08 d9 23 43 25 |....*FX3|.....#C%|
|000015c0| 0d 07 d0 05 e1 0d 07 da | 0d dd f2 6c 69 6e 65 72 |........|...liner|
|000015d0| 65 66 0d 07 e4 11 6e 6f | 31 3d 28 9a 23 43 25 29 |ef....no|1=(.#C%)|
|000015e0| 3c 3c 32 0d 07 ee 1c 6e | 6f 32 3d 28 9a 23 43 25 |<<2....n|o2=(.#C%|
|000015f0| 29 20 82 20 28 6e 6f 31 | 20 80 20 26 43 30 29 0d |) . (no1| . &C0).|
|00001600| 07 f8 2e 6e 6f 32 3d 6e | 6f 32 20 84 20 28 28 28 |...no2=n|o2 . (((|
|00001610| 9a 23 43 25 29 20 82 20 | 28 28 6e 6f 31 3c 3c 32 |.#C%) . |((no1<<2|
|00001620| 29 20 80 20 26 43 30 29 | 29 3c 3c 38 29 0d 08 02 |) . &C0)|)<<8)...|
|00001630| 0a f1 3b 6e 6f 32 3b 0d | 08 0c 05 e1 0d 08 16 0b |..;no2;.|........|
|00001640| dd f2 74 6f 6b 65 6e 0d | 08 20 1d e3 4c 3d 26 38 |..token.|. ..L=&8|
|00001650| 30 20 b8 20 26 46 46 3a | f3 54 24 28 4c 2d 26 37 |0 . &FF:|.T$(L-&7|
|00001660| 46 29 3a ed 0d 08 2a 44 | dc 41 4e 44 2c 44 49 56 |F):...*D|.AND,DIV|
|00001670| 2c 45 4f 52 2c 4d 4f 44 | 2c 4f 52 2c 45 52 52 4f |,EOR,MOD|,OR,ERRO|
|00001680| 52 2c 4c 49 4e 45 2c 4f | 46 46 2c 53 54 45 50 2c |R,LINE,O|FF,STEP,|
|00001690| 53 50 43 2c 54 41 42 28 | 2c 45 4c 53 45 2c 54 48 |SPC,TAB(|,ELSE,TH|
|000016a0| 45 4e 2c 2c 2c 50 54 52 | 0d 08 34 4f dc 50 41 47 |EN,,,PTR|..4O.PAG|
|000016b0| 45 2c 54 49 4d 45 2c 4c | 4f 4d 45 4d 2c 48 49 4d |E,TIME,L|OMEM,HIM|
|000016c0| 45 4d 2c 41 42 53 2c 41 | 43 53 2c 41 44 56 41 4c |EM,ABS,A|CS,ADVAL|
|000016d0| 2c 41 53 43 2c 41 53 4e | 2c 41 54 4e 2c 42 47 45 |,ASC,ASN|,ATN,BGE|
|000016e0| 54 2c 43 4f 53 2c 43 4f | 55 4e 54 2c 44 45 47 2c |T,COS,CO|UNT,DEG,|
|000016f0| 45 52 4c 2c 45 52 52 0d | 08 3e 50 dc 45 56 41 4c |ERL,ERR.|.>P.EVAL|
|00001700| 2c 45 58 50 2c 45 58 54 | 2c 46 41 4c 53 45 2c 46 |,EXP,EXT|,FALSE,F|
|00001710| 4e 2c 47 45 54 2c 49 4e | 4b 45 59 2c 49 4e 53 54 |N,GET,IN|KEY,INST|
|00001720| 52 28 2c 49 4e 54 2c 4c | 45 4e 2c 4c 4e 2c 4c 4f |R(,INT,L|EN,LN,LO|
|00001730| 47 2c 4e 4f 54 2c 4f 50 | 45 4e 49 4e 2c 4f 50 45 |G,NOT,OP|ENIN,OPE|
|00001740| 4e 4f 55 54 2c 50 49 0d | 08 48 4d dc 50 4f 49 4e |NOUT,PI.|.HM.POIN|
|00001750| 54 28 2c 50 4f 53 2c 52 | 41 44 2c 52 4e 44 2c 53 |T(,POS,R|AD,RND,S|
|00001760| 47 4e 2c 53 49 4e 2c 53 | 51 52 2c 54 41 4e 2c 54 |GN,SIN,S|QR,TAN,T|
|00001770| 4f 2c 54 52 55 45 2c 55 | 53 52 2c 56 41 4c 2c 56 |O,TRUE,U|SR,VAL,V|
|00001780| 50 4f 53 2c 43 48 52 24 | 2c 47 45 54 24 2c 49 4e |POS,CHR$|,GET$,IN|
|00001790| 4b 45 59 24 0d 08 52 5c | dc 4c 45 46 54 24 28 2c |KEY$..R\|.LEFT$(,|
|000017a0| 4d 49 44 24 28 2c 52 49 | 47 48 54 24 28 2c 53 54 |MID$(,RI|GHT$(,ST|
|000017b0| 52 24 2c 53 54 52 49 4e | 47 24 28 2c 45 4f 46 2c |R$,STRIN|G$(,EOF,|
|000017c0| 41 55 54 4f 2c 44 45 4c | 45 54 45 2c 4c 4f 41 44 |AUTO,DEL|ETE,LOAD|
|000017d0| 2c 4c 49 53 54 2c 4e 45 | 57 2c 4f 4c 44 2c 52 45 |,LIST,NE|W,OLD,RE|
|000017e0| 4e 55 4d 42 45 52 2c 53 | 41 56 45 2c 2c 50 54 52 |NUMBER,S|AVE,,PTR|
|000017f0| 0d 08 5c 56 dc 50 41 47 | 45 2c 54 49 4d 45 2c 4c |..\V.PAG|E,TIME,L|
|00001800| 4f 4d 45 4d 2c 48 49 4d | 45 4d 2c 53 4f 55 4e 44 |OMEM,HIM|EM,SOUND|
|00001810| 2c 42 50 55 54 2c 43 41 | 4c 4c 2c 43 48 41 49 4e |,BPUT,CA|LL,CHAIN|
|00001820| 2c 43 4c 45 41 52 2c 43 | 4c 4f 53 45 2c 43 4c 47 |,CLEAR,C|LOSE,CLG|
|00001830| 2c 43 4c 53 2c 44 41 54 | 41 2c 44 45 46 2c 44 49 |,CLS,DAT|A,DEF,DI|
|00001840| 4d 2c 44 52 41 57 0d 08 | 66 56 dc 45 4e 44 2c 45 |M,DRAW..|fV.END,E|
|00001850| 4e 44 50 52 4f 43 2c 45 | 4e 56 45 4c 4f 50 45 2c |NDPROC,E|NVELOPE,|
|00001860| 46 4f 52 2c 47 4f 53 55 | 42 2c 47 4f 54 4f 2c 47 |FOR,GOSU|B,GOTO,G|
|00001870| 43 4f 4c 2c 49 46 2c 49 | 4e 50 55 54 2c 4c 45 54 |COL,IF,I|NPUT,LET|
|00001880| 2c 4c 4f 43 41 4c 2c 4d | 4f 44 45 2c 4d 4f 56 45 |,LOCAL,M|ODE,MOVE|
|00001890| 2c 4e 45 58 54 2c 4f 4e | 2c 56 44 55 0d 08 70 5d |,NEXT,ON|,VDU..p]|
|000018a0| dc 50 4c 4f 54 2c 50 52 | 49 4e 54 2c 50 52 4f 43 |.PLOT,PR|INT,PROC|
|000018b0| 2c 52 45 41 44 2c 52 45 | 4d 2c 52 45 50 45 41 54 |,READ,RE|M,REPEAT|
|000018c0| 2c 52 45 50 4f 52 54 2c | 52 45 53 54 4f 52 45 2c |,REPORT,|RESTORE,|
|000018d0| 52 45 54 55 52 4e 2c 52 | 55 4e 2c 53 54 4f 50 2c |RETURN,R|UN,STOP,|
|000018e0| 43 4f 4c 4f 55 52 2c 54 | 52 41 43 45 2c 55 4e 54 |COLOUR,T|RACE,UNT|
|000018f0| 49 4c 2c 57 49 44 54 48 | 2c 0d 08 7a 05 e1 0d ff |IL,WIDTH|,..z....|
|00001900| 46 69 6c 65 44 61 74 61 | 82 21 53 70 72 69 74 65 |FileData|.!Sprite|
|00001910| 73 00 77 77 0c 02 00 00 | 42 f9 ff ff 74 3b d1 db |s.ww....|B...t;..|
|00001920| 03 00 f7 d7 01 00 00 00 | 10 00 00 00 10 02 00 00 |........|........|
|00001930| 00 02 00 00 21 62 61 73 | 69 63 38 36 00 00 00 00 |....!bas|ic86....|
|00001940| 04 00 00 00 10 00 00 00 | 00 00 00 00 07 00 00 00 |........|........|
|00001950| ac 00 00 00 ac 00 00 00 | 0c 00 00 00 00 ff ff ff |........|........|
|00001960| 00 ff ff ff 00 dd dd dd | 00 dd dd dd 00 bb bb bb |........|........|
|00001970| 00 bb bb bb 00 99 99 99 | 00 99 99 99 00 77 77 77 |........|.....www|
|00001980| 00 77 77 77 00 55 55 55 | 00 55 55 55 00 33 33 33 |.www.UUU|.UUU.333|
|00001990| 00 33 33 33 00 00 00 00 | 00 00 00 00 00 00 44 99 |.333....|......D.|
|000019a0| 00 00 44 99 00 ee ee 00 | 00 ee ee 00 00 00 cc 00 |..D.....|........|
|000019b0| 00 00 cc 00 00 dd 00 00 | 00 dd 00 00 00 ee ee bb |........|........|
|000019c0| 00 ee ee bb 00 55 88 00 | 00 55 88 00 00 ff bb 00 |.....U..|.U......|
|000019d0| 00 ff bb 00 00 00 bb ff | 00 00 bb ff 11 11 11 11 |........|........|
|000019e0| 11 11 73 77 77 77 77 77 | 77 77 77 77 77 40 44 44 |..swwwww|wwwww@DD|
|000019f0| 11 11 11 11 11 33 71 99 | 99 99 99 99 99 99 99 99 |.....3q.|........|
|00001a00| 79 40 44 44 11 11 11 11 | 33 11 71 99 99 bb bb 99 |y@DD....|3.q.....|
|00001a10| 99 b9 bb 99 79 40 44 44 | 11 11 11 33 11 11 71 99 |....y@DD|...3..q.|
|00001a20| b9 9b b9 9b 99 bb 99 99 | 79 40 44 44 11 11 33 11 |........|y@DD..3.|
|00001a30| 11 11 71 99 b9 9b b9 9b | b9 9b 99 99 79 40 44 44 |..q.....|....y@DD|
|00001a40| 11 33 11 11 11 11 71 99 | 99 bb bb 99 b9 bb bb 99 |.3....q.|........|
|00001a50| 79 40 44 44 77 77 77 77 | 77 77 77 77 77 77 b7 9b |y@DDwwww|wwwwww..|
|00001a60| b9 9b b9 9b 79 40 44 44 | 87 88 88 88 88 88 88 88 |....y@DD|........|
|00001a70| 88 88 b7 9b b9 9b b9 9b | 79 40 44 44 87 88 88 88 |........|y@DD....|
|00001a80| 88 88 88 88 88 88 b7 99 | 99 bb bb 99 79 40 44 44 |........|....y@DD|
|00001a90| 87 08 80 00 00 00 88 00 | 80 88 97 99 99 99 99 99 |........|........|
|00001aa0| 79 40 44 44 87 88 88 88 | 88 88 88 88 88 88 77 77 |y@DD....|......ww|
|00001ab0| 77 77 77 77 77 40 44 44 | 87 88 08 00 00 08 00 88 |wwwww@DD|........|
|00001ac0| 00 88 17 11 11 11 11 33 | 11 40 44 44 87 88 88 88 |.......3|.@DD....|
|00001ad0| 88 88 88 88 88 88 17 11 | 11 11 33 11 11 40 44 44 |........|..3..@DD|
|00001ae0| 87 80 00 80 00 00 08 00 | 80 88 17 11 11 33 11 11 |........|.....3..|
|00001af0| 11 40 44 44 87 88 88 88 | 88 88 88 88 88 88 17 11 |.@DD....|........|
|00001b00| 33 11 11 11 11 40 44 44 | 87 88 88 88 88 88 88 88 |3....@DD|........|
|00001b10| 88 88 17 33 11 11 11 11 | 11 40 44 44 77 77 77 77 |...3....|.@DDwwww|
|00001b20| 77 77 77 77 77 77 37 11 | 11 11 11 11 11 88 00 00 |wwwwww7.|........|
+--------+-------------------------+-------------------------+--------+--------+