/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_5 / issue_01 / tutorial / TUTOR

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 0b f4 3e 54 55 | 54 4f 52 0d 00 0a 27 f4 |.....>TU|TOR...'.|
|00000010| 20 3e 20 26 2e 74 75 74 | 6f 72 69 61 6c 73 2e 4b | > &.tut|orials.K|
|00000020| 65 79 54 75 74 6f 72 20 | 3a 20 63 72 75 6e 63 68 |eyTutor |: crunch|
|00000030| 65 64 0d 00 14 2e 20 ee | 85 e7 9f 3d 31 37 20 8c |ed.... .|...=17 .|
|00000040| ff 28 22 44 65 73 6b 54 | 6f 70 22 29 20 8b f6 3a |.("DeskT|op") ..:|
|00000050| f1 22 20 61 74 20 6c 69 | 6e 65 20 22 3b 9e 3a e0 |." at li|ne ";.:.|
|00000060| 0d 00 15 2e 20 f4 20 4f | 4e 45 52 52 4f 52 20 52 |.... . O|NERROR R|
|00000070| 45 50 4f 52 54 3a 50 52 | 49 4e 54 22 20 61 74 20 |EPORT:PR|INT" at |
|00000080| 6c 69 6e 65 20 22 3b 45 | 52 4c 3a 45 4e 44 0d 00 |line ";E|RL:END..|
|00000090| 1e 14 de 73 74 72 69 6e | 67 62 75 66 66 25 20 32 |...strin|gbuff% 2|
|000000a0| 35 36 0d 00 28 4d c8 99 | 26 36 30 30 38 30 2c 30 |56..(M..|&60080,0|
|000000b0| 20 b8 20 72 30 25 3b 70 | 73 72 25 3a 20 e7 28 28 | . r0%;p|sr%: .((|
|000000c0| 70 73 72 25 20 80 20 31 | 29 3d 31 29 84 28 72 30 |psr% . 1|)=1).(r0|
|000000d0| 25 3c 32 31 29 20 8c 20 | 2a 72 6d 6c 6f 61 64 20 |%<21) . |*rmload |
|000000e0| 26 2e 6d 6f 64 75 6c 65 | 73 2e 46 6f 6e 74 73 0d |&.module|s.Fonts.|
|000000f0| 00 32 1d 2a 73 65 74 20 | 66 6f 6e 74 24 70 72 65 |.2.*set |font$pre|
|00000100| 66 69 78 20 26 2e 21 46 | 6f 6e 74 73 0d 00 3c 33 |fix &.!F|onts..<3|
|00000110| c8 99 26 34 30 30 38 31 | 2c 2c 22 54 72 69 6e 69 |..&40081|,,"Trini|
|00000120| 74 79 2e 4d 65 64 69 75 | 6d 22 2c 32 37 30 2c 32 |ty.Mediu|m",270,2|
|00000130| 37 30 2c 30 2c 30 20 b8 | 20 72 6f 6d 61 6e 25 0d |70,0,0 .| roman%.|
|00000140| 00 46 20 c8 99 26 34 30 | 30 38 34 2c 72 6f 6d 61 |.F ..&40|084,roma|
|00000150| 6e 25 20 b8 20 2c 2c 79 | 30 25 2c 2c 79 31 25 0d |n% . ,,y|0%,,y1%.|
|00000160| 00 50 34 c8 99 26 34 30 | 30 38 31 2c 2c 22 54 72 |.P4..&40|081,,"Tr|
|00000170| 69 6e 69 74 79 2e 4d 65 | 64 69 75 6d 22 2c 32 37 |inity.Me|dium",27|
|00000180| 30 2c 32 37 30 2c 30 2c | 30 20 b8 20 69 74 61 6c |0,270,0,|0 . ital|
|00000190| 69 63 25 0d 00 5a 0b f2 | 6d 6f 64 65 31 32 0d 00 |ic%..Z..|mode12..|
|000001a0| 64 08 f2 63 6c 73 0d 00 | 6e 06 fb 30 0d 00 78 0b |d..cls..|n..0..x.|
|000001b0| 6c 63 6f 6c 25 3d 30 0d | 00 82 0e 72 63 6f 6c 25 |lcol%=0.|...rcol%|
|000001c0| 3d 31 32 38 30 0d 00 8c | 0b 40 25 3d 26 41 30 41 |=1280...|.@%=&A0A|
|000001d0| 0d 00 96 5f de 58 25 28 | 31 30 35 29 2c 59 25 28 |..._.X%(|105),Y%(|
|000001e0| 31 30 35 29 2c 57 25 28 | 31 30 35 29 2c 48 28 31 |105),W%(|105),H(1|
|000001f0| 30 35 29 2c 4c 65 67 65 | 6e 64 24 28 31 30 35 29 |05),Lege|nd$(105)|
|00000200| 2c 43 6f 64 65 25 28 31 | 30 35 29 2c 20 53 43 6f |,Code%(1|05), SCo|
|00000210| 64 65 25 28 31 30 35 29 | 2c 20 43 43 6f 64 65 25 |de%(105)|, CCode%|
|00000220| 28 31 30 35 29 2c 20 6b | 65 79 28 34 30 30 29 0d |(105), k|ey(400).|
|00000230| 00 a0 2c ef 32 33 2c 20 | 32 34 38 2c 26 30 30 2c |..,.23, |248,&00,|
|00000240| 26 43 33 2c 26 37 45 2c | 26 36 36 2c 26 36 36 2c |&C3,&7E,|&66,&66,|
|00000250| 26 37 45 2c 26 43 33 2c | 26 30 30 0d 00 aa 2c ef |&7E,&C3,|&00...,.|
|00000260| 32 33 2c 20 32 34 39 2c | 26 30 30 2c 26 31 38 2c |23, 249,|&00,&18,|
|00000270| 26 33 38 2c 26 37 46 2c | 26 37 46 2c 26 33 38 2c |&38,&7F,|&7F,&38,|
|00000280| 26 31 38 2c 26 30 30 0d | 00 b4 2c ef 32 33 2c 20 |&18,&00.|..,.23, |
|00000290| 32 35 30 2c 26 30 30 2c | 26 30 30 2c 26 30 30 2c |250,&00,|&00,&00,|
|000002a0| 26 46 46 2c 26 46 46 2c | 26 30 30 2c 26 30 30 2c |&FF,&FF,|&00,&00,|
|000002b0| 26 30 30 0d 00 be 2c ef | 32 33 2c 20 32 35 31 2c |&00...,.|23, 251,|
|000002c0| 26 30 30 2c 26 33 43 2c | 26 33 43 2c 26 46 43 2c |&00,&3C,|&3C,&FC,|
|000002d0| 26 46 30 2c 26 30 30 2c | 26 30 30 2c 26 30 30 0d |&F0,&00,|&00,&00.|
|000002e0| 00 c8 2c ef 32 33 2c 20 | 32 35 32 2c 26 30 30 2c |..,.23, |252,&00,|
|000002f0| 26 37 34 2c 26 34 36 2c | 26 37 35 2c 26 34 34 2c |&74,&46,|&75,&44,|
|00000300| 26 37 34 2c 26 30 30 2c | 26 30 30 0d 00 d2 2c ef |&74,&00,|&00...,.|
|00000310| 32 33 2c 20 32 35 33 2c | 26 30 30 2c 26 35 44 2c |23, 253,|&00,&5D,|
|00000320| 26 34 39 2c 26 34 39 2c | 26 43 39 2c 26 34 39 2c |&49,&49,|&C9,&49,|
|00000330| 26 30 30 2c 26 30 30 0d | 00 dc 2c ef 32 33 2c 20 |&00,&00.|..,.23, |
|00000340| 32 35 34 2c 26 30 30 2c | 26 44 43 2c 26 31 32 2c |254,&00,|&DC,&12,|
|00000350| 26 44 43 2c 26 31 34 2c | 26 44 32 2c 26 30 30 2c |&DC,&14,|&D2,&00,|
|00000360| 26 30 30 0d 00 e6 82 6b | 65 79 73 24 3d 22 51 57 |&00....k|eys$="QW|
|00000370| 45 52 54 59 55 49 4f 50 | 41 53 44 46 47 48 4a 4b |ERTYUIOP|ASDFGHJK|
|00000380| 4c 5a 58 43 56 42 4e 4d | 31 32 33 34 35 36 37 38 |LZXCVBNM|12345678|
|00000390| 39 30 22 2b bd 31 2b bd | 31 38 37 2b 22 2c 2e 2f |90"+.1+.|187+",./|
|000003a0| 3b 5b 5d 5c 3d 2d 22 2b | bd 32 2b 22 21 40 23 24 |;[]\=-"+|.2+"!@#$|
|000003b0| 25 5e 26 2a 28 29 5f 2b | 3a 22 22 3c 3e 3f 22 2b |%^&*()_+|:""<>?"+|
|000003c0| bd 33 2b 22 71 77 65 72 | 74 79 75 69 6f 70 61 73 |.3+"qwer|tyuiopas|
|000003d0| 64 66 67 68 6a 6b 6c 7a | 78 63 76 62 6e 6d 22 2b |dfghjklz|xcvbnm"+|
|000003e0| bd 34 2b bd 35 0d 00 f0 | 0f f2 74 69 74 6c 65 5f |.4+.5...|..title_|
|000003f0| 70 61 67 65 0d 00 fa 0d | f2 6b 65 79 62 6f 61 72 |page....|.keyboar|
|00000400| 64 0d 01 04 0e 50 61 67 | 65 55 70 3d 31 35 39 0d |d....Pag|eUp=159.|
|00000410| 01 0e 10 50 61 67 65 44 | 6f 77 6e 3d 31 35 38 0d |...PageD|own=158.|
|00000420| 01 18 0d 43 54 52 4c 6c | 3d 32 35 32 0d 01 22 0d |...CTRLl|=252..".|
|00000430| 43 54 52 4c 72 3d 32 34 | 39 0d 01 2c 0e 53 48 49 |CTRLr=24|9..,.SHI|
|00000440| 46 54 6c 3d 32 35 33 0d | 01 36 0e 53 48 49 46 54 |FTl=253.|.6.SHIFT|
|00000450| 72 3d 32 35 34 0d 01 40 | 0c 41 4c 54 6c 3d 32 35 |r=254..@|.ALTl=25|
|00000460| 30 0d 01 4a 0c 41 4c 54 | 72 3d 32 35 31 0d 01 54 |0..J.ALT|r=251..T|
|00000470| 0c 43 41 50 53 3d 32 35 | 35 0d 01 5e 0b 54 45 53 |.CAPS=25|5..^.TES|
|00000480| 54 53 3d 30 0d 01 68 0a | 54 54 49 4d 3d 30 0d 01 |TS=0..h.|TTIM=0..|
|00000490| 72 0b 52 49 47 48 54 3d | 30 0d 01 7c 10 65 6e 64 |r.RIGHT=|0..|.end|
|000004a0| 5f 70 61 72 74 20 3d 20 | 36 0d 01 86 13 e3 70 61 |_part = |6.....pa|
|000004b0| 72 74 20 3d 20 31 20 b8 | 20 35 20 3a 0d 01 90 09 |rt = 1 .| 5 :....|
|000004c0| ed 70 61 72 74 0d 01 9a | 05 f5 0d 01 a4 0e 70 61 |.part...|......pa|
|000004d0| 72 74 3d a4 6d 65 6e 75 | 0d 01 ae 13 f2 64 6f 70 |rt=.menu|.....dop|
|000004e0| 61 72 74 28 70 61 72 74 | 29 20 3a 0d 01 b8 12 fd |art(part|) :.....|
|000004f0| 70 61 72 74 3d 65 6e 64 | 5f 70 61 72 74 0d 01 c2 |part=end|_part...|
|00000500| 10 ff 28 22 44 65 73 6b | 54 6f 70 22 29 0d 01 cc |..("Desk|Top")...|
|00000510| 05 e0 0d 01 d6 10 dd f2 | 74 69 74 6c 65 5f 70 61 |........|title_pa|
|00000520| 67 65 0d 01 e0 0f 79 63 | 6f 6f 72 64 25 3d 37 30 |ge....yc|oord%=70|
|00000530| 30 0d 01 ea 2e f2 70 73 | 63 65 6e 74 72 65 28 22 |0.....ps|centre("|
|00000540| 57 65 6c 63 6f 6d 65 20 | 74 6f 20 74 68 65 20 4b |Welcome |to the K|
|00000550| 65 79 62 6f 61 72 64 20 | 54 75 74 6f 72 22 29 0d |eyboard |Tutor").|
|00000560| 01 f4 0e f2 70 73 6e 65 | 77 6c 69 6e 65 0d 01 fe |....psne|wline...|
|00000570| 0e f2 70 73 6e 65 77 6c | 69 6e 65 0d 02 08 0e f2 |..psnewl|ine.....|
|00000580| 70 73 6e 65 77 6c 69 6e | 65 0d 02 12 84 f2 70 72 |psnewlin|e.....pr|
|00000590| 69 6e 74 28 22 54 68 69 | 73 20 70 72 6f 67 72 61 |int("Thi|s progra|
|000005a0| 6d 20 77 69 6c 6c 20 74 | 61 6b 65 20 79 6f 75 20 |m will t|ake you |
|000005b0| 74 68 72 6f 75 67 68 20 | 74 68 65 20 6b 65 79 62 |through |the keyb|
|000005c0| 6f 61 72 64 20 66 69 72 | 73 74 6c 79 20 64 65 73 |oard fir|stly des|
|000005d0| 63 72 69 62 69 6e 67 20 | 69 74 73 20 66 65 61 74 |cribing |its feat|
|000005e0| 75 72 65 73 20 61 6e 64 | 20 74 68 65 6e 20 67 69 |ures and| then gi|
|000005f0| 76 69 6e 67 20 79 6f 75 | 20 73 6f 6d 65 20 73 69 |ving you| some si|
|00000600| 6d 70 6c 65 20 74 65 73 | 74 73 2e 22 29 0d 02 1c |mple tes|ts.")...|
|00000610| 0e f2 70 73 6e 65 77 6c | 69 6e 65 0d 02 26 60 f2 |..psnewl|ine..&`.|
|00000620| 70 72 69 6e 74 28 22 4f | 6e 63 65 20 61 6c 6c 20 |print("O|nce all |
|00000630| 74 68 65 73 65 20 61 72 | 65 20 63 6f 6d 70 6c 65 |these ar|e comple|
|00000640| 74 65 64 20 79 6f 75 20 | 77 69 6c 6c 20 67 65 74 |ted you |will get|
|00000650| 20 74 68 65 20 63 68 61 | 6e 63 65 20 74 6f 20 67 | the cha|nce to g|
|00000660| 6f 20 6f 76 65 72 20 61 | 6e 79 20 73 65 63 74 69 |o over a|ny secti|
|00000670| 6f 6e 20 61 67 61 69 6e | 2e 22 29 0d 02 30 0c f2 |on again|.")..0..|
|00000680| 70 73 73 70 61 63 65 0d | 02 3a 05 db 0d 02 44 05 |psspace.|.:....D.|
|00000690| e1 0d 02 4e 12 dd f2 64 | 6f 70 61 72 74 28 50 41 |...N...d|opart(PA|
|000006a0| 52 54 29 0d 02 58 08 f2 | 63 6c 73 0d 02 62 42 e7 |RT)..X..|cls..bB.|
|000006b0| 70 61 72 74 20 3c 20 65 | 6e 64 5f 70 61 72 74 20 |part < e|nd_part |
|000006c0| 8c ee 50 41 52 54 20 f2 | 70 61 72 74 31 2c 20 f2 |..PART .|part1, .|
|000006d0| 70 61 72 74 32 2c 20 f2 | 70 61 72 74 33 2c 20 f2 |part2, .|part3, .|
|000006e0| 70 61 72 74 34 2c 20 f2 | 70 61 72 74 35 0d 02 6c |part4, .|part5..l|
|000006f0| 05 e1 0d 02 76 0b dd f2 | 70 61 72 74 31 0d 02 80 |....v...|part1...|
|00000700| 36 f2 68 69 67 68 6c 69 | 67 68 74 28 22 51 57 45 |6.highli|ght("QWE|
|00000710| 52 54 59 55 49 4f 50 41 | 53 44 46 47 48 4a 4b 4c |RTYUIOPA|SDFGHJKL|
|00000720| 5a 58 43 56 42 4e 4d 31 | 32 33 34 35 36 37 38 39 |ZXCVBNM1|23456789|
|00000730| 30 22 29 0d 02 8a c1 f2 | 70 72 69 6e 74 28 22 54 |0").....|print("T|
|00000740| 68 69 73 20 70 61 72 74 | 20 65 78 61 6d 69 6e 65 |his part| examine|
|00000750| 73 20 74 68 65 20 61 6c | 70 68 61 6e 75 6d 65 72 |s the al|phanumer|
|00000760| 69 63 20 6b 65 79 73 20 | 69 6e 20 74 68 65 20 63 |ic keys |in the c|
|00000770| 65 6e 74 72 65 20 6f 66 | 20 74 68 65 20 6b 65 79 |entre of| the key|
|00000780| 62 6f 61 72 64 2e 20 20 | 54 68 65 73 65 20 61 72 |board.  |These ar|
|00000790| 65 20 74 68 65 20 73 61 | 6d 65 20 61 73 20 6b 65 |e the sa|me as ke|
|000007a0| 79 73 20 66 6f 75 6e 64 | 20 6f 6e 20 61 20 74 79 |ys found| on a ty|
|000007b0| 70 65 77 72 69 74 65 72 | 20 61 6e 64 20 77 69 6c |pewriter| and wil|
|000007c0| 6c 20 62 65 20 66 61 6d | 69 6c 69 61 72 20 74 6f |l be fam|iliar to|
|000007d0| 20 61 6e 79 6f 6e 65 20 | 77 68 6f 20 68 61 73 20 | anyone |who has |
|000007e0| 75 73 65 64 20 61 20 74 | 79 70 65 77 72 69 74 65 |used a t|ypewrite|
|000007f0| 72 2e 22 29 0d 02 94 0f | f2 63 61 70 73 28 22 4f |r.")....|.caps("O|
|00000800| 4e 22 29 0d 02 9e 0c f2 | 70 73 73 70 61 63 65 0d |N").....|psspace.|
|00000810| 02 a8 3e f2 75 6e 68 69 | 67 68 6c 69 67 68 74 28 |..>.unhi|ghlight(|
|00000820| bd 43 41 50 53 2b 22 51 | 57 45 52 54 59 55 49 4f |.CAPS+"Q|WERTYUIO|
|00000830| 50 41 53 44 46 47 48 4a | 4b 4c 5a 58 43 56 42 4e |PASDFGHJ|KLZXCVBN|
|00000840| 4d 31 32 33 34 35 36 37 | 38 39 30 22 29 0d 02 b2 |M1234567|890")...|
|00000850| 0c f2 70 61 72 74 28 31 | 29 0d 02 bc 05 e1 0d 02 |..part(1|).......|
|00000860| c6 0b dd f2 70 61 72 74 | 32 0d 02 d0 45 f2 68 69 |....part|2...E.hi|
|00000870| 67 68 6c 69 67 68 74 28 | 22 51 57 45 52 54 59 55 |ghlight(|"QWERTYU|
|00000880| 49 4f 50 41 53 44 46 47 | 48 4a 4b 4c 5a 58 43 56 |IOPASDFG|HJKLZXCV|
|00000890| 42 4e 4d 31 32 33 34 35 | 36 37 38 39 30 2c 2e 2f |BNM12345|67890,./|
|000008a0| 27 3b 5b 5d 5c 3d 2d 22 | 2b bd 31 38 37 29 0d 02 |';[]\=-"|+.187)..|
|000008b0| da 5d f2 70 72 69 6e 74 | 28 22 54 68 69 73 20 70 |.].print|("This p|
|000008c0| 61 72 74 20 65 78 61 6d | 69 6e 65 73 20 74 68 65 |art exam|ines the|
|000008d0| 20 6c 6f 77 65 72 20 73 | 79 6d 62 6f 6c 73 20 6f | lower s|ymbols o|
|000008e0| 6e 20 74 68 65 20 6b 65 | 79 73 20 61 73 20 77 65 |n the ke|ys as we|
|000008f0| 6c 6c 20 61 73 20 75 70 | 70 65 72 2d 63 61 73 65 |ll as up|per-case|
|00000900| 20 6c 65 74 74 65 72 73 | 2e 22 29 0d 02 e4 0f f2 | letters|.").....|
|00000910| 63 61 70 73 28 22 4f 4e | 22 29 0d 02 ee 0c f2 70 |caps("ON|").....p|
|00000920| 73 73 70 61 63 65 0d 02 | f8 4d f2 75 6e 68 69 67 |sspace..|.M.unhig|
|00000930| 68 6c 69 67 68 74 28 bd | 43 41 50 53 2b 22 51 57 |hlight(.|CAPS+"QW|
|00000940| 45 52 54 59 55 49 4f 50 | 41 53 44 46 47 48 4a 4b |ERTYUIOP|ASDFGHJK|
|00000950| 4c 5a 58 43 56 42 4e 4d | 31 32 33 34 35 36 37 38 |LZXCVBNM|12345678|
|00000960| 39 30 2c 2e 2f 27 3b 5b | 5d 5c 3d 2d 22 2b bd 31 |90,./';[|]\=-"+.1|
|00000970| 38 37 29 0d 03 02 0c f2 | 70 61 72 74 28 32 29 0d |87).....|part(2).|
|00000980| 03 0c 05 e1 0d 03 16 0b | dd f2 70 61 72 74 33 0d |........|..part3.|
|00000990| 03 20 55 f2 68 69 67 68 | 6c 69 67 68 74 28 22 51 |. U.high|light("Q|
|000009a0| 57 45 52 54 59 55 49 4f | 50 41 53 44 46 47 48 4a |WERTYUIO|PASDFGHJ|
|000009b0| 4b 4c 5a 58 43 56 42 4e | 4d 31 32 33 34 35 36 37 |KLZXCVBN|M1234567|
|000009c0| 38 39 30 2c 2e 2f 27 3b | 5b 5d 5c 3d 2d 22 2b bd |890,./';|[]\=-"+.|
|000009d0| 31 38 37 2b bd 53 48 49 | 46 54 6c 2b bd 53 48 49 |187+.SHI|FTl+.SHI|
|000009e0| 46 54 72 29 0d 03 2a 91 | f2 70 72 69 6e 74 28 22 |FTr)..*.|.print("|
|000009f0| 54 68 69 73 20 70 61 72 | 74 20 65 78 61 6d 69 6e |This par|t examin|
|00000a00| 65 73 20 75 70 70 65 72 | 20 73 79 6d 62 6f 6c 73 |es upper| symbols|
|00000a10| 20 6f 6e 20 74 68 65 20 | 6b 65 79 73 2e 20 20 54 | on the |keys.  T|
|00000a20| 6f 20 67 65 74 20 74 68 | 65 73 65 20 73 79 6d 62 |o get th|ese symb|
|00000a30| 6f 6c 73 2c 20 70 72 65 | 73 73 20 6c 65 66 74 20 |ols, pre|ss left |
|00000a40| 6f 72 20 72 69 67 68 74 | 20 53 48 49 46 54 20 69 |or right| SHIFT i|
|00000a50| 6e 20 63 6f 6e 6a 75 6e | 63 74 69 6f 6e 20 77 69 |n conjun|ction wi|
|00000a60| 74 68 20 74 68 65 20 64 | 65 73 69 72 65 64 20 6b |th the d|esired k|
|00000a70| 65 79 2e 22 29 0d 03 34 | 0f f2 63 61 70 73 28 22 |ey.")..4|..caps("|
|00000a80| 4f 4e 22 29 0d 03 3e 0c | f2 70 73 73 70 61 63 65 |ON")..>.|.psspace|
|00000a90| 0d 03 48 5d f2 75 6e 68 | 69 67 68 6c 69 67 68 74 |..H].unh|ighlight|
|00000aa0| 28 bd 43 41 50 53 2b 22 | 51 57 45 52 54 59 55 49 |(.CAPS+"|QWERTYUI|
|00000ab0| 4f 50 41 53 44 46 47 48 | 4a 4b 4c 5a 58 43 56 42 |OPASDFGH|JKLZXCVB|
|00000ac0| 4e 4d 31 32 33 34 35 36 | 37 38 39 30 2c 2e 2f 27 |NM123456|7890,./'|
|00000ad0| 3b 5b 5d 5c 3d 2d 22 2b | bd 31 38 37 2b bd 53 48 |;[]\=-"+|.187+.SH|
|00000ae0| 49 46 54 6c 2b bd 53 48 | 49 46 54 72 29 0d 03 52 |IFTl+.SH|IFTr)..R|
|00000af0| 0c f2 70 61 72 74 28 33 | 29 0d 03 5c 05 e1 0d 03 |..part(3|)..\....|
|00000b00| 66 0b dd f2 70 61 72 74 | 34 0d 03 70 b0 f2 70 72 |f...part|4..p..pr|
|00000b10| 69 6e 74 28 22 54 68 69 | 73 20 70 61 72 74 20 65 |int("Thi|s part e|
|00000b20| 78 61 6d 69 6e 65 73 20 | 74 68 65 20 65 6e 74 69 |xamines |the enti|
|00000b30| 72 65 20 6b 65 79 62 6f | 61 72 64 2e 20 20 54 6f |re keybo|ard.  To|
|00000b40| 20 6f 62 74 61 69 6e 20 | 74 68 65 20 74 6f 70 20 | obtain |the top |
|00000b50| 73 79 6d 62 6f 6c 20 6f | 6e 20 61 20 6b 65 79 20 |symbol o|n a key |
|00000b60| 6f 72 20 61 6e 20 75 70 | 70 65 72 2d 63 61 73 65 |or an up|per-case|
|00000b70| 20 6c 65 74 74 65 72 2c | 20 70 72 65 73 73 20 6c | letter,| press l|
|00000b80| 65 66 74 20 6f 72 20 72 | 69 67 68 74 20 53 48 49 |eft or r|ight SHI|
|00000b90| 46 54 20 69 6e 20 63 6f | 6e 6a 75 6e 63 74 69 6f |FT in co|njunctio|
|00000ba0| 6e 20 77 69 74 68 20 74 | 68 65 20 64 65 73 69 72 |n with t|he desir|
|00000bb0| 65 64 20 6b 65 79 2e 22 | 29 0d 03 7a 28 74 65 6d |ed key."|)..z(tem|
|00000bc0| 70 25 3d 79 63 6f 6f 72 | 64 25 3a f2 70 73 73 70 |p%=ycoor|d%:.pssp|
|00000bd0| 61 63 65 3a 79 63 6f 6f | 72 64 25 3d 74 65 6d 70 |ace:ycoo|rd%=temp|
|00000be0| 25 0d 03 84 0e f2 70 73 | 6e 65 77 6c 69 6e 65 0d |%.....ps|newline.|
|00000bf0| 03 8e a7 f2 70 72 69 6e | 74 28 22 46 6f 72 20 65 |....prin|t("For e|
|00000c00| 78 61 6d 70 6c 65 2c 20 | 74 6f 20 6f 62 74 61 69 |xample, |to obtai|
|00000c10| 6e 20 24 2c 20 70 72 65 | 73 73 20 53 48 49 46 54 |n $, pre|ss SHIFT|
|00000c20| 20 61 6e 64 20 34 2e 20 | 20 54 6f 20 6f 62 74 61 | and 4. | To obta|
|00000c30| 69 6e 20 48 2c 20 70 72 | 65 73 73 20 53 48 49 46 |in H, pr|ess SHIF|
|00000c40| 54 20 61 6e 64 20 48 2e | 20 20 54 6f 20 6f 62 74 |T and H.|  To obt|
|00000c50| 61 69 6e 20 74 68 65 20 | 6c 6f 77 65 72 20 73 79 |ain the |lower sy|
|00000c60| 6d 62 6f 6c 20 6f 6e 20 | 61 20 6b 65 79 20 6f 72 |mbol on |a key or|
|00000c70| 20 61 20 6c 6f 77 65 72 | 2d 63 61 73 65 20 6c 65 | a lower|-case le|
|00000c80| 74 74 65 72 2c 20 70 72 | 65 73 73 20 74 68 65 20 |tter, pr|ess the |
|00000c90| 6b 65 79 2e 22 29 0d 03 | 98 10 f2 63 61 70 73 28 |key.")..|...caps(|
|00000ca0| 22 4f 46 46 22 29 0d 03 | a2 0c f2 70 73 73 70 61 |"OFF")..|...psspa|
|00000cb0| 63 65 0d 03 ac 17 f2 75 | 6e 68 69 67 68 6c 69 67 |ce.....u|nhighlig|
|00000cc0| 68 74 28 bd 43 41 50 53 | 29 0d 03 b6 0c f2 70 61 |ht(.CAPS|).....pa|
|00000cd0| 72 74 28 34 29 0d 03 c0 | 05 e1 0d 03 ca 0b dd f2 |rt(4)...|........|
|00000ce0| 70 61 72 74 35 0d 03 d4 | da f2 70 72 69 6e 74 28 |part5...|..print(|
|00000cf0| 22 54 68 69 73 20 70 61 | 72 74 20 65 78 61 6d 69 |"This pa|rt exami|
|00000d00| 6e 65 73 20 74 68 65 20 | 65 6e 74 69 72 65 20 6b |nes the |entire k|
|00000d10| 65 79 62 6f 61 72 64 20 | 62 65 67 69 6e 6e 69 6e |eyboard |beginnin|
|00000d20| 67 20 77 69 74 68 20 61 | 6e 20 65 78 70 6c 61 6e |g with a|n explan|
|00000d30| 61 74 69 6f 6e 20 6f 66 | 20 74 68 65 20 6b 65 79 |ation of| the key|
|00000d40| 73 20 74 68 61 74 20 64 | 6f 20 6e 6f 74 20 61 70 |s that d|o not ap|
|00000d50| 70 65 61 72 20 6f 6e 20 | 61 20 74 79 70 65 77 72 |pear on |a typewr|
|00000d60| 69 74 65 72 2e 20 20 54 | 68 65 20 74 61 73 6b 73 |iter.  T|he tasks|
|00000d70| 20 74 68 61 74 20 74 68 | 65 73 65 20 6b 65 79 73 | that th|ese keys|
|00000d80| 20 70 65 72 66 6f 72 6d | 20 6d 61 79 20 76 61 72 | perform| may var|
|00000d90| 79 20 64 65 70 65 6e 64 | 69 6e 67 20 6f 6e 20 74 |y depend|ing on t|
|00000da0| 68 65 20 61 70 70 6c 69 | 63 61 74 69 6f 6e 20 79 |he appli|cation y|
|00000db0| 6f 75 20 61 72 65 20 75 | 73 69 6e 67 2e 22 29 0d |ou are u|sing.").|
|00000dc0| 03 de 28 74 65 6d 70 25 | 3d 79 63 6f 6f 72 64 25 |..(temp%|=ycoord%|
|00000dd0| 3a f2 70 73 73 70 61 63 | 65 3a 79 63 6f 6f 72 64 |:.psspac|e:ycoord|
|00000de0| 25 3d 74 65 6d 70 25 0d | 03 e8 1d f2 68 69 67 68 |%=temp%.|....high|
|00000df0| 6c 69 67 68 74 28 bd 43 | 54 52 4c 6c 2b bd 43 54 |light(.C|TRLl+.CT|
|00000e00| 52 4c 72 29 0d 03 f2 de | f2 70 72 69 6e 74 28 22 |RLr)....|.print("|
|00000e10| 43 54 52 4c 20 69 73 20 | 61 6c 77 61 79 73 20 75 |CTRL is |always u|
|00000e20| 73 65 64 20 69 6e 20 63 | 6f 6e 6a 75 6e 63 74 69 |sed in c|onjuncti|
|00000e30| 6f 6e 20 77 69 74 68 20 | 61 6e 6f 74 68 65 72 20 |on with |another |
|00000e40| 6b 65 79 2e 20 20 49 74 | 20 67 65 6e 65 72 61 74 |key.  It| generat|
|00000e50| 65 73 20 43 6f 6e 54 52 | 6f 4c 20 63 68 61 72 61 |es ConTR|oL chara|
|00000e60| 63 74 65 72 73 20 74 68 | 61 74 20 63 6f 6e 74 72 |cters th|at contr|
|00000e70| 6f 6c 20 76 61 72 69 6f | 75 73 20 61 73 70 65 63 |ol vario|us aspec|
|00000e80| 74 73 20 6f 66 20 74 68 | 65 20 6d 61 63 68 69 6e |ts of th|e machin|
|00000e90| 65 2e 20 20 46 6f 72 20 | 65 78 61 6d 70 6c 65 2c |e.  For |example,|
|00000ea0| 20 70 72 65 73 73 69 6e | 67 20 43 54 52 4c 20 61 | pressin|g CTRL a|
|00000eb0| 6e 64 20 4c 20 28 41 53 | 43 49 49 20 63 6f 64 65 |nd L (AS|CII code|
|00000ec0| 20 31 32 29 20 63 61 75 | 73 65 73 20 74 68 65 20 | 12) cau|ses the |
|00000ed0| 73 63 72 65 65 6e 20 74 | 6f 20 63 6c 65 61 72 2e |screen t|o clear.|
|00000ee0| 22 29 0d 03 fc 0c f2 70 | 73 73 70 61 63 65 0d 04 |").....p|sspace..|
|00000ef0| 06 08 f2 63 6c 73 0d 04 | 10 0e f2 74 69 74 6c 65 |...cls..|...title|
|00000f00| 63 74 72 6c 0d 04 1a 19 | f2 63 74 72 6c 28 22 30 |ctrl....|.ctrl("0|
|00000f10| 22 2c 22 40 22 2c 22 4e | 75 6c 6c 22 29 0d 04 24 |","@","N|ull")..$|
|00000f20| 38 f2 63 74 72 6c 28 22 | 31 22 2c 22 41 22 2c 22 |8.ctrl("|1","A","|
|00000f30| 53 65 6e 64 20 6e 65 78 | 74 20 63 68 61 72 61 63 |Send nex|t charac|
|00000f40| 74 65 72 20 74 6f 20 70 | 72 69 6e 74 65 72 20 6f |ter to p|rinter o|
|00000f50| 6e 6c 79 22 29 0d 04 2e | 3d f2 63 74 72 6c 28 22 |nly")...|=.ctrl("|
|00000f60| 32 22 2c 22 42 22 2c 22 | 53 65 6e 64 20 61 6c 6c |2","B","|Send all|
|00000f70| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 63 68 61 72 61 | followi|ng chara|
|00000f80| 63 74 65 72 73 20 74 6f | 20 70 72 69 6e 74 65 72 |cters to| printer|
|00000f90| 22 29 0d 04 38 37 f2 63 | 74 72 6c 28 22 33 22 2c |")..87.c|trl("3",|
|00000fa0| 22 43 22 2c 22 53 74 6f | 70 20 73 65 6e 64 69 6e |"C","Sto|p sendin|
|00000fb0| 67 20 63 68 61 72 61 63 | 74 65 72 73 20 74 6f 20 |g charac|ters to |
|00000fc0| 70 72 69 6e 74 65 72 22 | 29 0d 04 42 37 f2 63 74 |printer"|)..B7.ct|
|00000fd0| 72 6c 28 22 34 22 2c 22 | 44 22 2c 22 53 65 70 61 |rl("4","|D","Sepa|
|00000fe0| 72 61 74 65 20 74 65 78 | 74 20 61 6e 64 20 67 72 |rate tex|t and gr|
|00000ff0| 61 70 68 69 63 73 20 63 | 75 72 73 6f 72 73 22 29 |aphics c|ursors")|
|00001000| 0d 04 4c 33 f2 63 74 72 | 6c 28 22 35 22 2c 22 45 |..L3.ctr|l("5","E|
|00001010| 22 2c 22 4c 69 6e 6b 20 | 74 65 78 74 20 61 6e 64 |","Link |text and|
|00001020| 20 67 72 61 70 68 69 63 | 73 20 63 75 72 73 6f 72 | graphic|s cursor|
|00001030| 73 22 29 0d 04 56 3c f2 | 63 74 72 6c 28 22 36 22 |s")..V<.|ctrl("6"|
|00001040| 2c 22 46 22 2c 22 53 65 | 6e 64 20 61 6c 6c 20 66 |,"F","Se|nd all f|
|00001050| 6f 6c 6c 6f 77 69 6e 67 | 20 63 68 61 72 61 63 74 |ollowing| charact|
|00001060| 65 72 73 20 74 6f 20 73 | 63 72 65 65 6e 22 29 0d |ers to s|creen").|
|00001070| 04 60 20 f2 63 74 72 6c | 28 22 37 22 2c 22 47 22 |.` .ctrl|("7","G"|
|00001080| 2c 22 4d 61 6b 65 20 61 | 20 62 65 65 70 22 29 0d |,"Make a| beep").|
|00001090| 04 6a 0c f2 70 73 73 70 | 61 63 65 0d 04 74 1c f2 |.j..pssp|ace..t..|
|000010a0| 75 6e 68 69 67 68 6c 69 | 67 68 74 28 22 40 41 42 |unhighli|ght("@AB|
|000010b0| 43 44 45 46 47 22 29 0d | 04 7e 08 f2 63 6c 73 0d |CDEFG").|.~..cls.|
|000010c0| 04 88 0e f2 74 69 74 6c | 65 63 74 72 6c 0d 04 92 |....titl|ectrl...|
|000010d0| 1e f2 63 74 72 6c 28 22 | 38 22 2c 22 48 22 2c 22 |..ctrl("|8","H","|
|000010e0| 42 61 63 6b 73 70 61 63 | 65 22 29 0d 04 9c 34 f2 |Backspac|e")...4.|
|000010f0| 63 74 72 6c 28 22 39 22 | 2c 22 49 22 2c 22 46 6f |ctrl("9"|,"I","Fo|
|00001100| 72 77 61 72 64 73 70 61 | 63 65 20 28 53 61 6d 65 |rwardspa|ce (Same|
|00001110| 20 63 6f 64 65 20 61 73 | 20 54 41 42 29 22 29 0d | code as| TAB)").|
|00001120| 04 a6 1e f2 63 74 72 6c | 28 22 31 30 22 2c 22 4a |....ctrl|("10","J|
|00001130| 22 2c 22 4c 69 6e 65 66 | 65 65 64 22 29 0d 04 b0 |","Linef|eed")...|
|00001140| 26 f2 63 74 72 6c 28 22 | 31 31 22 2c 22 4b 22 2c |&.ctrl("|11","K",|
|00001150| 22 52 65 76 65 72 73 65 | 20 6c 69 6e 65 66 65 65 |"Reverse| linefee|
|00001160| 64 22 29 0d 04 ba 27 f2 | 63 74 72 6c 28 22 31 32 |d")...'.|ctrl("12|
|00001170| 22 2c 22 4c 22 2c 22 43 | 6c 65 61 72 20 74 65 78 |","L","C|lear tex|
|00001180| 74 20 73 63 72 65 65 6e | 22 29 0d 04 c4 33 f2 63 |t screen|")...3.c|
|00001190| 74 72 6c 28 22 31 33 22 | 2c 22 4d 22 2c 22 4e 65 |trl("13"|,"M","Ne|
|000011a0| 77 6c 69 6e 65 20 28 53 | 61 6d 65 20 63 6f 64 65 |wline (S|ame code|
|000011b0| 20 61 73 20 52 45 54 55 | 52 4e 29 22 29 0d 04 ce | as RETU|RN)")...|
|000011c0| 22 f2 63 74 72 6c 28 22 | 31 34 22 2c 22 4e 22 2c |".ctrl("|14","N",|
|000011d0| 22 50 61 67 65 20 6d 6f | 64 65 20 6f 6e 22 29 0d |"Page mo|de on").|
|000011e0| 04 d8 23 f2 63 74 72 6c | 28 22 31 35 22 2c 22 4f |..#.ctrl|("15","O|
|000011f0| 22 2c 22 50 61 67 65 20 | 6d 6f 64 65 20 6f 66 66 |","Page |mode off|
|00001200| 22 29 0d 04 e2 0c f2 70 | 73 73 70 61 63 65 0d 04 |").....p|sspace..|
|00001210| ec 1c f2 75 6e 68 69 67 | 68 6c 69 67 68 74 28 22 |...unhig|hlight("|
|00001220| 48 49 4a 4b 4c 4d 4e 4f | 22 29 0d 04 f6 08 f2 63 |HIJKLMNO|").....c|
|00001230| 6c 73 0d 05 00 0e f2 74 | 69 74 6c 65 63 74 72 6c |ls.....t|itlectrl|
|00001240| 0d 05 0a 2b f2 63 74 72 | 6c 28 22 31 36 22 2c 22 |...+.ctr|l("16","|
|00001250| 50 22 2c 22 43 6c 65 61 | 72 20 67 72 61 70 68 69 |P","Clea|r graphi|
|00001260| 63 73 20 73 63 72 65 65 | 6e 22 29 0d 05 14 25 f2 |cs scree|n")...%.|
|00001270| 63 74 72 6c 28 22 31 37 | 22 2c 22 51 22 2c 22 53 |ctrl("17|","Q","S|
|00001280| 65 74 20 74 65 78 74 20 | 63 6f 6c 6f 75 72 22 29 |et text |colour")|
|00001290| 0d 05 1e 29 f2 63 74 72 | 6c 28 22 31 38 22 2c 22 |...).ctr|l("18","|
|000012a0| 52 22 2c 22 53 65 74 20 | 67 72 61 70 68 69 63 73 |R","Set |graphics|
|000012b0| 20 63 6f 6c 6f 75 72 22 | 29 0d 05 28 21 f2 63 74 | colour"|)..(!.ct|
|000012c0| 72 6c 28 22 31 39 22 2c | 22 53 22 2c 22 53 65 74 |rl("19",|"S","Set|
|000012d0| 20 70 61 6c 65 74 74 65 | 22 29 0d 05 32 31 f2 63 | palette|")..21.c|
|000012e0| 74 72 6c 28 22 32 30 22 | 2c 22 54 22 2c 22 44 65 |trl("20"|,"T","De|
|000012f0| 66 61 75 6c 74 20 70 61 | 6c 65 74 74 65 20 61 6e |fault pa|lette an|
|00001300| 64 20 63 6f 6c 6f 75 72 | 73 22 29 0d 05 3c 37 f2 |d colour|s")..<7.|
|00001310| 63 74 72 6c 28 22 32 31 | 22 2c 22 55 22 2c 22 53 |ctrl("21|","U","S|
|00001320| 74 6f 70 20 73 65 6e 64 | 69 6e 67 20 63 68 61 72 |top send|ing char|
|00001330| 61 63 74 65 72 73 20 74 | 6f 20 73 63 72 65 65 6e |acters t|o screen|
|00001340| 22 29 0d 05 46 28 f2 63 | 74 72 6c 28 22 32 32 22 |")..F(.c|trl("22"|
|00001350| 2c 22 56 22 2c 22 53 65 | 6c 65 63 74 20 73 63 72 |,"V","Se|lect scr|
|00001360| 65 65 6e 20 6d 6f 64 65 | 22 29 0d 05 50 26 f2 63 |een mode|")..P&.c|
|00001370| 74 72 6c 28 22 32 33 22 | 2c 22 57 22 2c 22 44 65 |trl("23"|,"W","De|
|00001380| 66 69 6e 65 20 63 68 61 | 72 61 63 74 65 72 22 29 |fine cha|racter")|
|00001390| 0d 05 5a 0c f2 70 73 73 | 70 61 63 65 0d 05 64 1c |..Z..pss|pace..d.|
|000013a0| f2 75 6e 68 69 67 68 6c | 69 67 68 74 28 22 50 51 |.unhighl|ight("PQ|
|000013b0| 52 53 54 55 56 57 22 29 | 0d 05 6e 08 f2 63 6c 73 |RSTUVW")|..n..cls|
|000013c0| 0d 05 78 0e f2 74 69 74 | 6c 65 63 74 72 6c 0d 05 |..x..tit|lectrl..|
|000013d0| 82 2c f2 63 74 72 6c 28 | 22 32 34 22 2c 22 58 22 |.,.ctrl(|"24","X"|
|000013e0| 2c 22 44 65 66 69 6e 65 | 20 67 72 61 70 68 69 63 |,"Define| graphic|
|000013f0| 73 20 77 69 6e 64 6f 77 | 22 29 0d 05 8c 1a f2 63 |s window|").....c|
|00001400| 74 72 6c 28 22 32 35 22 | 2c 22 59 22 2c 22 50 6c |trl("25"|,"Y","Pl|
|00001410| 6f 74 22 29 0d 05 96 37 | f2 63 74 72 6c 28 22 32 |ot")...7|.ctrl("2|
|00001420| 36 22 2c 22 5a 22 2c 22 | 44 65 66 61 75 6c 74 20 |6","Z","|Default |
|00001430| 74 65 78 74 20 61 6e 64 | 20 67 72 61 70 68 69 63 |text and| graphic|
|00001440| 73 20 73 63 72 65 65 6e | 73 22 29 0d 05 a0 1d f2 |s screen|s").....|
|00001450| 63 74 72 6c 28 22 32 37 | 22 2c 22 5b 22 2c 22 4e |ctrl("27|","[","N|
|00001460| 6f 74 68 69 6e 67 22 29 | 0d 05 aa 28 f2 63 74 72 |othing")|...(.ctr|
|00001470| 6c 28 22 32 38 22 2c 22 | 5c 22 2c 22 44 65 66 69 |l("28","|\","Defi|
|00001480| 6e 65 20 74 65 78 74 20 | 77 69 6e 64 6f 77 22 29 |ne text |window")|
|00001490| 0d 05 b4 2c f2 63 74 72 | 6c 28 22 32 39 22 2c 22 |...,.ctr|l("29","|
|000014a0| 5d 22 2c 22 44 65 66 69 | 6e 65 20 67 72 61 70 68 |]","Defi|ne graph|
|000014b0| 69 63 73 20 6f 72 69 67 | 69 6e 22 29 0d 05 be 3a |ics orig|in")...:|
|000014c0| f2 63 74 72 6c 28 22 33 | 30 22 2c 22 5e 22 2c 22 |.ctrl("3|0","^","|
|000014d0| 48 6f 6d 65 20 74 65 78 | 74 20 63 75 72 73 6f 72 |Home tex|t cursor|
|000014e0| 20 28 53 61 6d 65 20 63 | 6f 64 65 20 61 73 20 48 | (Same c|ode as H|
|000014f0| 4f 4d 45 29 22 29 0d 05 | c8 2d f2 63 74 72 6c 28 |OME)")..|.-.ctrl(|
|00001500| 22 33 31 22 2c 22 5f 22 | 2c 22 4d 6f 76 65 20 74 |"31","_"|,"Move t|
|00001510| 65 78 74 20 63 75 72 73 | 6f 72 20 74 6f 20 58 2c |ext curs|or to X,|
|00001520| 59 22 29 0d 05 d2 0c f2 | 70 73 73 70 61 63 65 0d |Y").....|psspace.|
|00001530| 05 dc 2a f2 75 6e 68 69 | 67 68 6c 69 67 68 74 28 |..*.unhi|ghlight(|
|00001540| 22 58 59 5a 5b 5c 5d 5e | 5f 22 2b bd 43 54 52 4c |"XYZ[\]^|_"+.CTRL|
|00001550| 6c 2b bd 43 54 52 4c 72 | 29 0d 05 e6 08 f2 63 6c |l+.CTRLr|).....cl|
|00001560| 73 0d 05 f0 3c f2 68 69 | 67 68 6c 69 67 68 74 28 |s...<.hi|ghlight(|
|00001570| bd 26 38 43 2b bd 26 38 | 44 2b bd 26 38 45 2b bd |.&8C+.&8|D+.&8E+.|
|00001580| 26 38 46 2b 20 bd 26 38 | 42 2b 20 bd 50 61 67 65 |&8F+ .&8|B+ .Page|
|00001590| 55 70 2b bd 50 61 67 65 | 44 6f 77 6e 29 0d 05 fa |Up+.Page|Down)...|
|000015a0| 3a f2 70 72 69 6e 74 28 | 22 43 75 72 73 6f 72 20 |:.print(|"Cursor |
|000015b0| 63 6f 6e 74 72 6f 6c 20 | 28 61 72 72 6f 77 29 20 |control |(arrow) |
|000015c0| 6b 65 79 73 20 6d 6f 76 | 65 20 74 68 65 20 63 75 |keys mov|e the cu|
|000015d0| 72 73 6f 72 2e 22 29 0d | 06 04 52 f2 70 72 69 6e |rsor.").|..R.prin|
|000015e0| 74 28 22 50 41 47 45 20 | 55 50 20 61 6e 64 20 50 |t("PAGE |UP and P|
|000015f0| 41 47 45 20 44 4f 57 4e | 20 61 72 65 20 6e 6f 74 |AGE DOWN| are not|
|00001600| 20 75 73 65 64 20 62 79 | 20 42 41 53 49 43 20 6f | used by| BASIC o|
|00001610| 72 20 74 68 65 20 4f 70 | 65 72 61 74 69 6e 67 20 |r the Op|erating |
|00001620| 53 79 73 74 65 6d 2e 22 | 29 0d 06 0e 28 74 65 6d |System."|)...(tem|
|00001630| 70 25 3d 79 63 6f 6f 72 | 64 25 3a f2 70 73 73 70 |p%=ycoor|d%:.pssp|
|00001640| 61 63 65 3a 79 63 6f 6f | 72 64 25 3d 74 65 6d 70 |ace:ycoo|rd%=temp|
|00001650| 25 0d 06 18 ea f2 70 72 | 69 6e 74 28 22 43 4f 50 |%.....pr|int("COP|
|00001660| 59 20 63 6f 70 69 65 73 | 20 63 68 61 72 61 63 74 |Y copies| charact|
|00001670| 65 72 73 20 6f 6e 20 6f | 6e 65 20 6c 69 6e 65 20 |ers on o|ne line |
|00001680| 74 6f 20 61 6e 6f 74 68 | 65 72 20 6c 69 6e 65 20 |to anoth|er line |
|00001690| 28 63 61 6c 6c 65 64 20 | 74 68 65 20 69 6e 70 75 |(called |the inpu|
|000016a0| 74 20 6c 69 6e 65 29 2e | 20 20 50 6f 73 69 74 69 |t line).|  Positi|
|000016b0| 6f 6e 20 74 68 65 20 63 | 75 72 73 6f 72 20 75 6e |on the c|ursor un|
|000016c0| 64 65 72 20 74 68 65 20 | 6c 69 6e 65 20 74 6f 20 |der the |line to |
|000016d0| 62 65 20 63 6f 70 69 65 | 64 20 75 73 69 6e 67 20 |be copie|d using |
|000016e0| 74 68 65 20 63 75 72 73 | 6f 72 20 63 6f 6e 74 72 |the curs|or contr|
|000016f0| 6f 6c 20 6b 65 79 73 2e | 20 20 50 72 65 73 73 20 |ol keys.|  Press |
|00001700| 43 4f 50 59 20 61 6e 64 | 20 74 68 65 20 6c 69 6e |COPY and| the lin|
|00001710| 65 20 62 65 69 6e 67 20 | 63 6f 70 69 65 64 20 61 |e being |copied a|
|00001720| 70 70 65 61 72 73 20 6f | 6e 20 74 68 65 20 69 6e |ppears o|n the in|
|00001730| 70 75 74 20 6c 69 6e 65 | 2e 22 29 0d 06 22 75 f2 |put line|.").."u.|
|00001740| 70 72 69 6e 74 28 22 4e | 6f 74 65 20 74 68 61 74 |print("N|ote that|
|00001750| 20 77 6f 72 64 20 70 72 | 6f 63 65 73 73 6f 72 73 | word pr|ocessors|
|00001760| 20 61 6e 64 20 6f 74 68 | 65 72 20 61 70 70 6c 69 | and oth|er appli|
|00001770| 63 61 74 69 6f 6e 20 70 | 72 6f 67 72 61 6d 73 20 |cation p|rograms |
|00001780| 6d 61 79 20 77 65 6c 6c | 20 75 73 65 20 74 68 65 |may well| use the|
|00001790| 73 65 20 6b 65 79 73 20 | 69 6e 20 61 20 64 69 66 |se keys |in a dif|
|000017a0| 66 65 72 65 6e 74 20 6d | 61 6e 6e 65 72 2e 22 29 |ferent m|anner.")|
|000017b0| 0d 06 2c 0c f2 70 73 73 | 70 61 63 65 0d 06 36 3e |..,..pss|pace..6>|
|000017c0| f2 75 6e 68 69 67 68 6c | 69 67 68 74 28 bd 26 38 |.unhighl|ight(.&8|
|000017d0| 43 2b bd 26 38 44 2b bd | 26 38 45 2b bd 26 38 46 |C+.&8D+.|&8E+.&8F|
|000017e0| 2b 20 bd 26 38 42 2b 20 | bd 50 61 67 65 55 70 2b |+ .&8B+ |.PageUp+|
|000017f0| bd 50 61 67 65 44 6f 77 | 6e 29 0d 06 40 08 f2 63 |.PageDow|n)..@..c|
|00001800| 6c 73 0d 06 4a 25 f2 68 | 69 67 68 6c 69 67 68 74 |ls..J%.h|ighlight|
|00001810| 28 bd 39 2b bd 31 33 2b | bd 38 2b bd 41 4c 54 6c |(.9+.13+|.8+.ALTl|
|00001820| 2b bd 41 4c 54 72 29 0d | 06 54 36 f2 70 72 69 6e |+.ALTr).|.T6.prin|
|00001830| 74 28 22 54 41 42 20 6d | 6f 76 65 73 20 74 68 65 |t("TAB m|oves the|
|00001840| 20 63 75 72 73 6f 72 20 | 66 6f 72 77 61 72 64 73 | cursor |forwards|
|00001850| 20 28 41 53 43 49 49 20 | 39 29 2e 22 29 0d 06 5e | (ASCII |9).")..^|
|00001860| 28 74 65 6d 70 25 3d 79 | 63 6f 6f 72 64 25 3a f2 |(temp%=y|coord%:.|
|00001870| 70 73 73 70 61 63 65 3a | 79 63 6f 6f 72 64 25 3d |psspace:|ycoord%=|
|00001880| 74 65 6d 70 25 0d 06 68 | 84 f2 70 72 69 6e 74 28 |temp%..h|..print(|
|00001890| 22 52 45 54 55 52 4e 20 | 73 69 67 6e 61 6c 73 20 |"RETURN |signals |
|000018a0| 74 68 65 20 65 6e 64 20 | 6f 66 20 61 20 6c 69 6e |the end |of a lin|
|000018b0| 65 2e 20 20 49 74 20 61 | 64 76 61 6e 63 65 73 20 |e.  It a|dvances |
|000018c0| 6f 6e 65 20 6c 69 6e 65 | 20 61 6e 64 20 6d 6f 76 |one line| and mov|
|000018d0| 65 73 20 74 68 65 20 63 | 75 72 73 6f 72 20 62 61 |es the c|ursor ba|
|000018e0| 63 6b 20 74 6f 20 74 68 | 65 20 6c 65 66 74 20 68 |ck to th|e left h|
|000018f0| 61 6e 64 20 73 69 64 65 | 20 6f 66 20 74 68 65 20 |and side| of the |
|00001900| 73 63 72 65 65 6e 2e 22 | 29 0d 06 72 28 74 65 6d |screen."|)..r(tem|
|00001910| 70 25 3d 79 63 6f 6f 72 | 64 25 3a f2 70 73 73 70 |p%=ycoor|d%:.pssp|
|00001920| 61 63 65 3a 79 63 6f 6f | 72 64 25 3d 74 65 6d 70 |ace:ycoo|rd%=temp|
|00001930| 25 0d 06 7c 4d f2 70 72 | 69 6e 74 28 22 42 41 43 |%..|M.pr|int("BAC|
|00001940| 4b 53 50 41 43 45 20 6d | 6f 76 65 73 20 74 68 65 |KSPACE m|oves the|
|00001950| 20 63 75 72 73 6f 72 20 | 6f 6e 65 20 63 68 61 72 | cursor |one char|
|00001960| 61 63 74 65 72 20 74 6f | 20 74 68 65 20 6c 65 66 |acter to| the lef|
|00001970| 74 20 28 41 53 43 49 49 | 20 38 29 2e 22 29 0d 06 |t (ASCII| 8).")..|
|00001980| 86 28 74 65 6d 70 25 3d | 79 63 6f 6f 72 64 25 3a |.(temp%=|ycoord%:|
|00001990| f2 70 73 73 70 61 63 65 | 3a 79 63 6f 6f 72 64 25 |.psspace|:ycoord%|
|000019a0| 3d 74 65 6d 70 25 0d 06 | 90 b2 f2 70 72 69 6e 74 |=temp%..|...print|
|000019b0| 28 22 41 4c 54 20 69 73 | 20 61 6c 77 61 79 73 20 |("ALT is| always |
|000019c0| 75 73 65 64 20 69 6e 20 | 63 6f 6e 6a 75 6e 63 74 |used in |conjunct|
|000019d0| 69 6f 6e 20 77 69 74 68 | 20 61 6e 6f 74 68 65 72 |ion with| another|
|000019e0| 20 6b 65 79 2e 20 20 49 | 74 20 6d 61 6b 65 73 20 | key.  I|t makes |
|000019f0| 61 76 61 69 6c 61 62 6c | 65 20 63 68 61 72 61 63 |availabl|e charac|
|00001a00| 74 65 72 73 20 6e 6f 74 | 20 66 6f 75 6e 64 20 6f |ters not| found o|
|00001a10| 6e 20 74 68 65 20 6b 65 | 79 62 6f 61 72 64 2e 20 |n the ke|yboard. |
|00001a20| 20 28 49 74 20 61 64 64 | 73 20 31 32 38 20 74 6f | (It add|s 128 to|
|00001a30| 20 74 68 65 20 41 53 43 | 49 49 20 63 6f 64 65 20 | the ASC|II code |
|00001a40| 6f 66 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |of the f|ollowing|
|00001a50| 20 6b 65 79 2e 29 22 29 | 0d 06 9a 0c f2 70 73 73 | key.)")|.....pss|
|00001a60| 70 61 63 65 0d 06 a4 27 | f2 75 6e 68 69 67 68 6c |pace...'|.unhighl|
|00001a70| 69 67 68 74 28 bd 39 2b | bd 31 33 2b bd 38 2b bd |ight(.9+|.13+.8+.|
|00001a80| 41 4c 54 6c 2b bd 41 4c | 54 72 29 0d 06 ae 08 f2 |ALTl+.AL|Tr).....|
|00001a90| 63 6c 73 0d 06 b8 50 f2 | 68 69 67 68 6c 69 67 68 |cls...P.|highligh|
|00001aa0| 74 28 bd 32 37 2b 20 bd | 31 36 31 2b bd 31 36 32 |t(.27+ .|161+.162|
|00001ab0| 2b bd 31 36 33 2b bd 31 | 36 34 2b bd 31 36 35 2b |+.163+.1|64+.165+|
|00001ac0| bd 31 36 36 2b bd 31 36 | 37 2b bd 31 36 38 2b bd |.166+.16|7+.168+.|
|00001ad0| 31 36 39 2b bd 32 30 32 | 2b bd 32 30 33 2b bd 32 |169+.202|+.203+.2|
|00001ae0| 30 34 29 0d 06 c2 30 f2 | 70 72 69 6e 74 28 22 45 |04)...0.|print("E|
|00001af0| 53 43 20 73 74 6f 70 73 | 20 61 20 42 41 53 49 43 |SC stops| a BASIC|
|00001b00| 20 70 72 6f 67 72 61 6d | 20 72 75 6e 6e 69 6e 67 | program| running|
|00001b10| 2e 22 29 0d 06 cc 28 74 | 65 6d 70 25 3d 79 63 6f |.")...(t|emp%=yco|
|00001b20| 6f 72 64 25 3a f2 70 73 | 73 70 61 63 65 3a 79 63 |ord%:.ps|space:yc|
|00001b30| 6f 6f 72 64 25 3d 74 65 | 6d 70 25 0d 06 d6 0e f2 |oord%=te|mp%.....|
|00001b40| 70 73 6e 65 77 6c 69 6e | 65 0d 06 e0 d7 f2 70 72 |psnewlin|e.....pr|
|00001b50| 69 6e 74 28 22 46 31 2d | 46 31 32 20 28 73 6f 66 |int("F1-|F12 (sof|
|00001b60| 74 20 6b 65 79 73 29 20 | 63 61 6e 20 62 65 20 61 |t keys) |can be a|
|00001b70| 73 73 69 67 6e 65 64 20 | 64 69 66 66 65 72 65 6e |ssigned |differen|
|00001b80| 74 20 73 74 72 69 6e 67 | 73 20 6f 66 20 63 68 61 |t string|s of cha|
|00001b90| 72 61 63 74 65 72 73 20 | 75 73 69 6e 67 20 74 68 |racters |using th|
|00001ba0| 65 20 6f 70 65 72 61 74 | 69 6e 67 20 73 79 73 74 |e operat|ing syst|
|00001bb0| 65 6d 20 63 6f 6d 6d 61 | 6e 64 20 2a 4b 45 59 2e |em comma|nd *KEY.|
|00001bc0| 20 20 46 6f 72 20 65 78 | 61 6d 70 6c 65 2c 20 74 |  For ex|ample, t|
|00001bd0| 79 70 69 6e 67 20 2a 4b | 45 59 20 33 20 46 52 45 |yping *K|EY 3 FRE|
|00001be0| 44 20 28 52 45 54 55 52 | 4e 29 20 6d 61 6b 65 73 |D (RETUR|N) makes|
|00001bf0| 20 46 52 45 44 20 61 70 | 70 65 61 72 20 6f 6e 20 | FRED ap|pear on |
|00001c00| 74 68 65 20 73 63 72 65 | 65 6e 20 77 68 65 6e 20 |the scre|en when |
|00001c10| 46 33 20 69 73 20 70 72 | 65 73 73 65 64 2e 22 29 |F3 is pr|essed.")|
|00001c20| 0d 06 ea 0c f2 70 73 73 | 70 61 63 65 0d 06 f4 52 |.....pss|pace...R|
|00001c30| f2 75 6e 68 69 67 68 6c | 69 67 68 74 28 bd 32 37 |.unhighl|ight(.27|
|00001c40| 2b 20 bd 31 36 31 2b bd | 31 36 32 2b bd 31 36 33 |+ .161+.|162+.163|
|00001c50| 2b bd 31 36 34 2b bd 31 | 36 35 2b bd 31 36 36 2b |+.164+.1|65+.166+|
|00001c60| bd 31 36 37 2b bd 31 36 | 38 2b bd 31 36 39 2b bd |.167+.16|8+.169+.|
|00001c70| 32 30 32 2b bd 32 30 33 | 2b bd 32 30 34 29 0d 06 |202+.203|+.204)..|
|00001c80| fe 08 f2 63 6c 73 0d 07 | 08 1d f2 68 69 67 68 6c |...cls..|...highl|
|00001c90| 69 67 68 74 28 bd 32 30 | 35 2b bd 33 30 2b bd 31 |ight(.20|5+.30+.1|
|00001ca0| 32 37 29 0d 07 12 42 f2 | 70 72 69 6e 74 28 22 49 |27)...B.|print("I|
|00001cb0| 4e 53 45 52 54 20 69 73 | 20 6e 6f 74 20 75 73 65 |NSERT is| not use|
|00001cc0| 64 20 62 79 20 42 41 53 | 49 43 20 6f 72 20 74 68 |d by BAS|IC or th|
|00001cd0| 65 20 4f 70 65 72 61 74 | 69 6e 67 20 53 79 73 74 |e Operat|ing Syst|
|00001ce0| 65 6d 2e 22 29 0d 07 1c | 0e f2 70 73 6e 65 77 6c |em.")...|..psnewl|
|00001cf0| 69 6e 65 0d 07 26 59 f2 | 70 72 69 6e 74 28 22 48 |ine..&Y.|print("H|
|00001d00| 4f 4d 45 20 6d 6f 76 65 | 73 20 74 68 65 20 63 75 |OME move|s the cu|
|00001d10| 72 73 6f 72 20 74 6f 20 | 74 68 65 20 74 6f 70 20 |rsor to |the top |
|00001d20| 6c 65 66 74 20 68 61 6e | 64 20 63 6f 72 6e 65 72 |left han|d corner|
|00001d30| 20 6f 66 20 74 68 65 20 | 73 63 72 65 65 6e 20 28 | of the |screen (|
|00001d40| 41 53 43 49 49 20 33 30 | 29 2e 22 29 0d 07 30 0e |ASCII 30|).")..0.|
|00001d50| f2 70 73 6e 65 77 6c 69 | 6e 65 0d 07 3a 75 f2 70 |.psnewli|ne..:u.p|
|00001d60| 72 69 6e 74 28 22 44 45 | 4c 45 54 45 20 64 65 6c |rint("DE|LETE del|
|00001d70| 65 74 65 73 20 74 68 65 | 20 63 68 61 72 61 63 74 |etes the| charact|
|00001d80| 65 72 20 74 6f 20 74 68 | 65 20 6c 65 66 74 20 6f |er to th|e left o|
|00001d90| 66 20 74 68 65 20 63 75 | 72 73 6f 72 2c 20 6d 6f |f the cu|rsor, mo|
|00001da0| 76 69 6e 67 20 74 68 65 | 20 63 75 72 73 6f 72 20 |ving the| cursor |
|00001db0| 74 6f 20 74 68 65 20 6c | 65 66 74 20 61 74 20 74 |to the l|eft at t|
|00001dc0| 68 65 20 73 61 6d 65 20 | 74 69 6d 65 2e 22 29 0d |he same |time.").|
|00001dd0| 07 44 0c f2 70 73 73 70 | 61 63 65 0d 07 4e 1f f2 |.D..pssp|ace..N..|
|00001de0| 75 6e 68 69 67 68 6c 69 | 67 68 74 28 bd 32 30 35 |unhighli|ght(.205|
|00001df0| 2b bd 33 30 2b bd 31 32 | 37 29 0d 07 58 08 f2 63 |+.30+.12|7)..X..c|
|00001e00| 6c 73 0d 07 62 1e f2 68 | 69 67 68 6c 69 67 68 74 |ls..b..h|ighlight|
|00001e10| 28 bd 31 36 30 2b bd 32 | 34 30 2b bd 32 34 31 29 |(.160+.2|40+.241)|
|00001e20| 0d 07 6c aa f2 70 72 69 | 6e 74 28 22 50 52 49 4e |..l..pri|nt("PRIN|
|00001e30| 54 2c 20 6c 69 6b 65 20 | 46 31 2d 46 31 32 2c 20 |T, like |F1-F12, |
|00001e40| 63 61 6e 20 62 65 20 61 | 73 73 69 67 6e 65 64 20 |can be a|ssigned |
|00001e50| 64 69 66 66 65 72 65 6e | 74 20 73 74 72 69 6e 67 |differen|t string|
|00001e60| 73 20 6f 66 20 63 68 61 | 72 61 63 74 65 72 73 20 |s of cha|racters |
|00001e70| 75 73 69 6e 67 20 74 68 | 65 20 2a 4b 45 59 20 63 |using th|e *KEY c|
|00001e80| 6f 6d 6d 61 6e 64 2e 20 | 20 49 74 20 61 63 74 73 |ommand. | It acts|
|00001e90| 20 61 73 20 61 6e 20 46 | 30 20 6b 65 79 2c 20 61 | as an F|0 key, a|
|00001ea0| 6e 64 20 6d 61 79 20 62 | 65 20 75 73 65 64 20 62 |nd may b|e used b|
|00001eb0| 79 20 70 72 6f 67 72 61 | 6d 73 20 66 6f 72 20 50 |y progra|ms for P|
|00001ec0| 52 49 4e 54 69 6e 67 2e | 22 29 0d 07 76 28 74 65 |RINTing.|")..v(te|
|00001ed0| 6d 70 25 3d 79 63 6f 6f | 72 64 25 3a f2 70 73 73 |mp%=ycoo|rd%:.pss|
|00001ee0| 70 61 63 65 3a 79 63 6f | 6f 72 64 25 3d 74 65 6d |pace:yco|ord%=tem|
|00001ef0| 70 25 0d 07 80 63 f2 70 | 72 69 6e 74 28 22 53 43 |p%...c.p|rint("SC|
|00001f00| 52 4f 4c 4c 20 4c 4f 43 | 4b 20 73 74 6f 70 73 20 |ROLL LOC|K stops |
|00001f10| 73 63 72 65 65 6e 20 6f | 75 74 70 75 74 2e 20 20 |screen o|utput.  |
|00001f20| 50 72 65 73 73 69 6e 67 | 20 53 43 52 4f 4c 4c 20 |Pressing| SCROLL |
|00001f30| 4c 4f 43 4b 20 61 67 61 | 69 6e 20 72 65 73 74 61 |LOCK aga|in resta|
|00001f40| 72 74 73 20 73 63 72 65 | 65 6e 20 64 69 73 70 6c |rts scre|en displ|
|00001f50| 61 79 2e 22 29 0d 07 8a | 28 74 65 6d 70 25 3d 79 |ay.")...|(temp%=y|
|00001f60| 63 6f 6f 72 64 25 3a f2 | 70 73 73 70 61 63 65 3a |coord%:.|psspace:|
|00001f70| 79 63 6f 6f 72 64 25 3d | 74 65 6d 70 25 0d 07 94 |ycoord%=|temp%...|
|00001f80| b9 f2 70 72 69 6e 74 28 | 22 42 52 45 41 4b 20 69 |..print(|"BREAK i|
|00001f90| 73 20 73 69 6d 69 6c 61 | 72 20 74 6f 20 45 53 43 |s simila|r to ESC|
|00001fa0| 2e 20 20 53 48 49 46 54 | 20 61 6e 64 20 42 52 45 |.  SHIFT| and BRE|
|00001fb0| 41 4b 20 74 6f 67 65 74 | 68 65 72 20 69 73 20 6f |AK toget|her is o|
|00001fc0| 66 74 65 6e 20 75 73 65 | 64 20 74 6f 20 61 75 74 |ften use|d to aut|
|00001fd0| 6f 6d 61 74 69 63 61 6c | 6c 79 20 6c 6f 61 64 20 |omatical|ly load |
|00001fe0| 61 6e 64 20 72 75 6e 20 | 61 20 70 72 6f 67 72 61 |and run |a progra|
|00001ff0| 6d 2e 20 20 43 54 52 4c | 20 61 6e 64 20 42 52 45 |m.  CTRL| and BRE|
|00002000| 41 4b 20 72 65 73 65 74 | 73 20 74 68 65 20 6d 61 |AK reset|s the ma|
|00002010| 63 68 69 6e 65 2c 20 73 | 69 6d 69 6c 61 72 20 74 |chine, s|imilar t|
|00002020| 6f 20 62 65 69 6e 67 20 | 73 77 69 74 63 68 65 64 |o being |switched|
|00002030| 20 6f 6e 2e 22 29 0d 07 | 9e 0c f2 70 73 73 70 61 | on.")..|...psspa|
|00002040| 63 65 0d 07 a8 20 f2 75 | 6e 68 69 67 68 6c 69 67 |ce... .u|nhighlig|
|00002050| 68 74 28 bd 31 36 30 2b | bd 32 34 30 2b bd 32 34 |ht(.160+|.240+.24|
|00002060| 31 29 0d 07 b2 08 f2 63 | 6c 73 0d 07 bc 27 f2 6e |1).....c|ls...'.n|
|00002070| 75 6d 65 72 69 63 28 bd | 30 2b 22 2f 2a 23 37 38 |umeric(.|0+"/*#78|
|00002080| 39 2d 34 35 36 2b 31 32 | 33 30 2e 22 2b bd 31 33 |9-456+12|30."+.13|
|00002090| 29 0d 07 c6 6f f2 70 72 | 69 6e 74 28 22 54 68 65 |)...o.pr|int("The|
|000020a0| 20 6e 75 6d 65 72 69 63 | 20 6b 65 79 70 61 64 20 | numeric| keypad |
|000020b0| 69 73 20 75 73 65 64 20 | 6c 69 6b 65 20 61 20 63 |is used |like a c|
|000020c0| 61 6c 63 75 6c 61 74 6f | 72 2e 20 20 45 4e 54 45 |alculato|r.  ENTE|
|000020d0| 52 20 69 73 20 69 64 65 | 6e 74 69 63 61 6c 20 74 |R is ide|ntical t|
|000020e0| 6f 20 52 45 54 55 52 4e | 20 6f 6e 20 74 68 65 20 |o RETURN| on the |
|000020f0| 6d 61 69 6e 20 6b 65 79 | 62 6f 61 72 64 2e 22 29 |main key|board.")|
|00002100| 0d 07 d0 28 74 65 6d 70 | 25 3d 79 63 6f 6f 72 64 |...(temp|%=ycoord|
|00002110| 25 3a f2 70 73 73 70 61 | 63 65 3a 79 63 6f 6f 72 |%:.psspa|ce:ycoor|
|00002120| 64 25 3d 74 65 6d 70 25 | 0d 07 da b3 f2 70 72 69 |d%=temp%|.....pri|
|00002130| 6e 74 28 22 4e 55 4d 20 | 4c 4f 43 4b 20 63 61 75 |nt("NUM |LOCK cau|
|00002140| 73 65 73 20 73 6f 6d 65 | 20 6b 65 79 73 20 74 6f |ses some| keys to|
|00002150| 20 61 63 74 20 6c 69 6b | 65 20 63 75 72 73 6f 72 | act lik|e cursor|
|00002160| 20 6b 65 79 73 2e 20 20 | 32 20 69 73 20 64 6f 77 | keys.  |2 is dow|
|00002170| 6e 2c 20 38 20 69 73 20 | 75 70 2c 20 34 20 69 73 |n, 8 is |up, 4 is|
|00002180| 20 6c 65 66 74 20 61 6e | 64 20 36 20 69 73 20 72 | left an|d 6 is r|
|00002190| 69 67 68 74 2e 20 20 50 | 72 65 73 73 20 4e 55 4d |ight.  P|ress NUM|
|000021a0| 20 4c 4f 43 4b 20 61 67 | 61 69 6e 20 74 6f 20 72 | LOCK ag|ain to r|
|000021b0| 65 74 75 72 6e 20 74 68 | 65 20 6b 65 79 70 61 64 |eturn th|e keypad|
|000021c0| 20 74 6f 20 63 61 6c 63 | 75 6c 61 74 6f 72 20 66 | to calc|ulator f|
|000021d0| 75 6e 63 74 69 6f 6e 73 | 2e 22 29 0d 07 e4 0c f2 |unctions|.").....|
|000021e0| 70 73 73 70 61 63 65 0d | 07 ee 29 f2 75 6e 6e 75 |psspace.|..).unnu|
|000021f0| 6d 65 72 69 63 28 bd 30 | 2b 22 2f 2a 23 37 38 39 |meric(.0|+"/*#789|
|00002200| 2d 34 35 36 2b 31 32 33 | 30 2e 22 2b bd 31 33 29 |-456+123|0."+.13)|
|00002210| 0d 07 f8 08 f2 63 6c 73 | 0d 08 02 10 f2 63 61 70 |.....cls|.....cap|
|00002220| 73 28 22 4f 46 46 22 29 | 0d 08 0c 0c f2 70 73 73 |s("OFF")|.....pss|
|00002230| 70 61 63 65 0d 08 16 17 | f2 75 6e 68 69 67 68 6c |pace....|.unhighl|
|00002240| 69 67 68 74 28 bd 43 41 | 50 53 29 0d 08 20 0c f2 |ight(.CA|PS).. ..|
|00002250| 70 61 72 74 28 35 29 0d | 08 2a 05 e1 0d 08 34 10 |part(5).|.*....4.|
|00002260| dd f2 70 61 72 74 28 50 | 41 52 54 29 0d 08 3e 08 |..part(P|ART)..>.|
|00002270| f2 63 6c 73 0d 08 48 05 | f5 0d 08 52 0e f2 70 73 |.cls..H.|...R..ps|
|00002280| 6e 65 77 6c 69 6e 65 0d | 08 5c 27 f2 70 73 63 65 |newline.|.\'.psce|
|00002290| 6e 74 72 65 28 22 54 6f | 20 62 65 67 69 6e 20 74 |ntre("To| begin t|
|000022a0| 68 65 20 74 65 73 74 20 | 2e 2e 2e 2e 22 29 0d 08 |he test |....")..|
|000022b0| 66 13 f2 68 69 67 68 6c | 69 67 68 74 28 22 20 22 |f..highl|ight(" "|
|000022c0| 29 0d 08 70 0c f2 70 73 | 73 70 61 63 65 0d 08 7a |)..p..ps|space..z|
|000022d0| 15 f2 75 6e 68 69 67 68 | 6c 69 67 68 74 28 22 20 |..unhigh|light(" |
|000022e0| 22 29 0d 08 84 10 e3 43 | 48 41 52 3d 31 20 b8 20 |").....C|HAR=1 . |
|000022f0| 31 30 0d 08 8e 08 f2 63 | 6c 73 0d 08 98 0d f2 50 |10.....c|ls.....P|
|00002300| 55 54 53 43 4f 52 45 0d | 08 a2 3a f2 70 73 63 65 |UTSCORE.|..:.psce|
|00002310| 6e 74 72 65 28 22 50 61 | 72 74 20 22 2b c3 50 41 |ntre("Pa|rt "+.PA|
|00002320| 52 54 2b 22 20 20 20 20 | 20 51 75 65 73 74 69 6f |RT+"    | Questio|
|00002330| 6e 20 4e 75 6d 62 65 72 | 20 22 2b c3 43 48 41 52 |n Number| "+.CHAR|
|00002340| 29 0d 08 ac 0e f2 70 73 | 6e 65 77 6c 69 6e 65 0d |).....ps|newline.|
|00002350| 08 b6 18 f2 70 73 63 65 | 6e 74 72 65 28 22 46 69 |....psce|ntre("Fi|
|00002360| 6e 64 20 20 20 22 29 0d | 08 c0 13 45 24 3d bd 28 |nd   ").|...E$=.(|
|00002370| a4 67 65 6e 65 72 61 74 | 65 29 0d 08 ca 0d f2 57 |.generat|e).....W|
|00002380| 41 49 54 28 2e 37 29 0d | 08 d4 0a 2a 46 58 20 31 |AIT(.7).|...*FX 1|
|00002390| 35 0d 08 de 12 f2 70 73 | 74 61 62 28 45 24 2c 37 |5.....ps|tab(E$,7|
|000023a0| 32 30 29 0d 08 e8 0e f2 | 70 73 6e 65 77 6c 69 6e |20).....|psnewlin|
|000023b0| 65 0d 08 f2 0a 53 54 49 | 4d 3d 91 0d 08 fc 0f 49 |e....STI|M=.....I|
|000023c0| 24 3d bf 28 33 30 30 29 | 20 3a 0d 09 06 0c e7 49 |$=.(300)| :.....I|
|000023d0| 24 3d 22 22 20 8c 0d 09 | 10 12 f2 68 69 67 68 6c |$="" ...|...highl|
|000023e0| 69 67 68 74 28 45 24 29 | 0d 09 1a 2a f2 70 73 63 |ight(E$)|...*.psc|
|000023f0| 65 6e 74 72 65 28 22 50 | 72 65 73 73 20 74 68 65 |entre("P|ress the|
|00002400| 20 68 69 67 68 6c 69 67 | 68 74 65 64 20 6b 65 79 | highlig|hted key|
|00002410| 22 29 0d 09 24 0e f2 70 | 73 6e 65 77 6c 69 6e 65 |")..$..p|snewline|
|00002420| 0d 09 2e 08 49 24 3d be | 0d 09 38 14 f2 75 6e 68 |....I$=.|..8..unh|
|00002430| 69 67 68 6c 69 67 68 74 | 28 45 24 29 0d 09 42 05 |ighlight|(E$)..B.|
|00002440| cd 0d 09 4c 0a 45 54 49 | 4d 3d 91 0d 09 56 0c 49 |...L.ETI|M=...V.I|
|00002450| 41 3d 97 28 49 24 29 0d | 09 60 16 e7 a4 63 6f 6d |A=.(I$).|.`...com|
|00002460| 70 61 72 65 28 49 24 2c | 45 24 29 20 8c 0d 09 6a |pare(I$,|E$) ...j|
|00002470| 13 54 49 4d 20 3d 20 45 | 54 49 4d 2d 53 54 49 4d |.TIM = E|TIM-STIM|
|00002480| 0d 09 74 10 40 25 3d 26 | 30 31 30 32 30 32 30 41 |..t.@%=&|0102020A|
|00002490| 0d 09 7e 30 f2 70 73 63 | 65 6e 74 72 65 28 22 59 |..~0.psc|entre("Y|
|000024a0| 6f 75 20 74 6f 6f 6b 20 | 22 2b c3 28 54 49 4d 2f |ou took |"+.(TIM/|
|000024b0| 31 30 30 29 2b 22 20 73 | 65 63 6f 6e 64 73 22 29 |100)+" s|econds")|
|000024c0| 0d 09 88 0e f2 70 73 6e | 65 77 6c 69 6e 65 0d 09 |.....psn|ewline..|
|000024d0| 92 0b 40 25 3d 26 41 30 | 41 0d 09 9c 0c f2 57 41 |..@%=&A0|A.....WA|
|000024e0| 49 54 28 32 29 0d 09 a6 | 0a cc 54 49 4d 3d 30 0d |IT(2)...|..TIM=0.|
|000024f0| 09 b0 05 cd 0d 09 ba 0f | 54 54 49 4d 20 2b 3d 20 |........|TTIM += |
|00002500| 54 49 4d 0d 09 c4 0e 54 | 45 53 54 53 20 2b 3d 20 |TIM....T|ESTS += |
|00002510| 31 0d 09 ce 09 ed 43 48 | 41 52 0d 09 d8 0c f2 57 |1.....CH|AR.....W|
|00002520| 41 49 54 28 31 29 0d 09 | e2 08 f2 63 6c 73 0d 09 |AIT(1)..|...cls..|
|00002530| ec 0d f2 50 55 54 53 43 | 4f 52 45 0d 09 f6 23 f2 |...PUTSC|ORE...#.|
|00002540| 70 73 63 65 6e 74 72 65 | 28 22 45 6e 64 20 6f 66 |pscentre|("End of|
|00002550| 20 50 61 72 74 20 22 2b | c3 50 41 52 54 29 0d 0a | Part "+|.PART)..|
|00002560| 00 0e f2 70 73 6e 65 77 | 6c 69 6e 65 0d 0a 0a 0e |...psnew|line....|
|00002570| f2 70 73 6e 65 77 6c 69 | 6e 65 0d 0a 14 0e f2 70 |.psnewli|ne.....p|
|00002580| 73 6e 65 77 6c 69 6e 65 | 0d 0a 1e 4b f2 70 73 63 |snewline|...K.psc|
|00002590| 65 6e 74 72 65 28 22 50 | 72 65 73 73 20 53 50 41 |entre("P|ress SPA|
|000025a0| 43 45 20 42 41 52 20 74 | 6f 20 63 6f 6e 74 69 6e |CE BAR t|o contin|
|000025b0| 75 65 2c 20 6f 72 20 61 | 6e 79 20 6f 74 68 65 72 |ue, or a|ny other|
|000025c0| 20 6b 65 79 20 74 6f 20 | 74 72 79 20 61 67 61 69 | key to |try agai|
|000025d0| 6e 22 29 0d 0a 28 0a fd | be 3d 22 20 22 0d 0a 32 |n")..(..|.=" "..2|
|000025e0| 0d 50 41 52 54 20 2b 3d | 20 31 0d 0a 3c 05 e1 0d |.PART +=| 1..<...|
|000025f0| 0a 46 14 dd a4 63 6f 6d | 70 61 72 65 28 49 24 2c |.F...com|pare(I$,|
|00002600| 45 24 29 0d 0a 50 1c ea | 69 6e 63 6f 72 24 2c 20 |E$)..P..|incor$, |
|00002610| 6e 6f 74 63 61 70 24 2c | 20 49 41 2c 20 49 45 0d |notcap$,| IA, IE.|
|00002620| 0a 5a 4d 69 6e 63 6f 72 | 24 3d 22 54 68 61 74 20 |.ZMincor|$="That |
|00002630| 77 61 73 20 69 6e 63 6f | 72 72 65 63 74 2c 20 79 |was inco|rrect, y|
|00002640| 6f 75 20 73 68 6f 75 6c | 64 20 68 61 76 65 20 70 |ou shoul|d have p|
|00002650| 72 65 73 73 65 64 20 74 | 68 65 20 6b 65 79 20 73 |ressed t|he key s|
|00002660| 68 6f 77 6e 20 61 62 6f | 76 65 2e 22 0d 0a 64 2a |hown abo|ve."..d*|
|00002670| 6e 6f 74 63 61 70 24 3d | 22 54 68 61 74 20 69 73 |notcap$=|"That is|
|00002680| 20 6e 6f 74 20 61 20 63 | 61 70 69 74 61 6c 20 6c | not a c|apital l|
|00002690| 65 74 74 65 72 22 0d 0a | 6e 1e f2 70 73 63 65 6e |etter"..|n..pscen|
|000026a0| 74 72 65 28 22 59 6f 75 | 20 74 79 70 65 64 20 22 |tre("You| typed "|
|000026b0| 2b 49 24 29 0d 0a 78 0e | f2 70 73 6e 65 77 6c 69 |+I$)..x.|.psnewli|
|000026c0| 6e 65 0d 0a 82 0c e7 45 | 24 3d 49 24 20 8c 0d 0a |ne.....E|$=I$ ...|
|000026d0| 8c 0e 52 49 47 48 54 20 | 2b 3d 20 31 0d 0a 96 21 |..RIGHT |+= 1...!|
|000026e0| f2 70 73 63 65 6e 74 72 | 65 28 22 54 68 61 74 20 |.pscentr|e("That |
|000026f0| 69 73 20 63 6f 72 72 65 | 63 74 2e 22 29 0d 0a a0 |is corre|ct.")...|
|00002700| 0e f2 70 73 6e 65 77 6c | 69 6e 65 0d 0a aa 06 3d |..psnewl|ine....=|
|00002710| b9 0d 0a b4 05 cd 0d 0a | be 0c 49 41 3d 97 28 49 |........|..IA=.(I|
|00002720| 24 29 0d 0a c8 0c 45 41 | 3d 97 28 45 24 29 0d 0a |$)....EA|=.(E$)..|
|00002730| d2 12 f2 68 69 67 68 6c | 69 67 68 74 28 45 24 29 |...highl|ight(E$)|
|00002740| 0d 0a dc 13 43 24 3d bd | 28 45 41 20 80 26 44 46 |....C$=.|(EA .&DF|
|00002750| 29 20 3a 0d 0a e6 5c e7 | 43 24 3d 22 4f 22 20 80 |) :...\.|C$="O" .|
|00002760| 49 24 3d 22 30 22 20 8c | 3d a4 63 6f 6e 66 75 73 |I$="0" .|=.confus|
|00002770| 65 28 22 74 68 65 20 6c | 65 74 74 65 72 20 22 22 |e("the l|etter ""|
|00002780| 22 2b 45 24 2b 22 22 22 | 20 77 69 74 68 20 74 68 |"+E$+"""| with th|
|00002790| 65 20 64 69 67 69 74 20 | 7a 65 72 6f 2c 20 22 22 |e digit |zero, ""|
|000027a0| 30 22 22 2e 22 2c 20 22 | 30 22 2c 20 45 24 29 0d |0"".", "|0", E$).|
|000027b0| 0a f0 55 e7 45 24 3d 22 | 30 22 20 80 43 24 3d 22 |..U.E$="|0" .C$="|
|000027c0| 4f 22 20 8c 3d a4 63 6f | 6e 66 75 73 65 28 22 74 |O" .=.co|nfuse("t|
|000027d0| 68 65 20 64 69 67 69 74 | 20 7a 65 72 6f 20 77 69 |he digit| zero wi|
|000027e0| 74 68 20 74 68 65 20 6c | 65 74 74 65 72 20 22 22 |th the l|etter ""|
|000027f0| 22 2b 45 24 2b 22 22 22 | 2e 22 2c 20 22 4f 22 2c |"+E$+"""|.", "O",|
|00002800| 20 45 24 29 0d 0a fa 51 | e7 45 24 3d 22 31 22 20 | E$)...Q|.E$="1" |
|00002810| 80 49 24 3d 22 6c 22 20 | 8c 3d a4 63 6f 6e 66 75 |.I$="l" |.=.confu|
|00002820| 73 65 28 22 74 68 65 20 | 64 69 67 69 74 20 22 22 |se("the |digit ""|
|00002830| 31 22 22 20 77 69 74 68 | 20 6c 6f 77 65 72 20 63 |1"" with| lower c|
|00002840| 61 73 65 20 22 22 4c 22 | 22 2e 22 2c 20 22 6c 22 |ase ""L"|".", "l"|
|00002850| 2c 20 45 24 29 0d 0b 04 | 51 e7 45 24 3d 22 6c 22 |, E$)...|Q.E$="l"|
|00002860| 20 80 49 24 3d 22 31 22 | 20 8c 3d a4 63 6f 6e 66 | .I$="1"| .=.conf|
|00002870| 75 73 65 28 22 6c 6f 77 | 65 72 20 63 61 73 65 20 |use("low|er case |
|00002880| 22 22 4c 22 22 20 77 69 | 74 68 20 74 68 65 20 64 |""L"" wi|th the d|
|00002890| 69 67 69 74 20 22 22 31 | 22 22 2e 22 2c 20 22 31 |igit ""1|"".", "1|
|000028a0| 22 2c 20 45 24 29 0d 0b | 0e 51 e7 45 24 3d 22 49 |", E$)..|.Q.E$="I|
|000028b0| 22 20 80 49 24 3d 22 31 | 22 20 8c 3d a4 63 6f 6e |" .I$="1|" .=.con|
|000028c0| 66 75 73 65 28 22 74 68 | 65 20 64 69 67 69 74 20 |fuse("th|e digit |
|000028d0| 22 22 31 22 22 20 77 69 | 74 68 20 75 70 70 65 72 |""1"" wi|th upper|
|000028e0| 20 63 61 73 65 20 22 22 | 49 22 22 2e 22 2c 20 22 | case ""|I"".", "|
|000028f0| 31 22 2c 20 45 24 29 0d | 0b 18 51 e7 45 24 3d 22 |1", E$).|..Q.E$="|
|00002900| 31 22 20 80 49 24 3d 22 | 49 22 20 8c 3d a4 63 6f |1" .I$="|I" .=.co|
|00002910| 6e 66 75 73 65 28 22 75 | 70 70 65 72 20 63 61 73 |nfuse("u|pper cas|
|00002920| 65 20 22 22 49 22 22 20 | 77 69 74 68 20 74 68 65 |e ""I"" |with the|
|00002930| 20 64 69 67 69 74 20 22 | 22 31 22 22 2e 22 2c 20 | digit "|"1"".", |
|00002940| 22 49 22 2c 20 45 24 29 | 0d 0b 22 55 e7 45 24 3d |"I", E$)|.."U.E$=|
|00002950| 22 5f 22 20 80 49 24 3d | 22 2d 22 20 8c 3d a4 63 |"_" .I$=|"-" .=.c|
|00002960| 6f 6e 66 75 73 65 28 22 | 74 68 65 20 75 6e 64 65 |onfuse("|the unde|
|00002970| 72 73 63 6f 72 65 20 73 | 79 6d 62 6f 6c 20 77 69 |rscore s|ymbol wi|
|00002980| 74 68 20 74 68 65 20 6d | 69 6e 75 73 20 73 69 67 |th the m|inus sig|
|00002990| 6e 2e 22 2c 20 22 2d 22 | 2c 20 45 24 29 0d 0b 2c |n.", "-"|, E$)..,|
|000029a0| 55 e7 45 24 3d 22 2d 22 | 20 80 49 24 3d 22 5f 22 |U.E$="-"| .I$="_"|
|000029b0| 20 8c 3d a4 63 6f 6e 66 | 75 73 65 28 22 74 68 65 | .=.conf|use("the|
|000029c0| 20 6d 69 6e 75 73 20 73 | 69 67 6e 20 77 69 74 68 | minus s|ign with|
|000029d0| 20 74 68 65 20 75 6e 64 | 65 72 73 63 6f 72 65 20 | the und|erscore |
|000029e0| 73 79 6d 62 6f 6c 2e 22 | 2c 20 22 5f 22 2c 20 45 |symbol."|, "_", E|
|000029f0| 24 29 0d 0b 36 0c c8 8e | 50 41 52 54 20 ca 0d 0b |$)..6...|PART ...|
|00002a00| 40 0c c9 31 2c 20 32 2c | 20 33 0d 0b 4a 17 e7 45 |@..1, 2,| 3..J..E|
|00002a10| 24 3e 3d 22 61 22 20 80 | 45 24 3c 3d 22 7a 22 20 |$>="a" .|E$<="z" |
|00002a20| 8c 0d 0b 54 16 f2 70 73 | 63 65 6e 74 72 65 28 6e |...T..ps|centre(n|
|00002a30| 6f 74 63 61 70 24 29 0d | 0b 5e ad cc e7 a4 73 61 |otcap$).|.^....sa|
|00002a40| 6d 65 6b 65 79 28 45 41 | 2c 49 41 29 3d 31 20 8c |mekey(EA|,IA)=1 .|
|00002a50| f2 70 73 63 65 6e 74 72 | 65 28 22 59 6f 75 20 73 |.pscentr|e("You s|
|00002a60| 68 6f 75 6c 64 20 68 61 | 76 65 20 70 72 65 73 73 |hould ha|ve press|
|00002a70| 65 64 20 74 68 65 20 53 | 48 49 46 54 20 6b 65 79 |ed the S|HIFT key|
|00002a80| 20 61 73 20 77 65 6c 6c | 22 29 20 8b e7 a4 73 61 | as well|") ...sa|
|00002a90| 6d 65 6b 65 79 28 45 41 | 2c 49 41 29 3d 2d 31 20 |mekey(EA|,IA)=-1 |
|00002aa0| 8c f2 70 73 63 65 6e 74 | 72 65 28 22 59 6f 75 20 |..pscent|re("You |
|00002ab0| 73 68 6f 75 6c 64 20 6e | 6f 74 20 68 61 76 65 20 |should n|ot have |
|00002ac0| 75 73 65 64 20 74 68 65 | 20 53 48 49 46 54 20 6b |used the| SHIFT k|
|00002ad0| 65 79 22 29 20 8b f2 70 | 72 69 6e 74 28 69 6e 63 |ey") ..p|rint(inc|
|00002ae0| 6f 72 24 29 0d 0b 68 05 | cd 0d 0b 72 06 c9 34 0d |or$)..h.|...r..4.|
|00002af0| 0b 7c 9b e7 28 45 41 20 | 80 26 44 46 29 20 3d 20 |.|..(EA |.&DF) = |
|00002b00| 28 49 41 20 80 26 44 46 | 29 20 f2 70 72 69 6e 74 |(IA .&DF|) .print|
|00002b10| 28 22 59 6f 75 20 61 72 | 65 20 63 6f 6e 66 75 73 |("You ar|e confus|
|00002b20| 69 6e 67 20 75 70 70 65 | 72 20 61 6e 64 20 6c 6f |ing uppe|r and lo|
|00002b30| 77 65 72 20 63 61 73 65 | 2e 20 20 50 72 65 73 73 |wer case|.  Press|
|00002b40| 20 53 48 49 46 54 20 74 | 6f 20 6f 62 74 61 69 6e | SHIFT t|o obtain|
|00002b50| 20 74 68 65 20 74 6f 70 | 20 73 79 6d 62 6f 6c 73 | the top| symbols|
|00002b60| 20 61 6e 64 20 75 70 70 | 65 72 2d 63 61 73 65 20 | and upp|er-case |
|00002b70| 6c 65 74 74 65 72 73 2e | 22 29 20 8b f2 70 72 69 |letters.|") ..pri|
|00002b80| 6e 74 28 69 6e 63 6f 72 | 24 29 0d 0b 86 06 c9 35 |nt(incor|$).....5|
|00002b90| 0d 0b 90 a9 e7 a4 73 61 | 6d 65 6b 65 79 28 45 41 |......sa|mekey(EA|
|00002ba0| 2c 49 41 29 3d 31 20 8c | f2 70 73 63 65 6e 74 72 |,IA)=1 .|.pscentr|
|00002bb0| 65 28 22 59 6f 75 20 73 | 68 6f 75 6c 64 20 68 61 |e("You s|hould ha|
|00002bc0| 76 65 20 75 73 65 64 20 | 74 68 65 20 53 48 49 46 |ve used |the SHIF|
|00002bd0| 54 20 6b 65 79 20 61 73 | 20 77 65 6c 6c 22 29 20 |T key as| well") |
|00002be0| 8b e7 a4 73 61 6d 65 6b | 65 79 28 45 41 2c 49 41 |...samek|ey(EA,IA|
|00002bf0| 29 3d 2d 31 20 8c f2 70 | 73 63 65 6e 74 72 65 28 |)=-1 ..p|scentre(|
|00002c00| 22 59 6f 75 20 73 68 6f | 75 6c 64 20 6e 6f 74 20 |"You sho|uld not |
|00002c10| 68 61 76 65 20 75 73 65 | 64 20 74 68 65 20 53 48 |have use|d the SH|
|00002c20| 49 46 54 20 6b 65 79 22 | 29 20 8b f2 70 72 69 6e |IFT key"|) ..prin|
|00002c30| 74 28 69 6e 63 6f 72 24 | 29 0d 0b 9a 05 cb 0d 0b |t(incor$|).......|
|00002c40| a4 0c f2 70 73 73 70 61 | 63 65 0d 0b ae 14 f2 75 |...psspa|ce.....u|
|00002c50| 6e 68 69 67 68 6c 69 67 | 68 74 28 45 24 29 0d 0b |nhighlig|ht(E$)..|
|00002c60| b8 06 3d a3 0d 0b c2 1c | dd a4 63 6f 6e 66 75 73 |..=.....|..confus|
|00002c70| 65 28 6d 65 73 73 24 2c | 20 41 24 2c 20 45 24 29 |e(mess$,| A$, E$)|
|00002c80| 0d 0b cc 0c f2 57 41 49 | 54 28 32 29 0d 0b d6 05 |.....WAI|T(2)....|
|00002c90| db 0d 0b e0 05 87 0d 0b | ea 21 f2 70 72 69 6e 74 |........|.!.print|
|00002ca0| 28 22 59 6f 75 20 63 6f | 6e 66 75 73 65 64 20 22 |("You co|nfused "|
|00002cb0| 2b 6d 65 73 73 24 29 0d | 0b f4 12 f2 68 69 67 68 |+mess$).|....high|
|00002cc0| 6c 69 67 68 74 28 41 24 | 29 0d 0b fe 0c f2 70 73 |light(A$|).....ps|
|00002cd0| 73 70 61 63 65 0d 0c 08 | 14 f2 75 6e 68 69 67 68 |space...|..unhigh|
|00002ce0| 6c 69 67 68 74 28 41 24 | 29 0d 0c 12 14 f2 75 6e |light(A$|).....un|
|00002cf0| 68 69 67 68 6c 69 67 68 | 74 28 45 24 29 0d 0c 1c |highligh|t(E$)...|
|00002d00| 06 3d a3 0d 0c 26 1a dd | a4 73 61 6d 65 6b 65 79 |.=...&..|.samekey|
|00002d10| 28 63 6f 64 65 31 2c 63 | 6f 64 65 32 29 0d 0c 30 |(code1,c|ode2)..0|
|00002d20| 07 ea 41 25 0d 0c 3a 05 | f5 0d 0c 44 0b 41 25 20 |..A%..:.|...D.A% |
|00002d30| 2b 3d 20 31 0d 0c 4e 54 | fd 28 43 6f 64 65 25 28 |+= 1..NT|.(Code%(|
|00002d40| 41 25 29 3d 63 6f 64 65 | 31 20 80 53 43 6f 64 65 |A%)=code|1 .SCode|
|00002d50| 25 28 41 25 29 3d 63 6f | 64 65 32 29 20 84 28 43 |%(A%)=co|de2) .(C|
|00002d60| 6f 64 65 25 28 41 25 29 | 3d 63 6f 64 65 32 20 80 |ode%(A%)|=code2 .|
|00002d70| 53 43 6f 64 65 25 28 41 | 25 29 3d 63 6f 64 65 31 |SCode%(A|%)=code1|
|00002d80| 29 20 84 41 25 3d 4d 25 | 0d 0c 58 0e e7 41 25 3d |) .A%=M%|..X..A%=|
|00002d90| 4d 25 20 8c 3d 30 0d 0c | 62 1d e7 43 6f 64 65 25 |M% .=0..|b..Code%|
|00002da0| 28 41 25 29 3d 63 6f 64 | 65 31 20 8c 3d 2d 31 20 |(A%)=cod|e1 .=-1 |
|00002db0| 8b 3d 31 0d 0c 6c 0e dd | f2 63 61 70 73 28 41 24 |.=1..l..|.caps(A$|
|00002dc0| 29 0d 0c 76 1c c8 99 36 | 2c 20 32 30 32 2c 20 30 |)..v...6|, 202, 0|
|00002dd0| 2c 20 32 35 35 20 b8 20 | 2c 63 61 70 73 0d 0c 80 |, 255 . |,caps...|
|00002de0| 3b e7 28 28 63 61 70 73 | 20 80 26 31 30 29 3c 3e |;.((caps| .&10)<>|
|00002df0| 30 20 80 41 24 3d 22 4f | 4e 22 29 20 84 28 28 63 |0 .A$="O|N") .((c|
|00002e00| 61 70 73 20 80 26 31 30 | 29 3d 30 20 80 41 24 3d |aps .&10|)=0 .A$=|
|00002e10| 22 4f 46 46 22 29 20 8c | 0d 0c 8a 21 f2 70 73 63 |"OFF") .|...!.psc|
|00002e20| 65 6e 74 72 65 28 22 50 | 72 65 73 73 20 43 41 50 |entre("P|ress CAP|
|00002e30| 53 20 4c 4f 43 4b 2e 22 | 29 0d 0c 94 15 f2 68 69 |S LOCK."|).....hi|
|00002e40| 67 68 6c 69 67 68 74 28 | bd 43 41 50 53 29 0d 0c |ghlight(|.CAPS)..|
|00002e50| 9e 05 cd 0d 0c a8 05 e1 | 0d 0c b2 13 dd f2 68 69 |........|......hi|
|00002e60| 67 68 6c 69 67 68 74 28 | 41 24 29 0d 0c bc 07 ea |ghlight(|A$).....|
|00002e70| 49 25 0d 0c c6 0a ef 32 | 36 2c 20 35 0d 0c d0 11 |I%.....2|6, 5....|
|00002e80| e3 49 25 20 3d 20 31 20 | b8 20 a9 41 24 0d 0c da |.I% = 1 |. .A$...|
|00002e90| 1a f2 68 69 67 68 6b 65 | 79 28 97 28 c1 41 24 2c |..highke|y(.(.A$,|
|00002ea0| 49 25 2c 31 29 29 29 0d | 0c e4 07 ed 49 25 0d 0c |I%,1))).|....I%..|
|00002eb0| ee 08 e6 30 2c 31 0d 0c | f8 15 ef 34 2c 20 32 38 |...0,1..|...4, 28|
|00002ec0| 2c 30 2c 33 31 2c 37 39 | 2c 31 34 0d 0d 02 05 87 |,0,31,79|,14.....|
|00002ed0| 0d 0d 0c 05 e1 0d 0d 16 | 15 dd f2 75 6e 68 69 67 |........|...unhig|
|00002ee0| 68 6c 69 67 68 74 28 41 | 24 29 0d 0d 20 07 ea 49 |hlight(A|$).. ..I|
|00002ef0| 25 0d 0d 2a 0a ef 32 36 | 2c 20 35 0d 0d 34 0f e3 |%..*..26|, 5..4..|
|00002f00| 49 25 3d 31 20 b8 20 a9 | 41 24 0d 0d 3e 1c f2 75 |I%=1 . .|A$..>..u|
|00002f10| 6e 68 69 67 68 6b 65 79 | 28 97 28 c1 41 24 2c 49 |nhighkey|(.(.A$,I|
|00002f20| 25 2c 31 29 29 29 0d 0d | 48 07 ed 49 25 0d 0d 52 |%,1)))..|H..I%..R|
|00002f30| 15 ef 34 2c 20 32 38 2c | 30 2c 33 31 2c 37 39 2c |..4, 28,|0,31,79,|
|00002f40| 31 34 0d 0d 5c 05 87 0d | 0d 66 05 e1 0d 0d 70 11 |14..\...|.f....p.|
|00002f50| dd f2 6e 75 6d 65 72 69 | 63 28 41 24 29 0d 0d 7a |..numeri|c(A$)..z|
|00002f60| 07 ea 49 25 0d 0d 84 0a | ef 32 36 2c 20 35 0d 0d |..I%....|.26, 5..|
|00002f70| 8e 0f e3 49 25 3d 31 20 | b8 20 a9 41 24 0d 0d 98 |...I%=1 |. .A$...|
|00002f80| 1e f2 68 69 67 68 6b 65 | 79 28 97 28 c1 41 24 2c |..highke|y(.(.A$,|
|00002f90| 49 25 2c 31 29 29 2b 33 | 30 30 29 0d 0d a2 07 ed |I%,1))+3|00).....|
|00002fa0| 49 25 0d 0d ac 15 ef 34 | 2c 20 32 38 2c 30 2c 33 |I%.....4|, 28,0,3|
|00002fb0| 31 2c 37 39 2c 31 34 0d | 0d b6 05 87 0d 0d c0 05 |1,79,14.|........|
|00002fc0| e1 0d 0d ca 13 dd f2 75 | 6e 6e 75 6d 65 72 69 63 |.......u|nnumeric|
|00002fd0| 28 41 24 29 0d 0d d4 07 | ea 49 25 0d 0d de 0a ef |(A$)....|.I%.....|
|00002fe0| 32 36 2c 20 35 0d 0d e8 | 0f e3 49 25 3d 31 20 b8 |26, 5...|..I%=1 .|
|00002ff0| 20 a9 41 24 0d 0d f2 20 | f2 75 6e 68 69 67 68 6b | .A$... |.unhighk|
|00003000| 65 79 28 97 28 c1 41 24 | 2c 49 25 2c 31 29 29 2b |ey(.(.A$|,I%,1))+|
|00003010| 33 30 30 29 0d 0d fc 07 | ed 49 25 0d 0e 06 15 ef |300)....|.I%.....|
|00003020| 34 2c 20 32 38 2c 30 2c | 33 31 2c 37 39 2c 31 34 |4, 28,0,|31,79,14|
|00003030| 0d 0e 10 05 87 0d 0e 1a | 05 e1 0d 0e 24 11 dd f2 |........|....$...|
|00003040| 68 69 67 68 6b 65 79 28 | 41 25 29 0d 0e 2e 0e 41 |highkey(|A%)....A|
|00003050| 25 3d 6b 65 79 28 41 25 | 29 0d 0e 38 08 e6 30 2c |%=key(A%|)..8..0,|
|00003060| 33 0d 0e 42 42 c8 93 20 | c8 90 20 58 25 28 41 25 |3..BB.. |.. X%(A%|
|00003070| 29 2a 53 63 61 6c 65 2c | 59 25 28 41 25 29 2a 53 |)*Scale,|Y%(A%)*S|
|00003080| 63 61 6c 65 2b 36 30 30 | 2c 57 25 28 41 25 29 2a |cale+600|,W%(A%)*|
|00003090| 53 63 61 6c 65 2c 48 28 | 41 25 29 2a 53 63 61 6c |Scale,H(|A%)*Scal|
|000030a0| 65 20 3a 0d 0e 4c 08 e6 | 30 2c 30 0d 0e 56 45 ec |e :..L..|0,0..VE.|
|000030b0| 58 25 28 41 25 29 2a 53 | 63 61 6c 65 2b 28 57 25 |X%(A%)*S|cale+(W%|
|000030c0| 28 41 25 29 2a 53 63 61 | 6c 65 29 2f 32 2d 28 a9 |(A%)*Sca|le)/2-(.|
|000030d0| 4c 65 67 65 6e 64 24 28 | 41 25 29 2a 38 29 2c 20 |Legend$(|A%)*8), |
|000030e0| 59 25 28 41 25 29 2a 53 | 63 61 6c 65 2b 36 33 36 |Y%(A%)*S|cale+636|
|000030f0| 0d 0e 60 11 f1 20 4c 65 | 67 65 6e 64 24 28 41 25 |..`.. Le|gend$(A%|
|00003100| 29 0d 0e 6a 05 e1 0d 0e | 74 13 dd f2 75 6e 68 69 |)..j....|t...unhi|
|00003110| 67 68 6b 65 79 28 41 25 | 29 0d 0e 7e 0e 41 25 3d |ghkey(A%|)..~.A%=|
|00003120| 6b 65 79 28 41 25 29 0d | 0e 88 09 e6 30 2c 31 30 |key(A%).|....0,10|
|00003130| 0d 0e 92 42 c8 93 20 c8 | 90 20 58 25 28 41 25 29 |...B.. .|. X%(A%)|
|00003140| 2a 53 63 61 6c 65 2c 59 | 25 28 41 25 29 2a 53 63 |*Scale,Y|%(A%)*Sc|
|00003150| 61 6c 65 2b 36 30 30 2c | 57 25 28 41 25 29 2a 53 |ale+600,|W%(A%)*S|
|00003160| 63 61 6c 65 2c 48 28 41 | 25 29 2a 53 63 61 6c 65 |cale,H(A|%)*Scale|
|00003170| 20 3a 0d 0e 9c 45 ec 58 | 25 28 41 25 29 2a 53 63 | :...E.X|%(A%)*Sc|
|00003180| 61 6c 65 2b 28 57 25 28 | 41 25 29 2a 53 63 61 6c |ale+(W%(|A%)*Scal|
|00003190| 65 29 2f 32 2d 28 a9 4c | 65 67 65 6e 64 24 28 41 |e)/2-(.L|egend$(A|
|000031a0| 25 29 2a 38 29 2c 20 59 | 25 28 41 25 29 2a 53 63 |%)*8), Y|%(A%)*Sc|
|000031b0| 61 6c 65 2b 36 33 36 0d | 0e a6 08 e6 30 2c 30 0d |ale+636.|....0,0.|
|000031c0| 0e b0 11 f1 20 4c 65 67 | 65 6e 64 24 28 41 25 29 |.... Leg|end$(A%)|
|000031d0| 0d 0e ba 05 e1 0d 0e c4 | 0e dd f2 50 55 54 53 43 |........|...PUTSC|
|000031e0| 4f 52 45 0d 0e ce 08 f2 | 63 6c 73 0d 0e d8 38 f2 |ORE.....|cls...8.|
|000031f0| 70 73 63 65 6e 74 72 65 | 28 22 53 63 6f 72 65 20 |pscentre|("Score |
|00003200| 73 6f 20 66 61 72 3a 20 | 22 2b c3 52 49 47 48 54 |so far: |"+.RIGHT|
|00003210| 2b 22 20 6f 75 74 20 6f | 66 20 22 2b c3 54 45 53 |+" out o|f "+.TES|
|00003220| 54 53 29 0d 0e e2 0e f2 | 70 73 6e 65 77 6c 69 6e |TS).....|psnewlin|
|00003230| 65 0d 0e ec 10 40 25 3d | 26 30 31 30 32 30 32 30 |e....@%=|&0102020|
|00003240| 41 0d 0e f6 2c e7 52 49 | 47 48 54 3d 30 20 41 24 |A...,.RI|GHT=0 A$|
|00003250| 3d 22 30 22 20 8b 41 24 | 3d c3 28 a8 28 54 54 49 |="0" .A$|=.(.(TTI|
|00003260| 4d 2f 52 49 47 48 54 29 | 2f 31 30 30 29 0d 0f 00 |M/RIGHT)|/100)...|
|00003270| 0b 40 25 3d 26 41 30 41 | 0d 0f 0a 34 f2 70 73 63 |.@%=&A0A|...4.psc|
|00003280| 65 6e 74 72 65 28 22 41 | 76 65 72 61 67 65 20 74 |entre("A|verage t|
|00003290| 69 6d 65 20 74 61 6b 65 | 6e 3a 20 22 2b 41 24 2b |ime take|n: "+A$+|
|000032a0| 22 20 73 65 63 6f 6e 64 | 73 2e 22 29 0d 0f 14 0e |" second|s.")....|
|000032b0| f2 70 73 6e 65 77 6c 69 | 6e 65 0d 0f 1e 05 e1 0d |.psnewli|ne......|
|000032c0| 0f 28 0e dd a4 67 65 6e | 65 72 61 74 65 0d 0f 32 |.(...gen|erate..2|
|000032d0| 0d ea 41 25 2c 72 61 6e | 67 65 0d 0f 3c 17 72 61 |..A%,ran|ge..<.ra|
|000032e0| 6e 67 65 3d a7 6b 65 79 | 73 24 2c bd 50 41 52 54 |nge=.key|s$,.PART|
|000032f0| 29 0d 0f 46 23 f5 41 25 | 3d 97 28 c1 c0 6b 65 79 |)..F#.A%|=.(..key|
|00003300| 73 24 2c 72 61 6e 67 65 | 29 2c b3 28 72 61 6e 67 |s$,range|),.(rang|
|00003310| 65 29 29 29 0d 0f 50 0c | fd 41 25 3e 50 41 52 54 |e)))..P.|.A%>PART|
|00003320| 0d 0f 5a 08 3d 20 41 25 | 0d 0f 64 0d dd f2 57 41 |..Z.= A%|..d...WA|
|00003330| 49 54 28 58 29 0d 0f 6e | 06 ea 5a 0d 0f 78 09 5a |IT(X)..n|..Z..x.Z|
|00003340| 20 3d 20 91 0d 0f 82 0f | f5 fd 91 2d 5a 3e 58 2a | = .....|...-Z>X*|
|00003350| 31 30 30 0d 0f 8c 05 e1 | 0d 0f 96 0a dd a4 6d 65 |100.....|......me|
|00003360| 6e 75 0d 0f a0 08 f2 63 | 6c 73 0d 0f aa 0e f2 70 |nu.....c|ls.....p|
|00003370| 73 6e 65 77 6c 69 6e 65 | 0d 0f b4 45 f2 70 73 6a |snewline|...E.psj|
|00003380| 75 73 74 69 66 79 28 22 | 53 65 6c 65 63 74 20 74 |ustify("|Select t|
|00003390| 65 73 74 20 62 79 20 70 | 72 65 73 73 69 6e 67 20 |est by p|ressing |
|000033a0| 74 68 65 20 61 70 70 72 | 6f 70 72 69 61 74 65 20 |the appr|opriate |
|000033b0| 6e 75 6d 62 65 72 20 6b | 65 79 3a 22 29 0d 0f be |number k|ey:")...|
|000033c0| 31 f2 70 73 6a 75 73 74 | 69 66 79 28 22 31 2e 20 |1.psjust|ify("1. |
|000033d0| 43 61 70 69 74 61 6c 20 | 6c 65 74 74 65 72 73 20 |Capital |letters |
|000033e0| 61 6e 64 20 6e 75 6d 65 | 72 61 6c 73 22 29 0d 0f |and nume|rals")..|
|000033f0| c8 39 f2 70 73 6a 75 73 | 74 69 66 79 28 22 32 2e |.9.psjus|tify("2.|
|00003400| 20 4c 65 74 74 65 72 73 | 2c 20 6e 75 6d 65 72 61 | Letters|, numera|
|00003410| 6c 73 20 61 6e 64 20 62 | 6f 74 74 6f 6d 20 73 79 |ls and b|ottom sy|
|00003420| 6d 62 6f 6c 73 22 29 0d | 0f d2 37 f2 70 73 6a 75 |mbols").|..7.psju|
|00003430| 73 74 69 66 79 28 22 33 | 2e 20 4c 65 74 74 65 72 |stify("3|. Letter|
|00003440| 73 2c 20 6e 75 6d 65 72 | 61 6c 73 2c 20 61 6e 64 |s, numer|als, and|
|00003450| 20 61 6c 6c 20 73 79 6d | 62 6f 6c 73 22 29 0d 0f | all sym|bols")..|
|00003460| dc 4b f2 70 73 6a 75 73 | 74 69 66 79 28 22 34 2e |.K.psjus|tify("4.|
|00003470| 20 55 70 70 65 72 20 61 | 6e 64 20 6c 6f 77 65 72 | Upper a|nd lower|
|00003480| 20 63 61 73 65 20 6c 65 | 74 74 65 72 73 2c 20 6e | case le|tters, n|
|00003490| 75 6d 65 72 61 6c 73 20 | 61 6e 64 20 61 6c 6c 20 |umerals |and all |
|000034a0| 73 79 6d 62 6f 6c 73 22 | 29 0d 0f e6 24 f2 70 73 |symbols"|)...$.ps|
|000034b0| 6a 75 73 74 69 66 79 28 | 22 35 2e 20 45 6e 74 69 |justify(|"5. Enti|
|000034c0| 72 65 20 6b 65 79 62 6f | 61 72 64 22 29 0d 0f f0 |re keybo|ard")...|
|000034d0| 2a f2 70 73 6a 75 73 74 | 69 66 79 28 22 36 2e 20 |*.psjust|ify("6. |
|000034e0| 52 65 74 75 72 6e 20 74 | 6f 20 74 68 65 20 44 65 |Return t|o the De|
|000034f0| 73 6b 74 6f 70 22 29 0d | 0f fa 10 f5 70 61 72 74 |sktop").|....part|
|00003500| 3d a5 2d 97 22 30 22 0d | 10 04 18 fd 70 61 72 74 |=.-."0".|....part|
|00003510| 20 3e 3d 31 20 80 70 61 | 72 74 20 3c 3d 20 36 0d | >=1 .pa|rt <= 6.|
|00003520| 10 0e 0a 3d 20 70 61 72 | 74 0d 10 18 0f dd f2 74 |...= par|t......t|
|00003530| 69 74 6c 65 63 74 72 6c | 0d 10 22 28 f2 70 73 6a |itlectrl|.."(.psj|
|00003540| 75 73 74 69 66 79 28 22 | 41 53 43 49 49 20 20 20 |ustify("|ASCII   |
|00003550| 43 54 52 4c 2b 20 20 20 | 45 66 66 65 63 74 22 29 |CTRL+   |Effect")|
|00003560| 0d 10 2c 05 e1 0d 10 36 | 14 dd f2 63 74 72 6c 28 |..,....6|...ctrl(|
|00003570| 41 24 2c 42 24 2c 43 24 | 29 0d 10 40 11 f2 70 73 |A$,B$,C$|)..@..ps|
|00003580| 74 61 62 28 41 24 2c 35 | 30 29 0d 10 4a 12 f2 70 |tab(A$,5|0)..J..p|
|00003590| 73 74 61 62 28 42 24 2c | 32 35 30 29 0d 10 54 12 |stab(B$,|250)..T.|
|000035a0| f2 70 73 74 61 62 28 43 | 24 2c 33 35 30 29 0d 10 |.pstab(C|$,350)..|
|000035b0| 5e 0e f2 70 73 6e 65 77 | 6c 69 6e 65 0d 10 68 12 |^..psnew|line..h.|
|000035c0| f2 68 69 67 68 6c 69 67 | 68 74 28 42 24 29 0d 10 |.highlig|ht(B$)..|
|000035d0| 72 05 e1 0d 10 7c 0e dd | f2 6b 65 79 62 6f 61 72 |r....|..|.keyboar|
|000035e0| 64 0d 10 86 21 ef 32 36 | 2c 20 31 32 2c 20 31 39 |d...!.26|, 12, 19|
|000035f0| 2c 31 30 2c 31 36 2c 26 | 38 30 2c 26 41 30 2c 26 |,10,16,&|80,&A0,&|
|00003600| 43 30 0d 10 90 0f 53 63 | 61 6c 65 20 3d 20 34 2e |C0....Sc|ale = 4.|
|00003610| 37 0d 10 9a 06 ef 35 0d | 10 a4 05 f7 0d 10 ae 08 |7.....5.|........|
|00003620| 4d 25 3d 30 0d 10 b8 4e | f3 20 58 25 28 4d 25 29 |M%=0...N|. X%(M%)|
|00003630| 2c 59 25 28 4d 25 29 2c | 57 25 28 4d 25 29 2c 48 |,Y%(M%),|W%(M%),H|
|00003640| 28 4d 25 29 2c 4c 65 67 | 65 6e 64 24 28 4d 25 29 |(M%),Leg|end$(M%)|
|00003650| 2c 43 6f 64 65 25 28 4d | 25 29 2c 20 53 43 6f 64 |,Code%(M|%), SCod|
|00003660| 65 25 28 4d 25 29 2c 20 | 43 43 6f 64 65 25 28 4d |e%(M%), |CCode%(M|
|00003670| 25 29 0d 10 c2 05 f5 0d | 10 cc 15 6b 65 79 28 43 |%)......|...key(C|
|00003680| 6f 64 65 25 28 4d 25 29 | 29 3d 4d 25 0d 10 d6 16 |ode%(M%)|)=M%....|
|00003690| 6b 65 79 28 53 43 6f 64 | 65 25 28 4d 25 29 29 3d |key(SCod|e%(M%))=|
|000036a0| 4d 25 0d 10 e0 0a e6 30 | 2c 20 31 30 0d 10 ea 43 |M%.....0|, 10...C|
|000036b0| c8 93 20 c8 90 20 58 25 | 28 4d 25 29 2a 53 63 61 |.. .. X%|(M%)*Sca|
|000036c0| 6c 65 2c 20 59 25 28 4d | 25 29 2a 53 63 61 6c 65 |le, Y%(M|%)*Scale|
|000036d0| 2b 36 30 30 2c 20 57 25 | 28 4d 25 29 2a 53 63 61 |+600, W%|(M%)*Sca|
|000036e0| 6c 65 2c 20 48 28 4d 25 | 29 2a 53 63 61 6c 65 0d |le, H(M%|)*Scale.|
|000036f0| 10 f4 45 ec 58 25 28 4d | 25 29 2a 53 63 61 6c 65 |..E.X%(M|%)*Scale|
|00003700| 2b 28 57 25 28 4d 25 29 | 2a 53 63 61 6c 65 29 2f |+(W%(M%)|*Scale)/|
|00003710| 32 2d 28 a9 4c 65 67 65 | 6e 64 24 28 4d 25 29 2a |2-(.Lege|nd$(M%)*|
|00003720| 38 29 2c 20 59 25 28 4d | 25 29 2a 53 63 61 6c 65 |8), Y%(M|%)*Scale|
|00003730| 2b 36 33 36 0d 10 fe 08 | e6 30 2c 30 0d 11 08 11 |+636....|.0,0....|
|00003740| f1 20 4c 65 67 65 6e 64 | 24 28 4d 25 29 0d 11 12 |. Legend|$(M%)...|
|00003750| 0b 4d 25 20 2b 3d 20 31 | 0d 11 1c 4e f3 20 58 25 |.M% += 1|...N. X%|
|00003760| 28 4d 25 29 2c 59 25 28 | 4d 25 29 2c 57 25 28 4d |(M%),Y%(|M%),W%(M|
|00003770| 25 29 2c 48 28 4d 25 29 | 2c 4c 65 67 65 6e 64 24 |%),H(M%)|,Legend$|
|00003780| 28 4d 25 29 2c 43 6f 64 | 65 25 28 4d 25 29 2c 20 |(M%),Cod|e%(M%), |
|00003790| 53 43 6f 64 65 25 28 4d | 25 29 2c 20 43 43 6f 64 |SCode%(M|%), CCod|
|000037a0| 65 25 28 4d 25 29 0d 11 | 26 3a e7 4c 65 67 65 6e |e%(M%)..|&:.Legen|
|000037b0| 64 24 28 4d 25 29 3d 22 | 52 45 54 55 52 4e 22 20 |d$(M%)="|RETURN" |
|000037c0| 8c 4c 65 67 65 6e 64 24 | 28 4d 25 29 3d bd 32 34 |.Legend$|(M%)=.24|
|000037d0| 39 2b bd 32 35 30 2b bd | 32 35 30 2b bd 32 35 31 |9+.250+.|250+.251|
|000037e0| 0d 11 30 2c e7 4c 65 67 | 65 6e 64 24 28 4d 25 29 |..0,.Leg|end$(M%)|
|000037f0| 3d 22 3c 2d 22 20 8c 4c | 65 67 65 6e 64 24 28 4d |="<-" .L|egend$(M|
|00003800| 25 29 3d bd 32 34 39 2b | bd 32 35 30 0d 11 3a 2b |%)=.249+|.250..:+|
|00003810| e7 4c 65 67 65 6e 64 24 | 28 4d 25 29 3d 22 a3 22 |.Legend$|(M%)="."|
|00003820| 20 8c 4c 65 67 65 6e 64 | 24 28 4d 25 29 3d bd 32 | .Legend|$(M%)=.2|
|00003830| 34 38 2b 22 20 a3 22 0d | 11 44 16 fd 4c 65 67 65 |48+" .".|.D..Lege|
|00003840| 6e 64 24 28 4d 25 29 3d | 22 45 6e 64 22 0d 11 4e |nd$(M%)=|"End"..N|
|00003850| 0b 4d 25 20 2d 3d 20 31 | 0d 11 58 1e 4c 65 67 65 |.M% -= 1|..X.Lege|
|00003860| 6e 64 24 28 4d 25 29 3d | bd 32 35 32 2b bd 32 35 |nd$(M%)=|.252+.25|
|00003870| 33 2b bd 32 35 34 0d 11 | 62 45 ec 58 25 28 4d 25 |3+.254..|bE.X%(M%|
|00003880| 29 2a 53 63 61 6c 65 2b | 28 57 25 28 4d 25 29 2a |)*Scale+|(W%(M%)*|
|00003890| 53 63 61 6c 65 29 2f 32 | 2d 28 a9 4c 65 67 65 6e |Scale)/2|-(.Legen|
|000038a0| 64 24 28 4d 25 29 2a 38 | 29 2c 20 59 25 28 4d 25 |d$(M%)*8|), Y%(M%|
|000038b0| 29 2a 53 63 61 6c 65 2b | 36 33 36 0d 11 6c 11 f1 |)*Scale+|636..l..|
|000038c0| 20 4c 65 67 65 6e 64 24 | 28 4d 25 29 0d 11 76 15 | Legend$|(M%)..v.|
|000038d0| ef 34 2c 20 32 38 2c 30 | 2c 33 31 2c 37 39 2c 31 |.4, 28,0|,31,79,1|
|000038e0| 34 0d 11 80 05 e1 0d 11 | 8a 25 dc 30 2c 20 36 39 |4.......|.%.0, 69|
|000038f0| 2c 20 31 31 2c 20 31 31 | 2c 20 22 45 73 63 22 2c |, 11, 11|, "Esc",|
|00003900| 20 32 37 2c 20 32 37 2c | 20 32 37 0d 11 94 28 dc | 27, 27,| 27...(.|
|00003910| 32 31 2c 20 36 39 2c 20 | 31 31 2c 20 31 31 2c 20 |21, 69, |11, 11, |
|00003920| 22 46 31 22 2c 20 31 36 | 31 2c 20 31 39 33 2c 20 |"F1", 16|1, 193, |
|00003930| 31 36 31 0d 11 9e 28 dc | 33 33 2c 20 36 39 2c 20 |161...(.|33, 69, |
|00003940| 31 31 2c 20 31 31 2c 20 | 22 46 32 22 2c 20 31 36 |11, 11, |"F2", 16|
|00003950| 32 2c 20 31 39 34 2c 20 | 31 36 32 0d 11 a8 28 dc |2, 194, |162...(.|
|00003960| 34 35 2c 20 36 39 2c 20 | 31 31 2c 20 31 31 2c 20 |45, 69, |11, 11, |
|00003970| 22 46 33 22 2c 20 31 36 | 33 2c 20 31 39 35 2c 20 |"F3", 16|3, 195, |
|00003980| 31 36 33 0d 11 b2 28 dc | 35 37 2c 20 36 39 2c 20 |163...(.|57, 69, |
|00003990| 31 31 2c 20 31 31 2c 20 | 22 46 34 22 2c 20 31 36 |11, 11, |"F4", 16|
|000039a0| 34 2c 20 31 39 36 2c 20 | 31 36 34 0d 11 bc 28 dc |4, 196, |164...(.|
|000039b0| 37 36 2c 20 36 39 2c 20 | 31 31 2c 20 31 31 2c 20 |76, 69, |11, 11, |
|000039c0| 22 46 35 22 2c 20 31 36 | 35 2c 20 31 39 37 2c 20 |"F5", 16|5, 197, |
|000039d0| 31 36 35 0d 11 c6 28 dc | 38 38 2c 20 36 39 2c 20 |165...(.|88, 69, |
|000039e0| 31 31 2c 20 31 31 2c 20 | 22 46 36 22 2c 20 31 36 |11, 11, |"F6", 16|
|000039f0| 36 2c 20 31 39 38 2c 20 | 31 36 36 0d 11 d0 29 dc |6, 198, |166...).|
|00003a00| 31 30 30 2c 20 36 39 2c | 20 31 31 2c 20 31 31 2c |100, 69,| 11, 11,|
|00003a10| 20 22 46 37 22 2c 20 31 | 36 37 2c 20 31 39 39 2c | "F7", 1|67, 199,|
|00003a20| 20 31 36 37 0d 11 da 29 | dc 31 31 32 2c 20 36 39 | 167...)|.112, 69|
|00003a30| 2c 20 31 31 2c 20 31 31 | 2c 20 22 46 38 22 2c 20 |, 11, 11|, "F8", |
|00003a40| 31 36 38 2c 20 32 30 30 | 2c 20 31 36 38 0d 11 e4 |168, 200|, 168...|
|00003a50| 29 dc 31 33 32 2c 20 36 | 39 2c 20 31 31 2c 20 31 |).132, 6|9, 11, 1|
|00003a60| 31 2c 20 22 46 39 22 2c | 20 31 36 39 2c 20 32 30 |1, "F9",| 169, 20|
|00003a70| 31 2c 20 31 36 39 0d 11 | ee 2a dc 31 34 34 2c 20 |1, 169..|.*.144, |
|00003a80| 36 39 2c 20 31 31 2c 20 | 31 31 2c 20 22 46 31 30 |69, 11, |11, "F10|
|00003a90| 22 2c 20 32 30 32 2c 20 | 32 31 38 2c 20 32 30 32 |", 202, |218, 202|
|00003aa0| 0d 11 f8 2a dc 31 35 36 | 2c 20 36 39 2c 20 31 31 |...*.156|, 69, 11|
|00003ab0| 2c 20 31 31 2c 20 22 46 | 31 31 22 2c 20 32 30 33 |, 11, "F|11", 203|
|00003ac0| 2c 20 32 31 39 2c 20 32 | 30 33 0d 12 02 2a dc 31 |, 219, 2|03...*.1|
|00003ad0| 36 38 2c 20 36 39 2c 20 | 31 31 2c 20 31 31 2c 20 |68, 69, |11, 11, |
|00003ae0| 22 46 31 32 22 2c 20 32 | 30 34 2c 20 32 32 30 2c |"F12", 2|04, 220,|
|00003af0| 20 32 30 34 0d 12 0c 2a | dc 31 38 34 2c 20 36 39 | 204...*|.184, 69|
|00003b00| 2c 20 31 31 2c 20 31 31 | 2c 20 22 50 72 74 22 2c |, 11, 11|, "Prt",|
|00003b10| 20 31 36 30 2c 20 31 39 | 32 2c 20 31 36 30 0d 12 | 160, 19|2, 160..|
|00003b20| 16 2a dc 31 39 36 2c 20 | 36 39 2c 20 31 31 2c 20 |.*.196, |69, 11, |
|00003b30| 31 31 2c 20 22 53 63 6c | 22 2c 20 32 34 30 2c 20 |11, "Scl|", 240, |
|00003b40| 32 34 30 2c 20 32 34 30 | 0d 12 20 2a dc 32 30 38 |240, 240|.. *.208|
|00003b50| 2c 20 36 39 2c 20 31 31 | 2c 20 31 31 2c 20 22 42 |, 69, 11|, 11, "B|
|00003b60| 72 6b 22 2c 20 32 34 31 | 2c 20 32 34 31 2c 20 32 |rk", 241|, 241, 2|
|00003b70| 34 31 0d 12 2a 28 dc 30 | 2c 20 34 39 2c 20 31 31 |41..*(.0|, 49, 11|
|00003b80| 2c 20 31 31 2c 20 22 7e | 20 60 22 2c 20 31 38 37 |, 11, "~| `", 187|
|00003b90| 2c 20 31 32 36 2c 20 31 | 38 37 0d 12 34 26 dc 31 |, 126, 1|87..4&.1|
|00003ba0| 32 2c 20 34 39 2c 20 31 | 31 2c 20 31 31 2c 20 22 |2, 49, 1|1, 11, "|
|00003bb0| 21 20 31 22 2c 20 34 39 | 2c 20 33 33 2c 20 34 39 |! 1", 49|, 33, 49|
|00003bc0| 0d 12 3e 26 dc 32 34 2c | 20 34 39 2c 20 31 31 2c |..>&.24,| 49, 11,|
|00003bd0| 20 31 31 2c 20 22 40 20 | 32 22 2c 20 35 30 2c 20 | 11, "@ |2", 50, |
|00003be0| 36 34 2c 20 35 30 0d 12 | 48 26 dc 33 36 2c 20 34 |64, 50..|H&.36, 4|
|00003bf0| 39 2c 20 31 31 2c 20 31 | 31 2c 20 22 23 20 33 22 |9, 11, 1|1, "# 3"|
|00003c00| 2c 20 35 31 2c 20 33 35 | 2c 20 35 31 0d 12 52 26 |, 51, 35|, 51..R&|
|00003c10| dc 34 38 2c 20 34 39 2c | 20 31 31 2c 20 31 31 2c |.48, 49,| 11, 11,|
|00003c20| 20 22 24 20 34 22 2c 20 | 35 32 2c 20 33 36 2c 20 | "$ 4", |52, 36, |
|00003c30| 35 32 0d 12 5c 26 dc 36 | 30 2c 20 34 39 2c 20 31 |52..\&.6|0, 49, 1|
|00003c40| 31 2c 20 31 31 2c 20 22 | 25 20 35 22 2c 20 35 33 |1, 11, "|% 5", 53|
|00003c50| 2c 20 33 37 2c 20 35 33 | 0d 12 66 26 dc 37 32 2c |, 37, 53|..f&.72,|
|00003c60| 20 34 39 2c 20 31 31 2c | 20 31 31 2c 20 22 5e 20 | 49, 11,| 11, "^ |
|00003c70| 36 22 2c 20 35 34 2c 20 | 39 34 2c 20 35 34 0d 12 |6", 54, |94, 54..|
|00003c80| 70 26 dc 38 34 2c 20 34 | 39 2c 20 31 31 2c 20 31 |p&.84, 4|9, 11, 1|
|00003c90| 31 2c 20 22 26 20 37 22 | 2c 20 35 35 2c 20 33 38 |1, "& 7"|, 55, 38|
|00003ca0| 2c 20 35 35 0d 12 7a 26 | dc 39 36 2c 20 34 39 2c |, 55..z&|.96, 49,|
|00003cb0| 20 31 31 2c 20 31 31 2c | 20 22 2a 20 38 22 2c 20 | 11, 11,| "* 8", |
|00003cc0| 35 36 2c 20 34 32 2c 20 | 35 36 0d 12 84 27 dc 31 |56, 42, |56...'.1|
|00003cd0| 30 38 2c 20 34 39 2c 20 | 31 31 2c 20 31 31 2c 20 |08, 49, |11, 11, |
|00003ce0| 22 28 20 39 22 2c 20 35 | 37 2c 20 34 30 2c 20 35 |"( 9", 5|7, 40, 5|
|00003cf0| 37 0d 12 8e 27 dc 31 32 | 30 2c 20 34 39 2c 20 31 |7...'.12|0, 49, 1|
|00003d00| 31 2c 20 31 31 2c 20 22 | 29 20 30 22 2c 20 34 38 |1, 11, "|) 0", 48|
|00003d10| 2c 20 34 31 2c 20 34 38 | 0d 12 98 27 dc 31 33 32 |, 41, 48|...'.132|
|00003d20| 2c 20 34 39 2c 20 31 31 | 2c 20 31 31 2c 20 22 5f |, 49, 11|, 11, "_|
|00003d30| 20 2d 22 2c 20 34 35 2c | 20 39 35 2c 20 34 35 0d | -", 45,| 95, 45.|
|00003d40| 12 a2 27 dc 31 34 34 2c | 20 34 39 2c 20 31 31 2c |..'.144,| 49, 11,|
|00003d50| 20 31 31 2c 20 22 2b 20 | 3d 22 2c 20 36 31 2c 20 | 11, "+ |=", 61, |
|00003d60| 34 33 2c 20 36 31 0d 12 | ac 25 dc 31 35 36 2c 20 |43, 61..|.%.156, |
|00003d70| 34 39 2c 20 31 31 2c 20 | 31 31 2c 20 22 a3 22 2c |49, 11, |11, ".",|
|00003d80| 20 39 36 2c 20 39 36 2c | 20 39 36 0d 12 b6 23 dc | 96, 96,| 96...#.|
|00003d90| 31 36 38 2c 20 34 39 2c | 20 31 31 2c 20 31 31 2c |168, 49,| 11, 11,|
|00003da0| 20 22 3c 2d 22 2c 20 38 | 2c 20 38 2c 20 38 0d 12 | "<-", 8|, 8, 8..|
|00003db0| c0 2a dc 31 38 34 2c 20 | 34 39 2c 20 31 31 2c 20 |.*.184, |49, 11, |
|00003dc0| 31 31 2c 20 22 49 6e 73 | 22 2c 20 32 30 35 2c 20 |11, "Ins|", 205, |
|00003dd0| 32 32 31 2c 20 32 30 35 | 0d 12 ca 27 dc 31 39 36 |221, 205|...'.196|
|00003de0| 2c 20 34 39 2c 20 31 31 | 2c 20 31 31 2c 20 22 48 |, 49, 11|, 11, "H|
|00003df0| 6d 65 22 2c 20 33 30 2c | 20 33 30 2c 20 33 30 0d |me", 30,| 30, 30.|
|00003e00| 12 d4 2a dc 32 30 38 2c | 20 34 39 2c 20 31 31 2c |..*.208,| 49, 11,|
|00003e10| 20 31 31 2c 20 22 50 55 | 70 22 2c 20 31 35 39 2c | 11, "PU|p", 159,|
|00003e20| 20 31 35 39 2c 20 31 35 | 39 0d 12 de 2a dc 32 32 | 159, 15|9...*.22|
|00003e30| 34 2c 20 34 39 2c 20 31 | 31 2c 20 31 31 2c 20 22 |4, 49, 1|1, 11, "|
|00003e40| 4e 75 6d 22 2c 20 33 30 | 30 2c 20 33 30 30 2c 20 |Num", 30|0, 300, |
|00003e50| 33 30 30 0d 12 e8 28 dc | 32 33 36 2c 20 34 39 2c |300...(.|236, 49,|
|00003e60| 20 31 31 2c 20 31 31 2c | 20 22 2f 22 2c 20 33 34 | 11, 11,| "/", 34|
|00003e70| 37 2c 20 33 34 37 2c 20 | 33 34 37 0d 12 f2 28 dc |7, 347, |347...(.|
|00003e80| 32 34 38 2c 20 34 39 2c | 20 31 31 2c 20 31 31 2c |248, 49,| 11, 11,|
|00003e90| 20 22 2a 22 2c 20 33 34 | 32 2c 20 33 34 32 2c 20 | "*", 34|2, 342, |
|00003ea0| 33 34 32 0d 12 fc 28 dc | 32 36 30 2c 20 34 39 2c |342...(.|260, 49,|
|00003eb0| 20 31 31 2c 20 31 31 2c | 20 22 23 22 2c 20 33 33 | 11, 11,| "#", 33|
|00003ec0| 35 2c 20 33 33 35 2c 20 | 33 33 35 0d 13 06 22 dc |5, 335, |335...".|
|00003ed0| 30 2c 20 33 36 2c 20 31 | 37 2c 20 31 31 2c 20 22 |0, 36, 1|7, 11, "|
|00003ee0| 54 41 42 22 2c 20 39 2c | 20 39 2c 20 39 0d 13 10 |TAB", 9,| 9, 9...|
|00003ef0| 25 dc 31 38 2c 20 33 36 | 2c 20 31 31 2c 20 31 31 |%.18, 36|, 11, 11|
|00003f00| 2c 20 22 51 22 2c 20 31 | 31 33 2c 20 38 31 2c 20 |, "Q", 1|13, 81, |
|00003f10| 38 31 0d 13 1a 25 dc 33 | 30 2c 20 33 36 2c 20 31 |81...%.3|0, 36, 1|
|00003f20| 31 2c 20 31 31 2c 20 22 | 57 22 2c 20 31 31 39 2c |1, 11, "|W", 119,|
|00003f30| 20 38 37 2c 20 38 37 0d | 13 24 25 dc 34 32 2c 20 | 87, 87.|.$%.42, |
|00003f40| 33 36 2c 20 31 31 2c 20 | 31 31 2c 20 22 45 22 2c |36, 11, |11, "E",|
|00003f50| 20 31 30 31 2c 20 36 39 | 2c 20 36 39 0d 13 2e 25 | 101, 69|, 69...%|
|00003f60| dc 35 34 2c 20 33 36 2c | 20 31 31 2c 20 31 31 2c |.54, 36,| 11, 11,|
|00003f70| 20 22 52 22 2c 20 31 31 | 34 2c 20 38 32 2c 20 38 | "R", 11|4, 82, 8|
|00003f80| 32 0d 13 38 25 dc 36 36 | 2c 20 33 36 2c 20 31 31 |2..8%.66|, 36, 11|
|00003f90| 2c 20 31 31 2c 20 22 54 | 22 2c 20 31 31 36 2c 20 |, 11, "T|", 116, |
|00003fa0| 38 34 2c 20 38 34 0d 13 | 42 25 dc 37 38 2c 20 33 |84, 84..|B%.78, 3|
|00003fb0| 36 2c 20 31 31 2c 20 31 | 31 2c 20 22 59 22 2c 20 |6, 11, 1|1, "Y", |
|00003fc0| 31 32 31 2c 20 38 39 2c | 20 38 39 0d 13 4c 25 dc |121, 89,| 89..L%.|
|00003fd0| 39 30 2c 20 33 36 2c 20 | 31 31 2c 20 31 31 2c 20 |90, 36, |11, 11, |
|00003fe0| 22 55 22 2c 20 31 31 37 | 2c 20 38 35 2c 20 38 35 |"U", 117|, 85, 85|
|00003ff0| 0d 13 56 26 dc 31 30 32 | 2c 20 33 36 2c 20 31 31 |..V&.102|, 36, 11|
|00004000| 2c 20 31 31 2c 20 22 49 | 22 2c 20 31 31 35 2c 20 |, 11, "I|", 115, |
|00004010| 37 33 2c 20 37 33 0d 13 | 60 26 dc 31 31 34 2c 20 |73, 73..|`&.114, |
|00004020| 33 36 2c 20 31 31 2c 20 | 31 31 2c 20 22 4f 22 2c |36, 11, |11, "O",|
|00004030| 20 31 31 31 2c 20 37 39 | 2c 20 37 39 0d 13 6a 26 | 111, 79|, 79..j&|
|00004040| dc 31 32 36 2c 20 33 36 | 2c 20 31 31 2c 20 31 31 |.126, 36|, 11, 11|
|00004050| 2c 20 22 50 22 2c 20 31 | 31 32 2c 20 38 30 2c 20 |, "P", 1|12, 80, |
|00004060| 38 30 0d 13 74 28 dc 31 | 33 38 2c 20 33 36 2c 20 |80..t(.1|38, 36, |
|00004070| 31 31 2c 20 31 31 2c 20 | 22 7b 20 5b 22 2c 20 39 |11, 11, |"{ [", 9|
|00004080| 31 2c 20 31 32 33 2c 20 | 39 31 0d 13 7e 28 dc 31 |1, 123, |91..~(.1|
|00004090| 35 30 2c 20 33 36 2c 20 | 31 31 2c 20 31 31 2c 20 |50, 36, |11, 11, |
|000040a0| 22 7d 20 5d 22 2c 20 39 | 33 2c 20 31 32 35 2c 20 |"} ]", 9|3, 125, |
|000040b0| 39 33 0d 13 88 28 dc 31 | 36 32 2c 20 33 36 2c 20 |93...(.1|62, 36, |
|000040c0| 31 37 2c 20 31 31 2c 20 | 22 7c 20 5c 22 2c 20 39 |17, 11, |"| \", 9|
|000040d0| 32 2c 20 31 32 34 2c 20 | 39 32 0d 13 92 2a dc 31 |2, 124, |92...*.1|
|000040e0| 38 34 2c 20 33 36 2c 20 | 31 31 2c 20 31 31 2c 20 |84, 36, |11, 11, |
|000040f0| 22 44 65 6c 22 2c 20 31 | 32 37 2c 20 31 32 37 2c |"Del", 1|27, 127,|
|00004100| 20 31 32 37 0d 13 9c 2a | dc 31 39 36 2c 20 33 36 | 127...*|.196, 36|
|00004110| 2c 20 31 31 2c 20 31 31 | 2c 20 22 43 70 79 22 2c |, 11, 11|, "Cpy",|
|00004120| 20 31 33 39 2c 20 31 33 | 39 2c 20 31 33 39 0d 13 | 139, 13|9, 139..|
|00004130| a6 2a dc 32 30 38 2c 20 | 33 36 2c 20 31 31 2c 20 |.*.208, |36, 11, |
|00004140| 31 31 2c 20 22 50 44 6e | 22 2c 20 31 35 38 2c 20 |11, "PDn|", 158, |
|00004150| 31 35 38 2c 20 31 35 38 | 0d 13 b0 28 dc 32 32 34 |158, 158|...(.224|
|00004160| 2c 20 33 36 2c 20 31 31 | 2c 20 31 31 2c 20 22 37 |, 36, 11|, 11, "7|
|00004170| 22 2c 20 33 35 35 2c 20 | 33 35 35 2c 20 33 35 35 |", 355, |355, 355|
|00004180| 0d 13 ba 28 dc 32 33 36 | 2c 20 33 36 2c 20 31 31 |...(.236|, 36, 11|
|00004190| 2c 20 31 31 2c 20 22 38 | 22 2c 20 33 35 36 2c 20 |, 11, "8|", 356, |
|000041a0| 33 35 36 2c 20 33 35 36 | 0d 13 c4 28 dc 32 34 38 |356, 356|...(.248|
|000041b0| 2c 20 33 36 2c 20 31 31 | 2c 20 31 31 2c 20 22 39 |, 36, 11|, 11, "9|
|000041c0| 22 2c 20 33 35 37 2c 20 | 33 35 37 2c 20 33 35 37 |", 357, |357, 357|
|000041d0| 0d 13 ce 28 dc 32 36 30 | 2c 20 33 36 2c 20 31 31 |...(.260|, 36, 11|
|000041e0| 2c 20 31 31 2c 20 22 2d | 22 2c 20 33 34 35 2c 20 |, 11, "-|", 345, |
|000041f0| 33 34 35 2c 20 33 34 35 | 0d 13 d8 29 dc 30 2c 20 |345, 345|...).0, |
|00004200| 32 34 2c 20 32 31 2c 20 | 31 31 2c 20 22 43 54 52 |24, 21, |11, "CTR|
|00004210| 4c 22 2c 20 32 35 32 2c | 20 32 35 32 2c 20 32 35 |L", 252,| 252, 25|
|00004220| 32 0d 13 e2 24 dc 32 32 | 2c 20 32 34 2c 20 31 31 |2...$.22|, 24, 11|
|00004230| 2c 20 31 31 2c 20 22 41 | 22 2c 20 39 37 2c 20 36 |, 11, "A|", 97, 6|
|00004240| 35 2c 20 36 35 0d 13 ec | 25 dc 33 34 2c 20 32 34 |5, 65...|%.34, 24|
|00004250| 2c 20 31 31 2c 20 31 31 | 2c 20 22 53 22 2c 20 31 |, 11, 11|, "S", 1|
|00004260| 31 35 2c 20 38 33 2c 20 | 38 33 0d 13 f6 25 dc 34 |15, 83, |83...%.4|
|00004270| 36 2c 20 32 34 2c 20 31 | 31 2c 20 31 31 2c 20 22 |6, 24, 1|1, 11, "|
|00004280| 44 22 2c 20 31 30 30 2c | 20 36 38 2c 20 36 38 0d |D", 100,| 68, 68.|
|00004290| 14 00 25 dc 35 38 2c 20 | 32 34 2c 20 31 31 2c 20 |..%.58, |24, 11, |
|000042a0| 31 31 2c 20 22 46 22 2c | 20 31 30 32 2c 20 37 30 |11, "F",| 102, 70|
|000042b0| 2c 20 37 30 0d 14 0a 25 | dc 37 30 2c 20 32 34 2c |, 70...%|.70, 24,|
|000042c0| 20 31 31 2c 20 31 31 2c | 20 22 47 22 2c 20 31 30 | 11, 11,| "G", 10|
|000042d0| 33 2c 20 37 31 2c 20 37 | 31 0d 14 14 25 dc 38 32 |3, 71, 7|1...%.82|
|000042e0| 2c 20 32 34 2c 20 31 31 | 2c 20 31 31 2c 20 22 48 |, 24, 11|, 11, "H|
|000042f0| 22 2c 20 31 30 34 2c 20 | 37 32 2c 20 37 32 0d 14 |", 104, |72, 72..|
|00004300| 1e 25 dc 39 34 2c 20 32 | 34 2c 20 31 31 2c 20 31 |.%.94, 2|4, 11, 1|
|00004310| 31 2c 20 22 4a 22 2c 20 | 31 30 36 2c 20 37 34 2c |1, "J", |106, 74,|
|00004320| 20 37 34 0d 14 28 26 dc | 31 30 36 2c 20 32 34 2c | 74..(&.|106, 24,|
|00004330| 20 31 31 2c 20 31 31 2c | 20 22 4b 22 2c 20 31 30 | 11, 11,| "K", 10|
|00004340| 37 2c 20 37 35 2c 20 37 | 35 0d 14 32 26 dc 31 31 |7, 75, 7|5..2&.11|
|00004350| 38 2c 20 32 34 2c 20 31 | 31 2c 20 31 31 2c 20 22 |8, 24, 1|1, 11, "|
|00004360| 4c 22 2c 20 31 30 38 2c | 20 37 36 2c 20 37 36 0d |L", 108,| 76, 76.|
|00004370| 14 3c 27 dc 31 33 30 2c | 20 32 34 2c 20 31 31 2c |.<'.130,| 24, 11,|
|00004380| 20 31 31 2c 20 22 3a 20 | 3b 22 2c 20 35 39 2c 20 | 11, ": |;", 59, |
|00004390| 35 38 2c 20 35 39 0d 14 | 46 28 dc 31 34 32 2c 20 |58, 59..|F(.142, |
|000043a0| 32 34 2c 20 31 31 2c 20 | 31 31 2c 20 22 22 22 20 |24, 11, |11, """ |
|000043b0| 27 22 2c 20 33 39 2c 20 | 33 34 2c 20 33 39 0d 14 |'", 39, |34, 39..|
|000043c0| 50 2a dc 31 35 34 2c 20 | 32 34 2c 20 32 35 2c 20 |P*.154, |24, 25, |
|000043d0| 31 31 2c 20 22 52 45 54 | 55 52 4e 22 2c 20 31 33 |11, "RET|URN", 13|
|000043e0| 2c 20 31 33 2c 20 31 33 | 0d 14 5a 28 dc 32 32 34 |, 13, 13|..Z(.224|
|000043f0| 2c 20 32 34 2c 20 31 31 | 2c 20 31 31 2c 20 22 34 |, 24, 11|, 11, "4|
|00004400| 22 2c 20 33 35 32 2c 20 | 33 35 32 2c 20 33 35 32 |", 352, |352, 352|
|00004410| 0d 14 64 28 dc 32 33 36 | 2c 20 32 34 2c 20 31 31 |..d(.236|, 24, 11|
|00004420| 2c 20 31 31 2c 20 22 35 | 22 2c 20 33 35 33 2c 20 |, 11, "5|", 353, |
|00004430| 33 35 33 2c 20 33 35 33 | 0d 14 6e 28 dc 32 34 38 |353, 353|..n(.248|
|00004440| 2c 20 32 34 2c 20 31 31 | 2c 20 31 31 2c 20 22 36 |, 24, 11|, 11, "6|
|00004450| 22 2c 20 33 35 34 2c 20 | 33 35 34 2c 20 33 35 34 |", 354, |354, 354|
|00004460| 0d 14 78 28 dc 32 36 30 | 2c 20 32 34 2c 20 31 31 |..x(.260|, 24, 11|
|00004470| 2c 20 31 31 2c 20 22 2b | 22 2c 20 33 34 33 2c 20 |, 11, "+|", 343, |
|00004480| 33 34 33 2c 20 33 34 33 | 0d 14 82 2a dc 30 2c 20 |343, 343|...*.0, |
|00004490| 31 32 2c 20 32 36 2c 20 | 31 31 2c 20 22 53 48 49 |12, 26, |11, "SHI|
|000044a0| 46 54 22 2c 20 32 35 33 | 2c 20 32 35 33 2c 20 32 |FT", 253|, 253, 2|
|000044b0| 35 33 0d 14 8c 25 dc 32 | 37 2c 20 31 32 2c 20 31 |53...%.2|7, 12, 1|
|000044c0| 31 2c 20 31 31 2c 20 22 | 5a 22 2c 20 31 32 32 2c |1, 11, "|Z", 122,|
|000044d0| 20 39 30 2c 20 39 30 0d | 14 96 25 dc 33 39 2c 20 | 90, 90.|..%.39, |
|000044e0| 31 32 2c 20 31 31 2c 20 | 31 31 2c 20 22 58 22 2c |12, 11, |11, "X",|
|000044f0| 20 31 32 30 2c 20 38 38 | 2c 20 38 38 0d 14 a0 24 | 120, 88|, 88...$|
|00004500| dc 35 31 2c 20 31 32 2c | 20 31 31 2c 20 31 31 2c |.51, 12,| 11, 11,|
|00004510| 20 22 43 22 2c 20 39 39 | 2c 20 36 37 2c 20 36 37 | "C", 99|, 67, 67|
|00004520| 0d 14 aa 25 dc 36 33 2c | 20 31 32 2c 20 31 31 2c |...%.63,| 12, 11,|
|00004530| 20 31 31 2c 20 22 56 22 | 2c 20 31 31 38 2c 20 38 | 11, "V"|, 118, 8|
|00004540| 36 2c 20 38 36 0d 14 b4 | 24 dc 37 35 2c 20 31 32 |6, 86...|$.75, 12|
|00004550| 2c 20 31 31 2c 20 31 31 | 2c 20 22 42 22 2c 20 39 |, 11, 11|, "B", 9|
|00004560| 38 2c 20 36 36 2c 20 36 | 36 0d 14 be 25 dc 38 37 |8, 66, 6|6...%.87|
|00004570| 2c 20 31 32 2c 20 31 31 | 2c 20 31 31 2c 20 22 4e |, 12, 11|, 11, "N|
|00004580| 22 2c 20 31 31 30 2c 20 | 37 38 2c 20 37 38 0d 14 |", 110, |78, 78..|
|00004590| c8 25 dc 39 39 2c 20 31 | 32 2c 20 31 31 2c 20 31 |.%.99, 1|2, 11, 1|
|000045a0| 31 2c 20 22 4d 22 2c 20 | 31 30 39 2c 20 37 37 2c |1, "M", |109, 77,|
|000045b0| 20 37 37 0d 14 d2 27 dc | 31 31 31 2c 20 31 32 2c | 77...'.|111, 12,|
|000045c0| 20 31 31 2c 20 31 31 2c | 20 22 3c 20 2c 22 2c 20 | 11, 11,| "< ,", |
|000045d0| 34 34 2c 20 36 30 2c 20 | 34 34 0d 14 dc 27 dc 31 |44, 60, |44...'.1|
|000045e0| 32 33 2c 20 31 32 2c 20 | 31 31 2c 20 31 31 2c 20 |23, 12, |11, 11, |
|000045f0| 22 3e 20 2e 22 2c 20 34 | 36 2c 20 36 32 2c 20 34 |"> .", 4|6, 62, 4|
|00004600| 36 0d 14 e6 27 dc 31 33 | 35 2c 20 31 32 2c 20 31 |6...'.13|5, 12, 1|
|00004610| 31 2c 20 31 31 2c 20 22 | 3f 20 2f 22 2c 20 34 37 |1, 11, "|? /", 47|
|00004620| 2c 20 36 33 2c 20 34 37 | 0d 14 f0 2c dc 31 34 37 |, 63, 47|...,.147|
|00004630| 2c 20 31 32 2c 20 33 32 | 2c 20 31 31 2c 20 22 53 |, 12, 32|, 11, "S|
|00004640| 48 49 46 54 22 2c 20 32 | 35 34 2c 20 32 35 34 2c |HIFT", 2|54, 254,|
|00004650| 20 32 35 34 0d 14 fa 28 | dc 31 39 36 2c 20 31 32 | 254...(|.196, 12|
|00004660| 2c 20 31 31 2c 20 31 31 | 2c 20 22 8b 22 2c 20 31 |, 11, 11|, ".", 1|
|00004670| 34 33 2c 20 31 34 33 2c | 20 31 34 33 0d 15 04 28 |43, 143,| 143...(|
|00004680| dc 32 32 34 2c 20 31 32 | 2c 20 31 31 2c 20 31 31 |.224, 12|, 11, 11|
|00004690| 2c 20 22 31 22 2c 20 33 | 34 39 2c 20 33 34 39 2c |, "1", 3|49, 349,|
|000046a0| 20 33 34 39 0d 15 0e 28 | dc 32 33 36 2c 20 31 32 | 349...(|.236, 12|
|000046b0| 2c 20 31 31 2c 20 31 31 | 2c 20 22 32 22 2c 20 33 |, 11, 11|, "2", 3|
|000046c0| 35 30 2c 20 33 35 30 2c | 20 33 35 30 0d 15 18 28 |50, 350,| 350...(|
|000046d0| dc 32 34 38 2c 20 31 32 | 2c 20 31 31 2c 20 31 31 |.248, 12|, 11, 11|
|000046e0| 2c 20 22 33 22 2c 20 33 | 35 31 2c 20 33 35 31 2c |, "3", 3|51, 351,|
|000046f0| 20 33 35 31 0d 15 22 29 | dc 30 2c 20 20 30 2c 20 | 351..")|.0,  0, |
|00004700| 31 37 2c 20 31 31 2c 20 | 22 43 41 50 53 22 2c 20 |17, 11, |"CAPS", |
|00004710| 32 35 35 2c 20 32 35 35 | 2c 20 32 35 35 0d 15 2c |255, 255|, 255..,|
|00004720| 28 dc 33 30 2c 20 30 2c | 20 31 37 2c 20 31 31 2c |(.30, 0,| 17, 11,|
|00004730| 20 22 41 4c 54 22 2c 20 | 32 35 30 2c 20 32 35 30 | "ALT", |250, 250|
|00004740| 2c 20 32 35 30 0d 15 36 | 23 dc 34 38 2c 20 30 2c |, 250..6|#.48, 0,|
|00004750| 20 38 34 2c 20 31 31 2c | 20 22 20 22 2c 20 33 32 | 84, 11,| " ", 32|
|00004760| 2c 20 33 32 2c 20 33 32 | 0d 15 40 29 dc 31 33 33 |, 32, 32|..@).133|
|00004770| 2c 20 30 2c 20 31 37 2c | 20 31 31 2c 20 22 41 4c |, 0, 17,| 11, "AL|
|00004780| 54 22 2c 20 32 35 31 2c | 20 32 35 31 2c 20 32 35 |T", 251,| 251, 25|
|00004790| 31 0d 15 4a 2a dc 31 36 | 32 2c 20 30 2c 20 31 37 |1..J*.16|2, 0, 17|
|000047a0| 2c 20 31 31 2c 20 22 43 | 54 52 4c 22 2c 20 32 34 |, 11, "C|TRL", 24|
|000047b0| 39 2c 20 32 34 39 2c 20 | 32 34 39 0d 15 54 27 dc |9, 249, |249..T'.|
|000047c0| 31 38 34 2c 20 30 2c 20 | 31 31 2c 20 31 31 2c 20 |184, 0, |11, 11, |
|000047d0| 22 88 22 2c 20 31 34 30 | 2c 20 31 34 30 2c 20 31 |".", 140|, 140, 1|
|000047e0| 34 30 0d 15 5e 27 dc 31 | 39 36 2c 20 30 2c 20 31 |40..^'.1|96, 0, 1|
|000047f0| 31 2c 20 31 31 2c 20 22 | 8a 22 2c 20 31 34 32 2c |1, 11, "|.", 142,|
|00004800| 20 31 34 32 2c 20 31 34 | 32 0d 15 68 27 dc 32 30 | 142, 14|2..h'.20|
|00004810| 38 2c 20 30 2c 20 31 31 | 2c 20 31 31 2c 20 22 89 |8, 0, 11|, 11, ".|
|00004820| 22 2c 20 31 34 31 2c 20 | 31 34 31 2c 20 31 34 31 |", 141, |141, 141|
|00004830| 0d 15 72 27 dc 32 32 34 | 2c 20 30 2c 20 32 33 2c |..r'.224|, 0, 23,|
|00004840| 20 31 31 2c 20 22 30 22 | 2c 20 33 34 38 2c 20 33 | 11, "0"|, 348, 3|
|00004850| 34 38 2c 20 33 34 38 0d | 15 7c 27 dc 32 34 38 2c |48, 348.|.|'.248,|
|00004860| 20 30 2c 20 31 31 2c 20 | 31 31 2c 20 22 2e 22 2c | 0, 11, |11, ".",|
|00004870| 20 33 34 36 2c 20 33 34 | 36 2c 20 33 34 36 0d 15 | 346, 34|6, 346..|
|00004880| 86 28 dc 32 36 30 2c 20 | 30 2c 20 31 31 2c 20 32 |.(.260, |0, 11, 2|
|00004890| 32 2e 35 2c 20 22 22 2c | 20 33 31 33 2c 20 33 31 |2.5, "",| 313, 31|
|000048a0| 33 2c 20 33 31 33 0d 15 | 90 1f dc 30 2c 20 30 2c |3, 313..|...0, 0,|
|000048b0| 20 30 2c 20 30 2c 20 22 | 45 6e 64 22 2c 20 30 2c | 0, 0, "|End", 0,|
|000048c0| 20 30 2c 20 30 0d 15 9a | 0f dd f2 70 72 69 6e 74 | 0, 0...|...print|
|000048d0| 28 41 24 29 0d 15 a4 05 | f5 0d 15 ae 11 41 25 3d |(A$)....|.....A%=|
|000048e0| a7 41 24 2c 22 27 22 29 | 20 3a 0d 15 b8 1b e7 41 |.A$,"'")| :.....A|
|000048f0| 25 20 8c 41 24 3d a4 73 | 75 62 28 41 24 2c 41 25 |% .A$=.s|ub(A$,A%|
|00004900| 2c bd 31 33 29 0d 15 c2 | 11 42 25 3d a7 41 24 2c |,.13)...|.B%=.A$,|
|00004910| 22 5b 22 29 20 3a 0d 15 | cc 24 e7 42 25 20 8c 41 |"[") :..|.$.B% .A|
|00004920| 24 3d a4 73 75 62 28 41 | 24 2c 42 25 2c bd 32 36 |$=.sub(A|$,B%,.26|
|00004930| 2b bd 69 74 61 6c 69 63 | 25 29 0d 15 d6 11 43 25 |+.italic|%)....C%|
|00004940| 3d a7 41 24 2c 22 5d 22 | 29 20 3a 0d 15 e0 23 e7 |=.A$,"]"|) :...#.|
|00004950| 43 25 20 8c 41 24 3d a4 | 73 75 62 28 41 24 2c 43 |C% .A$=.|sub(A$,C|
|00004960| 25 2c bd 32 36 2b bd 72 | 6f 6d 61 6e 25 29 0d 15 |%,.26+.r|oman%)..|
|00004970| ea 15 fd 41 25 3d 30 20 | 80 42 25 3d 30 20 80 43 |...A%=0 |.B%=0 .C|
|00004980| 25 3d 30 0d 15 f4 14 41 | 24 3d a4 70 73 66 6f 72 |%=0....A|$=.psfor|
|00004990| 6d 61 74 28 41 24 29 0d | 15 fe 1b e7 41 24 3c 3e |mat(A$).|....A$<>|
|000049a0| 22 22 20 8c f2 70 73 6a | 75 73 74 69 66 79 28 41 |"" ..psj|ustify(A|
|000049b0| 24 29 0d 16 08 05 e1 0d | 16 12 12 dd a4 70 73 66 |$)......|.....psf|
|000049c0| 6f 72 6d 61 74 28 41 24 | 29 0d 16 1c 05 f5 0d 16 |ormat(A$|).......|
|000049d0| 26 35 c8 99 26 34 30 30 | 38 35 2c 2c 41 24 2c 28 |&5..&400|85,,A$,(|
|000049e0| 72 63 6f 6c 25 2d 6c 63 | 6f 6c 25 29 2a 34 30 30 |rcol%-lc|ol%)*400|
|000049f0| 2c 30 2c 33 32 2c 31 45 | 38 20 b8 20 2c 2c 2c 2c |,0,32,1E|8 . ,,,,|
|00004a00| 2c 4c 25 0d 16 30 31 e7 | 4c 25 3c a9 41 24 8c f2 |,L%..01.|L%<.A$..|
|00004a10| 72 6a 75 73 74 69 66 79 | 28 c0 41 24 2c 4c 25 29 |rjustify|(.A$,L%)|
|00004a20| 29 3a 41 24 3d c1 41 24 | 2c 4c 25 2b 32 29 3a 4c |):A$=.A$|,L%+2):L|
|00004a30| 25 3d 2d 31 0d 16 3a 0a | fd 4c 25 3e 3d 30 0d 16 |%=-1..:.|.L%>=0..|
|00004a40| 44 07 3d 41 24 0d 16 4e | 12 dd f2 72 6a 75 73 74 |D.=A$..N|...rjust|
|00004a50| 69 66 79 28 41 24 29 0d | 16 58 12 ec 72 63 6f 6c |ify(A$).|.X..rcol|
|00004a60| 25 2c 79 63 6f 6f 72 64 | 25 0d 16 62 22 c8 99 26 |%,ycoord|%..b"..&|
|00004a70| 34 30 30 38 36 2c 2c 41 | 24 2c 26 31 31 2c 6c 63 |40086,,A|$,&11,lc|
|00004a80| 6f 6c 25 2c 79 63 6f 6f | 72 64 25 0d 16 6c 0e f2 |ol%,ycoo|rd%..l..|
|00004a90| 70 73 6e 65 77 6c 69 6e | 65 0d 16 76 05 e1 0d 16 |psnewlin|e..v....|
|00004aa0| 80 13 dd f2 70 73 6a 75 | 73 74 69 66 79 28 41 24 |....psju|stify(A$|
|00004ab0| 29 0d 16 8a 22 c8 99 26 | 34 30 30 38 36 2c 2c 41 |)..."..&|40086,,A|
|00004ac0| 24 2c 26 31 30 2c 6c 63 | 6f 6c 25 2c 79 63 6f 6f |$,&10,lc|ol%,ycoo|
|00004ad0| 72 64 25 0d 16 94 0e f2 | 70 73 6e 65 77 6c 69 6e |rd%.....|psnewlin|
|00004ae0| 65 0d 16 9e 05 e1 0d 16 | a8 14 dd f2 70 73 74 61 |e.......|....psta|
|00004af0| 62 28 41 24 2c 74 61 62 | 25 29 0d 16 b2 0e ea 57 |b(A$,tab|%).....W|
|00004b00| 25 2c 20 74 79 70 65 25 | 0d 16 bc 28 c8 99 26 34 |%, type%|...(..&4|
|00004b10| 30 30 38 35 2c 2c 41 24 | 2c 31 45 38 2c 31 45 38 |0085,,A$|,1E8,1E8|
|00004b20| 2c 2d 31 2c 31 45 38 20 | b8 20 2c 2c 57 25 20 3a |,-1,1E8 |. ,,W% :|
|00004b30| 0d 16 c6 12 ec 30 2c 79 | 63 6f 6f 72 64 25 2b 79 |.....0,y|coord%+y|
|00004b40| 30 25 0d 16 d0 15 ec 31 | 32 38 30 2c 79 63 6f 6f |0%.....1|280,ycoo|
|00004b50| 72 64 25 2b 79 31 25 0d | 16 da 12 e7 57 25 81 34 |rd%+y1%.|....W%.4|
|00004b60| 30 30 3e 31 32 30 30 20 | 8c 0d 16 e4 12 ec 72 63 |00>1200 |......rc|
|00004b70| 6f 6c 25 2c 79 63 6f 6f | 72 64 25 0d 16 ee 0d 74 |ol%,ycoo|rd%....t|
|00004b80| 79 70 65 25 3d 26 31 31 | 0d 16 f8 05 cc 0d 17 02 |ype%=&11|........|
|00004b90| 0d 74 79 70 65 25 3d 26 | 31 30 0d 17 0c 05 cd 0d |.type%=&|10......|
|00004ba0| 17 16 23 c8 99 26 34 30 | 30 38 36 2c 2c 41 24 2c |..#..&40|086,,A$,|
|00004bb0| 74 79 70 65 25 2c 74 61 | 62 25 2c 79 63 6f 6f 72 |type%,ta|b%,ycoor|
|00004bc0| 64 25 0d 17 20 05 e1 0d | 17 2a 0f dd f2 70 73 6e |d%.. ...|.*...psn|
|00004bd0| 65 77 6c 69 6e 65 0d 17 | 34 18 79 63 6f 6f 72 64 |ewline..|4.ycoord|
|00004be0| 25 20 2d 3d 20 79 31 25 | 2d 79 30 25 2b 34 0d 17 |% -= y1%|-y0%+4..|
|00004bf0| 3e 05 e1 0d 17 48 09 dd | f2 63 6c 73 0d 17 52 1d |>....H..|.cls..R.|
|00004c00| ef 32 33 2c 32 35 2c 33 | 2c 32 2c 34 2c 36 2c 38 |.23,25,3|,2,4,6,8|
|00004c10| 2c 31 30 2c 31 32 2c 31 | 34 0d 17 5c 28 ef 32 33 |,10,12,1|4..\(.23|
|00004c20| 2c 32 35 2c 26 38 38 2c | 39 2c 26 33 30 2c 26 46 |,25,&88,|9,&30,&F|
|00004c30| 30 2c 26 46 30 2c 26 33 | 30 2c 26 33 30 2c 26 33 |0,&F0,&3|0,&30,&3|
|00004c40| 30 0d 17 66 0f 79 63 6f | 6f 72 64 25 3d 35 33 32 |0..f.yco|ord%=532|
|00004c50| 0d 17 70 08 fb 26 38 38 | 0d 17 7a 05 db 0d 17 84 |..p..&88|..z.....|
|00004c60| 05 87 0d 17 8e 18 ef 31 | 39 2c 30 2c 32 34 2c 26 |.......1|9,0,24,&|
|00004c70| 33 30 2c 26 46 30 2c 26 | 46 30 0d 17 98 05 e1 0d |30,&F0,&|F0......|
|00004c80| 17 a2 0c dd f2 6d 6f 64 | 65 31 32 0d 17 ac 06 ef |.....mod|e12.....|
|00004c90| 36 0d 17 b6 07 eb 31 32 | 0d 17 c0 05 87 0d 17 ca |6.....12|........|
|00004ca0| 1d ef 32 33 2c 32 35 2c | 33 2c 32 2c 34 2c 36 2c |..23,25,|3,2,4,6,|
|00004cb0| 38 2c 31 30 2c 31 32 2c | 31 34 0d 17 d4 28 ef 32 |8,10,12,|14...(.2|
|00004cc0| 33 2c 32 35 2c 26 38 38 | 2c 39 2c 26 33 30 2c 26 |3,25,&88|,9,&30,&|
|00004cd0| 46 30 2c 26 46 30 2c 26 | 33 30 2c 26 33 30 2c 26 |F0,&F0,&|30,&30,&|
|00004ce0| 33 30 0d 17 de 0f 79 63 | 6f 6f 72 64 25 3d 39 35 |30....yc|oord%=95|
|00004cf0| 30 0d 17 e8 08 fb 26 38 | 38 0d 17 f2 05 db 0d 17 |0.....&8|8.......|
|00004d00| fc 18 ef 31 39 2c 30 2c | 32 34 2c 26 33 30 2c 26 |...19,0,|24,&30,&|
|00004d10| 46 30 2c 26 46 30 0d 18 | 06 05 e1 0d 18 10 12 dd |F0,&F0..|........|
|00004d20| f2 70 73 63 65 6e 74 72 | 65 28 41 24 29 0d 18 1a |.pscentr|e(A$)...|
|00004d30| 07 ea 57 25 0d 18 24 28 | c8 99 26 34 30 30 38 35 |..W%..$(|..&40085|
|00004d40| 2c 2c 41 24 2c 31 45 38 | 2c 31 45 38 2c 2d 31 2c |,,A$,1E8|,1E8,-1,|
|00004d50| 31 45 38 20 b8 20 2c 2c | 57 25 20 3a 0d 18 2e 12 |1E8 . ,,|W% :....|
|00004d60| ec 30 2c 79 63 6f 6f 72 | 64 25 2b 79 30 25 0d 18 |.0,ycoor|d%+y0%..|
|00004d70| 38 15 ec 31 32 38 30 2c | 79 63 6f 6f 72 64 25 2b |8..1280,|ycoord%+|
|00004d80| 79 31 25 0d 18 42 27 c8 | 99 26 34 30 30 38 36 2c |y1%..B'.|.&40086,|
|00004d90| 2c 41 24 2c 26 31 30 2c | 36 34 30 2d 57 25 81 38 |,A$,&10,|640-W%.8|
|00004da0| 30 30 2c 79 63 6f 6f 72 | 64 25 0d 18 4c 05 e1 0d |00,ycoor|d%..L...|
|00004db0| 18 56 0d dd f2 70 73 73 | 70 61 63 65 0d 18 60 0a |.V...pss|pace..`.|
|00004dc0| 2a 46 58 20 31 35 0d 18 | 6a 0e 79 63 6f 6f 72 64 |*FX 15..|j.ycoord|
|00004dd0| 25 3d 33 32 0d 18 74 20 | f2 70 73 63 65 6e 74 72 |%=32..t |.pscentr|
|00004de0| 65 28 22 50 72 65 73 73 | 20 53 50 41 43 45 20 62 |e("Press| SPACE b|
|00004df0| 61 72 22 29 0d 18 7e 0b | f5 fd be 3d 22 20 22 0d |ar")..~.|...=" ".|
|00004e00| 18 88 05 e1 0d 18 92 16 | dd a4 73 75 62 28 41 24 |........|..sub(A$|
|00004e10| 2c 70 6f 73 2c 43 24 29 | 20 3a 0d 18 9c 1d 3d c0 |,pos,C$)| :....=.|
|00004e20| 41 24 2c 70 6f 73 2d 31 | 29 2b 43 24 2b c1 41 24 |A$,pos-1|)+C$+.A$|
|00004e30| 2c 70 6f 73 2b 31 29 0d | ff                      |,pos+1).|.       |
+--------+-------------------------+-------------------------+--------+--------+