home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / MISC / SPE.ZIP / FONTEDIT.SPE < prev    next >
Unknown  |  1987-06-14  |  15.6 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Abuse Level (other/abuseLevel) ext Unsupported
100% file data default
100% gt2 Kopftext: 'fontedit.spe ' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 66 6f 6e 74 65 64 69 74 | 2e 73 70 65 20 20 20 20 |fontedit|.spe |
|00000010| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 00 05 | | ..|
|00000020| 00 00 00 65 3e 00 00 01 | 00 00 00 00 7e 3e 06 00 |...e>...|....~>..|
|00000030| 30 2a 33 63 20 00 00 00 | 00 00 00 00 00 00 20 20 |0*3c ...|...... |
|00000040| 7d 04 01 00 07 00 01 00 | 00 00 00 00 00 00 2c 00 |}.......|......,.|
|00000050| c8 39 00 00 00 00 00 00 | 00 00 42 00 01 00 01 00 |.9......|..B.....|
|00000060| 00 00 00 00 69 00 8e 00 | 01 00 00 13 00 2c 00 01 |....i...|.....,..|
|00000070| 00 13 00 00 00 20 02 01 | 00 00 00 00 00 00 00 00 |..... ..|........|
|00000080| 00 57 00 cf 01 3f 00 01 | 00 01 00 00 00 07 00 69 |.W...?..|.......i|
|00000090| 00 07 00 01 00 00 ee 00 | 57 00 00 00 7c 00 2c 00 |........|W...|.,.|
|000000a0| 00 00 12 00 39 00 20 52 | 45 4d 20 42 61 73 69 63 |....9. R|EM Basic|
|000000b0| 20 50 72 6f 67 72 61 6d | 20 20 20 ee 00 7c 00 57 | Program| ..|.W|
|000000c0| 00 c8 00 2c 00 00 00 39 | 00 39 00 20 52 45 4d 20 |...,...9|.9. REM |
|000000d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000e0| 63 72 65 61 74 65 64 20 | 20 20 20 20 20 20 20 20 |created | |
|000000f0| 20 20 20 20 20 20 20 20 | 20 3a 20 20 31 33 2e 30 | | : 13.0|
|00000100| 36 2e 38 37 00 00 ee ee | 00 c8 00 7c 00 18 01 2c |6.87....|...|...,|
|00000110| 00 00 00 3d 00 3d 00 20 | 52 45 4d 20 20 20 20 20 |...=.=. |REM |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 66 72 6f 6d | | from|
|00000130| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000140| 20 20 20 20 20 3a 20 20 | 56 6f 6c 6b 65 72 20 53 | : |Volker S|
|00000150| 61 73 73 65 ee 00 3f ee | 00 18 01 c8 00 68 01 2c |asse..?.|.....h.,|
|00000160| 00 00 00 3d 00 3d 00 20 | 52 45 4d 20 53 74 72 75 |...=.=. |REM Stru|
|00000170| 63 74 6f 67 72 61 6d 20 | 20 20 20 20 73 61 76 65 |ctogram | save|
|00000180| 64 20 6f 6e 20 64 69 73 | 6b 20 20 20 20 20 20 20 |d on dis|k |
|00000190| 20 20 20 20 20 3a 20 20 | 42 61 73 69 63 2d 53 69 | : |Basic-Si|
|000001a0| 63 68 65 72 ee 00 00 ee | 00 68 01 18 01 b8 01 2c |cher....|.h.....,|
|000001b0| 00 00 00 3d 00 3d 00 20 | 52 45 4d 20 20 20 20 20 |...=.=. |REM |
|000001c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 66 69 6c 65 | | file|
|000001d0| 6e 61 6d 65 20 20 20 20 | 20 20 20 20 20 20 20 20 |name | |
|000001e0| 20 20 20 20 20 3a 20 20 | 66 6f 6e 74 65 64 69 74 | : |fontedit|
|000001f0| 2e 73 70 65 ee 00 ee ee | 00 b8 01 68 01 cf 01 2c |.spe....|...h...,|
|00000200| 00 00 00 04 00 04 00 20 | 52 45 4d ee 00 57 ee 00 |....... |REM..W..|
|00000210| cf 01 b8 01 00 00 2c 00 | 00 00 3e 00 3e 00 20 52 |......,.|..>.>. R|
|00000220| 45 4d 20 54 68 69 73 20 | 70 72 6f 67 72 61 6d 20 |EM This |program |
|00000230| 69 73 20 61 20 66 6f 6e | 74 20 65 64 69 74 6f 72 |is a fon|t editor|
|00000240| 20 66 6f 72 20 74 68 65 | 20 73 74 72 75 63 74 6f | for the| structo|
|00000250| 67 72 61 6d 20 70 72 69 | 6e 74 65 72 20 ee 00 25 |gram pri|nter ..%|
|00000260| 00 20 02 01 00 13 00 2c | 00 eb 03 01 00 00 00 00 |. .....,|........|
|00000270| 00 00 00 00 00 4b 02 a3 | 03 4c 00 01 00 01 00 07 |.....K..|.L......|
|00000280| 00 07 00 69 00 0e 00 01 | 00 00 ee 00 4b 02 00 00 |...i....|....K...|
|00000290| 94 02 20 02 00 00 36 00 | 36 00 20 52 45 4d 20 44 |.. ...6.|6. REM D|
|000002a0| 72 75 63 6b 6d 61 74 72 | 69 78 20 3a 20 48 69 67 |ruckmatr|ix : Hig|
|000002b0| 68 74 20 3d 20 39 20 50 | 6f 69 6e 74 73 2c 20 57 |ht = 9 P|oints, W|
|000002c0| 77 69 64 74 68 20 3d 20 | 38 20 50 6f 69 6e 74 73 |width = |8 Points|
|000002d0| ee 00 1c ee 00 94 02 4b | 02 c3 02 20 02 00 00 1c |.......K|... ....|
|000002e0| 00 1c 00 20 20 20 20 20 | 48 69 67 68 74 20 3d 20 |... |Hight = |
|000002f0| 31 30 20 3a 20 57 77 69 | 64 74 68 20 3d 20 38 20 |10 : Wwi|dth = 8 |
|00000300| 00 2b ee 00 c3 02 94 02 | e8 02 20 02 00 00 12 00 |.+......|.. .....|
|00000310| 12 00 20 44 49 4d 20 43 | 68 61 72 24 28 31 30 2c |.. DIM C|har$(10,|
|00000320| 20 31 32 29 31 32 29 20 | 00 e8 02 c3 02 27 03 20 | 12)12) |.....'. |
|00000330| 02 00 00 2c 00 2c 00 20 | 20 20 20 20 46 72 65 65 |...,.,. | Free|
|00000340| 24 20 20 3d 20 43 48 52 | 24 28 32 34 39 29 20 3a |$ = CHR|$(249) :|
|00000350| 20 54 61 6b 65 6e 24 20 | 3d 20 43 48 52 24 28 31 | Taken$ |= CHR$(1|
|00000360| 37 38 29 38 29 20 ee 00 | 27 03 e8 02 54 03 20 02 |78)8) ..|'...T. .|
|00000370| 00 00 1a 00 1a 00 20 44 | 49 4d 20 48 69 67 68 24 |...... D|IM High$|
|00000380| 28 32 35 35 29 2c 20 4c | 6f 77 24 28 32 35 35 29 |(255), L|ow$(255)|
|00000390| 00 00 20 20 00 54 03 27 | 03 a3 03 20 02 00 00 3c |.. .T.'|... ...<|
|000003a0| 00 3c 00 20 20 20 20 20 | 4e 75 6d 62 65 72 20 3d |.<. |Number =|
|000003b0| 20 30 20 3a 20 56 6f 72 | 73 63 68 75 62 31 20 3d | 0 : Vor|schub1 =|
|000003c0| 20 35 20 3a 20 56 6f 72 | 73 63 68 75 62 32 20 3d | 5 : Vor|schub2 =|
|000003d0| 20 35 20 3a 20 46 6f 6e | 74 24 20 3d 20 22 22 7a | 5 : Fon|t$ = ""z|
|000003e0| 24 20 20 00 a3 03 54 03 | 00 00 20 02 00 00 35 00 |$ ...T.|.. ...5.|
|000003f0| 35 00 20 20 20 20 20 50 | 57 77 69 64 74 68 20 3d |5. P|Wwidth =|
|00000400| 20 34 20 3a 20 50 48 69 | 67 68 74 20 3d 20 32 20 | 4 : PHi|ght = 2 |
|00000410| 3a 20 4f 62 65 6e 20 3d | 20 34 20 3a 20 4c 69 6e |: Oben =| 4 : Lin|
|00000420| 6b 73 20 3d 20 31 35 ee | 00 5a 2f 00 eb 03 01 00 |ks = 15.|.Z/.....|
|00000430| 13 00 20 02 8e 04 01 00 | 00 00 00 00 00 00 00 00 |.. .....|........|
|00000440| 16 04 6c 04 1b 00 01 00 | 01 00 0e 00 03 00 69 00 |..l.....|......i.|
|00000450| 11 00 01 00 00 ee 00 16 | 04 00 00 3f 04 eb 03 00 |........|...?....|
|00000460| 00 16 00 16 00 20 52 45 | 4d 20 49 6e 69 74 69 61 |..... RE|M Initia|
|00000470| 6c 69 73 69 65 72 75 6e | 67 65 6e 00 00 ee ee 00 |lisierun|gen.....|
|00000480| 3f 04 16 04 6c 04 eb 03 | 00 00 1a 00 1a 00 20 43 |?...l...|...... C|
|00000490| 4f 4c 4f 52 20 37 2c 30 | 20 3a 20 43 4c 53 20 3a |OLOR 7,0| : CLS :|
|000004a0| 20 4b 45 59 20 4f 46 46 | 47 4f 53 ee 00 6c 04 3f | KEY OFF|GOS..l.?|
|000004b0| 04 00 00 eb 03 00 00 0f | 00 0f 00 20 47 4f 53 55 |........|... GOSU|
|000004c0| 42 20 48 65 61 64 4c 69 | 6e 65 20 ee 00 43 00 8e |B HeadLi|ne ..C..|
|000004d0| 04 04 00 13 00 eb 03 8a | 05 01 00 b9 04 35 05 00 |........|.....5..|
|000004e0| 00 00 00 00 00 00 00 03 | 00 01 00 01 00 11 00 00 |........|........|
|000004f0| 00 69 00 13 00 01 00 00 | 37 00 b9 04 01 00 08 00 |.i......|7.......|
|00000500| 00 00 0a 05 8e 04 00 00 | 00 00 00 00 00 00 e4 04 |........|........|
|00000510| e4 04 14 00 01 00 01 00 | 11 00 01 00 69 00 12 00 |........|....i...|
|00000520| 01 00 99 ee 00 e4 04 00 | 00 00 00 b9 04 00 00 13 |........|........|
|00000530| 00 13 00 20 20 46 4f 52 | 20 54 3d 31 20 54 4f 20 |... FOR| T=1 TO |
|00000540| 57 77 69 64 74 68 ee 00 | 2c 3b 00 0a 05 01 00 09 |Wwidth..|,;......|
|00000550| 00 b9 04 00 00 8e 04 00 | 00 00 00 00 00 35 05 00 |........|.....5..|
|00000560| 00 00 00 03 00 01 00 01 | 00 12 00 00 00 04 00 13 |........|........|
|00000570| 00 01 00 9f 41 00 35 05 | 01 00 0a 00 b9 04 00 00 |....A.5.|........|
|00000580| 8e 04 00 00 00 00 0a 05 | 00 00 60 05 60 05 18 00 |........|..`.`...|
|00000590| 01 00 04 00 12 00 01 00 | 69 00 13 00 01 00 ee ee |........|i.......|
|000005a0| 00 60 05 00 00 00 00 35 | 05 00 00 17 00 17 00 20 |.`.....5|....... |
|000005b0| 20 48 69 6c 66 24 3d 48 | 69 6c 66 24 20 2b 20 43 | Hilf$=H|ilf$ + C|
|000005c0| 48 52 24 28 30 29 00 00 | ee 57 00 8a 05 04 00 13 |HR$(0)..|.W......|
|000005d0| 00 8e 04 8f 06 01 00 b5 | 05 2e 06 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 03 00 01 00 01 | 00 13 00 00 00 69 00 15 |........|.....i..|
|000005f0| 00 01 00 00 4b 00 b5 05 | 01 00 08 00 00 00 03 06 |....K...|........|
|00000600| 8a 05 00 00 00 00 00 00 | 00 00 e0 05 e0 05 11 00 |........|........|
|00000610| 01 00 01 00 13 00 01 00 | 69 00 14 00 01 00 99 ee |........|i.......|
|00000620| 00 e0 05 00 00 00 00 b5 | 05 00 00 10 00 10 00 20 |........|....... |
|00000630| 20 46 4f 52 20 54 3d 30 | 20 54 4f 20 32 35 35 00 | FOR T=0| TO 255.|
|00000640| 00 ee 4f 00 03 06 01 00 | 09 00 b5 05 00 00 8a 05 |..O.....|........|
|00000650| 00 00 00 00 00 00 2e 06 | 00 00 00 00 03 00 01 00 |........|........|
|00000660| 01 00 14 00 00 00 04 00 | 15 00 01 00 9f 55 00 2e |........|.....U..|
|00000670| 06 01 00 0a 00 b5 05 00 | 00 8a 05 00 00 00 00 03 |........|........|
|00000680| 06 00 00 59 06 59 06 24 | 00 01 00 04 00 14 00 01 |...Y.Y.$|........|
|00000690| 00 69 00 15 00 01 00 ee | ee 00 59 06 00 00 00 00 |.i......|..Y.....|
|000006a0| 2e 06 00 00 23 00 23 00 | 20 20 48 69 67 68 24 28 |....#.#.| High$(|
|000006b0| 54 29 3d 48 69 6c 66 24 | 20 3a 20 4c 6f 77 24 28 |T)=Hilf$| : Low$(|
|000006c0| 54 29 3d 48 69 67 68 24 | 28 54 29 00 20 20 7d 00 |T)=High$|(T). }.|
|000006d0| 8f 06 07 00 13 00 8a 05 | 5a 08 01 00 ba 06 ba 06 |........|Z.......|
|000006e0| 00 00 00 00 00 00 00 00 | 03 00 01 00 01 00 15 00 |........|........|
|000006f0| 00 00 69 00 18 00 01 00 | 00 7b 00 ba 06 04 00 13 |..i.....|.{......|
|00000700| 00 00 00 00 00 8f 06 e5 | 06 60 07 00 00 00 00 00 |........|.`......|
|00000710| 00 00 00 03 00 01 00 01 | 00 15 00 00 00 69 00 18 |........|.....i..|
|00000720| 00 01 00 00 61 00 e5 06 | 01 00 08 00 00 00 35 07 |....a...|......5.|
|00000730| ba 06 00 00 00 00 00 00 | 00 00 10 07 10 07 13 00 |........|........|
|00000740| 01 00 01 00 15 00 01 00 | 69 00 16 00 01 00 ff ee |........|i.......|
|00000750| 00 10 07 00 00 00 00 e5 | 06 00 00 12 00 12 00 20 |........|....... |
|00000760| 20 46 4f 52 20 5a 3d 31 | 20 54 4f 20 48 69 67 68 | FOR Z=1| TO High|
|00000770| 74 00 00 ff 65 00 35 07 | 01 00 09 00 e5 06 00 00 |t...e.5.|........|
|00000780| ba 06 00 00 00 00 00 00 | 60 07 00 00 00 00 03 00 |........|`.......|
|00000790| 01 00 01 00 16 00 00 00 | 04 00 18 00 01 00 ff 79 |........|.......y|
|000007a0| 00 60 07 04 00 0a 00 e5 | 06 00 00 ba 06 8b 07 07 |.`......|........|
|000007b0| 08 35 07 00 00 00 00 00 | 00 03 00 01 00 04 00 16 |.5......|........|
|000007c0| 00 00 00 69 00 18 00 01 | 00 ee 6d 00 8b 07 01 00 |...i....|..m.....|
|000007d0| 08 00 00 00 dc 07 60 07 | 00 00 00 00 00 00 00 00 |......`.|........|
|000007e0| b6 07 b6 07 14 00 01 00 | 04 00 16 00 01 00 69 00 |........|......i.|
|000007f0| 17 00 01 00 ff ee 00 b6 | 07 00 00 00 00 8b 07 00 |........|........|
|00000800| 00 13 00 13 00 20 20 46 | 4f 52 20 53 3d 31 20 54 |..... F|OR S=1 T|
|00000810| 4f 20 57 77 69 64 74 68 | ee 00 a8 71 00 dc 07 01 |O Wwidth|...q....|
|00000820| 00 09 00 8b 07 00 00 60 | 07 00 00 00 00 00 00 07 |.......`|........|
|00000830| 08 00 00 00 00 03 00 01 | 00 04 00 17 00 00 00 07 |........|........|
|00000840| 00 18 00 01 00 ff 77 00 | 07 08 01 00 0a 00 8b 07 |......w.|........|
|00000850| 00 00 60 07 00 00 00 00 | dc 07 00 00 32 08 32 08 |..`.....|....2.2.|
|00000860| 19 00 01 00 07 00 17 00 | 01 00 69 00 18 00 01 00 |........|..i.....|
|00000870| ee ee 00 32 08 00 00 00 | 00 07 08 00 00 15 00 15 |...2....|........|
|00000880| 00 20 43 68 61 72 24 28 | 20 5a 2c 20 53 29 20 3d |. Char$(| Z, S) =|
|00000890| 20 46 72 65 65 24 65 69 | 24 87 00 5a 08 01 00 13 | Free$ei|$..Z....|
|000008a0| 00 8f 06 ec 08 01 00 00 | 00 00 00 00 00 00 00 85 |........|........|
|000008b0| 08 c5 08 18 00 01 00 01 | 00 18 00 03 00 69 00 1b |........|.....i..|
|000008c0| 00 01 00 00 ee 00 85 08 | 00 00 a8 08 5a 08 00 00 |........|....Z...|
|000008d0| 10 00 10 00 20 47 4f 53 | 55 42 20 50 72 69 6e 74 |.... GOS|UB Print|
|000008e0| 43 68 61 72 69 67 65 ee | 00 a8 08 85 08 c5 08 5a |Charige.|.......Z|
|000008f0| 08 00 00 0a 00 0a 00 20 | 5a 3d 31 20 3a 20 53 3d |....... |Z=1 : S=|
|00000900| 31 00 00 ee ee 00 c5 08 | a8 08 00 00 5a 08 00 00 |1.......|....Z...|
|00000910| 14 00 14 00 20 47 4f 53 | 55 42 20 50 72 69 6e 74 |.... GOS|UB Print|
|00000920| 43 75 72 46 69 65 6c 64 | 67 65 6e fb 00 ec 08 04 |CurField|gen.....|
|00000930| 00 13 00 5a 08 93 0e 01 | 00 17 09 6d 09 00 00 00 |...Z....|...m....|
|00000940| 00 00 00 00 00 03 00 01 | 00 01 00 1b 00 00 00 69 |........|.......i|
|00000950| 00 25 00 01 00 20 8d 00 | 17 09 01 00 08 00 00 00 |.%... ..|........|
|00000960| 42 09 ec 08 00 00 00 00 | 00 00 00 00 00 00 00 00 |B.......|........|
|00000970| 03 00 01 00 01 00 1b 00 | 00 00 69 00 1c 00 01 00 |........|..i.....|
|00000980| ff 91 00 42 09 01 00 09 | 00 17 09 00 00 ec 08 00 |...B....|........|
|00000990| 00 00 00 00 00 6d 09 00 | 00 00 00 03 00 01 00 01 |.....m..|........|
|000009a0| 00 1c 00 00 00 04 00 25 | 00 01 00 ff f9 00 6d 09 |.......%|......m.|
|000009b0| 07 00 0a 00 17 09 00 00 | ec 08 98 09 01 0a 42 09 |........|......B.|
|000009c0| 00 00 00 00 00 00 0f 00 | 01 00 04 00 1c 00 00 00 |........|........|
|000009d0| 69 00 25 00 01 00 ee 9b | 00 98 09 01 00 13 00 00 |i.%.....|........|
|000009e0| 00 01 0a 6d 09 00 00 00 | 00 00 00 00 00 c3 09 e4 |...m....|........|
|000009f0| 09 0f 00 01 00 04 00 1c | 00 02 00 69 00 1e 00 01 |........|...i....|
|00000a00| 00 07 ee 00 c3 09 00 00 | e4 09 98 09 00 00 0e 00 |........|........|
|00000a10| 0e 00 20 52 45 4d 20 4d | 61 69 6e 20 6d 65 6e 75 |.. REM M|ain menu|
|00000a20| 20 20 ee ee 00 e4 09 c3 | 09 00 00 98 09 00 00 0a | ......|........|
|00000a30| 00 0a 00 20 61 24 3d 49 | 4e 4b 45 59 24 00 c9 ee |... a$=I|NKEY$...|
|00000a40| f7 00 01 0a 03 00 13 00 | 98 09 00 00 6d 09 2c 0a |........|....m.,.|
|00000a50| 68 0e 00 00 00 00 00 00 | 00 00 03 00 01 00 04 00 |h.......|........|
|00000a60| 1e 00 00 00 69 00 25 00 | 01 00 50 a3 00 2c 0a 01 |....i.%.|..P..,..|
|00000a70| 00 05 00 00 00 6b 0a 01 | 0a 00 00 00 00 00 00 00 |.....k..|........|
|00000a80| 00 57 0a 57 0a 03 00 01 | 00 04 00 1e 00 01 00 69 |.W.W....|.......i|
|00000a90| 00 1f 00 01 00 ff ee 00 | 57 0a 00 00 00 00 2c 0a |........|W.....,.|
|00000aa0| 00 00 01 00 01 00 20 20 | 20 ff d1 00 6b 0a 08 00 |...... | ...k...|
|00000ab0| 06 00 2c 0a 00 00 01 0a | 96 0a ed 0a 00 00 d9 0c |..,.....|........|
|00000ac0| 00 00 00 00 03 00 01 00 | 04 00 1f 00 00 00 37 00 |........|......7.|
|00000ad0| 25 00 01 00 00 ab 00 96 | 0a 01 00 15 00 00 00 ed |%.......|........|
|00000ae0| 0a 6b 0a 00 00 00 00 00 | 00 00 00 c1 0a c1 0a 1a |.k......|........|
|00000af0| 00 01 00 04 00 1f 00 01 | 00 37 00 20 00 01 00 00 |........|.7. ....|
|00000b00| ee 00 c1 0a 00 00 00 00 | 96 0a 00 00 19 00 19 00 |........|........|
|00000b10| 20 49 46 20 4c 45 4e 28 | 61 24 29 3d 31 20 41 4e | IF LEN(|a$)=1 AN|
|00000b20| 44 20 61 24 3d 22 71 22 | 20 00 00 ee cf 00 ed 0a |D a$="q"| .......|
|00000b30| 07 00 14 00 96 0a 00 00 | 6b 0a 18 0b be 0b 00 00 |........|k.......|
|00000b40| 00 00 00 00 00 00 64 00 | 01 00 04 00 20 00 00 00 |......d.|.... ...|
|00000b50| 37 00 25 00 01 00 00 b5 | 00 18 0b 01 00 13 00 00 |7.%.....|........|
|00000b60| 00 be 0b ed 0a 00 00 00 | 00 00 00 00 00 43 0b 79 |........|.....C.y|
|00000b70| 0b 33 00 01 00 04 00 20 | 00 02 00 37 00 22 00 01 |.3..... |...7."..|
|00000b80| 00 00 ee 00 43 0b 00 00 | 79 0b 18 0b 00 00 23 00 |....C...|y.....#.|
|00000b90| 23 00 20 4c 4f 43 41 54 | 45 20 34 2c 31 20 3a 20 |#. LOCAT|E 4,1 : |
|00000ba0| 50 52 49 4e 54 20 53 54 | 52 49 4e 47 24 28 37 39 |PRINT ST|RING$(79|
|00000bb0| 2c 22 20 22 29 20 20 ee | 20 00 79 0b 43 0b 00 00 |," ") .| .y.C...|
|00000bc0| 18 0b 00 00 32 00 32 00 | 20 4c 4f 43 41 54 45 20 |....2.2.| LOCATE |
|00000bd0| 34 2c 31 20 3a 20 49 4e | 50 55 54 20 22 44 6f 20 |4,1 : IN|PUT "Do |
|00000be0| 79 6f 75 20 77 61 6e 74 | 20 74 6f 20 6c 65 61 76 |you want| to leav|
|00000bf0| 65 20 28 79 29 22 3b 20 | 61 24 20 20 20 cd 00 be |e (y)"; |a$ ...|
|00000c00| 0b 02 00 13 00 18 0b 00 | 00 ed 0a e9 0b 8c 0c 00 |........|........|
|00000c10| 00 00 00 00 00 00 00 03 | 00 01 00 04 00 22 00 00 |........|....."..|
|00000c20| 00 37 00 25 00 01 00 00 | bd 00 e9 0b 01 00 02 00 |.7.%....|........|
|00000c30| 00 00 31 0c be 0b 00 00 | 00 00 00 00 00 00 14 0c |..1.....|........|
|00000c40| 14 0c 0b 00 01 00 04 00 | 22 00 01 00 37 00 23 00 |........|"...7.#.|
|00000c50| 01 00 1d ee 00 14 0c 00 | 00 00 00 e9 0b 00 00 0a |........|........|
|00000c60| 00 0a 00 20 49 46 20 61 | 24 3d 22 79 22 00 00 ee |... IF a|$="y"...|
|00000c70| c5 00 31 0c 01 00 03 00 | e9 0b 00 00 be 0b 00 00 |..1.....|........|
|00000c80| 00 00 00 00 8c 0c 5c 0c | 73 0c 07 00 01 00 04 00 |......\.|s.......|
|00000c90| 23 00 02 00 0b 00 25 00 | 01 00 23 ee 00 5c 0c 00 |#.....%.|..#..\..|
|00000ca0| 00 73 0c 31 0c 00 00 04 | 00 04 00 20 43 4c 53 20 |.s.1....|... CLS |
|00000cb0| 20 20 ee 00 73 0c 5c 0c | 00 00 31 0c 00 00 06 00 | ..s.\.|..1.....|
|00000cc0| 06 00 20 45 58 49 54 20 | 20 ee 00 cb 00 8c 0c 01 |.. EXIT | .......|
|00000cd0| 00 04 00 e9 0b 00 00 be | 0b 00 00 00 00 31 0c 00 |........|.....1..|
|00000ce0| 00 b7 0c b7 0c 11 00 01 | 00 0b 00 23 00 01 00 37 |........|...#...7|
|00000cf0| 00 25 00 01 00 ee ee 00 | b7 0c 00 00 00 00 8c 0c |.%......|........|
|00000d00| 00 00 0f 00 0f 00 20 47 | 4f 53 55 42 20 48 65 61 |...... G|OSUB Hea|
|00000d10| 64 4c 69 6e 65 ee 00 21 | e1 00 d9 0c 08 00 06 00 |dLine..!|........|
|00000d20| 2c 0a 00 00 01 0a 04 0d | 50 0d 6b 0a 9c 0d 00 00 |,.......|P.k.....|
|00000d30| 00 00 03 00 01 00 37 00 | 1f 00 00 00 46 00 25 00 |......7.|....F.%.|
|00000d40| 01 00 20 d9 00 04 0d 01 | 00 15 00 00 00 50 0d d9 |.. .....|.....P..|
|00000d50| 0c 00 00 00 00 00 00 00 | 00 2f 0d 2f 0d 0f 00 01 |........|././....|
|00000d60| 00 37 00 1f 00 01 00 46 | 00 20 00 01 00 00 ee 00 |.7.....F|. ......|
|00000d70| 2f 0d 00 00 00 00 04 0d | 00 00 0e 00 0e 00 20 49 |/.......|...... I|
|00000d80| 46 20 4c 45 4e 28 61 24 | 29 3d 31 20 00 0c ff df |F LEN(a$|)=1 ....|
|00000d90| 00 50 0d 03 00 14 00 04 | 0d 00 00 d9 0c 00 00 00 |.P......|........|
|00000da0| 00 00 00 00 00 7b 0d 7b | 0d 0f 00 01 00 37 00 20 |.....{.{|.....7. |
|00000db0| 00 01 00 46 00 25 00 01 | 00 ff ee 00 7b 0d 00 00 |...F.%..|....{...|
|00000dc0| 00 00 50 0d 00 00 0e 00 | 0e 00 20 47 4f 53 55 42 |..P.....|.. GOSUB|
|00000dd0| 20 42 65 66 65 68 6c 20 | 00 00 ee f1 00 9c 0d 08 | Befehl |........|
|00000de0| 00 06 00 2c 0a 00 00 01 | 0a c7 0d 13 0e d9 0c 68 |...,....|.......h|
|00000df0| 0e 00 00 00 00 03 00 01 | 00 46 00 1f 00 00 00 5e |........|.F.....^|
|00000e00| 00 25 00 01 00 20 e9 00 | c7 0d 01 00 15 00 00 00 |.%... ..|........|
|00000e10| 13 0e 9c 0d 00 00 00 00 | 00 00 00 00 f2 0d f2 0d |........|........|
|00000e20| 0f 00 01 00 46 00 1f 00 | 01 00 5e 00 20 00 01 00 |....F...|..^. ...|
|00000e30| 20 ee 00 f2 0d 00 00 00 | 00 c7 0d 00 00 0e 00 0e | .......|........|
|00000e40| 00 20 49 46 20 4c 45 4e | 28 61 24 29 3d 32 20 00 |. IF LEN|(a$)=2 .|
|00000e50| 00 ee ef 00 13 0e 03 00 | 14 00 c7 0d 00 00 9c 0d |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 3e 0e 3e 0e 18 00 01 00 |........|>.>.....|
|00000e70| 46 00 20 00 01 00 5e 00 | 25 00 01 00 20 ee 00 3e |F. ...^.|%... ..>|
|00000e80| 0e 00 00 00 00 13 0e 00 | 00 17 00 17 00 20 47 4f |........|..... GO|
|00000e90| 53 55 42 20 43 75 72 73 | 6f 72 73 74 65 75 65 72 |SUB Curs|orsteuer|
|00000ea0| 75 6e 67 20 00 00 4b f5 | 00 68 0e 01 00 07 00 2c |ung ..K.|.h.....,|
|00000eb0| 0a 00 00 01 0a 00 00 00 | 00 9c 0d 00 00 00 00 00 |........|........|
|00000ec0| 00 03 00 01 00 5e 00 1f | 00 00 00 69 00 25 00 01 |.....^..|...i.%..|
|00000ed0| 00 ee 01 01 93 0e 01 00 | 13 00 ec 08 d5 0e 01 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | be 0e be 0e 05 00 01 00 |........|........|
|00000ef0| 01 00 25 00 01 00 69 00 | 26 00 01 00 00 ee 00 be |..%...i.|&.......|
|00000f00| 0e 00 00 00 00 93 0e 00 | 00 04 00 04 00 20 45 4e |........|..... EN|
|00000f10| 44 00 00 ff 79 01 d5 0e | 05 00 13 00 93 0e 68 14 |D...y...|......h.|
|00000f20| 01 00 00 0f 3d 14 00 00 | 00 00 00 00 00 00 03 00 |....=...|........|
|00000f30| 01 00 01 00 26 00 00 00 | 69 00 2c 00 01 00 00 09 |....&...|i.,.....|
|00000f40| 01 00 0f 01 00 0b 00 00 | 00 45 0f d5 0e 00 00 00 |........|.E......|
|00000f50| 00 00 00 00 00 2b 0f 2b | 0f 08 00 01 00 01 00 26 |.....+.+|.......&|
|00000f60| 00 01 00 69 00 27 00 01 | 00 29 ee 00 2b 0f 00 00 |...i.'..|.)..+...|
|00000f70| 00 00 00 0f 00 00 07 00 | 07 00 20 42 65 66 65 68 |........|.. Befeh|
|00000f80| 6c 00 00 ee 0d 01 45 0f | 01 00 0c 00 00 0f 3d 14 |l.....E.|......=.|
|00000f90| d5 0e 00 00 00 00 00 00 | 70 0f 00 00 00 00 03 00 |........|p.......|
|00000fa0| 01 00 01 00 27 00 00 00 | 04 00 2b 00 01 00 d1 73 |....'...|..+....s|
|00000fb0| 01 70 0f 07 00 0d 00 00 | 0f 3d 14 d5 0e 9b 0f 9b |.p......|.=......|
|00000fc0| 0f 45 0f 00 00 00 00 00 | 00 03 00 01 00 04 00 27 |.E......|.......'|
|00000fd0| 00 00 00 69 00 2b 00 01 | 00 d5 71 01 9b 0f 03 00 |...i.+..|..q.....|
|00000fe0| 13 00 00 00 00 00 70 0f | c6 0f 12 14 00 00 00 00 |......p.|........|
|00000ff0| 00 00 00 00 03 00 01 00 | 04 00 27 00 00 00 69 00 |........|..'...i.|
|00001000| 2b 00 01 00 ff 17 01 c6 | 0f 01 00 05 00 00 00 0b |+.......|........|
|00001010| 10 9b 0f 00 00 00 00 00 | 00 00 00 f1 0f f1 0f 08 |........|........|
|00001020| 00 01 00 04 00 27 00 01 | 00 69 00 28 00 01 00 ff |.....'..|.i.(....|
|00001030| ee 00 f1 0f 00 00 00 00 | c6 0f 00 00 07 00 07 00 |........|........|
|00001040| 20 49 46 20 61 24 3d 00 | 00 ee 29 01 0b 10 08 00 | IF a$=.|..).....|
|00001050| 06 00 c6 0f 00 00 9b 0f | 36 10 79 10 00 00 f2 10 |........|6.y.....|
|00001060| 00 00 00 00 03 00 01 00 | 04 00 28 00 00 00 1a 00 |........|..(.....|
|00001070| 2b 00 01 00 00 1f 01 36 | 10 01 00 15 00 00 00 79 |+......6|.......y|
|00001080| 10 0b 10 00 00 00 00 00 | 00 00 00 61 10 61 10 06 |........|...a.a..|
|00001090| 00 01 00 04 00 28 00 01 | 00 1a 00 29 00 01 00 44 |.....(..|...)...D|
|000010a0| ee 00 61 10 00 00 00 00 | 36 10 00 00 05 00 05 00 |..a.....|6.......|
|000010b0| 20 22 2b 22 20 00 00 ee | 27 01 79 10 01 00 14 00 | "+" ...|'.y.....|
|000010c0| 36 10 00 00 0b 10 00 00 | 00 00 00 00 00 00 a4 10 |6.......|........|
|000010d0| ca 10 16 00 01 00 04 00 | 29 00 02 00 1a 00 2b 00 |........|).....+.|
|000010e0| 01 00 ff ee 00 a4 10 00 | 00 ca 10 79 10 00 00 13 |........|...y....|
|000010f0| 00 13 00 20 43 68 61 72 | 24 28 5a 2c 53 29 3d 54 |... Char|$(Z,S)=T|
|00001100| 61 6b 65 6e 24 20 24 20 | 74 ee 00 ca 10 a4 10 00 |aken$ $ |t.......|
|00001110| 00 79 10 00 00 15 00 15 | 00 20 47 4f 53 55 42 20 |.y......|. GOSUB |
|00001120| 50 72 69 6e 74 43 75 72 | 46 69 65 6c 64 20 65 00 |PrintCur|Field e.|
|00001130| 00 3b 01 f2 10 08 00 06 | 00 c6 0f 00 00 9b 0f 1d |.;......|........|
|00001140| 11 60 11 0b 10 d7 11 00 | 00 00 00 03 00 01 00 1a |.`......|........|
|00001150| 00 28 00 00 00 30 00 2b | 00 01 00 00 31 01 1d 11 |.(...0.+|....1...|
|00001160| 01 00 15 00 00 00 60 11 | f2 10 00 00 00 00 00 00 |......`.|........|
|00001170| 00 00 48 11 48 11 06 00 | 01 00 1a 00 28 00 01 00 |..H.H...|....(...|
|00001180| 30 00 29 00 01 00 00 ee | 00 48 11 00 00 00 00 1d |0.).....|.H......|
|00001190| 11 00 00 05 00 05 00 20 | 22 2d 22 20 00 00 ee 39 |....... |"-" ...9|
|000011a0| 01 60 11 01 00 14 00 1d | 11 00 00 f2 10 00 00 00 |.`......|........|
|000011b0| 00 00 00 00 00 8b 11 af | 11 16 00 01 00 1a 00 29 |........|.......)|
|000011c0| 00 02 00 30 00 2b 00 01 | 00 00 ee 00 8b 11 00 00 |...0.+..|........|
|000011d0| af 11 60 11 00 00 11 00 | 11 00 20 43 68 61 72 24 |..`.....|.. Char$|
|000011e0| 28 5a 2c 53 29 3d 46 72 | 65 65 24 65 69 24 ee 00 |(Z,S)=Fr|ee$ei$..|
|000011f0| af 11 8b 11 00 00 60 11 | 00 00 15 00 15 00 20 47 |......`.|...... G|
|00001200| 4f 53 55 42 20 50 72 69 | 6e 74 43 75 72 46 69 65 |OSUB Pri|ntCurFie|
|00001210| 6c 64 20 65 6e 20 4b 01 | d7 11 08 00 06 00 c6 0f |ld en K.|........|
|00001220| 00 00 9b 0f 02 12 45 12 | f2 10 93 12 00 00 00 00 |......E.|........|
|00001230| 03 00 01 00 30 00 28 00 | 00 00 41 00 2b 00 01 00 |....0.(.|..A.+...|
|00001240| 65 43 01 02 12 01 00 15 | 00 00 00 45 12 d7 11 00 |eC......|...E....|
|00001250| 00 00 00 00 00 00 00 2d | 12 2d 12 06 00 01 00 30 |.......-|.-.....0|
|00001260| 00 28 00 01 00 41 00 29 | 00 01 00 20 ee 00 2d 12 |.(...A.)|... ..-.|
|00001270| 00 00 00 00 02 12 00 00 | 05 00 05 00 20 22 6c 22 |........|.... "l"|
|00001280| 20 00 00 ee 49 01 45 12 | 01 00 14 00 02 12 00 00 | ...I.E.|........|
|00001290| d7 11 00 00 00 00 00 00 | 00 00 70 12 70 12 11 00 |........|..p.p...|
|000012a0| 01 00 30 00 29 00 01 00 | 41 00 2b 00 01 00 20 ee |..0.)...|A.+... .|
|000012b0| 00 70 12 00 00 00 00 45 | 12 00 00 10 00 10 00 20 |.p.....E|....... |
|000012c0| 47 4f 53 55 42 20 4c 6f | 61 64 46 6f 6e 74 20 20 |GOSUB Lo|adFont |
|000012d0| 00 00 5b 01 93 12 08 00 | 06 00 c6 0f 00 00 9b 0f |..[.....|........|
|000012e0| be 12 01 13 d7 11 4f 13 | 00 00 00 00 03 00 01 00 |......O.|........|
|000012f0| 41 00 28 00 00 00 52 00 | 2b 00 01 00 00 53 01 be |A.(...R.|+....S..|
|00001300| 12 01 00 15 00 00 00 01 | 13 93 12 00 00 00 00 00 |........|........|
|00001310| 00 00 00 e9 12 e9 12 06 | 00 01 00 41 00 28 00 01 |........|...A.(..|
|00001320| 00 52 00 29 00 01 00 00 | ee 00 e9 12 00 00 00 00 |.R.)....|........|
|00001330| be 12 00 00 05 00 05 00 | 20 22 73 22 20 00 00 ee |........| "s" ...|
|00001340| 59 01 01 13 01 00 14 00 | be 12 00 00 93 12 00 00 |Y.......|........|
|00001350| 00 00 00 00 00 00 2c 13 | 2c 13 11 00 01 00 41 00 |......,.|,.....A.|
|00001360| 29 00 01 00 52 00 2b 00 | 01 00 01 ee 00 2c 13 00 |)...R.+.|.....,..|
|00001370| 00 00 00 01 13 00 00 10 | 00 10 00 20 47 4f 53 55 |........|... GOSU|
|00001380| 42 20 53 61 76 65 46 6f | 6e 74 20 68 65 72 6b 01 |B SaveFo|nt herk.|
|00001390| 4f 13 08 00 06 00 c6 0f | 00 00 9b 0f 7a 13 c1 13 |O.......|....z...|
|000013a0| 93 12 12 14 00 00 00 00 | 03 00 01 00 52 00 28 00 |........|....R.(.|
|000013b0| 00 00 66 00 2b 00 01 00 | 00 63 01 7a 13 01 00 15 |..f.+...|.c.z....|
|000013c0| 00 00 00 c1 13 4f 13 00 | 00 00 00 00 00 00 00 a5 |.....O..|........|
|000013d0| 13 a5 13 0a 00 01 00 52 | 00 28 00 01 00 66 00 29 |.......R|.(...f.)|
|000013e0| 00 01 00 00 ee 00 a5 13 | 00 00 00 00 7a 13 00 00 |........|....z...|
|000013f0| 09 00 09 00 20 43 48 52 | 24 28 31 33 29 00 00 20 |.... CHR|$(13).. |
|00001400| 69 01 c1 13 01 00 14 00 | 7a 13 00 00 4f 13 00 00 |i.......|z...O...|
|00001410| 00 00 00 00 00 00 ec 13 | ec 13 14 00 01 00 52 00 |........|......R.|
|00001420| 29 00 01 00 66 00 2b 00 | 01 00 00 ee 00 ec 13 00 |)...f.+.|........|
|00001430| 00 00 00 c1 13 00 00 13 | 00 13 00 20 47 4f 53 55 |........|... GOSU|
|00001440| 42 20 43 68 61 72 77 61 | 65 68 6c 65 6e 20 65 6e |B Charwa|ehlen en|
|00001450| 20 6f 01 12 14 01 00 07 | 00 c6 0f 00 00 9b 0f 00 | o......|........|
|00001460| 00 00 00 4f 13 00 00 00 | 00 00 00 03 00 01 00 66 |...O....|.......f|
|00001470| 00 28 00 00 00 69 00 2b | 00 01 00 ff 77 01 3d 14 |.(...i.+|....w.=.|
|00001480| 01 00 0e 00 70 0f 00 00 | d5 0e 00 00 00 00 00 00 |....p...|........|
|00001490| 00 00 00 00 00 00 03 00 | 01 00 01 00 2b 00 00 00 |........|....+...|
|000014a0| 69 00 2c 00 01 00 ee ed | 01 68 14 05 00 13 00 d5 |i.,.....|.h......|
|000014b0| 0e 4a 1a 01 00 93 14 1f | 1a 00 00 00 00 00 00 00 |.J......|........|
|000014c0| 00 03 00 01 00 01 00 2c | 00 00 00 69 00 33 00 01 |.......,|...i.3..|
|000014d0| 00 00 81 01 93 14 01 00 | 0b 00 00 00 e1 14 68 14 |........|......h.|
|000014e0| 00 00 00 00 00 00 00 00 | be 14 be 14 11 00 01 00 |........|........|
|000014f0| 01 00 2c 00 01 00 69 00 | 2d 00 01 00 e3 ee 00 be |..,...i.|-.......|
|00001500| 14 00 00 00 00 93 14 00 | 00 10 00 10 00 20 43 75 |........|..... Cu|
|00001510| 72 73 6f 72 73 74 65 75 | 65 72 75 6e 67 00 00 00 |rsorsteu|erung...|
|00001520| 85 01 e1 14 01 00 0c 00 | 93 14 1f 1a 68 14 00 00 |........|....h...|
|00001530| 00 00 00 00 0c 15 00 00 | 00 00 03 00 01 00 01 00 |........|........|
|00001540| 2d 00 00 00 04 00 32 00 | 01 00 45 e7 01 0c 15 07 |-.....2.|..E.....|
|00001550| 00 0d 00 93 14 1f 1a 68 | 14 37 15 37 15 e1 14 00 |.......h|.7.7....|
|00001560| 00 00 00 00 00 03 00 01 | 00 04 00 2d 00 00 00 69 |........|...-...i|
|00001570| 00 32 00 01 00 49 e5 01 | 37 15 03 00 13 00 00 00 |.2...I..|7.......|
|00001580| 00 00 0c 15 62 15 f4 19 | 00 00 00 00 00 00 00 00 |....b...|........|
|00001590| 03 00 01 00 04 00 2d 00 | 00 00 69 00 32 00 01 00 |......-.|..i.2...|
|000015a0| 20 8f 01 62 15 01 00 05 | 00 00 00 b3 15 37 15 00 | ..b....|.....7..|
|000015b0| 00 00 00 00 00 00 00 8d | 15 8d 15 14 00 01 00 04 |........|........|
|000015c0| 00 2d 00 01 00 69 00 2e | 00 01 00 ff ee 00 8d 15 |.-...i..|........|
|000015d0| 00 00 00 00 62 15 00 00 | 13 00 13 00 20 49 46 20 |....b...|.... IF |
|000015e0| 4d 49 44 24 28 61 24 2c | 20 32 2c 20 31 29 3d 20 |MID$(a$,| 2, 1)= |
|000015f0| 00 00 a3 01 b3 15 08 00 | 06 00 62 15 00 00 37 15 |........|..b...7.|
|00001600| de 15 2e 16 00 00 c1 16 | 00 00 00 00 03 00 01 00 |........|........|
|00001610| 04 00 2e 00 00 00 1a 00 | 32 00 01 00 00 97 01 de |........|2.......|
|00001620| 15 01 00 15 00 00 00 2e | 16 b3 15 00 00 00 00 00 |........|........|
|00001630| 00 00 00 09 16 09 16 13 | 00 01 00 04 00 2e 00 01 |........|........|
|00001640| 00 1a 00 2f 00 01 00 00 | ee 00 09 16 00 00 00 00 |.../....|........|
|00001650| de 15 00 00 12 00 12 00 | 20 43 48 52 24 28 38 30 |........| CHR$(80|
|00001660| 29 20 41 4e 44 20 5a 3e | 31 20 20 00 ee a1 01 2e |) AND Z>|1 .....|
|00001670| 16 01 00 14 00 de 15 00 | 00 b3 15 00 00 00 00 00 |........|........|
|00001680| 00 00 00 59 16 99 16 16 | 00 01 00 04 00 2f 00 03 |...Y....|...../..|
|00001690| 00 1a 00 32 00 01 00 ff | ee 00 59 16 00 00 80 16 |...2....|..Y.....|
|000016a0| 2e 16 00 00 14 00 14 00 | 20 47 4f 53 55 42 20 48 |........| GOSUB H|
|000016b0| 69 64 65 43 75 72 46 69 | 65 6c 64 20 20 00 00 ee |ideCurFi|eld ...|
|000016c0| 00 80 16 59 16 99 16 2e | 16 00 00 06 00 06 00 20 |...Y....|....... |
|000016d0| 5a 3d 5a 2d 31 00 00 ee | ee 00 99 16 80 16 00 00 |Z=Z-1...|........|
|000016e0| 2e 16 00 00 15 00 15 00 | 20 47 4f 53 55 42 20 50 |........| GOSUB P|
|000016f0| 72 69 6e 74 43 75 72 46 | 69 65 6c 64 20 65 6e 20 |rintCurF|ield en |
|00001700| b7 01 c1 16 08 00 06 00 | 62 15 00 00 37 15 ec 16 |........|b...7...|
|00001710| 40 17 b3 15 d3 17 00 00 | 00 00 03 00 01 00 1a 00 |@.......|........|
|00001720| 2e 00 00 00 31 00 32 00 | 01 00 00 ab 01 ec 16 01 |....1.2.|........|
|00001730| 00 15 00 00 00 40 17 c1 | 16 00 00 00 00 00 00 00 |.....@..|........|
|00001740| 00 17 17 17 17 17 00 01 | 00 1a 00 2e 00 01 00 31 |........|.......1|
|00001750| 00 2f 00 01 00 00 ee 00 | 17 17 00 00 00 00 ec 16 |./......|........|
|00001760| 00 00 16 00 16 00 20 43 | 48 52 24 28 37 32 29 20 |...... C|HR$(72) |
|00001770| 41 4e 44 20 5a 3c 48 69 | 67 68 74 20 00 00 ee b5 |AND Z<Hi|ght ....|
|00001780| 01 40 17 01 00 14 00 ec | 16 00 00 c1 16 00 00 00 |.@......|........|
|00001790| 00 00 00 00 00 6b 17 ab | 17 16 00 01 00 1a 00 2f |.....k..|......./|
|000017a0| 00 03 00 31 00 32 00 01 | 00 00 ee 00 6b 17 00 00 |...1.2..|....k...|
|000017b0| 92 17 40 17 00 00 14 00 | 14 00 20 47 4f 53 55 42 |..@.....|.. GOSUB|
|000017c0| 20 48 69 64 65 43 75 72 | 46 69 65 6c 64 20 20 ee | HideCur|Field .|
|000017d0| 00 20 20 92 17 6b 17 ab | 17 40 17 00 00 06 00 06 |. ..k..|.@......|
|000017e0| 00 20 5a 3d 5a 2b 31 ee | 00 4f ee 00 ab 17 92 17 |. Z=Z+1.|.O......|
|000017f0| 00 00 40 17 00 00 15 00 | 15 00 20 47 4f 53 55 42 |..@.....|.. GOSUB|
|00001800| 20 50 72 69 6e 74 43 75 | 72 46 69 65 6c 64 20 65 | PrintCu|rField e|
|00001810| 6e 20 cb 01 d3 17 08 00 | 06 00 62 15 00 00 37 15 |n ......|..b...7.|
|00001820| fe 17 53 18 c1 16 e6 18 | 00 00 00 00 03 00 01 00 |..S.....|........|
|00001830| 31 00 2e 00 00 00 49 00 | 32 00 01 00 00 bf 01 fe |1.....I.|2.......|
|00001840| 17 01 00 15 00 00 00 53 | 18 d3 17 00 00 00 00 00 |.......S|........|
|00001850| 00 00 00 29 18 29 18 18 | 00 01 00 31 00 2e 00 01 |...).)..|...1....|
|00001860| 00 49 00 2f 00 01 00 00 | ee 00 29 18 00 00 00 00 |.I./....|..).....|
|00001870| fe 17 00 00 17 00 17 00 | 20 43 48 52 24 28 37 37 |........| CHR$(77|
|00001880| 29 20 41 4e 44 20 53 3c | 57 77 69 64 74 68 20 20 |) AND S<|Wwidth |
|00001890| 20 20 c9 01 53 18 01 00 | 14 00 fe 17 00 00 d3 17 | ..S...|........|
|000018a0| 00 00 00 00 00 00 00 00 | 7e 18 be 18 16 00 01 00 |........|~.......|
|000018b0| 31 00 2f 00 03 00 49 00 | 32 00 01 00 00 ee 00 7e |1./...I.|2......~|
|000018c0| 18 00 00 a5 18 53 18 00 | 00 14 00 14 00 20 47 4f |.....S..|..... GO|
|000018d0| 53 55 42 20 48 69 64 65 | 43 75 72 46 69 65 6c 64 |SUB Hide|CurField|
|000018e0| 20 20 ee 00 20 20 a5 18 | 7e 18 be 18 53 18 00 00 | .. ..|~...S...|
|000018f0| 06 00 06 00 20 53 3d 53 | 2b 31 ee 20 20 20 20 be |.... S=S|+1. .|
|00001900| 18 a5 18 00 00 53 18 00 | 00 15 00 15 00 20 47 4f |.....S..|..... GO|
|00001910| 53 55 42 20 50 72 69 6e | 74 43 75 72 46 69 65 6c |SUB Prin|tCurFiel|
|00001920| 64 20 65 6e 20 df 01 e6 | 18 08 00 06 00 62 15 00 |d en ...|.....b..|
|00001930| 00 37 15 11 19 61 19 d3 | 17 f4 19 00 00 00 00 03 |.7...a..|........|
|00001940| 00 01 00 49 00 2e 00 00 | 00 5f 00 32 00 01 00 00 |...I....|._.2....|
|00001950| d3 01 11 19 01 00 15 00 | 00 00 61 19 e6 18 00 00 |........|..a.....|
|00001960| 00 00 00 00 00 00 3c 19 | 3c 19 13 00 01 00 49 00 |......<.|<.....I.|
|00001970| 2e 00 01 00 5f 00 2f 00 | 01 00 00 ee 00 3c 19 00 |...._./.|.....<..|
|00001980| 00 00 00 11 19 00 00 12 | 00 12 00 20 43 48 52 24 |........|... CHR$|
|00001990| 28 37 35 29 20 41 4e 44 | 20 53 3e 31 20 00 00 ee |(75) AND| S>1 ...|
|000019a0| dd 01 61 19 01 00 14 00 | 11 19 00 00 e6 18 00 00 |..a.....|........|
|000019b0| 00 00 00 00 00 00 8c 19 | cc 19 16 00 01 00 49 00 |........|......I.|
|000019c0| 2f 00 03 00 5f 00 32 00 | 01 00 00 ee 00 8c 19 00 |/..._.2.|........|
|000019d0| 00 b3 19 61 19 00 00 14 | 00 14 00 20 47 4f 53 55 |...a....|... GOSU|
|000019e0| 42 20 48 69 64 65 43 75 | 72 46 69 65 6c 64 20 20 |B HideCu|rField |
|000019f0| ee 00 20 20 b3 19 8c 19 | cc 19 61 19 00 00 06 00 |.. ....|..a.....|
|00001a00| 06 00 20 53 3d 53 2d 31 | ee 00 8c ee 00 cc 19 b3 |.. S=S-1|........|
|00001a10| 19 00 00 61 19 00 00 15 | 00 15 00 20 47 4f 53 55 |...a....|... GOSU|
|00001a20| 42 20 50 72 69 6e 74 43 | 75 72 46 69 65 6c 64 20 |B PrintC|urField |
|00001a30| 65 6e 20 e3 01 f4 19 01 | 00 07 00 62 15 00 00 37 |en .....|...b...7|
|00001a40| 15 00 00 00 00 e6 18 00 | 00 00 00 00 00 03 00 01 |........|........|
|00001a50| 00 5f 00 2e 00 00 00 69 | 00 32 00 01 00 ff eb 01 |._.....i|.2......|
|00001a60| 1f 1a 01 00 0e 00 0c 15 | 00 00 68 14 00 00 00 00 |........|..h.....|
|00001a70| 00 00 00 00 00 00 00 00 | 03 00 01 00 01 00 32 00 |........|......2.|
|00001a80| 00 00 69 00 33 00 01 00 | d7 11 02 4a 1a 05 00 13 |..i.3...|...J....|
|00001a90| 00 68 14 be 1c 01 00 75 | 1a 93 1c 00 00 00 00 00 |.h.....u|........|
|00001aa0| 00 00 00 03 00 01 00 01 | 00 33 00 00 00 69 00 3c |........|.3...i.<|
|00001ab0| 00 01 00 00 f5 01 75 1a | 01 00 0b 00 00 00 bc 1a |......u.|........|
|00001ac0| 4a 1a 00 00 00 00 00 00 | 00 00 a0 1a a0 1a 0f 00 |J.......|........|
|00001ad0| 01 00 01 00 33 00 01 00 | 69 00 34 00 01 00 ff ee |....3...|i.4.....|
|00001ae0| 00 a0 1a 00 00 00 00 75 | 1a 00 00 09 00 09 00 20 |.......u|....... |
|00001af0| 48 65 61 64 4c 69 6e 65 | 20 00 95 f9 01 bc 1a 01 |HeadLine| .......|
|00001b00| 00 0c 00 75 1a 93 1c 4a | 1a 00 00 00 00 00 00 e7 |...u...J|........|
|00001b10| 1a 00 00 00 00 03 00 01 | 00 01 00 34 00 00 00 04 |........|...4....|
|00001b20| 00 3b 00 01 00 ff 0b 02 | e7 1a 01 00 0d 00 75 1a |.;......|......u.|
|00001b30| 93 1c 4a 1a 00 00 00 00 | bc 1a 00 00 12 1b 29 1c |..J.....|......).|
|00001b40| 58 00 01 00 04 00 34 00 | 07 00 69 00 3b 00 01 00 |X.....4.|..i.;...|
|00001b50| ff ee 00 12 1b 00 00 30 | 1b e7 1a 00 00 0b 00 0b |.......0|........|
|00001b60| 00 20 4c 4f 43 41 54 45 | 20 31 2c 31 00 00 ee ee |. LOCATE| 1,1....|
|00001b70| 00 30 1b 12 1b 8b 1b e7 | 1a 00 00 48 00 48 00 20 |.0......|...H.H. |
|00001b80| 50 52 49 4e 54 20 22 43 | 75 72 73 6f 72 3d 6d 6f |PRINT "C|ursor=mo|
|00001b90| 76 65 20 66 69 65 6c 64 | 2c 20 52 65 74 75 72 6e |ve field|, Return|
|00001ba0| 3d 63 68 6f 6f 73 65 20 | 63 68 61 72 2c 20 2b 3d |=choose |char, +=|
|00001bb0| 66 69 65 6c 64 20 6f 6e | 2c 20 2d 3d 66 69 65 6c |field on|, -=fiel|
|00001bc0| 64 20 6f 66 66 22 20 6e | 20 ee ee 00 8b 1b 30 1b |d off" n| .....0.|
|00001bd0| c8 1b e7 1a 00 00 2a 00 | 2a 00 20 50 52 49 4e 54 |......*.|*. PRINT|
|00001be0| 20 22 71 3d 71 75 69 74 | 2c 20 6c 3d 6c 6f 61 64 | "q=quit|, l=load|
|00001bf0| 20 66 6f 6e 74 2c 20 73 | 3d 73 61 76 65 20 66 6f | font, s|=save fo|
|00001c00| 6e 74 22 20 63 20 20 ee | 00 c8 1b 8b 1b e1 1b e7 |nt" c .|........|
|00001c10| 1a 00 00 06 00 06 00 20 | 50 52 49 4e 54 20 20 20 |....... |PRINT |
|00001c20| ee 00 e1 1b c8 1b 0b 1c | e7 1a 00 00 17 00 17 00 |........|........|
|00001c30| 20 50 52 49 4e 54 20 53 | 54 52 49 4e 47 24 28 37 | PRINT S|TRING$(7|
|00001c40| 39 2c 20 22 20 22 29 20 | 20 20 ee 00 0b 1c e1 1b |9, " ") | ......|
|00001c50| 29 1c e7 1a 00 00 0b 00 | 0b 00 20 4c 4f 43 41 54 |).......|.. LOCAT|
|00001c60| 45 20 34 2c 31 ee 00 cd | ee 00 29 1c 0b 1c 00 00 |E 4,1...|..).....|
|00001c70| e7 1a 00 00 57 00 57 00 | 20 50 52 49 4e 54 20 22 |....W.W.| PRINT "|
|00001c80| 46 6f 6e 74 3d 22 3b 20 | 46 6f 6e 74 24 3b 20 22 |Font="; |Font$; "|
|00001c90| 2e 66 6f 6e 22 3b 20 22 | 20 20 73 68 6f 77 6e 20 |.fon"; "| shown |
|00001ca0| 63 68 61 72 3d 22 3b 20 | 4e 75 6d 62 65 72 3b 20 |char="; |Number; |
|00001cb0| 22 20 20 73 63 72 65 65 | 6e 20 63 68 61 72 20 22 |" scree|n char "|
|00001cc0| 3b 20 43 48 52 24 28 4e | 75 6d 62 65 72 29 3b 72 |; CHR$(N|umber);r|
|00001cd0| 20 ee 0f 02 93 1c 01 00 | 0e 00 e7 1a 00 00 4a 1a | .......|......J.|
|00001ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 03 00 01 00 |........|........|
|00001cf0| 01 00 3b 00 00 00 69 00 | 3c 00 01 00 ff 47 02 be |..;...i.|<....G..|
|00001d00| 1c 05 00 13 00 4a 1a b2 | 1f 01 00 e9 1c 87 1f 00 |.....J..|........|
|00001d10| 00 00 00 00 00 00 00 03 | 00 01 00 01 00 3c 00 00 |........|.....<..|
|00001d20| 00 69 00 42 00 01 00 00 | 19 02 e9 1c 01 00 0b 00 |.i.B....|........|
|00001d30| 00 00 31 1d be 1c 00 00 | 00 00 00 00 00 00 14 1d |..1.....|........|
|00001d40| 14 1d 13 00 01 00 01 00 | 3c 00 01 00 69 00 3d 00 |........|<...i.=.|
|00001d50| 01 00 ff ee 00 14 1d 00 | 00 00 00 e9 1c 00 00 0a |........|........|
|00001d60| 00 0a 00 20 50 72 69 6e | 74 43 68 61 72 69 67 65 |... Prin|tCharige|
|00001d70| 1d 02 31 1d 01 00 0c 00 | e9 1c 87 1f be 1c 00 00 |..1.....|........|
|00001d80| 00 00 00 00 5c 1d 00 00 | 00 00 03 00 01 00 01 00 |....\...|........|
|00001d90| 3d 00 00 00 04 00 41 00 | 01 00 ff 41 02 5c 1d 04 |=.....A.|...A.\..|
|00001da0| 00 0d 00 e9 1c 87 1f be | 1c 87 1d 1b 1e 31 1d 00 |........|.....1..|
|00001db0| 00 00 00 00 00 03 00 01 | 00 04 00 3d 00 00 00 69 |........|...=...i|
|00001dc0| 00 41 00 01 00 ff 25 02 | 87 1d 01 00 08 00 00 00 |.A....%.|........|
|00001dd0| f0 1d 5c 1d 00 00 00 00 | 00 00 00 00 b2 1d b2 1d |..\.....|........|
|00001de0| 34 00 01 00 04 00 3d 00 | 01 00 69 00 3e 00 01 00 |4.....=.|..i.>...|
|00001df0| ff ee 00 b2 1d 00 00 00 | 00 87 1d 00 00 2b 00 2b |........|.....+.+|
|00001e00| 00 20 20 46 4f 52 20 42 | 5a 3d 50 48 69 67 68 74 |. FOR B|Z=PHight|
|00001e10| 20 54 4f 20 50 48 69 67 | 68 74 20 2a 20 28 48 69 | TO PHig|ht * (Hi|
|00001e20| 67 68 74 20 2b 20 31 29 | 20 2d 20 31 20 2d 20 29 |ght + 1)| - 1 - )|
|00001e30| 02 f0 1d 01 00 09 00 87 | 1d 00 00 5c 1d 00 00 00 |........|...\....|
|00001e40| 00 00 00 1b 1e 00 00 00 | 00 03 00 01 00 04 00 3e |........|.......>|
|00001e50| 00 00 00 07 00 41 00 01 | 00 ff 3f 02 1b 1e 04 00 |.....A..|..?.....|
|00001e60| 0a 00 87 1d 00 00 5c 1d | 46 1e 09 1f f0 1d 00 00 |......\.|F.......|
|00001e70| 00 00 00 00 03 00 01 00 | 07 00 3e 00 00 00 69 00 |........|..>...i.|
|00001e80| 41 00 01 00 ff 33 02 46 | 1e 01 00 08 00 00 00 de |A....3.F|........|
|00001e90| 1e 1b 1e 00 00 00 00 00 | 00 00 00 71 1e 9d 1e 37 |........|...q...7|
|00001ea0| 00 01 00 07 00 3e 00 02 | 00 69 00 40 00 01 00 ff |.....>..|.i.@....|
|00001eb0| ee 00 71 1e 00 00 9d 1e | 46 1e 00 00 19 00 19 00 |..q.....|F.......|
|00001ec0| 20 20 4c 4f 43 41 54 45 | 20 42 5a 20 2b 20 4f 62 | LOCATE| BZ + Ob|
|00001ed0| 65 6e 2c 20 4c 69 6e 6b | 73 00 00 ee 20 20 9d 1e |en, Link|s... ..|
|00001ee0| 71 1e 00 00 46 1e 00 00 | 2e 00 2e 00 20 20 46 4f |q...F...|.... FO|
|00001ef0| 52 20 42 53 3d 50 57 77 | 69 64 74 68 20 54 4f 20 |R BS=PWw|idth TO |
|00001f00| 50 57 77 69 64 74 68 20 | 2a 20 28 57 77 69 64 74 |PWwidth |* (Wwidt|
|00001f10| 68 20 2b 20 31 29 20 2d | 20 31 ee 00 df 37 02 de |h + 1) -| 1...7..|
|00001f20| 1e 01 00 09 00 46 1e 00 | 00 1b 1e 00 00 00 00 00 |.....F..|........|
|00001f30| 00 09 1f 00 00 00 00 03 | 00 01 00 07 00 40 00 00 |........|.....@..|
|00001f40| 00 0a 00 41 00 01 00 ff | 3d 02 09 1f 01 00 0a 00 |...A....|=.......|
|00001f50| 46 1e 00 00 1b 1e 00 00 | 00 00 de 1e 00 00 34 1f |F.......|......4.|
|00001f60| 34 1f 4c 00 01 00 0a 00 | 40 00 01 00 69 00 41 00 |4.L.....|@...i.A.|
|00001f70| 01 00 20 ee 00 34 1f 00 | 00 00 00 09 1f 00 00 40 |.. ..4..|.......@|
|00001f80| 00 40 00 20 20 50 52 49 | 4e 54 20 43 68 61 72 24 |.@. PRI|NT Char$|
|00001f90| 28 20 48 69 67 68 74 20 | 2b 20 31 20 2d 20 49 4e |( Hight |+ 1 - IN|
|00001fa0| 54 28 42 5a 20 2f 20 50 | 48 69 67 68 74 29 2c 20 |T(BZ / P|Hight), |
|00001fb0| 49 4e 54 28 42 53 20 2f | 20 50 57 77 69 64 74 68 |INT(BS /| PWwidth|
|00001fc0| 29 29 3b ee 00 c9 45 02 | 87 1f 01 00 0e 00 5c 1d |));...E.|......\.|
|00001fd0| 00 00 be 1c 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fe0| 03 00 01 00 01 00 41 00 | 00 00 69 00 42 00 01 00 |......A.|..i.B...|
|00001ff0| ff 67 02 b2 1f 05 00 13 | 00 be 1c 3a 21 01 00 dd |.g......|...:!...|
|00002000| 1f 0f 21 00 00 00 00 00 | 00 00 00 03 00 01 00 01 |..!.....|........|
|00002010| 00 42 00 00 00 69 00 47 | 00 01 00 00 4f 02 dd 1f |.B...i.G|....O...|
|00002020| 01 00 0b 00 00 00 29 20 | b2 1f 00 00 00 00 00 00 |......) |........|
|00002030| 00 00 08 20 08 20 16 00 | 01 00 01 00 42 00 01 00 |... . ..|....B...|
|00002040| 69 00 43 00 01 00 ff ee | 00 08 20 00 00 00 00 dd |i.C.....|.. .....|
|00002050| 1f 00 00 0e 00 0e 00 20 | 50 72 69 6e 74 43 75 72 |....... |PrintCur|
|00002060| 46 69 65 6c 64 67 65 6e | 53 02 29 20 01 00 0c 00 |Fieldgen|S.) ....|
|00002070| dd 1f 0f 21 b2 1f 00 00 | 00 00 00 00 54 20 00 00 |...!....|....T ..|
|00002080| 00 00 03 00 01 00 01 00 | 43 00 00 00 04 00 46 00 |........|C.....F.|
|00002090| 01 00 ff 61 02 54 20 07 | 00 0d 00 dd 1f 0f 21 b2 |...a.T .|......!.|
|000020a0| 1f 7f 20 7f 20 29 20 00 | 00 00 00 00 00 0d 00 01 |.. . ) .|........|
|000020b0| 00 04 00 43 00 00 00 69 | 00 46 00 01 00 ff 5f 02 |...C...i|.F...._.|
|000020c0| 7f 20 01 00 13 00 00 00 | 00 00 54 20 00 00 00 00 |. ......|..T ....|
|000020d0| 00 00 00 00 aa 20 f0 20 | 16 00 01 00 04 00 43 00 |..... . |......C.|
|000020e0| 03 00 69 00 46 00 01 00 | 00 ee 00 aa 20 00 00 c9 |..i.F...|.... ...|
|000020f0| 20 7f 20 00 00 0c 00 0c | 00 20 20 43 4f 4c 4f 52 | . .....|. COLOR|
|00002100| 20 30 2c 20 37 00 00 ee | ee 00 c9 20 aa 20 f0 20 | 0, 7...|... . . |
|00002110| 7f 20 00 00 14 00 14 00 | 20 20 47 4f 53 55 42 20 |. ......| GOSUB |
|00002120| 48 69 64 65 43 75 72 46 | 69 65 6c 64 67 00 00 ee |HideCurF|ieldg...|
|00002130| 00 f0 20 c9 20 00 00 7f | 20 00 00 0c 00 0c 00 20 |.. . ...| ...... |
|00002140| 20 43 4f 4c 4f 52 20 37 | 2c 20 30 00 00 20 65 02 | COLOR 7|, 0.. e.|
|00002150| 0f 21 01 00 0e 00 54 20 | 00 00 b2 1f 00 00 00 00 |.!....T |........|
|00002160| 00 00 00 00 00 00 00 00 | 03 00 01 00 01 00 46 00 |........|......F.|
|00002170| 00 00 69 00 47 00 01 00 | ff a1 02 3a 21 05 00 13 |..i.G...|...:!...|
|00002180| 00 b2 1f 85 24 01 00 65 | 21 5a 24 00 00 00 00 00 |....$..e|!Z$.....|
|00002190| 00 00 00 03 00 01 00 01 | 00 47 00 00 00 69 00 4d |........|.G...i.M|
|000021a0| 00 01 00 00 6f 02 65 21 | 01 00 0b 00 00 00 b0 21 |....o.e!|.......!|
|000021b0| 3a 21 00 00 00 00 00 00 | 00 00 90 21 90 21 13 00 |:!......|...!.!..|
|000021c0| 01 00 01 00 47 00 01 00 | 69 00 48 00 01 00 ff ee |....G...|i.H.....|
|000021d0| 00 90 21 00 00 00 00 65 | 21 00 00 0d 00 0d 00 20 |..!....e|!...... |
|000021e0| 48 69 64 65 43 75 72 46 | 69 65 6c 64 67 64 77 73 |HideCurF|ieldgdws|
|000021f0| 02 b0 21 01 00 0c 00 65 | 21 5a 24 3a 21 00 00 00 |..!....e|!Z$:!...|
|00002200| 00 00 00 db 21 00 00 00 | 00 03 00 01 00 01 00 48 |....!...|.......H|
|00002210| 00 00 00 04 00 4c 00 01 | 00 ff 9b 02 db 21 07 00 |.....L..|.....!..|
|00002220| 0d 00 65 21 5a 24 3a 21 | 06 22 06 22 b0 21 00 00 |..e!Z$:!|.".".!..|
|00002230| 00 00 00 00 03 00 01 00 | 04 00 48 00 00 00 69 00 |........|..H...i.|
|00002240| 4c 00 01 00 ff 99 02 06 | 22 04 00 13 00 00 00 00 |L.......|".......|
|00002250| 00 db 21 31 22 c8 22 00 | 00 00 00 00 00 00 00 03 |..!1".".|........|
|00002260| 00 01 00 04 00 48 00 00 | 00 69 00 4c 00 01 00 00 |.....H..|.i.L....|
|00002270| 7d 02 31 22 01 00 08 00 | 00 00 9d 22 06 22 00 00 |}.1"....|..."."..|
|00002280| 00 00 00 00 00 00 5c 22 | 5c 22 37 00 01 00 04 00 |......\"|\"7.....|
|00002290| 48 00 01 00 69 00 49 00 | 01 00 ff ee 00 5c 22 00 |H...i.I.|.....\".|
|000022a0| 00 00 00 31 22 00 00 2e | 00 2e 00 20 20 46 4f 52 |...1"...|... FOR|
|000022b0| 20 42 5a 3d 50 48 69 67 | 68 74 20 2a 20 5a 20 20 | BZ=PHig|ht * Z |
|000022c0| 20 54 4f 20 20 50 48 69 | 67 68 74 20 2a 20 28 5a | TO PHi|ght * (Z|
|000022d0| 20 2b 20 31 29 20 2d 20 | 31 20 2d 20 81 02 9d 22 | + 1) - |1 - ..."|
|000022e0| 01 00 09 00 31 22 00 00 | 06 22 00 00 00 00 00 00 |....1"..|."......|
|000022f0| c8 22 00 00 00 00 03 00 | 01 00 04 00 49 00 00 00 |."......|....I...|
|00002300| 07 00 4c 00 01 00 ff 97 | 02 c8 22 04 00 0a 00 31 |..L.....|.."....1|
|00002310| 22 00 00 06 22 f3 22 e8 | 23 9d 22 00 00 00 00 00 |"...".".|#.".....|
|00002320| 00 03 00 01 00 07 00 49 | 00 00 00 69 00 4c 00 01 |.......I|...i.L..|
|00002330| 00 ff 8b 02 f3 22 01 00 | 08 00 00 00 bd 23 c8 22 |....."..|.....#."|
|00002340| 00 00 00 00 00 00 00 00 | 1e 23 79 23 51 00 01 00 |........|.#y#Q...|
|00002350| 07 00 49 00 02 00 69 00 | 4b 00 01 00 ff ee 00 1e |..I...i.|K.......|
|00002360| 23 00 00 79 23 f3 22 00 | 00 48 00 48 00 20 20 4c |#..y#.".|.H.H. L|
|00002370| 4f 43 41 54 45 20 28 48 | 69 67 68 74 20 2b 20 31 |OCATE (H|ight + 1|
|00002380| 29 20 2a 20 50 48 69 67 | 68 74 20 2d 20 42 5a 20 |) * PHig|ht - BZ |
|00002390| 2b 20 4f 62 65 6e 20 2b | 20 31 2c 20 50 57 77 69 |+ Oben +| 1, PWwi|
|000023a0| 64 74 68 20 2a 20 28 53 | 20 2d 20 31 29 20 2b 20 |dth * (S| - 1) + |
|000023b0| 4c 69 6e 6b 73 20 20 20 | 20 20 79 23 1e 23 00 00 |Links | y#.#..|
|000023c0| f3 22 00 00 31 00 31 00 | 20 20 46 4f 52 20 42 53 |."..1.1.| FOR BS|
|000023d0| 3d 50 57 77 69 64 74 68 | 20 2a 20 53 20 20 20 54 |=PWwidth| * S T|
|000023e0| 4f 20 20 20 50 57 77 69 | 64 74 68 20 2a 20 28 53 |O PWwi|dth * (S|
|000023f0| 20 2b 20 31 29 20 2d 20 | 31 ee 00 be 8f 02 bd 23 | + 1) - |1......#|
|00002400| 01 00 09 00 f3 22 00 00 | c8 22 00 00 00 00 00 00 |....."..|."......|
|00002410| e8 23 00 00 00 00 03 00 | 01 00 07 00 4b 00 00 00 |.#......|....K...|
|00002420| 0a 00 4c 00 01 00 ff 95 | 02 e8 23 01 00 0a 00 f3 |..L.....|..#.....|
|00002430| 22 00 00 c8 22 00 00 00 | 00 bd 23 00 00 13 24 13 |"..."...|..#...$.|
|00002440| 24 40 00 01 00 0a 00 4b | 00 01 00 69 00 4c 00 01 |$@.....K|...i.L..|
|00002450| 00 20 ee 00 13 24 00 00 | 00 00 e8 23 00 00 34 00 |. ...$..|...#..4.|
|00002460| 34 00 20 20 50 52 49 4e | 54 20 43 68 61 72 24 28 |4. PRIN|T Char$(|
|00002470| 20 49 4e 54 28 42 5a 20 | 2f 20 50 48 69 67 68 74 | INT(BZ |/ PHight|
|00002480| 29 2c 20 49 4e 54 28 42 | 53 20 2f 20 50 57 77 69 |), INT(B|S / PWwi|
|00002490| 64 74 68 29 29 3b ee 00 | ae 9f 02 5a 24 01 00 0e |dth));..|...Z$...|
|000024a0| 00 db 21 00 00 3a 21 00 | 00 00 00 00 00 00 00 00 |..!..:!.|........|
|000024b0| 00 00 00 03 00 01 00 01 | 00 4c 00 00 00 69 00 4d |........|.L...i.M|
|000024c0| 00 01 00 ee c7 02 85 24 | 05 00 13 00 3a 21 ba 26 |.......$|....:!.&|
|000024d0| 01 00 b0 24 8f 26 00 00 | 00 00 00 00 00 00 03 00 |...$.&..|........|
|000024e0| 01 00 01 00 4d 00 00 00 | 69 00 57 00 01 00 00 a9 |....M...|i.W.....|
|000024f0| 02 b0 24 01 00 0b 00 00 | 00 fa 24 85 24 00 00 00 |..$.....|..$.$...|
|00002500| 00 00 00 00 00 db 24 db | 24 14 00 01 00 01 00 4d |......$.|$......M|
|00002510| 00 01 00 69 00 4e 00 01 | 00 ff ee 00 db 24 00 00 |...i.N..|.....$..|
|00002520| 00 00 b0 24 00 00 0c 00 | 0c 00 20 43 68 61 72 77 |...$....|.. Charw|
|00002530| 61 65 68 6c 65 6e 6c 65 | 6e ad 02 fa 24 01 00 0c |aehlenle|n...$...|
|00002540| 00 b0 24 8f 26 85 24 00 | 00 00 00 00 00 25 25 00 |..$.&.$.|.....%%.|
|00002550| 00 00 00 03 00 01 00 01 | 00 4e 00 00 00 04 00 56 |........|.N.....V|
|00002560| 00 01 00 ff c1 02 25 25 | 07 00 0d 00 b0 24 8f 26 |......%%|.....$.&|
|00002570| 85 24 00 00 00 00 fa 24 | 00 00 50 25 68 26 2a 00 |.$.....$|..P%h&*.|
|00002580| 01 00 04 00 4e 00 08 00 | 69 00 56 00 01 00 ff ee |....N...|i.V.....|
|00002590| 00 50 25 00 00 72 25 25 | 25 00 00 0f 00 0f 00 20 |.P%..r%%|%...... |
|000025a0| 47 4f 53 55 42 20 53 61 | 76 65 43 68 61 72 69 63 |GOSUB Sa|veCharic|
|000025b0| 68 20 20 72 25 50 25 a9 | 25 25 25 00 00 24 00 24 |h r%P%.|%%%..$.$|
|000025c0| 00 20 4c 4f 43 41 54 45 | 20 34 2c 31 20 3a 20 50 |. LOCATE| 4,1 : P|
|000025d0| 52 49 4e 54 20 53 54 52 | 49 4e 47 24 28 37 39 2c |RINT STR|ING$(79,|
|000025e0| 20 22 20 22 29 20 20 ee | ee 00 a9 25 72 25 e5 25 | " ") .|...%r%.%|
|000025f0| 25 25 00 00 29 00 29 00 | 20 4c 4f 43 41 54 45 20 |%%..).).| LOCATE |
|00002600| 34 2c 31 20 3a 20 49 4e | 50 55 54 20 22 57 68 69 |4,1 : IN|PUT "Whi|
|00002610| 63 68 20 63 68 61 72 20 | 22 3b 20 4e 75 6d 62 65 |ch char |"; Numbe|
|00002620| 72 6d 20 20 20 00 e5 25 | a9 25 07 26 25 25 00 00 |rm ..%|.%.&%%..|
|00002630| 0f 00 0f 00 20 47 4f 53 | 55 42 20 48 65 61 64 4c |.... GOS|UB HeadL|
|00002640| 69 6e 65 47 4f 53 ee 00 | 07 26 e5 25 28 26 25 25 |ineGOS..|.&.%(&%%|
|00002650| 00 00 0e 00 0e 00 20 47 | 4f 53 55 42 20 47 65 74 |...... G|OSUB Get|
|00002660| 43 68 61 72 47 4f 53 ee | 00 28 26 07 26 4b 26 25 |CharGOS.|.(&.&K&%|
|00002670| 25 00 00 10 00 10 00 20 | 47 4f 53 55 42 20 50 72 |%...... |GOSUB Pr|
|00002680| 69 6e 74 43 68 61 72 20 | ee 00 20 00 4b 26 28 26 |intChar |.. .K&(&|
|00002690| 68 26 25 25 00 00 0a 00 | 0a 00 20 5a 3d 31 20 3a |h&%%....|.. Z=1 :|
|000026a0| 20 53 3d 31 47 4f 53 ee | 00 68 26 4b 26 00 00 25 | S=1GOS.|.h&K&..%|
|000026b0| 25 00 00 14 00 14 00 20 | 47 4f 53 55 42 20 50 72 |%...... |GOSUB Pr|
|000026c0| 69 6e 74 43 75 72 46 69 | 65 6c 64 20 ee 00 c5 02 |intCurFi|eld ....|
|000026d0| 8f 26 01 00 0e 00 25 25 | 00 00 85 24 00 00 00 00 |.&....%%|...$....|
|000026e0| 00 00 00 00 00 00 00 00 | 57 00 01 00 01 00 56 00 |........|W.....V.|
|000026f0| 00 00 69 00 57 00 01 00 | ff 4f 03 ba 26 05 00 13 |..i.W...|.O..&...|
|00002700| 00 85 24 a1 2d 01 00 e5 | 26 76 2d 00 00 00 00 00 |..$.-...|&v-.....|
|00002710| 00 00 00 03 00 01 00 01 | 00 57 00 00 00 69 00 65 |........|.W...i.e|
|00002720| 00 01 00 00 cf 02 e5 26 | 01 00 0b 00 00 00 2c 27 |.......&|......,'|
|00002730| ba 26 00 00 00 00 00 00 | 00 00 10 27 10 27 10 00 |.&......|...'.'..|
|00002740| 01 00 01 00 57 00 01 00 | 69 00 58 00 01 00 73 ee |....W...|i.X...s.|
|00002750| 00 10 27 00 00 00 00 e5 | 26 00 00 09 00 09 00 20 |..'.....|&...... |
|00002760| 53 61 76 65 43 68 61 72 | 69 63 68 d3 02 2c 27 01 |SaveChar|ich..,'.|
|00002770| 00 0c 00 e5 26 76 2d ba | 26 00 00 00 00 00 00 57 |....&v-.|&......W|
|00002780| 27 00 00 00 00 03 00 01 | 00 01 00 58 00 00 00 04 |'.......|...X....|
|00002790| 00 64 00 01 00 eb 49 03 | 57 27 07 00 0d 00 e5 26 |.d....I.|W'.....&|
|000027a0| 76 2d ba 26 82 27 e3 27 | 2c 27 00 00 00 00 00 00 |v-.&.'.'|,'......|
|000027b0| 24 00 01 00 04 00 58 00 | 00 00 69 00 64 00 01 00 |$.....X.|..i.d...|
|000027c0| ef db 02 82 27 01 00 13 | 00 00 00 e3 27 57 27 00 |....'...|....'W'.|
|000027d0| 00 00 00 00 00 00 00 ad | 27 ad 27 24 00 01 00 04 |........|'.'$....|
|000027e0| 00 58 00 01 00 69 00 59 | 00 01 00 00 ee 00 ad 27 |.X...i.Y|.......'|
|000027f0| 00 00 00 00 82 27 00 00 | 23 00 23 00 20 48 69 67 |.....'..|#.#. Hig|
|00002800| 68 24 28 4e 75 6d 62 65 | 72 29 3d 22 22 20 3a 20 |h$(Numbe|r)="" : |
|00002810| 4c 6f 77 24 28 4e 75 6d | 62 65 72 29 3d 22 22 ee |Low$(Num|ber)="".|
|00002820| 00 00 47 03 e3 27 07 00 | 13 00 82 27 00 00 57 27 |..G..'..|...'..W'|
|00002830| 0e 28 0e 28 00 00 00 00 | 00 00 00 00 03 00 01 00 |.(.(....|........|
|00002840| 04 00 59 00 00 00 69 00 | 64 00 01 00 00 45 03 0e |..Y...i.|d....E..|
|00002850| 28 04 00 13 00 00 00 00 | 00 e3 27 39 28 b5 28 00 |(.......|..'9(.(.|
|00002860| 00 00 00 00 00 00 00 03 | 00 01 00 04 00 59 00 00 |........|.....Y..|
|00002870| 00 69 00 64 00 01 00 00 | e5 02 39 28 01 00 08 00 |.i.d....|..9(....|
|00002880| 00 00 8a 28 0e 28 00 00 | 00 00 00 00 00 00 64 28 |...(.(..|......d(|
|00002890| 64 28 14 00 01 00 04 00 | 59 00 01 00 69 00 5a 00 |d(......|Y...i.Z.|
|000028a0| 01 00 ff ee 00 64 28 00 | 00 00 00 39 28 00 00 13 |.....d(.|...9(...|
|000028b0| 00 13 00 20 20 46 4f 52 | 20 74 3d 31 20 74 6f 20 |... FOR| t=1 to |
|000028c0| 57 77 69 64 74 68 ee 00 | 08 e9 02 8a 28 01 00 09 |Wwidth..|....(...|
|000028d0| 00 39 28 00 00 0e 28 00 | 00 00 00 00 00 b5 28 00 |.9(...(.|......(.|
|000028e0| 00 00 00 03 00 01 00 04 | 00 5a 00 00 00 07 00 64 |........|.Z.....d|
|000028f0| 00 01 00 ff 43 03 b5 28 | 07 00 0a 00 39 28 00 00 |....C..(|....9(..|
|00002900| 0e 28 e0 28 0f 2d 8a 28 | 00 00 00 00 00 00 03 00 |.(.(.-.(|........|
|00002910| 01 00 07 00 5a 00 00 00 | 69 00 64 00 01 00 ee 13 |....Z...|i.d.....|
|00002920| 03 e0 28 04 00 13 00 00 | 00 e6 2a b5 28 0b 29 ae |..(.....|..*.(.).|
|00002930| 29 00 00 00 00 00 00 00 | 00 03 00 01 00 07 00 5a |).......|.......Z|
|00002940| 00 00 00 69 00 5e 00 01 | 00 00 f5 02 0b 29 01 00 |...i.^..|.....)..|
|00002950| 08 00 00 00 83 29 e0 28 | 00 00 00 00 00 00 00 00 |.....).(|........|
|00002960| 36 29 52 29 23 00 01 00 | 07 00 5a 00 02 00 69 00 |6)R)#...|..Z...i.|
|00002970| 5c 00 01 00 ff ee 00 36 | 29 00 00 52 29 0b 29 00 |\......6|)..R).).|
|00002980| 00 09 00 09 00 20 20 53 | 75 6d 6d 65 3d 30 00 00 |..... S|umme=0..|
|00002990| 20 ee 00 52 29 36 29 00 | 00 0b 29 00 00 1e 00 1e | ..R)6).|..).....|
|000029a0| 00 20 20 46 4f 52 20 67 | 3d 56 6f 72 73 63 68 75 |. FOR g|=Vorschu|
|000029b0| 62 31 20 2b 20 31 20 54 | 4f 20 48 69 67 68 74 6f |b1 + 1 T|O Highto|
|000029c0| 65 68 f9 02 83 29 01 00 | 09 00 0b 29 00 00 e0 28 |eh...)..|...)...(|
|000029d0| 00 00 00 00 00 00 ae 29 | 00 00 00 00 03 00 01 00 |.......)|........|
|000029e0| 07 00 5c 00 00 00 0a 00 | 5e 00 01 00 ff 11 03 ae |..\.....|^.......|
|000029f0| 29 02 00 0a 00 0b 29 00 | 00 e0 28 d9 29 bb 2a 83 |).....).|..(.).*.|
|00002a00| 29 00 00 00 00 00 00 03 | 00 01 00 0a 00 5c 00 00 |).......|.....\..|
|00002a10| 00 69 00 5e 00 01 00 ee | 01 03 d9 29 01 00 02 00 |.i.^....|...)....|
|00002a20| 00 00 2d 2a ae 29 00 00 | 00 00 00 00 00 00 04 2a |..-*.)..|.......*|
|00002a30| 04 2a 1c 00 01 00 0a 00 | 5c 00 01 00 69 00 5d 00 |.*......|\...i.].|
|00002a40| 01 00 ff ee 00 04 2a 00 | 00 00 00 d9 29 00 00 16 |......*.|....)...|
|00002a50| 00 16 00 20 49 46 20 43 | 68 61 72 24 28 67 2c 20 |... IF C|har$(g, |
|00002a60| 74 29 3d 54 61 6b 65 6e | 24 74 24 7a 0b 03 2d 2a |t)=Taken|$t$z..-*|
|00002a70| 07 00 03 00 d9 29 00 00 | ae 29 58 2a 58 2a 00 00 |.....)..|.)X*X*..|
|00002a80| bb 2a 00 00 00 00 1a 00 | 01 00 0a 00 5d 00 00 00 |.*......|....]...|
|00002a90| 34 00 5e 00 01 00 ff 09 | 03 58 2a 01 00 13 00 00 |4.^.....|.X*.....|
|00002aa0| 00 00 00 2d 2a 00 00 00 | 00 00 00 00 00 83 2a 83 |...-*...|......*.|
|00002ab0| 2a 2a 00 01 00 0a 00 5d | 00 01 00 34 00 5e 00 01 |**.....]|...4.^..|
|00002ac0| 00 00 ee 00 83 2a 00 00 | 00 00 58 2a 00 00 25 00 |.....*..|..X*..%.|
|00002ad0| 25 00 20 53 75 6d 6d 65 | 3d 53 75 6d 6d 65 20 2b |%. Summe|=Summe +|
|00002ae0| 20 32 5e 28 67 20 2d 20 | 56 6f 72 73 63 68 75 62 | 2^(g - |Vorschub|
|00002af0| 31 20 2d 20 31 29 20 20 | 31 29 0f 03 bb 2a 01 00 |1 - 1) |1)...*..|
|00002b00| 04 00 d9 29 00 00 ae 29 | 00 00 00 00 2d 2a 00 00 |...)...)|....-*..|
|00002b10| 00 00 00 00 0a 00 01 00 | 34 00 5d 00 00 00 69 00 |........|4.]...i.|
|00002b20| 5e 00 01 00 ee 3b 03 e6 | 2a 04 00 13 00 e0 28 0f |^....;..|*.....(.|
|00002b30| 2d b5 28 11 2b f2 2b 00 | 00 00 00 00 00 00 00 03 |-.(.+.+.|........|
|00002b40| 00 01 00 07 00 5e 00 00 | 00 69 00 63 00 01 00 00 |.....^..|.i.c....|
|00002b50| 1f 03 11 2b 01 00 08 00 | 00 00 c7 2b e6 2a 00 00 |...+....|...+.*..|
|00002b60| 00 00 00 00 00 00 3c 2b | 96 2b 2c 00 01 00 07 00 |......<+|.+,.....|
|00002b70| 5e 00 03 00 69 00 61 00 | 01 00 ff ee 00 3c 2b 00 |^...i.a.|.....<+.|
|00002b80| 00 7a 2b 11 2b 00 00 2b | 00 2b 00 20 20 48 69 67 |.z+.+..+|.+. Hig|
|00002b90| 68 24 28 4e 75 6d 62 65 | 72 29 3d 48 69 67 68 24 |h$(Numbe|r)=High$|
|00002ba0| 28 4e 75 6d 62 65 72 29 | 20 2b 20 43 48 52 24 28 |(Number)| + CHR$(|
|00002bb0| 53 75 6d 6d 65 29 00 00 | ff 20 00 7a 2b 3c 2b 96 |Summe)..|. .z+<+.|
|00002bc0| 2b 11 2b 00 00 09 00 09 | 00 20 20 53 75 6d 6d 65 |+.+.....|. Summe|
|00002bd0| 3d 30 00 00 ee ee 00 96 | 2b 7a 2b 00 00 11 2b 00 |=0......|+z+...+.|
|00002be0| 00 1e 00 1e 00 20 20 46 | 4f 52 20 67 3d 31 20 54 |..... F|OR g=1 T|
|00002bf0| 4f 20 48 69 67 68 74 20 | 2d 20 56 6f 72 73 63 68 |O Hight |- Vorsch|
|00002c00| 75 62 31 75 6e 67 23 03 | c7 2b 01 00 09 00 11 2b |ub1ung#.|.+.....+|
|00002c10| 00 00 e6 2a 00 00 00 00 | 00 00 f2 2b 00 00 00 00 |...*....|...+....|
|00002c20| 03 00 01 00 07 00 61 00 | 00 00 0a 00 63 00 01 00 |......a.|....c...|
|00002c30| ff 39 03 f2 2b 02 00 0a | 00 11 2b 00 00 e6 2a 1d |.9..+...|..+...*.|
|00002c40| 2c c8 2c c7 2b 00 00 00 | 00 00 00 03 00 01 00 0a |,.,.+...|........|
|00002c50| 00 61 00 00 00 69 00 63 | 00 01 00 20 2b 03 1d 2c |.a...i.c|... +..,|
|00002c60| 01 00 02 00 00 00 71 2c | f2 2b 00 00 00 00 00 00 |......q,|.+......|
|00002c70| 00 00 48 2c 48 2c 1c 00 | 01 00 0a 00 61 00 01 00 |..H,H,..|....a...|
|00002c80| 69 00 62 00 01 00 ff ee | 00 48 2c 00 00 00 00 1d |i.b.....|.H,.....|
|00002c90| 2c 00 00 16 00 16 00 20 | 49 46 20 43 68 61 72 24 |,...... |IF Char$|
|00002ca0| 28 67 2c 20 74 29 3d 54 | 61 6b 65 6e 24 74 24 7a |(g, t)=T|aken$t$z|
|00002cb0| 31 03 71 2c 01 00 03 00 | 1d 2c 00 00 f2 2b 00 00 |1.q,....|.,...+..|
|00002cc0| 00 00 00 00 c8 2c 9c 2c | 9c 2c 1a 00 01 00 0a 00 |.....,.,|.,......|
|00002cd0| 62 00 01 00 24 00 63 00 | 01 00 ff ee 00 9c 2c 00 |b...$.c.|......,.|
|00002ce0| 00 00 00 71 2c 00 00 19 | 00 19 00 20 53 75 6d 6d |...q,...|... Summ|
|00002cf0| 65 3d 53 75 6d 6d 65 20 | 2b 20 32 5e 28 67 20 2d |e=Summe |+ 2^(g -|
|00002d00| 20 31 29 20 00 00 ff 37 | 03 c8 2c 01 00 04 00 1d | 1) ...7|..,.....|
|00002d10| 2c 00 00 f2 2b 00 00 00 | 00 71 2c 00 00 f3 2c f3 |,...+...|.q,...,.|
|00002d20| 2c 0a 00 01 00 24 00 62 | 00 01 00 69 00 63 00 01 |,....$.b|...i.c..|
|00002d30| 00 ee ee 00 f3 2c 00 00 | 00 00 c8 2c 00 00 09 00 |.....,..|...,....|
|00002d40| 09 00 20 52 45 4d 20 4c | 65 65 72 00 00 00 41 03 |.. REM L|eer...A.|
|00002d50| 0f 2d 01 00 13 00 e6 2a | 00 00 b5 28 00 00 00 00 |.-.....*|...(....|
|00002d60| 00 00 00 00 3a 2d 3a 2d | 2a 00 01 00 07 00 63 00 |....:-:-|*.....c.|
|00002d70| 01 00 69 00 64 00 01 00 | 00 ee 00 3a 2d 00 00 00 |..i.d...|...:-...|
|00002d80| 00 0f 2d 00 00 29 00 29 | 00 20 20 4c 6f 77 24 28 |..-..).)|. Low$(|
|00002d90| 4e 75 6d 62 65 72 29 3d | 4c 6f 77 24 28 4e 75 6d |Number)=|Low$(Num|
|00002da0| 62 65 72 29 20 2b 20 43 | 48 52 24 28 53 75 6d 6d |ber) + C|HR$(Summ|
|00002db0| 65 29 00 00 ee 4d 03 76 | 2d 01 00 0e 00 57 27 00 |e)...M.v|-....W'.|
|00002dc0| 00 ba 26 00 00 00 00 00 | 00 00 00 00 00 00 00 03 |..&.....|........|
|00002dd0| 00 01 00 01 00 64 00 00 | 00 69 00 65 00 01 00 f9 |.....d..|.i.e....|
|00002de0| cb 03 a1 2d 05 00 13 00 | ba 26 23 34 01 00 cc 2d |...-....|.&#4...-|
|00002df0| f8 33 00 00 00 00 00 00 | 00 00 03 00 01 00 01 00 |.3......|........|
|00002e00| 65 00 00 00 69 00 72 00 | 01 00 00 57 03 cc 2d 01 |e...i.r.|...W..-.|
|00002e10| 00 0b 00 00 00 12 2e a1 | 2d 00 00 00 00 00 00 00 |........|-.......|
|00002e20| 00 f7 2d f7 2d 0e 00 01 | 00 01 00 65 00 01 00 69 |..-.-...|...e...i|
|00002e30| 00 66 00 01 00 fd ee 00 | f7 2d 00 00 00 00 cc 2d |.f......|.-.....-|
|00002e40| 00 00 08 00 08 00 20 47 | 65 74 43 68 61 72 68 6f |...... G|etCharho|
|00002e50| 6c 5b 03 12 2e 01 00 0c | 00 cc 2d f8 33 a1 2d 00 |l[......|..-.3.-.|
|00002e60| 00 00 00 00 00 3d 2e 00 | 00 00 00 03 00 01 00 01 |.....=..|........|
|00002e70| 00 66 00 00 00 04 00 71 | 00 01 00 67 c5 03 3d 2e |.f.....q|...g..=.|
|00002e80| 07 00 0d 00 cc 2d f8 33 | a1 2d 68 2e 68 2e 12 2e |.....-.3|.-h.h...|
|00002e90| 00 00 00 00 00 00 03 00 | 01 00 04 00 66 00 00 00 |........|....f...|
|00002ea0| 69 00 71 00 01 00 6b c3 | 03 68 2e 04 00 13 00 00 |i.q...k.|.h......|
|00002eb0| 00 00 00 3d 2e 93 2e 0f | 2f 00 00 00 00 00 00 00 |...=....|/.......|
|00002ec0| 00 03 00 01 00 04 00 66 | 00 00 00 69 00 71 00 01 |.......f|...i.q..|
|00002ed0| 00 00 65 03 93 2e 01 00 | 08 00 00 00 e4 2e 68 2e |..e.....|......h.|
|00002ee0| 00 00 00 00 00 00 00 00 | be 2e be 2e 14 00 01 00 |........|........|
|00002ef0| 04 00 66 00 01 00 69 00 | 67 00 01 00 ff ee 00 be |..f...i.|g.......|
|00002f00| 2e 00 00 00 00 93 2e 00 | 00 13 00 13 00 20 20 46 |........|..... F|
|00002f10| 4f 52 20 74 3d 31 20 74 | 6f 20 57 77 69 64 74 68 |OR t=1 t|o Wwidth|
|00002f20| ee 00 f7 69 03 e4 2e 01 | 00 09 00 93 2e 00 00 68 |...i....|.......h|
|00002f30| 2e 00 00 00 00 00 00 0f | 2f 00 00 00 00 03 00 01 |........|/.......|
|00002f40| 00 04 00 67 00 00 00 07 | 00 71 00 01 00 ff c1 03 |...g....|.q......|
|00002f50| 0f 2f 07 00 0a 00 93 2e | 00 00 68 2e 3a 2f bb 31 |./......|..h.:/.1|
|00002f60| e4 2e 00 00 00 00 00 00 | 03 00 01 00 07 00 67 00 |........|......g.|
|00002f70| 00 00 69 00 71 00 01 00 | ee 97 03 3a 2f 04 00 13 |..i.q...|...:/...|
|00002f80| 00 00 00 bb 31 0f 2f 65 | 2f 2d 30 00 00 00 00 00 |....1./e|/-0.....|
|00002f90| 00 00 00 03 00 01 00 07 | 00 67 00 00 00 69 00 6c |........|.g...i.l|
|00002fa0| 00 01 00 00 75 03 65 2f | 01 00 08 00 00 00 02 30 |....u.e/|.......0|
|00002fb0| 3a 2f 00 00 00 00 00 00 | 00 00 90 2f c9 2f 2b 00 |:/......|..././+.|
|00002fc0| 01 00 07 00 67 00 02 00 | 69 00 69 00 01 00 ff ee |....g...|i.i.....|
|00002fd0| 00 90 2f 00 00 c9 2f 65 | 2f 00 00 26 00 26 00 20 |../.../e|/..&.&. |
|00002fe0| 20 53 75 6d 6d 65 3d 41 | 53 43 28 4d 49 44 24 28 | Summe=A|SC(MID$(|
|00002ff0| 48 69 67 68 24 28 4e 75 | 6d 62 65 72 29 2c 20 74 |High$(Nu|mber), t|
|00003000| 2c 20 31 29 29 20 00 20 | 20 00 c9 2f 90 2f 00 00 |, 1)) . | .././..|
|00003010| 65 2f 00 00 26 00 26 00 | 20 20 46 4f 52 20 67 3d |e/..&.&.| FOR g=|
|00003020| 48 69 67 68 74 20 54 4f | 20 56 6f 72 73 63 68 75 |Hight TO| Vorschu|
|00003030| 62 31 20 2b 20 31 20 53 | 54 45 50 20 2d 31 50 20 |b1 + 1 S|TEP -1P |
|00003040| 2d 79 03 02 30 01 00 09 | 00 65 2f 00 00 3a 2f 00 |-y..0...|.e/..:/.|
|00003050| 00 00 00 00 00 2d 30 00 | 00 00 00 03 00 01 00 07 |.....-0.|........|
|00003060| 00 69 00 00 00 0a 00 6c | 00 01 00 ff 95 03 2d 30 |.i.....l|......-0|
|00003070| 02 00 0a 00 65 2f 00 00 | 3a 2f 58 30 6b 31 02 30 |....e/..|:/X0k1.0|
|00003080| 00 00 00 00 00 00 03 00 | 01 00 0a 00 69 00 00 00 |........|....i...|
|00003090| 69 00 6c 00 01 00 ee 81 | 03 58 30 01 00 02 00 00 |i.l.....|.X0.....|
|000030a0| 00 b6 30 2d 30 00 00 00 | 00 00 00 00 00 83 30 83 |..0-0...|......0.|
|000030b0| 30 25 00 01 00 0a 00 69 | 00 01 00 69 00 6a 00 01 |0%.....i|...i.j..|
|000030c0| 00 ff 20 20 83 30 00 00 | 00 00 58 30 00 00 20 00 |.. .0..|..X0.. .|
|000030d0| 20 00 20 49 46 20 53 75 | 6d 6d 65 3e 3d 32 5e 28 | . IF Su|mme>=2^(|
|000030e0| 67 20 2d 20 56 6f 72 73 | 63 68 75 62 31 20 2d 20 |g - Vors|chub1 - |
|000030f0| 31 29 2d 20 31 8d 03 b6 | 30 07 00 03 00 58 30 00 |1)- 1...|0....X0.|
|00003100| 00 2d 30 e1 30 e1 30 00 | 00 6b 31 00 00 00 00 1a |.-0.0.0.|.k1.....|
|00003110| 00 01 00 0a 00 6a 00 00 | 00 34 00 6c 00 01 00 ff |.....j..|.4.l....|
|00003120| 8b 03 e1 30 01 00 13 00 | 00 00 00 00 b6 30 00 00 |...0....|.....0..|
|00003130| 00 00 00 00 00 00 0c 31 | 44 31 2a 00 01 00 0a 00 |.......1|D1*.....|
|00003140| 6a 00 02 00 34 00 6c 00 | 01 00 00 ee 00 0c 31 00 |j...4.l.|......1.|
|00003150| 00 44 31 e1 30 00 00 25 | 00 25 00 20 53 75 6d 6d |.D1.0..%|.%. Summ|
|00003160| 65 3d 53 75 6d 6d 65 20 | 2d 20 32 5e 28 67 20 2d |e=Summe |- 2^(g -|
|00003170| 20 56 6f 72 73 63 68 75 | 62 31 20 2d 20 31 29 20 | Vorschu|b1 - 1) |
|00003180| 20 31 29 ee 00 44 31 0c | 31 00 00 e1 30 00 00 14 | 1)..D1.|1...0...|
|00003190| 00 14 00 20 43 68 61 72 | 24 28 67 2c 20 74 29 3d |... Char|$(g, t)=|
|000031a0| 54 61 6b 65 6e 24 20 24 | 20 74 93 03 6b 31 01 00 |Taken$ $| t..k1..|
|000031b0| 04 00 58 30 00 00 2d 30 | 00 00 00 00 b6 30 00 00 |..X0..-0|.....0..|
|000031c0| 96 31 96 31 16 00 01 00 | 34 00 6a 00 01 00 69 00 |.1.1....|4.j...i.|
|000031d0| 6c 00 01 00 ee ee 00 96 | 31 00 00 00 00 6b 31 00 |l.......|1....k1.|
|000031e0| 00 12 00 12 00 20 43 68 | 61 72 24 28 67 2c 20 74 |..... Ch|ar$(g, t|
|000031f0| 29 3d 46 72 65 65 24 65 | 69 24 bf 03 bb 31 04 00 |)=Free$e|i$...1..|
|00003200| 13 00 3a 2f 00 00 0f 2f | e6 31 ad 32 00 00 00 00 |..:/.../|.1.2....|
|00003210| 00 00 00 00 03 00 01 00 | 07 00 6c 00 00 00 69 00 |........|..l...i.|
|00003220| 71 00 01 00 00 a1 03 e6 | 31 01 00 08 00 00 00 82 |q.......|1.......|
|00003230| 32 bb 31 00 00 00 00 00 | 00 00 00 11 32 49 32 2b |2.1.....|....2I2+|
|00003240| 00 01 00 07 00 6c 00 02 | 00 69 00 6e 00 01 00 ff |.....l..|.i.n....|
|00003250| 20 00 11 32 00 00 49 32 | e6 31 00 00 25 00 25 00 | ..2..I2|.1..%.%.|
|00003260| 20 20 53 75 6d 6d 65 3d | 41 53 43 28 4d 49 44 24 | Summe=|ASC(MID$|
|00003270| 28 4c 6f 77 24 28 4e 75 | 6d 62 65 72 29 2c 20 74 |(Low$(Nu|mber), t|
|00003280| 2c 20 31 29 29 00 20 00 | ee 00 49 32 11 32 00 00 |, 1)). .|..I2.2..|
|00003290| e6 31 00 00 26 00 26 00 | 20 20 46 4f 52 20 67 3d |.1..&.&.| FOR g=|
|000032a0| 48 69 67 68 74 20 2d 20 | 56 6f 72 73 63 68 75 62 |Hight - |Vorschub|
|000032b0| 31 20 54 4f 20 31 20 53 | 54 45 50 20 2d 31 50 20 |1 TO 1 S|TEP -1P |
|000032c0| 2d a5 03 82 32 01 00 09 | 00 e6 31 00 00 bb 31 00 |-...2...|..1...1.|
|000032d0| 00 00 00 00 00 ad 32 00 | 00 00 00 03 00 01 00 07 |......2.|........|
|000032e0| 00 6e 00 00 00 0a 00 71 | 00 01 00 ff bd 03 ad 32 |.n.....q|.......2|
|000032f0| 02 00 0a 00 e6 31 00 00 | bb 31 d8 32 a8 33 82 32 |.....1..|.1.2.3.2|
|00003300| 00 00 00 00 00 00 03 00 | 01 00 0a 00 6e 00 00 00 |........|....n...|
|00003310| 69 00 71 00 01 00 20 ad | 03 d8 32 01 00 02 00 00 |i.q... .|..2.....|
|00003320| 00 2a 33 ad 32 00 00 00 | 00 00 00 00 00 03 33 03 |.*3.2...|......3.|
|00003330| 33 15 00 01 00 0a 00 6e | 00 01 00 69 00 6f 00 01 |3......n|...i.o..|
|00003340| 00 ff 20 20 03 33 00 00 | 00 00 d8 32 00 00 14 00 |.. .3..|...2....|
|00003350| 14 00 20 49 46 20 53 75 | 6d 6d 65 3e 3d 32 5e 28 |.. IF Su|mme>=2^(|
|00003360| 67 20 2d 20 31 29 20 ee | 00 b5 03 2a 33 01 00 03 |g - 1) .|...*3...|
|00003370| 00 d8 32 00 00 ad 32 00 | 00 00 00 00 00 a8 33 55 |..2...2.|......3U|
|00003380| 33 81 33 1a 00 01 00 0a | 00 6f 00 02 00 24 00 71 |3.3.....|.o...$.q|
|00003390| 00 01 00 ff ee 00 55 33 | 00 00 81 33 2a 33 00 00 |......U3|...3*3..|
|000033a0| 19 00 19 00 20 53 75 6d | 6d 65 3d 53 75 6d 6d 65 |.... Sum|me=Summe|
|000033b0| 20 2d 20 32 5e 28 67 20 | 2d 20 31 29 20 00 00 ff | - 2^(g |- 1) ...|
|000033c0| ee 00 81 33 55 33 00 00 | 2a 33 00 00 14 00 14 00 |...3U3..|*3......|
|000033d0| 20 43 68 61 72 24 28 67 | 2c 20 74 29 3d 54 61 6b | Char$(g|, t)=Tak|
|000033e0| 65 6e 24 20 24 20 74 bb | 03 a8 33 01 00 04 00 d8 |en$ $ t.|..3.....|
|000033f0| 32 00 00 ad 32 00 00 00 | 00 2a 33 00 00 d3 33 d3 |2...2...|.*3...3.|
|00003400| 33 16 00 01 00 24 00 6f | 00 01 00 69 00 71 00 01 |3....$.o|...i.q..|
|00003410| 00 ee ee 00 d3 33 00 00 | 00 00 a8 33 00 00 12 00 |.....3..|...3....|
|00003420| 12 00 20 43 68 61 72 24 | 28 67 2c 20 74 29 3d 46 |.. Char$|(g, t)=F|
|00003430| 72 65 65 24 65 69 24 c9 | 03 f8 33 01 00 0e 00 3d |ree$ei$.|..3....=|
|00003440| 2e 00 00 a1 2d 00 00 00 | 00 00 00 00 00 00 00 00 |....-...|........|
|00003450| 00 03 00 01 00 01 00 71 | 00 00 00 69 00 72 00 01 |.......q|...i.r..|
|00003460| 00 ee 2b 04 23 34 05 00 | 13 00 a1 2d c8 39 01 00 |..+.#4..|...-.9..|
|00003470| 4e 34 9d 39 00 00 00 00 | 00 00 00 00 03 00 01 00 |N4.9....|........|
|00003480| 01 00 72 00 00 00 69 00 | 83 00 01 00 00 d3 03 4e |..r...i.|.......N|
|00003490| 34 01 00 0b 00 00 00 95 | 34 23 34 00 00 00 00 00 |4.......|4#4.....|
|000034a0| 00 00 00 79 34 79 34 0f | 00 01 00 01 00 72 00 01 |...y4y4.|.....r..|
|000034b0| 00 69 00 73 00 01 00 ff | ee 00 79 34 00 00 00 00 |.i.s....|..y4....|
|000034c0| 4e 34 00 00 09 00 09 00 | 20 4c 6f 61 64 46 6f 6e |N4......| LoadFon|
|000034d0| 74 6e 61 64 d7 03 95 34 | 01 00 0c 00 4e 34 9d 39 |tnad...4|....N4.9|
|000034e0| 23 34 00 00 00 00 00 00 | c0 34 00 00 00 00 03 00 |#4......|.4......|
|000034f0| 01 00 01 00 73 00 00 00 | 04 00 82 00 01 00 ff 25 |....s...|.......%|
|00003500| 04 c0 34 07 00 0d 00 4e | 34 9d 39 23 34 eb 34 ac |..4....N|4.9#4.4.|
|00003510| 38 95 34 00 00 00 00 00 | 00 6b 00 01 00 04 00 73 |8.4.....|.k.....s|
|00003520| 00 00 00 69 00 82 00 01 | 00 ee e5 03 eb 34 01 00 |...i....|.....4..|
|00003530| 13 00 00 00 2a 36 c0 34 | 00 00 00 00 00 00 00 00 |....*6.4|........|
|00003540| 16 35 f3 35 59 00 01 00 | 04 00 73 00 04 00 69 00 |.5.5Y...|..s...i.|
|00003550| 77 00 01 00 00 ee 00 16 | 35 00 00 4d 35 eb 34 00 |w.......|5..M5.4.|
|00003560| 00 24 00 24 00 20 4c 4f | 43 41 54 45 20 34 2c 31 |.$.$. LO|CATE 4,1|
|00003570| 20 3a 20 50 52 49 4e 54 | 20 53 54 52 49 4e 47 24 | : PRINT| STRING$|
|00003580| 28 37 39 2c 20 22 20 22 | 29 20 20 20 ee 00 4d 35 |(79, " "|) ..M5|
|00003590| 16 35 88 35 eb 34 00 00 | 28 00 28 00 20 4c 4f 43 |.5.5.4..|(.(. LOC|
|000035a0| 41 54 45 20 34 2c 31 20 | 3a 20 49 4e 50 55 54 20 |ATE 4,1 |: INPUT |
|000035b0| 22 57 68 69 63 68 20 66 | 6f 6e 74 20 22 3b 20 46 |"Which f|ont "; F|
|000035c0| 6f 6e 74 24 65 20 20 ee | 00 88 35 4d 35 f3 35 eb |ont$e .|..5M5.5.|
|000035d0| 34 00 00 58 00 58 00 20 | 4c 4f 43 41 54 45 20 34 |4..X.X. |LOCATE 4|
|000035e0| 2c 31 20 3a 20 50 52 49 | 4e 54 20 22 4c 6f 61 64 |,1 : PRI|NT "Load|
|000035f0| 69 6e 67 20 66 6f 6e 74 | 20 3a 20 22 3b 20 46 6f |ing font| : "; Fo|
|00003600| 6e 74 24 3b 20 22 2e 66 | 6f 6e 20 20 20 20 20 20 |nt$; ".f|on |
|00003610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003620| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 22 20 | | " |
|00003630| 20 20 ee 00 f3 35 88 35 | 00 00 eb 34 00 00 24 00 | ...5.5|...4..$.|
|00003640| 24 00 20 4f 50 45 4e 20 | 46 6f 6e 74 24 20 2b 20 |$. OPEN |Font$ + |
|00003650| 22 2e 66 6f 6e 22 20 46 | 4f 52 20 49 4e 50 55 54 |".fon" F|OR INPUT|
|00003660| 20 41 53 20 23 32 54 20 | 41 13 04 2a 36 04 00 13 | AS #2T |A..*6...|
|00003670| 00 eb 34 ac 38 c0 34 55 | 36 ce 36 00 00 00 00 00 |..4.8.4U|6.6.....|
|00003680| 00 00 00 03 00 01 00 04 | 00 77 00 00 00 69 00 7c |........|.w...i.||
|00003690| 00 01 00 00 ed 03 55 36 | 01 00 08 00 00 00 a3 36 |......U6|.......6|
|000036a0| 2a 36 00 00 00 00 00 00 | 00 00 80 36 80 36 11 00 |*6......|...6.6..|
|000036b0| 01 00 04 00 77 00 01 00 | 69 00 78 00 01 00 ff ee |....w...|i.x.....|
|000036c0| 00 80 36 00 00 00 00 55 | 36 00 00 10 00 10 00 20 |..6....U|6...... |
|000036d0| 20 46 4f 52 20 54 3d 30 | 20 54 4f 20 32 35 35 00 | FOR T=0| TO 255.|
|000036e0| 00 ee f1 03 a3 36 01 00 | 09 00 55 36 00 00 2a 36 |.....6..|..U6..*6|
|000036f0| 00 00 00 00 00 00 ce 36 | 00 00 00 00 03 00 01 00 |.......6|........|
|00003700| 04 00 78 00 00 00 07 00 | 7c 00 01 00 ff 11 04 ce |..x.....||.......|
|00003710| 36 07 00 0a 00 55 36 00 | 00 2a 36 f9 36 51 37 a3 |6....U6.|.*6.6Q7.|
|00003720| 36 00 00 00 00 00 00 1d | 00 01 00 07 00 78 00 00 |6.......|.....x..|
|00003730| 00 69 00 7c 00 01 00 ee | f9 03 f9 36 01 00 13 00 |.i.|....|...6....|
|00003740| 00 00 51 37 ce 36 00 00 | 00 00 00 00 00 00 24 37 |..Q7.6..|......$7|
|00003750| 24 37 1b 00 01 00 07 00 | 78 00 01 00 69 00 79 00 |$7......|x...i.y.|
|00003760| 01 00 00 ee 00 24 37 00 | 00 00 00 f9 36 00 00 1a |.....$7.|....6...|
|00003770| 00 1a 00 20 20 48 69 67 | 68 24 28 54 29 3d 22 22 |... Hig|h$(T)=""|
|00003780| 20 3a 20 4c 6f 77 24 28 | 54 29 3d 22 22 00 00 20 | : Low$(|T)="".. |
|00003790| 0f 04 51 37 04 00 13 00 | f9 36 00 00 ce 36 7c 37 |..Q7....|.6...6|7|
|000037a0| f8 37 00 00 00 00 00 00 | 00 00 03 00 01 00 07 00 |.7......|........|
|000037b0| 79 00 00 00 69 00 7c 00 | 01 00 00 01 04 7c 37 01 |y...i.|.|.....|7.|
|000037c0| 00 08 00 00 00 cd 37 51 | 37 00 00 00 00 00 00 00 |......7Q|7.......|
|000037d0| 00 a7 37 a7 37 14 00 01 | 00 07 00 79 00 01 00 69 |..7.7...|...y...i|
|000037e0| 00 7a 00 01 00 ff ee 00 | a7 37 00 00 00 00 7c 37 |.z......|.7....|7|
|000037f0| 00 00 13 00 13 00 20 20 | 46 4f 52 20 51 3d 31 20 |...... |FOR Q=1 |
|00003800| 54 4f 20 57 77 69 64 74 | 68 ee 00 ca 05 04 cd 37 |TO Wwidt|h......7|
|00003810| 01 00 09 00 7c 37 00 00 | 51 37 00 00 00 00 00 00 |....|7..|Q7......|
|00003820| f8 37 00 00 00 00 03 00 | 01 00 07 00 7a 00 00 00 |.7......|....z...|
|00003830| 0a 00 7c 00 01 00 ff 0d | 04 f8 37 01 00 0a 00 7c |..|.....|..7....||
|00003840| 37 00 00 51 37 00 00 00 | 00 cd 37 00 00 23 38 68 |7..Q7...|..7..#8h|
|00003850| 38 33 00 01 00 0a 00 7a | 00 02 00 69 00 7c 00 01 |83.....z|...i.|..|
|00003860| 00 ee 20 20 23 38 00 00 | 68 38 f8 37 00 00 32 00 |.. #8..|h8.7..2.|
|00003870| 32 00 20 49 4e 50 55 54 | 20 23 32 2c 20 48 69 67 |2. INPUT| #2, Hig|
|00003880| 68 25 20 3a 20 48 69 67 | 68 24 28 54 29 3d 48 69 |h% : Hig|h$(T)=Hi|
|00003890| 67 68 24 28 54 29 20 2b | 20 43 48 52 24 28 48 69 |gh$(T) +| CHR$(Hi|
|000038a0| 67 68 25 29 00 00 ee ee | 00 68 38 23 38 00 00 f8 |gh%)....|.h8#8...|
|000038b0| 37 00 00 31 00 31 00 20 | 49 4e 50 55 54 20 23 32 |7..1.1. |INPUT #2|
|000038c0| 2c 20 4c 6f 77 25 20 20 | 3a 20 4c 6f 77 24 28 54 |, Low% |: Low$(T|
|000038d0| 29 20 3d 4c 6f 77 24 28 | 54 29 20 20 2b 20 43 48 |) =Low$(|T) + CH|
|000038e0| 52 24 28 4c 6f 77 25 29 | 00 00 00 23 04 ac 38 01 |R$(Low%)|...#..8.|
|000038f0| 00 13 00 2a 36 00 00 c0 | 34 00 00 00 00 00 00 00 |...*6...|4.......|
|00003900| 00 d7 38 76 39 15 00 01 | 00 04 00 7c 00 06 00 69 |..8v9...|...|...i|
|00003910| 00 82 00 01 00 00 ee 00 | d7 38 00 00 f3 38 ac 38 |........|.8...8.8|
|00003920| 00 00 09 00 09 00 20 43 | 4c 4f 53 45 20 23 32 20 |...... C|LOSE #2 |
|00003930| 20 20 20 00 f3 38 d7 38 | 15 39 ac 38 00 00 0f 00 | ..8.8|.9.8....|
|00003940| 0f 00 20 47 4f 53 55 42 | 20 48 65 61 64 4c 69 6e |.. GOSUB| HeadLin|
|00003950| 65 47 4f 53 ee 00 15 39 | f3 38 36 39 ac 38 00 00 |eGOS...9|.869.8..|
|00003960| 0e 00 0e 00 20 47 4f 53 | 55 42 20 47 65 74 43 68 |.... GOS|UB GetCh|
|00003970| 61 72 47 4f 53 ee 00 36 | 39 15 39 59 39 ac 38 00 |arGOS..6|9.9Y9.8.|
|00003980| 00 10 00 10 00 20 47 4f | 53 55 42 20 50 72 69 6e |..... GO|SUB Prin|
|00003990| 74 43 68 61 72 20 ee 00 | ee 00 59 39 36 39 76 39 |tChar ..|..Y969v9|
|000039a0| ac 38 00 00 0a 00 0a 00 | 20 5a 3d 31 20 3a 20 53 |.8......| Z=1 : S|
|000039b0| 3d 31 47 4f 53 ee 00 76 | 39 59 39 00 00 ac 38 00 |=1GOS..v|9Y9...8.|
|000039c0| 00 14 00 14 00 20 47 4f | 53 55 42 20 50 72 69 6e |..... GO|SUB Prin|
|000039d0| 74 43 75 72 46 69 65 6c | 64 20 20 20 29 04 9d 39 |tCurFiel|d )..9|
|000039e0| 01 00 0e 00 c0 34 00 00 | 23 34 00 00 00 00 00 00 |.....4..|#4......|
|000039f0| 00 00 00 00 00 00 03 00 | 01 00 01 00 82 00 00 00 |........|........|
|00003a00| 69 00 83 00 01 00 ff 7b | 04 c8 39 05 00 13 00 23 |i......{|..9....#|
|00003a10| 34 00 00 01 00 f3 39 14 | 3e 00 00 00 00 00 00 00 |4.....9.|>.......|
|00003a20| 00 03 00 01 00 01 00 83 | 00 00 00 69 00 8e 00 01 |........|...i....|
|00003a30| 00 00 33 04 f3 39 01 00 | 0b 00 00 00 3a 3a c8 39 |..3..9..|....::.9|
|00003a40| 00 00 00 00 00 00 00 00 | 1e 3a 1e 3a 13 00 01 00 |........|.:.:....|
|00003a50| 01 00 83 00 01 00 69 00 | 84 00 01 00 ff ee 00 1e |......i.|........|
|00003a60| 3a 00 00 00 00 f3 39 00 | 00 09 00 09 00 20 53 61 |:.....9.|..... Sa|
|00003a70| 76 65 46 6f 6e 74 63 68 | 65 37 04 3a 3a 01 00 0c |veFontch|e7.::...|
|00003a80| 00 f3 39 14 3e c8 39 00 | 00 00 00 00 00 65 3a 00 |..9.>.9.|.....e:.|
|00003a90| 00 00 00 03 00 01 00 01 | 00 84 00 00 00 04 00 8d |........|........|
|00003aa0| 00 01 00 ff 75 04 65 3a | 07 00 0d 00 f3 39 14 3e |....u.e:|.....9.>|
|00003ab0| c8 39 90 3a ab 3d 3a 3a | 00 00 00 00 00 00 6b 00 |.9.:.=::|......k.|
|00003ac0| 01 00 04 00 84 00 00 00 | 69 00 8d 00 01 00 ee 43 |........|i......C|
|00003ad0| 04 90 3a 01 00 13 00 00 | 00 7f 3b 65 3a 00 00 00 |..:.....|..;e:...|
|00003ae0| 00 00 00 00 00 bb 3a 47 | 3b 58 00 01 00 04 00 84 |......:G|;X......|
|00003af0| 00 03 00 69 00 87 00 01 | 00 00 20 20 bb 3a 00 00 |...i....|.. .:..|
|00003b00| dd 3a 90 3a 00 00 0f 00 | 0f 00 20 47 4f 53 55 42 |.:.:....|.. GOSUB|
|00003b10| 20 53 61 76 65 43 68 61 | 72 69 63 68 ee 00 dd 3a | SaveCha|rich...:|
|00003b20| bb 3a 47 3b 90 3a 00 00 | 57 00 57 00 20 4c 4f 43 |.:G;.:..|W.W. LOC|
|00003b30| 41 54 45 20 34 2c 31 20 | 3a 20 50 52 49 4e 54 20 |ATE 4,1 |: PRINT |
|00003b40| 22 53 61 76 69 6e 67 20 | 66 6f 6e 74 20 3a 20 22 |"Saving |font : "|
|00003b50| 3b 20 46 6f 6e 74 24 3b | 20 22 2e 66 6f 6e 20 20 |; Font$;| ".fon |
|00003b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003b70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003b80| 20 20 22 20 20 20 ee 00 | 47 3b dd 3a 00 00 90 3a | " ..|G;.:...:|
|00003b90| 00 00 25 00 25 00 20 4f | 50 45 4e 20 46 6f 6e 74 |..%.%. O|PEN Font|
|00003ba0| 24 20 2b 20 22 2e 66 6f | 6e 22 20 46 4f 52 20 4f |$ + ".fo|n" FOR O|
|00003bb0| 55 54 50 55 54 20 41 53 | 20 23 32 54 20 41 6b 04 |UTPUT AS| #2T Ak.|
|00003bc0| 7f 3b 04 00 13 00 90 3a | ab 3d 65 3a aa 3b 23 3c |.;.....:|.=e:.;#<|
|00003bd0| 00 00 00 00 00 00 00 00 | 03 00 01 00 04 00 87 00 |........|........|
|00003be0| 00 00 69 00 8b 00 01 00 | 00 4b 04 aa 3b 01 00 08 |..i.....|.K..;...|
|00003bf0| 00 00 00 f8 3b 7f 3b 00 | 00 00 00 00 00 00 00 d5 |....;.;.|........|
|00003c00| 3b d5 3b 11 00 01 00 04 | 00 87 00 01 00 69 00 88 |;.;.....|.....i..|
|00003c10| 00 01 00 ff ee 00 d5 3b | 00 00 00 00 aa 3b 00 00 |.......;|.....;..|
|00003c20| 10 00 10 00 20 20 46 4f | 52 20 54 3d 30 20 54 4f |.... FO|R T=0 TO|
|00003c30| 20 32 35 35 00 00 ee 4f | 04 f8 3b 01 00 09 00 aa | 255...O|..;.....|
|00003c40| 3b 00 00 7f 3b 00 00 00 | 00 00 00 23 3c 00 00 00 |;...;...|...#<...|
|00003c50| 00 03 00 01 00 04 00 88 | 00 00 00 07 00 8b 00 01 |........|........|
|00003c60| 00 ff 69 04 23 3c 07 00 | 0a 00 aa 3b 00 00 7f 3b |..i.#<..|...;...;|
|00003c70| 4e 3c 4e 3c f8 3b 00 00 | 00 00 00 00 1d 00 01 00 |N<N<.;..|........|
|00003c80| 07 00 88 00 00 00 69 00 | 8b 00 01 00 ee 67 04 4e |......i.|.....g.N|
|00003c90| 3c 04 00 13 00 00 00 00 | 00 23 3c 79 3c f5 3c 00 |<.......|.#<y<.<.|
|00003ca0| 00 00 00 00 00 00 00 03 | 00 01 00 07 00 88 00 00 |........|........|
|00003cb0| 00 69 00 8b 00 01 00 00 | 59 04 79 3c 01 00 08 00 |.i......|Y.y<....|
|00003cc0| 00 00 ca 3c 4e 3c 00 00 | 00 00 00 00 00 00 a4 3c |...<N<..|.......<|
|00003cd0| a4 3c 14 00 01 00 07 00 | 88 00 01 00 69 00 89 00 |.<......|....i...|
|00003ce0| 01 00 ff ee 00 a4 3c 00 | 00 00 00 79 3c 00 00 13 |......<.|...y<...|
|00003cf0| 00 13 00 20 20 46 4f 52 | 20 51 3d 31 20 54 4f 20 |... FOR| Q=1 TO |
|00003d00| 57 77 69 64 74 68 65 00 | 00 5d 04 ca 3c 01 00 09 |Wwidthe.|.]..<...|
|00003d10| 00 79 3c 00 00 4e 3c 00 | 00 00 00 00 00 f5 3c 00 |.y<..N<.|......<.|
|00003d20| 00 00 00 03 00 01 00 07 | 00 89 00 00 00 0a 00 8b |........|........|
|00003d30| 00 01 00 ff 65 04 f5 3c | 01 00 0a 00 79 3c 00 00 |....e..<|....y<..|
|00003d40| 4e 3c 00 00 00 00 ca 3c | 00 00 20 3d 66 3d 34 00 |N<.....<|.. =f=4.|
|00003d50| 01 00 0a 00 89 00 02 00 | 69 00 8b 00 01 00 ee ee |........|i.......|
|00003d60| 00 20 3d 00 00 66 3d f5 | 3c 00 00 33 00 33 00 20 |. =..f=.|<..3.3. |
|00003d70| 48 69 67 68 25 3d 41 53 | 43 28 4d 49 44 24 28 48 |High%=AS|C(MID$(H|
|00003d80| 69 67 68 24 28 54 29 2c | 20 51 2c 20 31 29 29 20 |igh$(T),| Q, 1)) |
|00003d90| 3a 20 50 52 49 4e 54 20 | 23 32 2c 20 48 69 67 68 |: PRINT |#2, High|
|00003da0| 25 20 ee 00 00 ee 00 66 | 3d 20 3d 00 00 f5 3c 00 |% .....f|= =...<.|
|00003db0| 00 32 00 32 00 20 4c 6f | 77 25 20 3d 41 53 43 28 |.2.2. Lo|w% =ASC(|
|00003dc0| 4d 49 44 24 28 4c 6f 77 | 24 28 54 29 20 2c 20 51 |MID$(Low|$(T) , Q|
|00003dd0| 2c 20 31 29 29 20 3a 20 | 50 52 49 4e 54 20 23 32 |, 1)) : |PRINT #2|
|00003de0| 2c 20 4c 6f 77 25 20 00 | 20 00 73 04 ab 3d 01 00 |, Low% .| .s..=..|
|00003df0| 13 00 7f 3b 00 00 65 3a | 00 00 00 00 00 00 00 00 |...;..e:|........|
|00003e00| d6 3d f2 3d 10 00 01 00 | 04 00 8b 00 02 00 69 00 |.=.=....|......i.|
|00003e10| 8d 00 01 00 00 ee 00 d6 | 3d 00 00 f2 3d ab 3d 00 |........|=...=.=.|
|00003e20| 00 09 00 09 00 20 43 4c | 4f 53 45 20 23 32 47 4f |..... CL|OSE #2GO|
|00003e30| 53 ee 00 f2 3d d6 3d 00 | 00 ab 3d 00 00 0f 00 0f |S...=.=.|..=.....|
|00003e40| 00 20 47 4f 53 55 42 20 | 48 65 61 64 4c 69 6e 65 |. GOSUB |HeadLine|
|00003e50| 20 00 00 79 04 14 3e 01 | 00 0e 00 65 3a 00 00 c8 | ..y..>.|...e:...|
|00003e60| 39 00 00 00 00 00 00 00 | 00 00 00 00 00 03 00 01 |9.......|........|
|00003e70| 00 01 00 8d 00 00 00 69 | 00 8e 00 01 00 ff |.......i|...... |
+--------+-------------------------+-------------------------+--------+--------+