SB LES 2
FILE INFORMATION
FILENAME(S): SB LES 2
FILE TYPE(S): PRG
FILE SIZE: 7.3K
FIRST SEEN: 2025-12-02 02:15:01
APPEARS ON: 1 disk(s)
FILE HASH
40906123dcf58bbb4fbf170639f6bef4c46a682198b06bf3897db28f46276679
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HOPE YOU GAMES | SB LES 2 | PRG | The BAM Archive | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 05 00 9C 3A 99 22 93 9E 22 3B 3A 97 |.. ....:."..";:.|
00000010: 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 |53280,0:.53281,0|
00000020: 00 2B 08 0A 00 64 01 20 30 2C 31 00 38 08 0F 00 |.+...d. 0,1.8...|
00000030: 41 24 B2 C7 28 33 34 29 00 5D 08 14 00 64 6F 20 |A$..(34).]...do |
00000040: 39 35 2C 35 30 2C 22 01 53 42 2D 4C 45 53 20 02 |95,50,".SB-LES .|
00000050: 44 45 45 4C 20 32 22 2C 31 2C 32 2C 38 00 7A 08 |DEEL 2",1,2,8.z.|
00000060: 1E 00 64 6F 20 31 32 35 2C 31 30 30 2C 22 02 44 |..do 125,100,".D|
00000070: 4F 4F 52 22 2C 31 2C 32 2C 38 00 8A 08 28 00 81 |OOR",1,2,8...(..|
00000080: 58 B2 31 A4 31 30 30 30 3A 82 00 A7 08 32 00 64 |X.1.1000:....2.d|
00000090: 6F 20 31 32 33 2C 31 35 30 2C 22 01 4B 4F 45 4E |o 123,150,".KOEN|
000000A0: 22 2C 31 2C 32 2C 39 00 B3 08 33 00 64 66 20 32 |",1,2,9...3.df 2|
000000B0: 3A 64 67 00 D6 08 37 00 99 22 93 49 4E 20 44 45 |:dg...7..".IN DE|
000000C0: 45 4C 20 32 20 42 45 47 49 4E 4E 45 4E 20 57 45 |EL 2 BEGINNEN WE|
000000D0: 20 4D 45 54 3A 22 00 F7 08 38 00 99 22 11 1D 1D | MET:"...8.."...|
000000E0: 1D 1D 1D 53 54 52 49 4E 47 2D 4D 41 4E 49 50 55 |...STRING-MANIPU|
000000F0: 4C 41 54 49 45 2E 22 00 1B 09 39 00 99 22 11 1D |LATIE."...9.."..|
00000100: 1D 1D 1D 1D 49 4E 50 55 54 2D 56 45 52 45 45 4E |....INPUT-VEREEN|
00000110: 56 4F 55 44 49 47 49 4E 47 2E 22 00 2D 09 3A 00 |VOUDIGING.".-.:.|
00000120: A1 41 24 3A 8B 41 24 B2 22 22 A7 35 38 00 50 09 |.A$:.A$."".58.P.|
00000130: 3C 00 99 22 93 49 4E 20 44 45 45 4C 20 32 20 42 |<..".IN DEEL 2 B|
00000140: 45 47 49 4E 4E 45 4E 20 57 45 20 4D 45 54 3A 22 |EGINNEN WE MET:"|
00000150: 00 77 09 3D 00 99 22 93 20 20 20 20 20 20 20 20 |.w.=..". |
00000160: 20 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ..............|
00000170: C0 C0 C0 C0 C0 C9 22 00 9D 09 3E 00 99 22 20 20 |......"...>.." |
00000180: 20 20 20 20 20 20 20 20 DD 53 54 52 49 4E 47 2D | .STRING-|
00000190: 4D 41 4E 49 50 55 4C 41 54 49 45 DD 22 00 C3 09 |MANIPULATIE."...|
000001A0: 3F 00 99 22 20 20 20 20 20 20 20 20 20 20 CA C0 |?.." ..|
000001B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000001C0: C0 CB 22 00 EA 09 40 00 99 22 11 11 11 11 11 20 |.."...@.."..... |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 D5 C0 C0 C0 | ....|
000001E0: C0 C0 C0 C0 C0 C0 C0 C0 C9 22 00 0C 0A 41 00 99 |........."...A..|
000001F0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 44 |" .D|
00000200: 52 55 4B 20 52 45 54 55 52 4E DD 22 00 2E 0A 42 |RUK RETURN."...B|
00000210: 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
00000220: CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 56 |.............".V|
00000230: 0A 43 00 99 22 11 11 11 11 11 20 20 20 20 20 20 |.C.."..... |
00000240: 20 20 20 20 20 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ..........|
00000250: C0 C0 C0 C0 C9 22 00 79 0A 44 00 99 22 20 20 20 |.....".y.D.." |
00000260: 20 20 20 20 20 20 20 20 20 DD 56 4F 4F 52 20 20 | .VOOR |
00000270: 56 45 52 56 4F 4C 47 DD 22 00 9C 0A 45 00 99 22 |VERVOLG."...E.."|
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 CA C0 C0 C0 | ....|
00000290: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 B2 0A 46 |..........."...F|
000002A0: 00 A1 41 24 3A 8B 41 24 B2 C7 28 31 33 29 A7 31 |..A$:.A$..(13).1|
000002B0: 31 30 00 BA 0A 47 00 89 37 30 00 CC 0A 6E 00 99 |10...G..70...n..|
000002C0: 22 93 12 20 20 20 20 20 20 20 20 22 00 DD 0A 78 |".. "...x|
000002D0: 00 99 22 12 20 49 4E 53 45 52 54 20 22 00 EE 0A |..". INSERT "...|
000002E0: 82 00 99 22 12 20 20 20 20 20 20 20 20 22 00 23 |...". ".#|
000002F0: 0B 8C 00 99 22 11 46 4F 52 4D 41 54 3A 20 12 20 |....".FORMAT: . |
00000300: 49 4E 53 45 52 54 20 28 22 3B C7 28 33 34 29 3B |INSERT (";.(34);|
00000310: 22 53 55 42 53 54 52 22 3B C7 28 33 34 29 3B 22 |"SUBSTR";.(34);"|
00000320: 2C 22 3B 00 45 0B 96 00 99 C7 28 33 34 29 3B 22 |,";.E.....(34);"|
00000330: 48 4F 4F 46 44 53 54 52 22 3B C7 28 33 34 29 3B |HOOFDSTR";.(34);|
00000340: 22 2C 50 29 22 00 74 0B A0 00 99 22 11 2D 4F 4D |",P)".t....".-OM|
00000350: 20 45 45 4E 20 53 54 52 49 4E 47 20 49 4E 20 45 | EEN STRING IN E|
00000360: 45 4E 20 41 4E 44 45 52 45 20 53 54 52 49 4E 47 |EN ANDERE STRING|
00000370: 20 54 45 22 00 AA 0B AA 00 99 22 49 4E 54 45 47 | TE"......"INTEG|
00000380: 52 45 52 45 4E 20 56 41 4E 41 46 20 50 4C 41 41 |REREN VANAF PLAA|
00000390: 54 53 20 50 20 49 4E 20 44 45 20 48 4F 4F 46 44 |TS P IN DE HOOFD|
000003A0: 2D 20 20 53 54 52 49 4E 47 22 00 BE 0B B4 00 99 |- STRING"......|
000003B0: 22 11 2D 56 4F 4F 52 42 45 45 4C 44 3A 22 00 E5 |".-VOORBEELD:"..|
000003C0: 0B BE 00 99 22 11 31 39 38 33 20 41 24 3D 22 3B |....".1983 A$=";|
000003D0: C7 28 33 34 29 3B 22 4F 50 20 45 45 4E 20 22 3B |.(34);"OP EEN ";|
000003E0: C7 28 33 34 29 00 0C 0C C8 00 99 22 31 39 38 34 |.(34)......"1984|
000003F0: 20 42 24 3D 22 3B C7 28 33 34 29 3B 22 56 49 45 | B$=";.(34);"VIE|
00000400: 52 20 52 49 4A 22 3B C7 28 33 34 29 00 2D 0C D2 |R RIJ";.(34).-..|
00000410: 00 99 22 31 39 38 35 20 50 52 49 4E 54 49 4E 53 |.."1985 PRINTINS|
00000420: 45 52 54 28 41 24 2C 42 24 2C 35 29 22 00 3D 0C |ERT(A$,B$,5)".=.|
00000430: DC 00 99 22 31 39 38 36 20 45 4E 44 22 00 4C 0C |..."1986 END".L.|
00000440: E6 00 99 22 11 2D 47 45 45 46 54 22 00 64 0C F0 |...".-GEEFT".d..|
00000450: 00 99 22 11 56 49 45 52 20 4F 50 20 45 45 4E 20 |..".VIER OP EEN |
00000460: 52 49 4A 22 00 77 0C FA 00 A1 41 24 3A 8B 41 24 |RIJ".w....A$:.A$|
00000470: B2 22 22 A7 32 35 30 00 87 0C 04 01 99 22 93 12 |."".250......"..|
00000480: 20 20 20 20 20 20 22 00 96 0C 0E 01 99 22 12 20 | "......". |
00000490: 49 4E 53 54 20 22 00 A5 0C 18 01 99 22 12 20 20 |INST "......". |
000004A0: 20 20 20 20 22 00 E8 0C 22 01 99 22 11 46 4F 52 | "..."..".FOR|
000004B0: 4D 41 54 3A 20 12 20 49 4E 53 54 28 22 3B C7 28 |MAT: . INST(";.(|
000004C0: 33 34 29 3B 22 53 55 42 53 54 52 22 3B C7 28 33 |34);"SUBSTR";.(3|
000004D0: 34 29 3B 22 2C 22 3B C7 28 33 34 29 3B 22 48 4F |4);",";.(34);"HO|
000004E0: 4F 46 44 53 54 52 22 3B 00 F9 0C 2C 01 99 C7 28 |OFDSTR";...,...(|
000004F0: 33 34 29 3B 22 2C 50 29 22 00 27 0D 36 01 99 22 |34);",P)".'.6.."|
00000500: 11 2D 4F 4D 20 45 45 4E 20 53 55 42 53 54 52 20 |.-OM EEN SUBSTR |
00000510: 4F 56 45 52 20 45 45 4E 20 48 4F 46 44 53 54 52 |OVER EEN HOFDSTR|
00000520: 49 4E 47 20 54 45 22 00 56 0D 40 01 99 22 53 43 |ING TE".V.@.."SC|
00000530: 48 52 49 4A 56 45 4E 20 56 41 4E 41 46 20 45 45 |HRIJVEN VANAF EE|
00000540: 4E 20 42 45 50 41 41 4C 44 45 20 50 4C 41 41 54 |N BEPAALDE PLAAT|
00000550: 53 20 28 50 29 22 00 70 0D 4A 01 99 22 49 4E 20 |S (P)".p.J.."IN |
00000560: 44 45 20 48 4F 4F 46 44 53 54 52 49 4E 47 2E 22 |DE HOOFDSTRING."|
00000570: 00 84 0D 54 01 99 22 11 2D 56 4F 4F 52 42 45 45 |...T..".-VOORBEE|
00000580: 4C 44 3A 22 00 A9 0D 5E 01 99 22 11 31 39 38 34 |LD:"...^..".1984|
00000590: 20 41 24 3D 22 3B C7 28 33 34 29 3B 22 42 45 54 | A$=";.(34);"BET|
000005A0: 45 52 22 3B C7 28 33 34 29 00 DB 0D 68 01 99 22 |ER";.(34)...h.."|
000005B0: 31 39 38 35 20 42 24 3D 22 3B C7 28 33 34 29 3B |1985 B$=";.(34);|
000005C0: 22 56 49 45 52 20 4F 50 20 52 49 4A 20 49 53 20 |"VIER OP RIJ IS |
000005D0: 47 4F 45 44 22 3B C7 28 33 34 29 00 FB 0D 72 01 |GOED";.(34)...r.|
000005E0: 99 22 31 39 38 36 20 50 52 49 4E 54 49 4E 53 54 |."1986 PRINTINST|
000005F0: 28 41 24 2C 42 24 2C 31 36 29 22 00 0B 0E 7C 01 |(A$,B$,16)"...|.|
00000600: 99 22 31 39 38 37 20 45 4E 44 22 00 1B 0E 86 01 |."1987 END".....|
00000610: 99 22 11 2D 47 45 45 46 54 3A 22 00 3C 0E 90 01 |.".-GEEFT:".<...|
00000620: 99 22 11 56 49 45 52 20 4F 50 20 45 45 4E 20 52 |.".VIER OP EEN R|
00000630: 49 4A 20 49 53 20 42 45 54 45 52 22 00 4F 0E 9A |IJ IS BETER".O..|
00000640: 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 31 30 00 |..A$:.A$."".410.|
00000650: 60 0E A4 01 99 22 93 12 20 20 20 20 20 20 20 22 |`....".. "|
00000660: 00 70 0E AE 01 99 22 12 20 50 4C 41 43 45 20 22 |.p....". PLACE "|
00000670: 00 80 0E B8 01 99 22 12 20 20 20 20 20 20 20 22 |......". "|
00000680: 00 BA 0E C2 01 99 22 11 46 4F 52 4D 41 54 3A 20 |......".FORMAT: |
00000690: 12 20 50 4C 41 43 45 20 28 22 3B C7 28 33 34 29 |. PLACE (";.(34)|
000006A0: 3B 22 53 55 42 53 54 52 22 3B C7 28 33 34 29 3B |;"SUBSTR";.(34);|
000006B0: 22 2C 22 3B C7 28 33 34 29 3B 00 D4 0E CC 01 99 |",";.(34);......|
000006C0: 22 48 4F 4F 46 44 53 54 52 22 3B C7 28 33 34 29 |"HOOFDSTR";.(34)|
000006D0: 3B 22 29 22 00 00 0F D6 01 99 22 11 2D 4F 4D 20 |;")"......".-OM |
000006E0: 44 45 20 50 4C 41 41 54 53 20 56 41 4E 20 45 45 |DE PLAATS VAN EE|
000006F0: 4E 20 53 55 42 53 54 52 20 49 4E 20 45 45 4E 22 |N SUBSTR IN EEN"|
00000700: 00 1C 0F E0 01 99 22 48 4F 4F 46 44 53 54 52 20 |......"HOOFDSTR |
00000710: 54 45 20 42 45 50 41 4C 45 4E 2E 22 00 30 0F EA |TE BEPALEN.".0..|
00000720: 01 99 22 11 2D 56 4F 4F 52 42 45 45 4C 44 3A 22 |..".-VOORBEELD:"|
00000730: 00 5F 0F F4 01 99 22 11 31 39 38 34 20 41 24 3D |._....".1984 A$=|
00000740: 22 3B C7 28 33 34 29 3B 22 56 49 45 52 20 4F 50 |";.(34);"VIER OP|
00000750: 20 45 45 4E 20 52 49 4A 22 3B C7 28 33 34 29 00 | EEN RIJ";.(34).|
00000760: 8C 0F FE 01 99 22 31 39 38 35 20 41 3D 50 4C 41 |....."1985 A=PLA|
00000770: 43 45 28 22 3B C7 28 33 34 29 3B 22 4F 50 22 3B |CE(";.(34);"OP";|
00000780: C7 28 33 34 29 3B 22 2C 41 24 29 22 00 A3 0F 08 |.(34);",A$)"....|
00000790: 02 99 22 31 39 38 36 20 50 52 49 4E 54 41 3A 45 |.."1986 PRINTA:E|
000007A0: 4E 44 22 00 B3 0F 12 02 99 22 11 2D 47 45 45 46 |ND"......".-GEEF|
000007B0: 54 3A 22 00 BD 0F 1C 02 99 22 11 36 22 00 D0 0F |T:"......".6"...|
000007C0: 26 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 35 35 30 |&..A$:.A$."".550|
000007D0: 00 DF 0F 30 02 99 22 93 12 20 20 20 20 20 22 00 |...0..".. ".|
000007E0: ED 0F 3A 02 99 22 12 20 44 55 50 20 22 00 FB 0F |..:..". DUP "...|
000007F0: 44 02 99 22 12 20 20 20 20 20 22 00 2E 10 4E 02 |D..". "...N.|
00000800: 99 22 11 46 4F 52 4D 41 54 3A 20 12 20 44 55 50 |.".FORMAT: . DUP|
00000810: 20 28 22 3B C7 28 33 34 29 3B 22 53 54 52 49 4E | (";.(34);"STRIN|
00000820: 47 22 3B C7 28 33 34 29 3B 22 2C 4E 29 22 00 57 |G";.(34);",N)".W|
00000830: 10 58 02 99 22 11 2D 4F 4D 20 45 45 4E 20 47 45 |.X..".-OM EEN GE|
00000840: 47 45 56 45 4E 20 53 54 52 49 4E 47 20 4E 20 4B |GEVEN STRING N K|
00000850: 45 45 52 20 54 45 22 00 6A 10 62 02 99 22 44 55 |EER TE".j.b.."DU|
00000860: 50 4C 49 43 45 52 45 4E 2E 22 00 7E 10 6C 02 99 |PLICEREN.".~.l..|
00000870: 22 11 2D 56 4F 4F 52 42 45 45 4C 44 3A 22 00 AE |".-VOORBEELD:"..|
00000880: 10 76 02 99 22 11 31 39 38 34 20 41 24 3D 44 55 |.v..".1984 A$=DU|
00000890: 50 20 28 22 3B C7 28 33 34 29 3B 22 48 49 45 50 |P (";.(34);"HIEP|
000008A0: 2D 22 3B C7 28 33 34 29 3B 22 2C 33 29 22 00 D5 |-";.(34);",3)"..|
000008B0: 10 80 02 99 22 31 39 38 35 20 42 24 3D 22 3B C7 |...."1985 B$=";.|
000008C0: 28 33 34 29 3B 22 48 4F 45 52 41 21 21 21 22 3B |(34);"HOERA!!!";|
000008D0: C7 28 33 34 29 00 F1 10 8A 02 99 22 31 39 38 36 |.(34)......"1986|
000008E0: 20 43 24 3D 41 24 2B 42 24 3A 50 52 49 4E 54 43 | C$=A$+B$:PRINTC|
000008F0: 24 00 01 11 94 02 99 22 11 2D 47 45 45 46 54 3A |$......".-GEEFT:|
00000900: 22 00 21 11 9E 02 99 22 11 48 49 45 50 2D 48 49 |".!....".HIEP-HI|
00000910: 45 50 2D 48 49 45 50 2D 48 4F 45 52 41 21 21 21 |EP-HIEP-HOERA!!!|
00000920: 22 00 34 11 A8 02 A1 41 24 3A 8B 41 24 B2 22 22 |".4....A$:.A$.""|
00000930: A7 36 38 30 00 46 11 B2 02 99 22 93 12 20 20 20 |.680.F....".. |
00000940: 20 20 20 20 20 22 00 57 11 BC 02 99 22 12 20 43 | ".W....". C|
00000950: 45 4E 54 52 45 20 22 00 68 11 C6 02 99 22 12 20 |ENTRE ".h....". |
00000960: 20 20 20 20 20 20 20 22 00 9B 11 D0 02 99 22 11 | "......".|
00000970: 46 4F 52 4D 41 54 3A 20 12 20 43 45 4E 54 52 45 |FORMAT: . CENTRE|
00000980: 20 22 3B C7 28 33 34 29 3B 22 53 54 52 49 4E 47 | ";.(34);"STRING|
00000990: 22 3B C7 28 33 34 29 3B 22 20 22 00 CD 11 DA 02 |";.(34);" ".....|
000009A0: 99 22 11 2D 4F 4D 20 45 45 4E 20 47 45 47 45 56 |.".-OM EEN GEGEV|
000009B0: 45 4E 20 53 54 52 49 4E 47 20 49 4E 20 48 45 54 |EN STRING IN HET|
000009C0: 20 4D 49 44 44 45 4E 20 56 41 4E 22 3B 00 F0 11 | MIDDEN VAN";...|
000009D0: E4 02 99 22 45 45 4E 20 53 43 48 45 52 4D 4C 49 |..."EEN SCHERMLI|
000009E0: 4A 4E 20 54 45 20 50 4C 41 41 54 53 45 4E 2E 22 |JN TE PLAATSEN."|
000009F0: 00 1E 12 EE 02 99 22 11 2D 48 49 45 52 56 4F 4F |......".-HIERVOO|
00000A00: 52 20 49 53 20 48 45 54 20 56 4F 4F 52 20 55 20 |R IS HET VOOR U |
00000A10: 4E 49 45 54 20 4E 4F 44 49 47 20 4F 4D 22 00 48 |NIET NODIG OM".H|
00000A20: 12 F8 02 99 22 44 45 20 4C 45 4E 47 54 45 20 56 |...."DE LENGTE V|
00000A30: 41 4E 20 44 45 20 53 54 52 49 4E 47 20 54 45 20 |AN DE STRING TE |
00000A40: 4B 45 4E 4E 45 4E 2E 22 00 5C 12 02 03 99 22 11 |KENNEN.".\....".|
00000A50: 2D 56 4F 4F 52 42 45 45 4C 44 3A 22 00 7F 12 0C |-VOORBEELD:"....|
00000A60: 03 99 22 11 31 39 38 34 20 43 45 4E 54 52 45 20 |..".1984 CENTRE |
00000A70: 22 53 42 AB 4C 45 53 20 44 45 45 4C 20 32 22 00 |"SB.LES DEEL 2".|
00000A80: 8F 12 16 03 99 22 11 2D 47 45 45 46 54 3A 22 00 |.....".-GEEFT:".|
00000A90: A6 12 20 03 64 23 20 22 53 42 2D 4C 45 53 20 44 |.. .d# "SB-LES D|
00000AA0: 45 45 4C 20 32 22 00 B9 12 2A 03 A1 41 24 3A 8B |EEL 2"...*..A$:.|
00000AB0: 41 24 B2 22 22 A7 38 31 30 00 C7 12 34 03 99 22 |A$."".810...4.."|
00000AC0: 93 12 20 20 20 20 22 00 D4 12 3E 03 99 22 12 20 |.. "...>..". |
00000AD0: 41 54 20 22 00 E1 12 48 03 99 22 12 20 20 20 20 |AT "...H..". |
00000AE0: 22 00 1A 13 52 03 99 22 11 46 4F 52 4D 41 54 3A |"...R..".FORMAT:|
00000AF0: 20 12 20 50 52 49 4E 54 20 41 54 28 4B 2C 52 29 | . PRINT AT(K,R)|
00000B00: 22 3B C7 28 33 34 29 3B 22 53 54 52 49 4E 47 22 |";.(34);"STRING"|
00000B10: 3B C7 28 33 34 29 3B 22 20 22 00 47 13 5C 03 99 |;.(34);" ".G.\..|
00000B20: 22 11 2D 4F 4D 20 45 45 4E 20 53 54 52 49 4E 47 |".-OM EEN STRING|
00000B30: 20 54 45 20 50 52 49 4E 54 45 4E 20 4F 50 20 44 | TE PRINTEN OP D|
00000B40: 45 20 4B 2D 44 45 22 00 73 13 66 03 99 22 4B 4F |E K-DE".s.f.."KO|
00000B50: 4C 4F 4D 20 45 4E 20 44 45 20 52 2D 44 45 20 52 |LOM EN DE R-DE R|
00000B60: 49 4A 20 56 41 4E 20 48 45 54 20 53 43 48 45 52 |IJ VAN HET SCHER|
00000B70: 4D 2E 22 00 87 13 70 03 99 22 11 2D 56 4F 4F 52 |M."...p..".-VOOR|
00000B80: 42 45 45 4C 44 3A 22 00 BB 13 7A 03 99 22 11 31 |BEELD:"...z..".1|
00000B90: 39 38 34 20 50 52 49 4E 54 20 41 54 28 31 30 2C |984 PRINT AT(10,|
00000BA0: 32 30 29 22 3B C7 28 33 34 29 3B 22 53 55 50 45 |20)";.(34);"SUPE|
00000BB0: 52 4D 41 4E 22 3B C7 28 33 34 29 00 CB 13 84 03 |RMAN";.(34).....|
00000BC0: 99 22 11 2D 47 45 45 46 54 3A 22 00 E4 13 8E 03 |.".-GEEFT:".....|
00000BD0: 99 20 64 28 31 30 2C 32 30 29 22 53 55 50 45 52 |. d(10,20)"SUPER|
00000BE0: 4D 41 4E 22 00 F7 13 98 03 99 22 20 20 20 20 20 |MAN"......" |
00000BF0: 20 20 20 20 20 5E 22 00 0D 14 A2 03 99 22 20 20 | ^"......" |
00000C00: 20 20 20 20 20 28 31 30 2C 32 30 29 22 00 20 14 | (10,20)". .|
00000C10: AC 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 39 34 30 |...A$:.A$."".940|
00000C20: 00 2F 14 B6 03 99 22 93 12 20 20 20 20 20 22 00 |./....".. ".|
00000C30: 3D 14 C0 03 99 22 12 20 55 53 45 20 22 00 4B 14 |=....". USE ".K.|
00000C40: CA 03 99 22 12 20 20 20 20 20 22 00 8C 14 D4 03 |...". ".....|
00000C50: 99 22 11 46 4F 52 4D 41 54 3A 20 12 20 55 53 45 |.".FORMAT: . USE|
00000C60: 22 3B C7 28 33 34 29 3B 22 23 20 23 20 23 2E 23 |";.(34);"# # #.#|
00000C70: 20 23 20 23 20 23 20 23 22 3B C7 28 33 34 29 3B | # # # #";.(34);|
00000C80: 22 2C 53 56 3A 50 52 49 4E 54 20 22 00 BB 14 DE |",SV:PRINT "....|
00000C90: 03 99 22 11 2D 4F 4D 20 47 45 54 41 4C 4C 45 4E |..".-OM GETALLEN|
00000CA0: 20 54 45 20 46 4F 52 4D 41 54 45 52 45 4E 2E 28 | TE FORMATEREN.(|
00000CB0: 45 52 20 49 53 20 47 45 45 4E 22 00 E6 14 E8 03 |ER IS GEEN".....|
00000CC0: 99 22 53 50 41 54 49 45 20 4E 4F 44 49 47 20 54 |."SPATIE NODIG T|
00000CD0: 55 53 53 45 4E 20 44 45 20 48 41 53 48 2D 54 45 |USSEN DE HASH-TE|
00000CE0: 4B 45 4E 53 29 22 00 17 15 FC 03 99 22 2D 48 45 |KENS)"......"-HE|
00000CF0: 54 20 41 41 4E 54 41 4C 20 48 41 53 48 2D 54 45 |T AANTAL HASH-TE|
00000D00: 4B 45 4E 53 20 47 45 45 46 54 20 48 45 54 20 41 |KENS GEEFT HET A|
00000D10: 41 4E 54 41 4C 22 3B 00 40 15 06 04 99 22 47 45 |ANTAL";.@...."GE|
00000D20: 54 41 4C 4C 45 4E 20 41 41 4E 20 56 4F 4F 52 20 |TALLEN AAN VOOR |
00000D30: 45 4E 20 4E 41 20 44 45 20 4B 4F 4D 4D 41 2E 22 |EN NA DE KOMMA."|
00000D40: 00 70 15 10 04 99 22 11 2D 53 56 20 47 45 45 46 |.p....".-SV GEEF|
00000D50: 54 20 44 45 20 53 54 52 49 4E 47 56 41 52 49 41 |T DE STRINGVARIA|
00000D60: 42 45 4C 45 20 41 41 4E 20 57 41 41 52 49 4E 22 |BELE AAN WAARIN"|
00000D70: 00 98 15 1A 04 99 22 57 41 41 52 49 4E 20 48 45 |......"WAARIN HE|
00000D80: 54 20 47 45 54 41 4C 20 5A 49 54 20 4F 50 47 45 |T GETAL ZIT OPGE|
00000D90: 53 4C 41 47 45 4E 2E 22 00 AC 15 24 04 99 22 11 |SLAGEN."...$..".|
00000DA0: 2D 56 4F 4F 52 42 45 45 4C 44 3A 22 00 CC 15 2E |-VOORBEELD:"....|
00000DB0: 04 99 22 11 31 39 38 34 20 41 24 3D 53 54 52 24 |..".1984 A$=STR$|
00000DC0: 28 52 4E 44 28 31 29 2A 32 35 39 29 00 00 16 38 |(RND(1)*259)...8|
00000DD0: 04 99 22 31 39 38 35 20 55 53 45 20 22 3B C7 28 |.."1985 USE ";.(|
00000DE0: 33 34 29 3B 22 24 23 23 23 2E 23 23 43 22 3B C7 |34);"$###.##C";.|
00000DF0: 28 33 34 29 3B 22 2C 41 24 3A 50 52 49 4E 54 22 |(34);",A$:PRINT"|
00000E00: 00 1E 16 42 04 99 22 11 2D 47 45 45 46 54 20 42 |...B..".-GEEFT B|
00000E10: 49 4A 56 4F 4F 52 42 45 45 4C 44 3A 11 22 00 31 |IJVOORBEELD:.".1|
00000E20: 16 47 04 41 24 B2 C4 28 BB 28 31 29 AC 32 35 39 |.G.A$..(.(1).259|
00000E30: 29 00 48 16 4C 04 64 2C 20 22 24 23 23 23 2E 23 |).H.L.d, "$###.#|
00000E40: 23 43 22 2C 41 24 3A 99 00 5D 16 51 04 99 22 11 |#C",A$:..].Q..".|
00000E50: 4E 4F 47 20 45 45 4E 53 20 4A 2F 4E 22 00 7B 16 |NOG EENS J/N".{.|
00000E60: 56 04 A1 41 24 3A 8B 41 24 B2 22 4A 22 A7 99 22 |V..A$:.A$."J".."|
00000E70: 91 91 91 91 22 3A 89 31 30 39 35 00 8D 16 5B 04 |....":.1095...[.|
00000E80: 8B 41 24 B3 B1 22 4E 22 A7 31 31 31 30 00 B5 16 |.A$.."N".1110...|
00000E90: 60 04 99 22 93 20 20 20 20 20 20 20 20 D5 C0 C0 |`..". ...|
00000EA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000EB0: C0 C0 C0 C9 22 00 DC 16 6A 04 99 22 20 20 20 20 |...."...j.." |
00000EC0: 20 20 20 20 DD 49 4E 50 55 54 20 56 45 52 45 45 | .INPUT VEREE|
00000ED0: 4E 56 4F 55 44 49 47 49 4E 47 DD 22 00 03 17 74 |NVOUDIGING."...t|
00000EE0: 04 99 22 20 20 20 20 20 20 20 20 CA C0 C0 C0 C0 |.." .....|
00000EF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000F00: C0 CB 22 00 2A 17 7E 04 99 22 11 11 11 11 11 20 |..".*.~.."..... |
00000F10: 20 20 20 20 20 20 20 20 20 20 20 20 D5 C0 C0 C0 | ....|
00000F20: C0 C0 C0 C0 C0 C0 C0 C0 C9 22 00 4C 17 88 04 99 |.........".L....|
00000F30: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 44 |" .D|
00000F40: 52 55 4B 20 52 45 54 55 52 4E DD 22 00 6E 17 92 |RUK RETURN.".n..|
00000F50: 04 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
00000F60: CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 96 |............."..|
00000F70: 17 9C 04 99 22 11 11 11 11 11 20 20 20 20 20 20 |...."..... |
00000F80: 20 20 20 20 20 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ..........|
00000F90: C0 C0 C0 C0 C9 22 00 B9 17 A6 04 99 22 20 20 20 |....."......" |
00000FA0: 20 20 20 20 20 20 20 20 20 DD 56 4F 4F 52 20 20 | .VOOR |
00000FB0: 56 45 52 56 4F 4C 47 DD 22 00 DC 17 B0 04 99 22 |VERVOLG."......"|
00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 CA C0 C0 C0 | ....|
00000FD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 F3 17 BA |..........."....|
00000FE0: 04 A1 41 24 3A 8B 41 24 B2 C7 28 31 33 29 A7 31 |..A$:.A$..(13).1|
00000FF0: 32 33 30 00 FD 17 C4 04 89 31 32 31 30 00 0E 18 |230......1210...|
00001000: CE 04 99 22 93 12 20 20 20 20 20 20 20 22 00 1E |...".. "..|
00001010: 18 D8 04 99 22 12 20 46 45 54 43 48 20 22 00 2E |....". FETCH "..|
00001020: 18 E2 04 99 22 12 20 20 20 20 20 20 20 22 00 6D |....". ".m|
00001030: 18 EC 04 99 22 11 46 4F 52 4D 41 54 3A 20 12 20 |....".FORMAT: . |
00001040: 46 45 54 43 48 22 3B C7 28 33 34 29 3B 22 43 4B |FETCH";.(34);"CK|
00001050: 22 3B C7 28 33 34 29 3B 22 2C 49 2C 53 54 52 49 |";.(34);",I,STRI|
00001060: 4E 47 56 41 52 49 41 42 45 4C 45 20 22 00 9C 18 |NGVARIABELE "...|
00001070: F6 04 99 22 11 2D 4D 45 54 20 46 45 54 43 48 20 |...".-MET FETCH |
00001080: 4B 41 4E 20 44 45 20 53 4F 4F 52 54 20 56 41 4E |KAN DE SOORT VAN|
00001090: 20 49 4E 47 45 56 4F 45 52 44 45 22 00 C7 18 00 | INGEVOERDE"....|
000010A0: 05 99 22 4B 41 52 41 4B 54 45 52 53 20 56 4F 4F |.."KARAKTERS VOO|
000010B0: 52 41 46 20 41 41 4E 47 45 47 45 56 45 4E 20 57 |RAF AANGEGEVEN W|
000010C0: 4F 52 44 45 4E 2E 22 00 F5 18 0A 05 99 22 11 2D |ORDEN."......".-|
000010D0: 4F 4F 4B 20 48 45 54 20 41 41 4E 54 41 4C 20 4B |OOK HET AANTAL K|
000010E0: 41 52 41 4B 54 45 52 53 20 44 41 54 20 4D 41 58 |ARAKTERS DAT MAX|
000010F0: 49 4D 55 4D 22 00 37 19 14 05 99 22 54 4F 45 47 |IMUM".7...."TOEG|
00001100: 45 53 54 41 41 4E 20 49 53 20 41 4C 53 20 49 4E |ESTAAN IS ALS IN|
00001110: 50 55 54 2C 4B 41 4E 20 57 4F 52 44 45 4E 20 20 |PUT,KAN WORDEN |
00001120: 20 20 20 20 47 45 53 50 45 43 49 46 49 45 45 52 | GESPECIFIEER|
00001130: 44 2E 20 28 49 29 22 00 61 19 1E 05 99 22 11 2D |D. (I)".a....".-|
00001140: 43 4B 20 53 54 41 41 54 20 56 4F 4F 52 20 43 4F |CK STAAT VOOR CO|
00001150: 4E 54 52 4F 4C 45 2D 4B 41 52 41 4B 54 45 52 3A |NTROLE-KARAKTER:|
00001160: 22 00 90 19 28 05 99 22 11 20 43 4C 52 2F 48 4F |"...(..". CLR/HO|
00001170: 4D 45 20 20 20 41 4C 4C 45 45 4E 20 4F 4E 47 45 |ME ALLEEN ONGE|
00001180: 53 48 49 46 54 45 20 4C 45 54 54 45 52 53 2E 22 |SHIFTE LETTERS."|
00001190: 00 BF 19 32 05 99 22 11 20 43 52 53 52 20 44 57 |...2..". CRSR DW|
000011A0: 4E 20 20 20 41 4C 4C 45 45 4E 20 4E 55 4D 45 52 |N ALLEEN NUMER|
000011B0: 49 45 4B 45 20 47 45 47 45 56 45 4E 53 2E 22 00 |IEKE GEGEVENS.".|
000011C0: EE 19 3C 05 99 22 11 20 43 52 53 52 20 4C 46 54 |..<..". CRSR LFT|
000011D0: 20 20 20 5A 4F 57 45 4C 20 43 49 4A 46 45 52 53 | ZOWEL CIJFERS|
000011E0: 20 41 4C 53 20 47 45 53 48 49 46 54 45 22 00 0A | ALS GESHIFTE"..|
000011F0: 1A 46 05 99 22 20 20 20 20 20 20 20 20 20 20 20 |.F.." |
00001200: 20 4C 45 54 54 45 52 53 2E 22 00 1E 1A 50 05 A1 | LETTERS."...P..|
00001210: 41 24 3A 8B 41 24 B2 22 22 A7 31 33 36 30 00 4D |A$:.A$."".1360.M|
00001220: 1A 5A 05 99 22 93 2D 44 45 20 49 4E 44 45 58 20 |.Z..".-DE INDEX |
00001230: 49 20 47 45 45 46 54 20 48 45 54 20 41 41 4E 54 |I GEEFT HET AANT|
00001240: 41 4C 20 4B 41 52 41 4B 54 45 52 53 22 00 77 1A |AL KARAKTERS".w.|
00001250: 64 05 99 22 44 41 54 20 4D 41 58 49 4D 41 41 4C |d.."DAT MAXIMAAL|
00001260: 20 4D 41 47 20 49 4E 47 45 56 4F 45 52 44 20 57 | MAG INGEVOERD W|
00001270: 4F 52 44 45 4E 2E 22 00 A2 1A 6E 05 99 22 11 2D |ORDEN."...n..".-|
00001280: 44 45 20 53 54 52 49 4E 47 56 41 52 49 41 42 45 |DE STRINGVARIABE|
00001290: 4C 45 20 48 45 45 46 54 20 44 45 5A 45 4C 46 44 |LE HEEFT DEZELFD|
000012A0: 45 22 00 D2 1A 78 05 99 22 46 55 4E 43 54 49 45 |E"...x.."FUNCTIE|
000012B0: 20 41 4C 53 20 44 49 45 20 42 49 4A 20 45 45 4E | ALS DIE BIJ EEN|
000012C0: 20 49 4E 50 55 54 2D 53 54 41 54 45 4D 45 4E 54 | INPUT-STATEMENT|
000012D0: 2E 22 00 E5 1A 82 05 99 22 2D 56 4F 4F 52 42 45 |."......"-VOORBE|
000012E0: 45 4C 44 3A 22 00 13 1B 8C 05 99 22 11 4F 4D 20 |ELD:"......".OM |
000012F0: 44 45 20 49 4E 50 55 54 20 54 45 20 42 45 50 45 |DE INPUT TE BEPE|
00001300: 52 4B 45 4E 20 54 4F 54 20 32 20 43 49 4A 46 45 |RKEN TOT 2 CIJFE|
00001310: 52 53 22 00 38 1B 96 05 99 22 4D 41 4B 45 4E 20 |RS".8...."MAKEN |
00001320: 57 45 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 52 |WE DE VOLGENDE R|
00001330: 4F 55 54 49 4E 45 2E 22 00 72 1B A0 05 99 22 11 |OUTINE.".r....".|
00001340: 31 39 38 34 20 50 52 49 4E 54 22 3B C7 28 33 34 |1984 PRINT";.(34|
00001350: 29 3B 22 48 4F 45 56 45 45 4C 20 50 49 4C 4F 54 |);"HOEVEEL PILOT|
00001360: 45 4E 20 28 4D 41 58 20 39 39 29 22 3B C7 28 33 |EN (MAX 99)";.(3|
00001370: 34 29 00 9D 1B AA 05 99 22 31 39 38 35 20 46 45 |4)......"1985 FE|
00001380: 54 43 48 20 22 3B C7 28 33 34 29 3B 22 11 22 3B |TCH ";.(34);".";|
00001390: C7 28 33 34 29 3B 22 2C 32 2C 41 24 22 00 C3 1B |.(34);",2,A$"...|
000013A0: B4 05 99 22 31 39 38 36 20 50 52 49 4E 54 41 24 |..."1986 PRINTA$|
000013B0: 22 3B C7 28 33 34 29 3B 22 20 4F 4B 22 3B C7 28 |";.(34);" OK";.(|
000013C0: 33 34 29 00 EF 1B BE 05 99 22 11 2D 57 49 4C 54 |34)......".-WILT|
000013D0: 20 55 20 44 49 54 20 45 45 4E 53 20 5A 49 45 4E | U DIT EENS ZIEN|
000013E0: 20 52 55 4E 4E 45 4E 20 3F 20 20 4A 2F 4E 22 00 | RUNNEN ? J/N".|
000013F0: 04 1C C8 05 A1 41 24 3A 8B 41 24 B2 22 4A 22 A7 |.....A$:.A$."J".|
00001400: 31 35 30 30 00 16 1C D2 05 8B 41 24 B3 B1 22 4E |1500......A$.."N|
00001410: 22 A7 31 34 38 30 00 20 1C D7 05 89 31 35 38 30 |".1480. ....1580|
00001420: 00 41 1C DC 05 99 22 93 48 4F 45 56 45 45 4C 20 |.A....".HOEVEEL |
00001430: 50 49 4C 4F 54 45 4E 20 28 4D 41 58 20 39 39 29 |PILOTEN (MAX 99)|
00001440: 22 00 51 1C E6 05 64 27 20 22 11 22 2C 32 2C 41 |".Q...d' ".",2,A|
00001450: 24 00 5F 1C F0 05 99 41 24 3B 22 20 4F 4B 22 00 |$._....A$;" OK".|
00001460: 8F 1C FA 05 99 22 11 11 4D 45 52 4B 20 4F 50 20 |....."..MERK OP |
00001470: 44 41 54 20 45 52 20 4E 49 45 54 53 20 47 45 42 |DAT ER NIETS GEB|
00001480: 45 55 52 54 20 41 4C 53 20 55 20 45 45 4E 22 00 |EURT ALS U EEN".|
00001490: BC 1C 04 06 99 22 4C 45 54 54 45 52 20 49 4E 54 |....."LETTER INT|
000014A0: 59 50 54 2E 20 45 52 20 4B 41 4E 20 4F 4F 4B 20 |YPT. ER KAN OOK |
000014B0: 47 45 45 4E 20 44 45 52 44 45 20 22 00 DB 1C 0E |GEEN DERDE "....|
000014C0: 06 99 22 54 45 4B 45 4E 20 49 4E 47 45 56 4F 45 |.."TEKEN INGEVOE|
000014D0: 52 44 20 57 4F 52 44 45 4E 2E 22 00 08 1D 18 06 |RD WORDEN.".....|
000014E0: 99 22 11 11 57 49 4C 54 20 55 20 48 45 54 20 4E |."..WILT U HET N|
000014F0: 4F 47 20 45 45 4E 53 20 5A 49 45 4E 20 52 55 4E |OG EENS ZIEN RUN|
00001500: 4E 45 4E 20 4A 2F 4E 22 00 12 1D 22 06 89 31 34 |NEN J/N"..."..14|
00001510: 38 30 00 23 1D 2C 06 99 22 93 12 20 20 20 20 20 |80.#.,..".. |
00001520: 20 20 22 00 33 1D 36 06 99 22 12 20 49 4E 4B 45 | ".3.6..". INKE|
00001530: 59 20 22 00 43 1D 40 06 99 22 12 20 20 20 20 20 |Y ".C.@..". |
00001540: 20 20 22 00 66 1D 4A 06 99 22 11 46 4F 52 4D 41 | ".f.J..".FORMA|
00001550: 54 3A 20 12 20 56 41 52 49 41 42 45 4C 45 3D 49 |T: . VARIABELE=I|
00001560: 4E 4B 45 59 20 22 00 94 1D 54 06 99 22 11 2D 4F |NKEY "...T..".-O|
00001570: 4D 20 54 45 20 54 45 53 54 45 4E 20 57 45 4C 4B |M TE TESTEN WELK|
00001580: 45 20 46 55 4E 43 54 49 45 54 4F 45 54 53 20 57 |E FUNCTIETOETS W|
00001590: 45 52 44 22 00 C5 1D 5E 06 99 22 49 4E 47 45 54 |ERD"...^.."INGET|
000015A0: 59 50 54 2E 28 56 4F 4F 52 41 4C 20 48 41 4E 44 |YPT.(VOORAL HAND|
000015B0: 49 47 20 42 49 4A 20 4D 45 4E 55 47 45 44 52 45 |IG BIJ MENUGEDRE|
000015C0: 56 45 4E 22 3B 00 D9 1D 68 06 99 22 50 52 4F 47 |VEN";...h.."PROG|
000015D0: 52 41 4D 4D 41 27 53 29 22 00 04 1E 72 06 99 22 |RAMMA'S)"...r.."|
000015E0: 11 2D 4D 45 52 4B 20 4F 50 20 44 41 54 20 42 49 |.-MERK OP DAT BI|
000015F0: 4A 20 49 4E 4B 45 59 20 53 4C 45 43 48 54 53 20 |J INKEY SLECHTS |
00001600: 44 45 20 22 00 30 1E 7C 06 99 22 46 55 4E 43 54 |DE ".0.|.."FUNCT|
00001610: 49 45 54 4F 45 54 53 45 4E 20 31 20 54 4F 54 20 |IETOETSEN 1 TOT |
00001620: 45 4E 20 4D 45 54 20 38 20 4B 55 4E 4E 45 4E 22 |EN MET 8 KUNNEN"|
00001630: 00 4D 1E 86 06 99 22 47 45 43 4F 4E 54 52 4F 4C |.M...."GECONTROL|
00001640: 45 45 52 44 20 57 4F 52 44 45 4E 2E 22 00 61 1E |EERD WORDEN.".a.|
00001650: 90 06 99 22 11 2D 56 4F 4F 52 42 45 45 4C 44 3A |...".-VOORBEELD:|
00001660: 22 00 93 1E 95 06 99 22 11 31 39 38 33 20 50 52 |"......".1983 PR|
00001670: 49 4E 54 22 3B C7 28 33 34 29 3B 22 44 52 55 4B |INT";.(34);"DRUK|
00001680: 20 45 45 4E 20 46 2D 54 4F 45 54 53 22 3B C7 28 | EEN F-TOETS";.(|
00001690: 33 34 29 00 A7 1E 9A 06 99 22 31 39 38 34 20 41 |34)......"1984 A|
000016A0: 3D 49 4E 4B 45 59 22 00 C5 1E 9F 06 99 22 31 39 |=INKEY"......"19|
000016B0: 38 35 20 49 46 41 3C 31 4F 52 41 3E 38 54 48 45 |85 IFA<1ORA>8THE|
000016C0: 4E 31 39 38 34 00 00 1F A4 06 99 22 31 39 38 36 |N1984......"1986|
000016D0: 20 50 52 49 4E 54 22 3B C7 28 33 34 29 3B 22 55 | PRINT";.(34);"U|
000016E0: 20 44 52 55 4B 54 45 20 46 55 4E 43 54 49 45 54 | DRUKTE FUNCTIET|
000016F0: 4F 45 54 53 22 3B C7 28 33 34 29 3B 22 3B 41 22 |OETS";.(34);";A"|
00001700: 00 28 1F AE 06 99 22 11 57 49 4C 54 20 55 20 44 |.(....".WILT U D|
00001710: 49 54 20 45 45 4E 53 20 5A 49 45 4E 20 52 55 4E |IT EENS ZIEN RUN|
00001720: 4E 45 4E 20 4A 2F 4E 22 00 3D 1F B8 06 A1 41 24 |NEN J/N".=....A$|
00001730: 3A 8B 41 24 B2 22 4A 22 A7 31 37 35 30 00 4F 1F |:.A$."J".1750.O.|
00001740: C2 06 8B 41 24 B3 B1 22 4E 22 A7 31 37 32 30 00 |...A$.."N".1720.|
00001750: 59 1F CC 06 89 31 37 39 30 00 79 1F D6 06 99 22 |Y....1790.y...."|
00001760: 93 44 52 55 4B 20 45 45 4E 20 46 2D 54 4F 45 54 |.DRUK EEN F-TOET|
00001770: 53 22 3A 9C 3A 64 66 20 31 00 82 1F E0 06 41 B2 |S":.:df 1.....A.|
00001780: 64 56 00 94 1F E5 06 8B 41 B3 31 B0 41 B1 38 A7 |dV......A.1.A.8.|
00001790: 31 37 36 30 00 B3 1F EA 06 99 22 55 20 44 52 55 |1760......"U DRU|
000017A0: 4B 54 45 20 46 55 4E 43 54 49 45 54 4F 45 54 53 |KTE FUNCTIETOETS|
000017B0: 22 3B 41 00 BD 1F F4 06 89 31 37 31 30 00 CF 1F |";A......1710...|
000017C0: FE 06 99 22 93 12 20 20 20 20 20 20 20 20 22 00 |...".. ".|
000017D0: E0 1F 08 07 99 22 12 20 4F 4E 20 4B 45 59 20 22 |.....". ON KEY "|
000017E0: 00 F1 1F 12 07 99 22 12 20 20 20 20 20 20 20 20 |......". |
000017F0: 22 00 35 20 1C 07 99 22 11 46 4F 52 4D 41 54 3A |".5 ...".FORMAT:|
00001800: 20 12 20 4F 4E 20 4B 45 59 22 3B C7 28 33 34 29 | . ON KEY";.(34)|
00001810: 3B 22 4B 41 52 41 4B 54 45 52 28 53 29 22 3B C7 |;"KARAKTER(S)";.|
00001820: 28 33 34 29 3B 22 2C 3A 47 4F 54 4F 20 4C 49 4A |(34);",:GOTO LIJ|
00001830: 4E 20 92 22 3B 00 65 20 26 07 99 22 11 2D 4F 4D |N .";.e &..".-OM|
00001840: 20 44 45 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 | DE COMMODORE 64|
00001850: 20 5A 49 4A 4E 20 54 4F 45 54 53 45 4E 42 4F 52 | ZIJN TOETSENBOR|
00001860: 44 20 54 45 22 00 96 20 30 07 99 22 4C 41 54 45 |D TE".. 0.."LATE|
00001870: 4E 20 41 46 54 41 53 54 45 4E 20 54 4F 54 20 45 |N AFTASTEN TOT E|
00001880: 52 20 45 45 4E 20 4B 41 52 41 4B 54 45 52 20 57 |R EEN KARAKTER W|
00001890: 4F 52 44 54 22 3B 00 C5 20 3A 07 99 22 49 4E 47 |ORDT";.. :.."ING|
000018A0: 45 44 52 55 4B 54 20 44 41 54 20 5A 49 43 48 20 |EDRUKT DAT ZICH |
000018B0: 49 4E 20 44 45 20 56 4F 4F 52 41 46 20 47 45 47 |IN DE VOORAF GEG|
000018C0: 45 56 45 4E 22 00 DA 20 44 07 99 22 4C 49 4A 53 |EVEN".. D.."LIJS|
000018D0: 54 20 42 45 56 49 4E 44 2E 22 00 08 21 49 07 99 |T BEVIND."..!I..|
000018E0: 22 11 2D 28 44 45 20 43 48 52 24 20 57 41 41 52 |".-(DE CHR$ WAAR|
000018F0: 44 45 20 56 2F 48 20 49 4E 47 45 44 52 55 4B 54 |DE V/H INGEDRUKT|
00001900: 45 20 54 45 4B 45 4E 22 00 32 21 4A 07 99 22 4B |E TEKEN".2!J.."K|
00001910: 4F 4D 54 20 49 4E 20 44 45 20 56 41 52 49 41 42 |OMT IN DE VARIAB|
00001920: 45 4C 45 20 53 54 20 54 45 20 53 54 41 41 4E 2E |ELE ST TE STAAN.|
00001930: 29 22 00 46 21 4E 07 99 22 11 2D 56 4F 4F 52 42 |)".F!N..".-VOORB|
00001940: 45 45 4C 44 3A 22 00 74 21 58 07 99 22 4F 4D 20 |EELD:".t!X.."OM |
00001950: 48 45 54 20 50 52 47 20 54 45 20 4C 41 54 45 4E |HET PRG TE LATEN|
00001960: 20 53 54 4F 50 50 45 4E 20 54 4F 54 20 45 52 20 | STOPPEN TOT ER |
00001970: 45 45 4E 22 00 A5 21 62 07 99 22 43 2C 45 45 4E |EEN"..!b.."C,EEN|
00001980: 20 44 2C 4F 46 20 45 45 4E 20 45 20 57 4F 52 44 | D,OF EEN E WORD|
00001990: 54 20 49 4E 47 45 44 52 55 4B 54 2C 4B 41 4E 20 |T INGEDRUKT,KAN |
000019A0: 4D 45 4E 22 3B 00 CB 21 6C 07 99 22 44 45 20 56 |MEN";..!l.."DE V|
000019B0: 4F 4C 47 45 4E 44 45 20 52 4F 55 54 49 4E 45 20 |OLGENDE ROUTINE |
000019C0: 47 45 42 52 55 49 4B 45 4E 2E 22 00 EE 21 76 07 |GEBRUIKEN."..!v.|
000019D0: 99 22 11 31 39 38 34 20 4B 24 3D 22 3B C7 28 33 |.".1984 K$=";.(3|
000019E0: 34 29 3B 22 43 44 45 22 3B C7 28 33 34 29 00 0E |4);"CDE";.(34)..|
000019F0: 22 80 07 99 22 31 39 38 35 20 4F 4E 20 4B 45 59 |"..."1985 ON KEY|
00001A00: 20 4B 24 2C 3A 47 4F 54 4F 20 31 39 38 37 00 23 | K$,:GOTO 1987.#|
00001A10: 22 8A 07 99 22 31 39 38 36 20 47 4F 54 4F 31 39 |"..."1986 GOTO19|
00001A20: 38 35 22 00 59 22 94 07 99 22 31 39 38 37 20 50 |85".Y"..."1987 P|
00001A30: 52 49 4E 54 22 3B C7 28 33 34 29 3B 22 55 20 44 |RINT";.(34);"U D|
00001A40: 52 55 4B 54 45 20 22 3B C7 28 33 34 29 3B 22 3B |RUKTE ";.(34);";|
00001A50: 43 48 52 24 28 53 54 29 22 00 6D 22 9E 07 A1 41 |CHR$(ST)".m"...A|
00001A60: 24 3A 8B 41 24 B2 22 22 A7 31 39 35 30 00 80 22 |$:.A$."".1950.."|
00001A70: A8 07 99 22 93 12 20 20 20 20 20 20 20 20 20 22 |...".. "|
00001A80: 00 92 22 B2 07 99 22 12 20 44 49 53 41 42 4C 45 |.."...". DISABLE|
00001A90: 20 22 00 A4 22 BC 07 99 22 12 20 20 20 20 20 20 | ".."...". |
00001AA0: 20 20 20 22 00 CD 22 C6 07 99 22 11 2D 4F 4D 20 | ".."...".-OM |
00001AB0: 44 45 20 27 4F 4E 20 4B 45 59 27 20 54 4F 45 53 |DE 'ON KEY' TOES|
00001AC0: 54 41 4E 44 20 55 49 54 20 54 45 20 22 00 DF 22 |TAND UIT TE ".."|
00001AD0: D0 07 99 22 53 43 48 41 4B 45 4C 45 4E 2E 22 00 |..."SCHAKELEN.".|
00001AE0: F3 22 DA 07 99 22 11 1C 2D 12 4C 45 54 20 4F 50 |."..."..-.LET OP|
00001AF0: 3A 92 22 00 1F 23 E4 07 99 22 11 44 49 53 41 42 |:."..#...".DISAB|
00001B00: 4C 45 20 4D 4F 45 54 20 41 4C 54 49 4A 44 20 47 |LE MOET ALTIJD G|
00001B10: 45 42 52 55 49 4B 54 20 57 4F 52 44 45 4E 22 00 |EBRUIKT WORDEN".|
00001B20: 4D 23 EE 07 99 22 4F 4D 44 41 54 20 44 45 20 43 |M#..."OMDAT DE C|
00001B30: 4F 4D 50 55 54 45 52 20 41 4E 44 45 52 53 20 45 |OMPUTER ANDERS E|
00001B40: 4C 4B 45 20 4B 45 45 52 20 41 4C 53 22 00 7A 23 |LKE KEER ALS".z#|
00001B50: F8 07 99 22 45 52 20 45 45 4E 20 4B 41 52 41 4B |..."ER EEN KARAK|
00001B60: 54 45 52 20 49 4E 47 45 54 59 50 54 20 57 4F 52 |TER INGETYPT WOR|
00001B70: 44 54 20 54 45 52 55 47 2D 22 00 AA 23 02 08 99 |DT TERUG-"..#...|
00001B80: 22 4B 45 45 52 54 20 4E 41 41 52 20 44 45 20 4C |"KEERT NAAR DE L|
00001B90: 49 4A 4E 20 56 2F 48 20 4F 4E 20 4B 45 59 20 43 |IJN V/H ON KEY C|
00001BA0: 4F 4D 4D 41 4E 44 4F 2E 9E 22 00 BD 23 0C 08 99 |OMMANDO.."..#...|
00001BB0: 22 11 11 12 20 20 20 20 20 20 20 20 22 00 CE 23 |"... "..#|
00001BC0: 16 08 99 22 12 20 52 45 53 55 4D 45 20 22 00 DF |...". RESUME "..|
00001BD0: 23 20 08 99 22 12 20 20 20 20 20 20 20 20 22 00 |# ..". ".|
00001BE0: 0C 24 2A 08 99 22 11 2D 4F 4D 20 48 45 54 20 4F |.$*..".-OM HET O|
00001BF0: 4E 20 4B 45 59 20 43 4F 4D 4D 41 4E 44 4F 20 54 |N KEY COMMANDO T|
00001C00: 45 52 55 47 20 41 41 4E 20 54 45 22 00 33 24 34 |ERUG AAN TE".3$4|
00001C10: 08 99 22 5A 45 54 54 45 4E 20 4E 41 20 45 45 4E |.."ZETTEN NA EEN|
00001C20: 20 44 49 53 41 42 4C 45 20 43 4F 4D 4D 41 4E 44 | DISABLE COMMAND|
00001C30: 4F 2E 22 00 47 24 3E 08 A1 41 24 3A 8B 41 24 B2 |O.".G$>..A$:.A$.|
00001C40: 22 22 A7 32 31 31 30 00 71 24 48 08 99 22 93 11 |"".2110.q$H.."..|
00001C50: 11 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 |.... |
00001C60: D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 |................|
00001C70: 22 00 95 24 52 08 99 22 20 20 20 20 20 20 20 20 |"..$R.." |
00001C80: 20 20 20 20 DD 44 52 55 4B 20 45 45 4E 20 54 4F | .DRUK EEN TO|
00001C90: 45 54 53 DD 22 00 B9 24 5C 08 99 22 20 20 20 20 |ETS."..$\.." |
00001CA0: 20 20 20 20 20 20 20 20 CA C0 C0 C0 C0 C0 C0 C0 | ........|
00001CB0: C0 C0 C0 C0 C0 C0 C0 CB 22 00 E2 24 66 08 99 22 |........"..$f.."|
00001CC0: 11 11 11 11 11 20 20 20 20 20 20 20 20 20 20 20 |..... |
00001CD0: 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00001CE0: C9 22 00 06 25 70 08 99 22 20 20 20 20 20 20 20 |."..%p.." |
00001CF0: 20 20 20 20 20 DD 4F 4D 20 54 45 20 45 49 4E 44 | .OM TE EIND|
00001D00: 49 47 45 4E DD 22 00 2A 25 7A 08 99 22 20 20 20 |IGEN.".*%z.." |
00001D10: 20 20 20 20 20 20 20 20 20 CA C0 C0 C0 C0 C0 C0 | .......|
00001D20: C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 3E 25 84 08 A1 |.........".>%...|
00001D30: 41 24 3A 8B 41 24 B2 22 22 A7 32 31 38 30 00 49 |A$:.A$."".2180.I|
00001D40: 25 8E 08 9C 3A 99 22 93 22 00 00 00 20 15 |%...:."."... . |
.. ....:."..";:.53280,0:.53281,0.+...D.
0,1.8...A$.G(34).]...DO 95,50,".SB-LES .
DEEL 2",1,2,8.Z...DO 125,100,".DOOR",1,2
,8...(..X.1.1000:....2.DO 123,150,".KOEN
",1,2,9...3.DF 2:DG.V.7..".IN DEEL 2 BEG
INNEN WE MET:"...8.."......STRING-MANIPU
LATIE."...9.."......INPUT-VEREENVOUDIGIN
G.".-.:..A$:.A$."".58.P.<..".IN DEEL 2 B
EGINNEN WE MET:".W.=..". U.....
.............I"...>.." .STRING-
MANIPULATIE.".C.?.." J.........
.........K"...@.."..... U...
........I"...A.." .DRUK RETU
RN."...B.." J...........K".V
.C.."..... U.............I".Y
.D.." .VOOR VERVOLG."...E.."
J.............K"...F..A$:.A$
.G(13).110...G..70.L.N..".. "...X
..". INSERT "......". ".#....".FO
RMAT: . INSERT (";G(34);"SUBSTR";G(34);"
,";.E....G(34);"HOOFDSTR";G(34);",P)".T.
..".-OM EEN STRING IN EEN ANDERE STRING
TE"......"INTEGREREN VANAF PLAATS P IN
DE HOOFD- STRING"......".-VOORBEELD:"..
....".1983 A$=";G(34);"OP EEN ";G(34)...
H.."1984 B$=";G(34);"VIER RIJ";G(34).-.R
.."1985 PRINTINSERT(A$,B$,5)".=...."1986
END".L....".-GEEFT".D....".VIER OP EEN
RIJ".W....A$:.A$."".250......".. ".
.....". INST "......". "..."..".FOR
MAT: . INST(";G(34);"SUBSTR";G(34);",";G
(34);"HOOFDSTR";...,..G(34);",P)".'.6.."
.-OM EEN SUBSTR OVER EEN HOFDSTRING TE".
V.@.."SCHRIJVEN VANAF EEN BEPAALDE PLAAT
S (P)".P.J.."IN DE HOOFDSTRING."...T..".
-VOORBEELD:"...^..".1984 A$=";G(34);"BET
ER";G(34)...H.."1985 B$=";G(34);"VIER OP
RIJ IS GOED";G(34)...R.."1986 PRINTINST
(A$,B$,16)"...|.."1987 END"......".-GEEF
T:".<....".VIER OP EEN RIJ IS BETER".O..
..A$:.A$."".410.`....".. ".P....".
PLACE "......". "...B..".FORMAT:
. PLACE (";G(34);"SUBSTR";G(34);",";G(34
);.T.L.."HOOFDSTR";G(34);")"...V..".-OM
DE PLAATS VAN EEN SUBSTR IN EEN"......"H
OOFDSTR TE BEPALEN.".0....".-VOORBEELD:"
._....".1984 A$=";G(34);"VIER OP EEN RIJ
";G(34)......"1985 A=PLACE(";G(34);"OP";
G(34);",A$)"......"1986 PRINTA:END".....
.".-GEEFT:"......".6".P.&..A$:.A$."".550
...0..".. "...:..". DUP "...D..".
"...N..".FORMAT: . DUP (";G(34);"STRIN
G";G(34);",N)".W.X..".-OM EEN GEGEVEN ST
RING N KEER TE".J.B.."DUPLICEREN.".~.L..
".-VOORBEELD:"...V..".1984 A$=DUP (";G(3
4);"HIEP-";G(34);",3)".U...."1985 B$=";G
(34);"HOERA!!!";G(34)......"1986 C$=A$+B
$:PRINTC$......".-GEEFT:".!....".HIEP-HI
EP-HIEP-HOERA!!!".4....A$:.A$."".680.F..
..".. ".W....". CENTRE ".H.F..".
"...P..".FORMAT: . CENTRE ";G(34)
;"STRING";G(34);" ".M.Z..".-OM EEN GEGEV
EN STRING IN HET MIDDEN VAN";......"EEN
SCHERMLIJN TE PLAATSEN."......".-HIERVOO
R IS HET VOOR U NIET NODIG OM".H...."DE
LENGTE VAN DE STRING TE KENNEN.".\....".
-VOORBEELD:".....".1984 CENTRE "SB.LES
DEEL 2"......".-GEEFT:"... .D# "SB-LES D
EEL 2"...*..A$:.A$."".810.G.4..".. ".
T.>..". AT "...H..". "...R..".FORMAT:
. PRINT AT(K,R)";G(34);"STRING";G(34);"
".G.\..".-OM EEN STRING TE PRINTEN OP D
E K-DE".S.F.."KOLOM EN DE R-DE RIJ VAN H
ET SCHERM."...P..".-VOORBEELD:"...Z..".1
984 PRINT AT(10,20)";G(34);"SUPERMAN";G(
34).K....".-GEEFT:"...... D(10,20)"SUPER
MAN"......" ^"......" (10
,20)". ....A$:.A$."".940./....".. ".
=....". USE ".K.J..". "...T..".FORMA
T: . USE";G(34);"# # #.# # # # #";G(34);
",SV:PRINT "......".-OM GETALLEN TE FORM
ATEREN.(ER IS GEEN"......"SPATIE NODIG T
USSEN DE HASH-TEKENS)"......"-HET AANTAL
HASH-TEKENS GEEFT HET AANTAL";.@...."GE
TALLEN AAN VOOR EN NA DE KOMMA.".P....".
-SV GEEFT DE STRINGVARIABELE AAN WAARIN"
......"WAARIN HET GETAL ZIT OPGESLAGEN."
...$..".-VOORBEELD:".L....".1984 A$=STR$
(RND(1)*259)...8.."1985 USE ";G(34);"$##
#.##C";G(34);",A$:PRINT"...B..".-GEEFT B
IJVOORBEELD:.".1.G.A$.D(.(1).259).H.L.D,
"$###.##C",A$:..].Q..".NOG EENS J/N".{.
V..A$:.A$."J".."....":.1095...[..A$.."N"
.1110...`..". U..................
...I"...J.." .INPUT VEREENVOUDIGI
NG."...T.." J....................
.K".*.~.."..... U...........
I".L...." .DRUK RETURN.".N..
.." J...........K"......"...
.. U.............I"......"
.VOOR VERVOLG."......"
J.............K"......A$:.A$.G(13).1
230...D..1210...N..".. "...X..". F
ETCH "......". ".M....".FORMAT: .
FETCH";G(34);"CK";G(34);",I,STRINGVARIAB
ELE "......".-MET FETCH KAN DE SOORT VAN
INGEVOERDE".G...."KARAKTERS VOORAF AANG
EGEVEN WORDEN."......".-OOK HET AANTAL K
ARAKTERS DAT MAXIMUM".7...."TOEGESTAAN I
S ALS INPUT,KAN WORDEN GESPECIFIEER
D. (I)".A....".-CK STAAT VOOR CONTROLE-K
ARAKTER:"...(..". CLR/HOME ALLEEN ONGE
SHIFTE LETTERS."...2..". CRSR DWN ALLE
EN NUMERIEKE GEGEVENS."...<..". CRSR LFT
ZOWEL CIJFERS ALS GESHIFTE"...F.."
LETTERS."...P..A$:.A$."".1360.M
.Z..".-DE INDEX I GEEFT HET AANTAL KARAK
TERS".W.D.."DAT MAXIMAAL MAG INGEVOERD W
ORDEN."...N..".-DE STRINGVARIABELE HEEFT
DEZELFDE".R.X.."FUNCTIE ALS DIE BIJ EEN
INPUT-STATEMENT."......"-VOORBEELD:"...
...".OM DE INPUT TE BEPERKEN TOT 2 CIJFE
RS".8...."MAKEN WE DE VOLGENDE ROUTINE."
.R. ..".1984 PRINT";G(34);"HOEVEEL PILOT
EN (MAX 99)";G(34)......"1985 FETCH ";G(
34);".";G(34);",2,A$".C...."1986 PRINTA$
";G(34);" OK";G(34)......".-WILT U DIT E
ENS ZIEN RUNNEN ? J/N"...H..A$:.A$."J".
1500...R..A$.."N".1480. .W..1580.A....".
HOEVEEL PILOTEN (MAX 99)".Q...D' ".",2,A
$._....A$;" OK"......"..MERK OP DAT ER N
IETS GEBEURT ALS U EEN"......"LETTER INT
YPT. ER KAN OOK GEEN DERDE "......"TEKEN
INGEVOERD WORDEN."......"..WILT U HET N
OG EENS ZIEN RUNNEN J/N"..."..1480.#.,..
".. ".3.6..". INKEY ".C.@..".
".F.J..".FORMAT: . VARIABELE=INKEY "..
.T..".-OM TE TESTEN WELKE FUNCTIETOETS W
ERD".E.^.."INGETYPT.(VOORAL HANDIG BIJ M
ENUGEDREVEN";.Y.H.."PROGRAMMA'S)"...R.."
.-MERK OP DAT BIJ INKEY SLECHTS DE ".0.|
.."FUNCTIETOETSEN 1 TOT EN MET 8 KUNNEN"
.M...."GECONTROLEERD WORDEN.".A....".-VO
ORBEELD:"......".1983 PRINT";G(34);"DRUK
EEN F-TOETS";G(34)......"1984 A=INKEY".
E...."1985 IFA<1ORA>8THEN1984......"1986
PRINT";G(34);"U DRUKTE FUNCTIETOETS";G(
34);";A".(....".WILT U DIT EENS ZIEN RUN
NEN J/N".=....A$:.A$."J".1750.O.B..A$.."
N".1720.Y.L..1790.Y.V..".DRUK EEN F-TOET
S":.:DF 1.....A.DV......A.1.A.8.1760....
.."U DRUKTE FUNCTIETOETS";A......1710.O.
...".. "......". ON KEY "......".
".5 ...".FORMAT: . ON KEY";G(34)
;"KARAKTER(S)";G(34);",:GOTO LIJN .";.E
&..".-OM DE COMMODORE 64 ZIJN TOETSENBOR
D TE".. 0.."LATEN AFTASTEN TOT ER EEN KA
RAKTER WORDT";.E :.."INGEDRUKT DAT ZICH
IN DE VOORAF GEGEVEN".Z D.."LIJST BEVIND
."..!I..".-(DE CHR$ WAARDE V/H INGEDRUKT
E TEKEN".2!J.."KOMT IN DE VARIABELE ST T
E STAAN.)".F!N..".-VOORBEELD:".T!X.."OM
HET PRG TE LATEN STOPPEN TOT ER EEN"..!B
.."C,EEN D,OF EEN E WORDT INGEDRUKT,KAN
MEN";.K!L.."DE VOLGENDE ROUTINE GEBRUIKE
N."..!V..".1984 K$=";G(34);"CDE";G(34)..
"..."1985 ON KEY K$,:GOTO 1987.#"..."198
6 GOTO1985".Y"..."1987 PRINT";G(34);"U D
RUKTE ";G(34);";CHR$(ST)".M"...A$:.A$.""
.1950.."...".. ".."...". DISABLE
".."...". ".M"F..".-OM DE 'ON K
EY' TOESTAND UIT TE ".."P.."SCHAKELEN.".
."Z.."..-.LET OP:."..#...".DISABLE MOET
ALTIJD GEBRUIKT WORDEN".M#..."OMDAT DE C
OMPUTER ANDERS ELKE KEER ALS".Z#..."ER E
EN KARAKTER INGETYPT WORDT TERUG-"..#...
"KEERT NAAR DE LIJN V/H ON KEY COMMANDO.
."..#..."... ".N#...". RESUME "..
# ..". "..$*..".-OM HET ON KEY CO
MMANDO TERUG AAN TE".3$4.."ZETTEN NA EEN
DISABLE COMMANDO.".G$>..A$:.A$."".2110.
Q$H.."...... U..............I
"..$R.." .DRUK EEN TOETS."..$
\.." J..............K"..$F.."
..... U..............I"..%P..
" .OM TE EINDIGEN.".*%Z.."
J..............K".>%...A$:.A$."
".2180.I%...:."."... .
> CLICK IMAGE PREVIEW FOR FULL MODAL