UB-MUS.GENERATOR
FILE INFORMATION
FILENAME(S): UB-MUS.GENERATOR
FILE TYPE(S): PRG
FILE SIZE: 11.6K
FIRST SEEN: 2025-11-30 21:28:30
APPEARS ON: 1 disk(s)
FILE HASH
fcdfe5bc559dab3ccdc5734fee60dd0707b0e181935396d752d1874ca8b63cae
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KLAAS JOLANDA | UB-MUS.GENERATOR | PRG | DuncanTwain | 30 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 8F 20 20 20 20 20 20 20 20 46 |....... F|
00000010: 52 41 4E 4B 20 53 50 52 45 4E 47 45 52 00 39 08 |RANK SPRENGER.9.|
00000020: 02 00 8F 20 20 20 20 20 20 20 20 42 52 41 53 53 |... BRASS|
00000030: 45 52 54 53 54 52 2E 31 38 00 55 08 03 00 8F 20 |ERTSTR.18.U.... |
00000040: 20 20 20 20 20 20 20 34 33 30 30 20 20 45 53 53 | 4300 ESS|
00000050: 45 4E 20 20 31 00 71 08 04 00 8F 20 20 20 20 20 |EN 1.q.... |
00000060: 20 20 20 54 48 4F 4D 41 53 20 53 43 48 57 41 52 | THOMAS SCHWAR|
00000070: 5A 00 8D 08 05 00 8F 20 20 20 20 20 20 20 20 48 |Z...... H|
00000080: 41 54 5A 50 45 52 53 54 52 2E 31 32 39 00 A8 08 |ATZPERSTR.129...|
00000090: 06 00 8F 20 20 20 20 20 20 20 20 34 33 30 30 20 |... 4300 |
000000A0: 20 45 53 53 45 4E 2D 31 00 B1 08 0A 00 DB 31 2C | ESSEN-1......1,|
000000B0: 31 00 B7 08 0C 00 D4 00 C3 08 0D 00 99 C7 28 31 |1.............(1|
000000C0: 34 37 29 00 E6 08 14 00 99 22 20 20 20 20 20 20 |47)......" |
000000D0: 20 20 20 20 20 20 4D 55 53 54 45 52 47 45 4E 45 | MUSTERGENE|
000000E0: 52 41 54 4F 52 22 00 EE 08 16 00 99 3A 99 00 F4 |RATOR"......:...|
000000F0: 08 23 00 99 00 1F 09 28 00 99 22 20 20 20 20 20 |.#.....(.." |
00000100: 46 4F 4C 47 45 4E 44 45 20 4D 55 53 54 45 52 20 |FOLGENDE MUSTER |
00000110: 53 49 4E 44 20 41 42 52 55 46 42 41 52 3A 22 00 |SIND ABRUFBAR:".|
00000120: 27 09 2C 00 99 3A 99 00 57 09 32 00 99 22 4D 49 |'.,..:..W.2.."MI|
00000130: 54 54 45 4C 4B 52 45 55 5A 20 20 28 4D 4B 29 20 |TTELKREUZ (MK) |
00000140: 20 20 20 20 20 20 4D 49 54 54 45 4C 50 55 4E 4B | MITTELPUNK|
00000150: 54 20 28 4D 50 29 22 00 87 09 3C 00 99 22 48 4F |T (MP)"...<.."HO|
00000160: 52 49 5A 2E 4C 49 4E 49 45 4E 20 28 48 4C 29 20 |RIZ.LINIEN (HL) |
00000170: 20 20 20 20 20 20 56 45 52 54 2E 4C 49 4E 49 45 | VERT.LINIE|
00000180: 4E 20 28 56 4C 29 22 00 B6 09 46 00 99 22 47 49 |N (VL)"...F.."GI|
00000190: 54 54 45 52 52 41 53 54 45 52 20 28 47 52 29 20 |TTERRASTER (GR) |
000001A0: 20 20 20 20 20 20 4D 49 54 54 45 4E 4B 52 45 49 | MITTENKREI|
000001B0: 53 20 28 4D 53 29 00 E5 09 50 00 99 22 53 43 48 |S (MS)...P.."SCH|
000001C0: 49 52 4D 20 57 45 49 53 53 20 28 53 57 29 20 20 |IRM WEISS (SW) |
000001D0: 20 20 20 20 20 53 43 48 49 52 4D 20 52 4F 54 20 | SCHIRM ROT |
000001E0: 20 28 53 52 29 00 15 0A 5A 00 99 22 53 43 48 49 | (SR)...Z.."SCHI|
000001F0: 52 4D 20 42 4C 41 55 20 20 28 53 42 29 20 20 20 |RM BLAU (SB) |
00000200: 20 20 20 20 4B 52 45 49 53 45 20 20 20 20 20 20 | KREISE |
00000210: 28 4B 52 29 22 00 45 0A 5B 00 99 22 53 43 48 49 |(KR)".E.[.."SCHI|
00000220: 52 4D 20 47 52 55 45 4E 20 28 53 47 29 20 20 20 |RM GRUEN (SG) |
00000230: 20 20 20 20 4D 55 4C 54 49 52 41 53 54 45 52 20 | MULTIRASTER |
00000240: 28 4D 52 29 22 00 76 0A 5D 00 99 22 4D 49 54 20 |(MR)".v.].."MIT |
00000250: 46 35 20 55 4E 44 20 46 37 20 4D 45 4E 55 45 20 |F5 UND F7 MENUE |
00000260: 4F 44 45 52 20 4D 55 53 54 45 52 20 57 41 45 48 |ODER MUSTER WAEH|
00000270: 4C 45 4E 21 22 3B 00 7C 0A 5E 00 99 00 99 0A 5F |LEN!";.|.^....._|
00000280: 00 99 22 28 50 45 29 20 3D 20 50 52 4F 47 52 41 |.."(PE) = PROGRA|
00000290: 4D 4D 2D 45 4E 44 45 20 22 00 A2 0A 64 00 85 20 |MM-ENDE "...d.. |
000002A0: 41 24 00 BE 0A 6E 00 8B 20 41 24 B2 22 4D 4B 22 |A$...n.. A$."MK"|
000002B0: 20 A7 20 8D 20 31 30 30 30 3A 89 32 36 30 00 DA | . . 1000:.260..|
000002C0: 0A 78 00 8B 20 41 24 B2 22 4D 50 22 20 A7 20 8D |.x.. A$."MP" . .|
000002D0: 20 31 31 30 30 3A 89 32 36 30 00 F6 0A 82 00 8B | 1100:.260......|
000002E0: 20 41 24 B2 22 48 4C 22 20 A7 20 8D 20 31 32 30 | A$."HL" . . 120|
000002F0: 30 3A 89 32 36 30 00 12 0B 87 00 8B 20 41 24 B2 |0:.260...... A$.|
00000300: 22 56 4C 22 20 A7 20 8D 20 31 33 30 30 3A 89 32 |"VL" . . 1300:.2|
00000310: 36 30 00 31 0B 8C 00 8B 20 41 24 B2 22 47 52 22 |60.1.... A$."GR"|
00000320: A7 8D 31 32 30 30 3A 8D 31 33 30 35 3A 89 32 36 |..1200:.1305:.26|
00000330: 30 00 4C 0B 96 00 8B 20 41 24 B2 22 4D 53 22 20 |0.L.... A$."MS" |
00000340: A7 20 8D 31 35 30 30 3A 89 32 36 30 00 63 0B A0 |. .1500:.260.c..|
00000350: 00 8B 20 41 24 B2 22 53 57 22 20 A7 20 89 20 31 |.. A$."SW" . . 1|
00000360: 37 30 30 00 7A 0B AA 00 8B 20 41 24 B2 22 53 52 |700.z.... A$."SR|
00000370: 22 20 A7 20 89 20 31 37 32 30 00 91 0B B4 00 8B |" . . 1720......|
00000380: 20 41 24 B2 22 53 42 22 20 A7 20 89 20 31 37 34 | A$."SB" . . 174|
00000390: 30 00 A8 0B BE 00 8B 20 41 24 B2 22 53 47 22 20 |0...... A$."SG" |
000003A0: A7 20 89 20 31 37 36 30 00 C4 0B C8 00 8B 20 41 |. . 1760...... A|
000003B0: 24 B2 22 4B 52 22 20 A7 20 8D 20 31 36 30 30 3A |$."KR" . . 1600:|
000003C0: 89 32 36 30 00 DB 0B D2 00 8B 20 41 24 B2 22 4D |.260...... A$."M|
000003D0: 52 22 20 A7 20 8D 20 32 30 30 30 00 F1 0B DC 00 |R" . . 2000.....|
000003E0: 8B 20 41 24 B2 22 50 45 22 20 A7 20 89 32 35 30 |. A$."PE" . .250|
000003F0: 30 00 10 0C 04 01 99 20 22 91 20 20 20 20 20 20 |0...... ". |
00000400: 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 91 22 | ..........."|
00000410: 00 1A 0C 0E 01 89 20 31 30 30 00 23 0C E8 03 DB |...... 100.#....|
00000420: 31 2C 31 00 39 0C FC 03 CD 20 31 34 39 2C 30 2C |1,1.9.... 149,0,|
00000430: 31 34 39 2C 31 39 39 2C 32 00 4F 0C 06 04 CD 20 |149,199,2.O.... |
00000440: 31 35 30 2C 30 2C 31 35 30 2C 31 39 39 2C 32 00 |150,0,150,199,2.|
00000450: 65 0C 1A 04 CD 20 30 2C 31 30 30 2C 32 39 39 2C |e.... 0,100,299,|
00000460: 31 30 30 2C 32 00 6B 0C 24 04 8E 00 74 0C 4C 04 |100,2.k.$...t.L.|
00000470: DB 31 2C 31 00 86 0C 51 04 E1 20 31 34 39 2C 20 |.1,1...Q.. 149, |
00000480: 39 39 2C 34 2C 32 00 95 0C 56 04 E0 31 35 30 2C |99,4,2...V..150,|
00000490: 20 39 38 2C 32 00 9B 0C 60 04 8E 00 A5 0C B0 04 | 98,2...`.......|
000004A0: DB 20 31 2C 31 00 B7 0C B5 04 CD 20 30 2C 30 2C |. 1,1...... 0,0,|
000004B0: 32 39 39 2C 30 2C 32 00 CB 0C BA 04 CD 20 30 2C |299,0,2...... 0,|
000004C0: 31 39 2C 32 39 39 2C 31 39 2C 32 00 DF 0C C4 04 |19,299,19,2.....|
000004D0: CD 20 30 2C 33 39 2C 32 39 39 2C 33 39 2C 32 00 |. 0,39,299,39,2.|
000004E0: F3 0C CE 04 CD 20 30 2C 35 39 2C 32 39 39 2C 35 |..... 0,59,299,5|
000004F0: 39 2C 32 00 07 0D D8 04 CD 20 30 2C 37 39 2C 32 |9,2...... 0,79,2|
00000500: 39 39 2C 37 39 2C 32 00 1B 0D E2 04 CD 20 30 2C |99,79,2...... 0,|
00000510: 39 39 2C 32 39 39 2C 39 39 2C 32 00 31 0D EC 04 |99,299,99,2.1...|
00000520: CD 20 30 2C 31 31 39 2C 32 39 39 2C 31 31 39 2C |. 0,119,299,119,|
00000530: 32 00 47 0D F6 04 CD 20 30 2C 31 33 39 2C 32 39 |2.G.... 0,139,29|
00000540: 39 2C 31 33 39 2C 32 00 5D 0D FB 04 CD 20 30 2C |9,139,2.].... 0,|
00000550: 31 35 39 2C 32 39 39 2C 31 35 39 2C 32 00 73 0D |159,299,159,2.s.|
00000560: 00 05 CD 20 30 2C 31 37 39 2C 32 39 39 2C 31 37 |... 0,179,299,17|
00000570: 39 2C 32 00 89 0D 05 05 CD 20 30 2C 31 39 39 2C |9,2...... 0,199,|
00000580: 32 39 39 2C 31 39 39 2C 32 00 8F 0D 0A 05 8E 00 |299,199,2.......|
00000590: 98 0D 14 05 DB 31 2C 31 00 AA 0D 19 05 CD 20 30 |.....1,1...... 0|
000005A0: 2C 30 2C 30 2C 31 39 39 2C 32 00 BC 0D 1A 05 CD |,0,0,199,2......|
000005B0: 20 31 2C 30 2C 31 2C 31 39 39 2C 32 00 D0 0D 1E | 1,0,1,199,2....|
000005C0: 05 CD 20 31 39 2C 30 2C 31 39 2C 31 39 39 2C 32 |.. 19,0,19,199,2|
000005D0: 00 E4 0D 1F 05 CD 20 32 30 2C 30 2C 32 30 2C 31 |...... 20,0,20,1|
000005E0: 39 39 2C 32 00 F8 0D 23 05 CD 20 33 39 2C 30 2C |99,2...#.. 39,0,|
000005F0: 33 39 2C 31 39 39 2C 32 00 0C 0E 24 05 CD 20 34 |39,199,2...$.. 4|
00000600: 30 2C 30 2C 34 30 2C 31 39 39 2C 32 00 20 0E 28 |0,0,40,199,2. .(|
00000610: 05 CD 20 35 39 2C 30 2C 35 39 2C 31 39 39 2C 32 |.. 59,0,59,199,2|
00000620: 00 34 0E 29 05 CD 20 36 30 2C 30 2C 36 30 2C 31 |.4.).. 60,0,60,1|
00000630: 39 39 2C 32 00 48 0E 2D 05 CD 20 37 39 2C 30 2C |99,2.H.-.. 79,0,|
00000640: 37 39 2C 31 39 39 2C 32 00 5C 0E 2E 05 CD 20 38 |79,199,2.\.... 8|
00000650: 30 2C 30 2C 38 30 2C 31 39 39 2C 32 00 70 0E 32 |0,0,80,199,2.p.2|
00000660: 05 CD 20 39 39 2C 30 2C 39 39 2C 31 39 39 2C 32 |.. 99,0,99,199,2|
00000670: 00 85 0E 33 05 CD 31 30 30 2C 30 2C 31 30 30 2C |...3..100,0,100,|
00000680: 31 39 39 2C 32 00 9A 0E 37 05 CD 31 31 39 2C 30 |199,2...7..119,0|
00000690: 2C 31 31 39 2C 31 39 39 2C 32 00 AF 0E 38 05 CD |,119,199,2...8..|
000006A0: 31 32 30 2C 30 2C 31 32 30 2C 31 39 39 2C 32 00 |120,0,120,199,2.|
000006B0: C4 0E 3C 05 CD 31 33 39 2C 30 2C 31 33 39 2C 31 |..<..139,0,139,1|
000006C0: 39 39 2C 32 00 D9 0E 3D 05 CD 31 34 30 2C 30 2C |99,2...=..140,0,|
000006D0: 31 34 30 2C 31 39 39 2C 32 00 EE 0E 41 05 CD 31 |140,199,2...A..1|
000006E0: 35 39 2C 30 2C 31 35 39 2C 31 39 39 2C 32 00 03 |59,0,159,199,2..|
000006F0: 0F 42 05 CD 31 36 30 2C 30 2C 31 36 30 2C 31 39 |.B..160,0,160,19|
00000700: 39 2C 32 00 18 0F 46 05 CD 31 37 39 2C 30 2C 31 |9,2...F..179,0,1|
00000710: 37 39 2C 31 39 39 2C 32 00 2D 0F 47 05 CD 31 38 |79,199,2.-.G..18|
00000720: 30 2C 30 2C 31 38 30 2C 31 39 39 2C 32 00 42 0F |0,0,180,199,2.B.|
00000730: 4B 05 CD 31 39 39 2C 30 2C 31 39 39 2C 31 39 39 |K..199,0,199,199|
00000740: 2C 32 00 57 0F 4C 05 CD 32 30 30 2C 30 2C 32 30 |,2.W.L..200,0,20|
00000750: 30 2C 31 39 39 2C 32 00 6C 0F 50 05 CD 32 31 39 |0,199,2.l.P..219|
00000760: 2C 30 2C 32 31 39 2C 31 39 39 2C 32 00 81 0F 51 |,0,219,199,2...Q|
00000770: 05 CD 32 32 30 2C 30 2C 32 32 30 2C 31 39 39 2C |..220,0,220,199,|
00000780: 32 00 96 0F 55 05 CD 32 33 39 2C 30 2C 32 33 39 |2...U..239,0,239|
00000790: 2C 31 39 39 2C 32 00 AB 0F 56 05 CD 32 34 30 2C |,199,2...V..240,|
000007A0: 30 2C 32 34 30 2C 31 39 39 2C 32 00 C0 0F 5A 05 |0,240,199,2...Z.|
000007B0: CD 32 35 39 2C 30 2C 32 35 39 2C 31 39 39 2C 32 |.259,0,259,199,2|
000007C0: 00 D5 0F 5B 05 CD 32 36 30 2C 30 2C 32 36 30 2C |...[..260,0,260,|
000007D0: 31 39 39 2C 32 00 EA 0F 5F 05 CD 32 37 39 2C 30 |199,2..._..279,0|
000007E0: 2C 32 37 39 2C 31 39 39 2C 32 00 FF 0F 60 05 CD |,279,199,2...`..|
000007F0: 32 38 30 2C 30 2C 32 38 30 2C 31 39 39 2C 32 00 |280,0,280,199,2.|
00000800: 14 10 64 05 CD 32 39 39 2C 30 2C 32 39 39 2C 31 |..d..299,0,299,1|
00000810: 39 39 2C 32 00 29 10 65 05 CD 33 30 30 2C 30 2C |99,2.).e..300,0,|
00000820: 33 30 30 2C 31 39 39 2C 32 00 2F 10 6E 05 8E 00 |300,199,2./.n...|
00000830: 38 10 DC 05 DB 31 2C 31 00 4A 10 E6 05 E1 20 31 |8....1,1.J.... 1|
00000840: 34 39 2C 39 39 2C 39 39 2C 32 00 5C 10 F0 05 E1 |49,99,99,2.\....|
00000850: 20 31 34 39 2C 39 39 2C 39 38 2C 32 00 6E 10 F5 | 149,99,98,2.n..|
00000860: 05 E1 20 31 34 39 2C 39 39 2C 39 37 2C 32 00 7D |.. 149,99,97,2.}|
00000870: 10 FA 05 CC 20 31 34 39 2C 39 39 2C 32 00 83 10 |.... 149,99,2...|
00000880: 0E 06 8E 00 8D 10 40 06 DB 20 31 2C 31 00 9E 10 |......@.. 1,1...|
00000890: 4A 06 E1 20 31 39 2C 31 39 2C 31 39 2C 32 00 B0 |J.. 19,19,19,2..|
000008A0: 10 54 06 E1 20 31 39 2C 31 37 39 2C 31 39 2C 32 |.T.. 19,179,19,2|
000008B0: 00 C2 10 5E 06 E1 20 32 37 39 2C 31 39 2C 31 39 |...^.. 279,19,19|
000008C0: 2C 32 00 D5 10 68 06 E1 20 32 37 39 2C 31 37 39 |,2...h.. 279,179|
000008D0: 2C 31 39 2C 32 00 E7 10 72 06 E1 20 31 34 39 2C |,19,2...r.. 149,|
000008E0: 39 39 2C 35 30 2C 32 00 ED 10 7C 06 8E 00 F6 10 |99,50,2...|.....|
000008F0: A4 06 DB 32 2C 32 00 00 11 AE 06 89 20 32 36 30 |...2,2...... 260|
00000900: 00 09 11 B8 06 DB 33 2C 33 00 13 11 C2 06 89 20 |......3,3...... |
00000910: 32 36 30 00 1C 11 CC 06 DB 37 2C 37 00 26 11 D6 |260......7,7.&..|
00000920: 06 89 20 32 36 30 00 2F 11 E0 06 DB 36 2C 36 00 |.. 260./....6,6.|
00000930: 39 11 EA 06 89 20 32 36 30 00 6F 11 08 07 E0 31 |9.... 260.o....1|
00000940: 30 2C 31 30 2C 32 3A E0 33 30 2C 33 30 2C 32 3A |0,10,2:.30,30,2:|
00000950: E0 32 39 30 2C 31 30 2C 32 3A E0 32 39 30 2C 31 |.290,10,2:.290,1|
00000960: 39 30 2C 32 3A E0 32 37 30 2C 31 37 30 2C 32 00 |90,2:.270,170,2.|
00000970: 91 11 6C 07 E0 32 37 30 2C 33 30 2C 32 3A E0 31 |..l..270,30,2:.1|
00000980: 30 2C 31 39 30 2C 32 3A E0 33 30 2C 31 37 30 2C |0,190,2:.30,170,|
00000990: 32 00 97 11 76 07 8E 00 BF 11 D0 07 8D 31 31 30 |2...v........110|
000009A0: 30 3A 8D 31 32 30 35 3A 8D 31 33 30 35 3A 8D 31 |0:.1205:.1305:.1|
000009B0: 35 31 30 3A 8D 31 36 31 30 3A 8D 31 38 30 30 00 |510:.1610:.1800.|
000009C0: C5 11 BA 09 8E 00 D2 11 C4 09 99 20 C7 28 31 34 |........... .(14|
000009D0: 37 29 00 E8 11 C5 09 97 35 33 32 38 30 2C 30 3A |7)......53280,0:|
000009E0: 97 35 33 32 38 31 2C 30 00 10 12 C6 09 99 22 20 |.53281,0......" |
000009F0: 20 20 20 20 20 20 20 05 49 43 48 2C 44 45 49 4E | .ICH,DEIN|
00000A00: 20 43 20 42 20 4D 20 2D 20 36 20 34 20 22 3A 99 | C B M - 6 4 ":.|
00000A10: 00 41 12 C9 09 99 22 42 49 4E 20 55 45 42 45 52 |.A...."BIN UEBER|
00000A20: 47 4C 55 45 43 4B 4C 49 43 48 20 44 49 52 20 42 |GLUECKLICH DIR B|
00000A30: 45 49 4D 20 45 49 4E 53 54 45 4C 4C 45 4E 22 3A |EIM EINSTELLEN":|
00000A40: 99 00 71 12 CE 09 99 22 44 45 53 20 4D 4F 4E 49 |..q...."DES MONI|
00000A50: 54 4F 52 53 20 4F 44 45 52 20 46 45 52 4E 53 45 |TORS ODER FERNSE|
00000A60: 48 45 52 53 20 47 45 48 4F 4C 46 45 4E 20 5A 55 |HERS GEHOLFEN ZU|
00000A70: 22 00 80 12 D8 09 99 22 48 41 42 45 4E 20 2E 22 |"......"HABEN ."|
00000A80: 00 98 12 E2 09 99 3A 99 3A 99 3A 99 3A 99 3A 99 |......:.:.:.:.:.|
00000A90: 3A 99 3A 99 3A 99 3A 99 00 C8 12 EC 09 99 22 20 |:.:.:.:......." |
00000AA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AB0: 20 20 20 20 12 45 49 4E 20 48 45 49 53 53 45 52 | .EIN HEISSER|
00000AC0: 20 54 49 50 20 21 92 22 00 DA 12 F6 09 81 49 B2 | TIP !."......I.|
00000AD0: 31 20 A4 20 33 39 39 30 3A 82 00 E6 12 FB 09 99 |1 . 3990:.......|
00000AE0: C7 28 31 34 37 29 00 FC 12 00 0A 97 35 33 32 38 |.(147)......5328|
00000AF0: 30 2C 37 3A 97 35 33 32 38 31 2C 37 00 1F 13 14 |0,7:.53281,7....|
00000B00: 0A 99 22 90 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00000B10: 20 20 20 48 20 41 20 4C 20 4C 20 4F 20 21 22 00 | H A L L O !".|
00000B20: 25 13 18 0A 99 00 54 13 1E 0A 99 22 20 20 49 43 |%.....T...." IC|
00000B30: 48 20 42 49 4E 20 41 4E 20 57 45 49 54 52 45 4E |H BIN AN WEITREN|
00000B40: 20 4B 4F 4E 54 41 4B 54 45 4E 20 5A 57 45 43 4B | KONTAKTEN ZWECK|
00000B50: 53 22 3A 99 00 7B 13 28 0A 99 22 20 20 20 20 20 |S":..{.(.." |
00000B60: 20 20 20 20 20 45 52 46 41 48 52 55 4E 47 53 41 | ERFAHRUNGSA|
00000B70: 55 53 54 41 55 53 43 48 22 3A 99 00 9F 13 32 0A |USTAUSCH":....2.|
00000B80: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 53 4F |." SO|
00000B90: 46 54 57 41 52 45 54 41 55 53 43 48 22 3A 99 00 |FTWARETAUSCH":..|
00000BA0: BE 13 3C 0A 99 22 20 20 20 20 20 20 20 20 20 20 |..<.." |
00000BB0: 20 20 20 20 20 20 20 20 55 4E 44 22 3A 99 00 E3 | UND":...|
00000BC0: 13 46 0A 99 22 20 20 20 20 20 20 20 20 20 20 20 |.F.." |
00000BD0: 20 53 4F 46 54 57 41 52 45 56 45 52 4B 41 55 46 | SOFTWAREVERKAUF|
00000BE0: 22 3A 99 00 F8 13 50 0A 99 22 49 4E 54 45 52 45 |":....P.."INTERE|
00000BF0: 53 53 49 45 52 54 2E 22 00 FE 13 5A 0A 99 00 2A |SSIERT."...Z...*|
00000C00: 14 64 0A 99 22 46 41 4C 4C 53 20 53 49 45 20 49 |.d.."FALLS SIE I|
00000C10: 4E 54 45 52 45 53 53 45 20 48 41 42 45 4E 2C 4E |NTERESSE HABEN,N|
00000C20: 45 48 4D 45 4E 20 53 49 45 22 00 4A 14 6E 0A 99 |EHMEN SIE".J.n..|
00000C30: 22 44 4F 43 48 20 4B 4F 4E 54 41 4B 54 20 41 55 |"DOCH KONTAKT AU|
00000C40: 46 20 4D 49 54 20 3A 22 3A 99 00 6C 14 78 0A 99 |F MIT :":..l.x..|
00000C50: 22 20 20 20 20 20 20 20 20 20 20 20 20 46 52 41 |" FRA|
00000C60: 4E 4B 20 53 50 52 45 4E 47 45 52 22 00 8E 14 82 |NK SPRENGER"....|
00000C70: 0A 99 22 20 20 20 20 20 20 20 20 20 20 20 20 42 |.." B|
00000C80: 52 41 53 53 45 52 54 53 54 52 2E 31 38 22 00 B0 |RASSERTSTR.18"..|
00000C90: 14 8C 0A 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
00000CA0: 20 34 33 30 30 20 20 45 53 53 45 4E 20 20 31 22 | 4300 ESSEN 1"|
00000CB0: 00 D3 14 96 0A 99 22 20 20 20 20 20 20 20 20 20 |......" |
00000CC0: 20 20 54 45 4C 2E 20 30 32 30 31 2F 37 39 36 35 | TEL. 0201/7965|
00000CD0: 35 39 22 00 15 15 40 1F 53 49 B2 35 34 32 37 32 |59"...@.SI.54272|
00000CE0: 3A 46 4C B2 53 49 3A 46 48 B2 53 49 AA 31 3A 57 |:FL.SI:FH.SI.1:W|
00000CF0: B2 53 7E AD B7 A4 1B 25 34 9A A3 53 A4 8B 25 34 |.S~....%4..S..%4|
00000D00: 9A A3 63 A4 CB 25 34 9A A3 23 40 01 53 94 A1 F9 |..c..%4..#@.S...|
00000D10: 74 C2 C3 13 50 00 29 15 4D 41 44 45 20 54 4F 20 |t...P.).MADE TO |
00000D20: 44 49 53 41 50 50 45 41 52 00 46 15 1E 05 99 22 |DISAPPEAR.F...."|
00000D30: 57 49 54 48 20 54 48 45 20 27 42 59 45 20 43 4F |WITH THE 'BYE CO|
00000D40: 4D 4D 41 4E 44 2E 00 55 15 28 05 99 22 11 20 20 |MMAND..U.(..". |
00000D50: 12 42 59 45 92 00 81 15 32 05 99 22 11 20 41 4C |.BYE....2..". AL|
00000D60: 54 48 4F 55 47 48 20 54 48 45 20 54 55 52 54 4C |THOUGH THE TURTL|
00000D70: 45 20 44 49 53 41 50 50 45 41 52 53 2C 20 59 4F |E DISAPPEARS, YO|
00000D80: 55 00 AA 15 3C 05 99 22 43 41 4E 20 53 54 49 4C |U...<.."CAN STIL|
00000D90: 4C 20 43 4F 4E 54 49 4E 55 45 20 54 4F 20 44 52 |L CONTINUE TO DR|
00000DA0: 41 57 20 57 49 54 48 20 49 54 00 D0 15 46 05 99 |AW WITH IT...F..|
00000DB0: 22 28 41 4E 44 20 49 54 20 41 43 54 55 41 4C 4C |"(AND IT ACTUALL|
00000DC0: 59 20 44 52 41 57 53 20 46 41 53 54 45 52 21 29 |Y DRAWS FASTER!)|
00000DD0: 00 EF 15 50 05 8D 36 30 3A F6 3A F0 AB 34 35 3A |...P..60:.:..45:|
00000DE0: F5 31 35 30 3A F0 AB 31 32 30 3A F5 31 35 30 00 |.150:..120:.150.|
00000DF0: FD 15 5A 05 8D 37 30 3A D4 3A 8D 36 30 00 28 16 |..Z..70:.:.60.(.|
00000E00: 64 05 99 22 93 11 54 48 45 20 56 41 4C 55 45 53 |d.."..THE VALUES|
00000E10: 20 4F 46 20 54 48 45 20 58 20 41 4E 44 20 59 20 | OF THE X AND Y |
00000E20: 50 4F 53 49 54 49 4F 4E 00 50 16 6E 05 99 22 41 |POSITION.P.n.."A|
00000E30: 4E 44 20 54 48 45 20 44 49 52 45 43 54 49 4F 4E |ND THE DIRECTION|
00000E40: 20 28 49 4E 20 44 45 47 52 45 45 53 29 20 49 4E | (IN DEGREES) IN|
00000E50: 00 7A 16 78 05 99 22 57 48 49 43 48 20 54 48 45 |.z.x.."WHICH THE|
00000E60: 20 54 55 52 54 4C 45 20 49 53 20 50 4F 49 4E 54 | TURTLE IS POINT|
00000E70: 49 4E 47 20 43 41 4E 20 42 45 00 98 16 82 05 99 |ING CAN BE......|
00000E80: 22 52 45 41 44 20 49 4E 54 4F 20 59 4F 55 52 20 |"READ INTO YOUR |
00000E90: 50 52 4F 47 52 41 4D 2E 00 B9 16 8C 05 99 22 54 |PROGRAM......."T|
00000EA0: 48 45 52 45 20 41 52 45 20 54 48 52 45 45 20 46 |HERE ARE THREE F|
00000EB0: 55 4E 43 54 49 4F 4E 53 3A 00 E1 16 96 05 99 22 |UNCTIONS:......"|
00000EC0: 11 20 20 12 54 50 4F 53 28 58 29 92 20 47 49 56 |. .TPOS(X). GIV|
00000ED0: 45 53 20 54 48 45 20 58 20 50 4F 53 49 54 49 4F |ES THE X POSITIO|
00000EE0: 4E 00 09 17 A0 05 99 22 11 20 20 12 54 50 4F 53 |N......". .TPOS|
00000EF0: 28 59 29 92 20 47 49 56 45 53 20 54 48 45 20 59 |(Y). GIVES THE Y|
00000F00: 20 50 4F 53 49 54 49 4F 4E 00 30 17 AA 05 99 22 | POSITION.0...."|
00000F10: 11 20 20 12 54 50 4F 53 28 41 29 92 20 47 49 56 |. .TPOS(A). GIV|
00000F20: 45 53 20 54 48 45 20 44 49 52 45 43 54 49 4F 4E |ES THE DIRECTION|
00000F30: 00 54 17 B4 05 99 22 20 20 20 20 20 20 20 20 20 |.T...." |
00000F40: 20 20 20 20 20 20 20 20 28 49 4E 20 44 45 47 52 | (IN DEGR|
00000F50: 45 45 53 29 00 7D 17 BE 05 99 22 54 48 45 53 45 |EES).}...."THESE|
00000F60: 20 46 55 4E 43 54 49 4F 4E 53 20 4D 41 59 20 42 | FUNCTIONS MAY B|
00000F70: 45 20 55 53 45 44 20 54 4F 20 53 45 54 00 A2 17 |E USED TO SET...|
00000F80: C8 05 99 22 41 4E 4F 54 48 45 52 20 56 41 52 49 |..."ANOTHER VARI|
00000F90: 41 42 4C 45 20 5B 20 45 3D 54 50 4F 53 28 58 29 |ABLE [ E=TPOS(X)|
00000FA0: 20 5D 00 BA 17 D2 05 99 22 4F 52 20 49 4E 20 41 | ]......"OR IN A|
00000FB0: 20 43 4F 4E 44 49 54 49 4F 4E 00 E2 17 DC 05 99 | CONDITION......|
00000FC0: 22 20 5B 20 49 46 20 54 50 4F 53 20 28 41 29 20 |" [ IF TPOS (A) |
00000FD0: 3E 20 31 38 30 20 54 48 45 4E 20 2E 2E 2E 2E 2E |> 180 THEN .....|
00000FE0: 20 5D 00 10 18 E6 05 99 22 4F 52 20 49 4E 20 41 | ]......"OR IN A|
00000FF0: 20 50 52 49 4E 54 20 43 4F 4D 4D 41 4E 44 20 5B | PRINT COMMAND [|
00001000: 20 50 52 49 4E 54 20 54 50 4F 53 28 41 29 20 5D | PRINT TPOS(A) ]|
00001010: 00 18 18 F0 05 8D 36 30 00 45 18 FA 05 99 22 93 |......60.E....".|
00001020: 11 49 4E 20 4F 52 44 45 52 20 54 4F 20 4D 41 4B |.IN ORDER TO MAK|
00001030: 45 20 49 54 20 45 41 53 49 45 52 20 54 4F 20 52 |E IT EASIER TO R|
00001040: 45 50 45 41 54 00 6E 18 04 06 99 22 47 52 4F 55 |EPEAT.n...."GROU|
00001050: 50 53 20 4F 46 20 54 55 52 54 4C 45 20 47 52 41 |PS OF TURTLE GRA|
00001060: 50 48 49 43 20 43 4F 4D 4D 41 4E 44 53 2C 00 94 |PHIC COMMANDS,..|
00001070: 18 0E 06 99 22 27 52 45 50 45 41 54 27 20 43 4F |...."'REPEAT' CO|
00001080: 4D 4D 41 4E 44 53 20 41 52 45 20 49 4E 43 4C 55 |MMANDS ARE INCLU|
00001090: 44 45 44 2E 00 C0 18 18 06 99 22 54 48 45 20 43 |DED......."THE C|
000010A0: 4F 4D 4D 41 4E 44 20 57 48 49 43 48 20 53 48 4F |OMMAND WHICH SHO|
000010B0: 57 53 20 54 48 45 20 42 45 47 49 4E 4E 49 4E 47 |WS THE BEGINNING|
000010C0: 00 EA 18 22 06 99 22 4F 46 20 54 48 45 20 43 4F |...".."OF THE CO|
000010D0: 4D 4D 4E 41 4E 44 53 20 54 4F 20 42 45 20 52 45 |MMNANDS TO BE RE|
000010E0: 50 45 41 54 45 44 20 41 4E 44 00 13 19 2C 06 99 |PEATED AND...,..|
000010F0: 22 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 54 |"THE NUMBER OF T|
00001100: 49 4D 45 53 20 54 48 45 59 20 41 52 45 20 54 4F |IMES THEY ARE TO|
00001110: 20 42 45 00 3A 19 36 06 99 22 52 45 50 45 41 54 | BE.:.6.."REPEAT|
00001120: 45 44 20 49 53 20 54 48 45 20 4C 45 46 54 20 42 |ED IS THE LEFT B|
00001130: 52 41 43 4B 45 54 20 12 5B 92 00 65 19 40 06 99 |RACKET .[..e.@..|
00001140: 22 49 54 20 4D 55 53 54 20 42 45 20 46 4F 4C 4C |"IT MUST BE FOLL|
00001150: 4F 57 45 44 20 42 59 20 54 48 45 20 4E 55 4D 42 |OWED BY THE NUMB|
00001160: 45 52 20 4F 46 00 7F 19 4A 06 99 22 52 45 50 45 |ER OF...J.."REPE|
00001170: 41 54 53 20 41 4E 44 20 41 20 43 4F 4C 4F 4E 00 |ATS AND A COLON.|
00001180: A4 19 54 06 99 22 46 4F 52 20 45 58 41 4D 50 4C |..T.."FOR EXAMPL|
00001190: 45 20 2D 20 12 5B 33 3A 92 20 57 49 4C 4C 20 43 |E - .[3:. WILL C|
000011A0: 41 55 53 45 00 D0 19 5E 06 99 22 54 48 45 20 46 |AUSE...^.."THE F|
000011B0: 4F 4C 4C 4F 57 49 4E 47 20 43 4F 4D 4D 41 4E 44 |OLLOWING COMMAND|
000011C0: 53 20 54 4F 20 42 45 20 52 45 50 45 41 54 45 44 |S TO BE REPEATED|
000011D0: 00 DF 19 68 06 99 22 33 20 54 49 4D 45 53 2E 00 |...h.."3 TIMES..|
000011E0: E7 19 72 06 8D 36 30 00 13 1A 7C 06 99 22 93 11 |..r..60...|.."..|
000011F0: 54 48 45 20 45 4E 44 20 4F 46 20 54 48 45 20 47 |THE END OF THE G|
00001200: 52 4F 55 50 20 4F 46 20 43 4F 4D 4D 41 4E 44 53 |ROUP OF COMMANDS|
00001210: 20 49 53 00 39 1A 86 06 99 22 4D 41 52 4B 45 44 | IS.9...."MARKED|
00001220: 20 42 59 20 41 20 43 4F 4C 4F 4E 20 41 4E 44 20 | BY A COLON AND |
00001230: 54 48 45 20 52 49 47 48 54 00 4D 1A 90 06 99 22 |THE RIGHT.M...."|
00001240: 42 52 41 43 4B 45 54 20 12 5D 92 20 2E 00 7A 1A |BRACKET .]. ..z.|
00001250: 9A 06 99 22 54 48 45 20 43 4F 4D 4D 41 4E 44 53 |..."THE COMMANDS|
00001260: 20 4D 41 59 20 42 45 20 41 4E 59 20 42 41 53 49 | MAY BE ANY BASI|
00001270: 43 20 43 4F 4D 4D 41 4E 44 53 00 A4 1A A4 06 99 |C COMMANDS......|
00001280: 22 41 4E 44 20 4D 41 59 20 53 50 41 4E 20 4D 41 |"AND MAY SPAN MA|
00001290: 4E 59 20 4C 49 4E 45 53 20 4F 46 20 50 52 4F 47 |NY LINES OF PROG|
000012A0: 52 41 4D 2E 00 B7 1A AE 06 99 22 46 4F 52 20 45 |RAM......."FOR E|
000012B0: 58 41 4D 50 4C 45 3A 00 D9 1A B8 06 99 22 20 5B |XAMPLE:......" [|
000012C0: 32 3A 50 52 49 4E 54 27 41 42 43 27 3A 5D 20 57 |2:PRINT'ABC':] W|
000012D0: 49 4C 4C 20 50 52 49 4E 54 00 E3 1A C2 06 99 22 |ILL PRINT......"|
000012E0: 41 42 43 00 ED 1A CC 06 99 22 41 42 43 00 17 1B |ABC......"ABC...|
000012F0: D6 06 99 22 49 4E 20 54 55 52 54 4C 45 20 47 52 |..."IN TURTLE GR|
00001300: 41 50 48 49 43 53 2C 20 59 4F 55 20 43 41 4E 20 |APHICS, YOU CAN |
00001310: 44 52 41 57 20 41 4E 00 3A 1B E0 06 99 22 45 49 |DRAW AN.:...."EI|
00001320: 47 48 54 20 53 49 44 45 44 20 46 49 47 55 52 45 |GHT SIDED FIGURE|
00001330: 20 28 4F 43 54 41 47 4F 4E 29 00 5D 1B EA 06 99 | (OCTAGON).]....|
00001340: 22 54 55 52 54 4C 45 32 20 3A 20 5B 38 3A 4D 4F |"TURTLE2 : [8:MO|
00001350: 56 45 33 30 3A 54 55 52 4E 34 35 3A 5D 00 84 1B |VE30:TURN45:]...|
00001360: F4 06 8D 36 30 3A DB 31 2C 37 3A F4 32 3A FB 38 |...60:.1,7:.2:.8|
00001370: 3A F5 33 30 3A F0 34 35 3A FC 3A 8D 37 30 3A D4 |:.30:.45:.:.70:.|
00001380: 3A 8D 36 30 00 B2 1B FE 06 99 22 93 11 4F 52 20 |:.60......"..OR |
00001390: 54 4F 20 44 52 41 57 20 41 20 46 49 47 55 45 20 |TO DRAW A FIGUE |
000013A0: 57 49 54 48 20 41 4E 59 20 4E 55 4D 42 45 52 20 |WITH ANY NUMBER |
000013B0: 4F 46 00 D5 1B 08 07 99 22 53 49 44 45 53 2C 20 |OF......"SIDES, |
000013C0: 55 53 45 20 56 41 52 49 41 42 4C 45 53 20 46 4F |USE VARIABLES FO|
000013D0: 52 20 54 48 45 00 00 1C 12 07 99 22 4E 55 4D 42 |R THE......"NUMB|
000013E0: 45 52 20 4F 46 20 52 45 50 45 41 54 53 20 41 4E |ER OF REPEATS AN|
000013F0: 44 20 54 4F 20 43 4F 4D 50 55 54 45 20 54 48 45 |D TO COMPUTE THE|
00001400: 00 0C 1C 1C 07 99 22 41 4E 47 4C 45 00 2B 1C 26 |......"ANGLE.+.&|
00001410: 07 99 22 49 4E 50 55 54 27 4E 55 4D 42 45 52 20 |.."INPUT'NUMBER |
00001420: 4F 46 20 53 49 44 45 53 27 3B 4E 00 42 1C 30 07 |OF SIDES';N.B.0.|
00001430: 99 22 48 49 52 45 53 31 2C 37 3A 54 55 52 54 4C |."HIRES1,7:TURTL|
00001440: 45 32 00 5E 1C 3A 07 99 22 5B 4E 3A 4D 4F 56 45 |E2.^.:.."[N:MOVE|
00001450: 33 30 3A 54 55 52 4E 33 36 30 2F 4E 3A 5D 00 7B |30:TURN360/N:].{|
00001460: 1C 44 07 8D 36 30 3A 85 22 4E 55 4D 42 45 52 20 |.D..60:."NUMBER |
00001470: 4F 46 20 53 49 44 45 53 22 3B 4E 00 A1 1C 4E 07 |OF SIDES";N...N.|
00001480: DB 31 2C 37 3A F4 32 3A FB 4E 3A F5 33 30 3A F0 |.1,7:.2:.N:.30:.|
00001490: 33 36 30 AD 4E 3A FC 3A 8D 37 30 3A D4 3A 8D 36 |360.N:.:.70:.:.6|
000014A0: 30 00 CA 1C 58 07 99 22 93 11 49 46 20 59 4F 55 |0...X.."..IF YOU|
000014B0: 20 4E 45 45 44 20 54 4F 20 47 45 54 20 4F 55 54 | NEED TO GET OUT|
000014C0: 20 4F 46 20 4F 4E 45 20 4F 46 00 F3 1C 62 07 99 | OF ONE OF...b..|
000014D0: 22 54 48 45 53 45 20 52 45 50 45 41 54 53 20 42 |"THESE REPEATS B|
000014E0: 45 46 4F 52 45 20 54 48 45 20 53 50 45 43 49 46 |EFORE THE SPECIF|
000014F0: 49 45 44 00 18 1D 6C 07 99 22 4E 55 4D 42 45 52 |IED...l.."NUMBER|
00001500: 20 4F 46 20 54 49 4D 45 53 20 49 53 20 55 50 2C | OF TIMES IS UP,|
00001510: 20 55 53 45 20 54 48 45 00 33 1D 76 07 99 22 11 | USE THE.3.v..".|
00001520: 20 20 12 3A 45 58 49 54 92 20 43 4F 4D 4D 4E 41 | .:EXIT. COMMNA|
00001530: 4E 44 2E 00 47 1D 80 07 99 22 11 46 4F 52 20 45 |ND..G....".FOR E|
00001540: 58 41 4D 50 4C 45 3A 00 6F 1D 8A 07 99 22 5B 32 |XAMPLE:.o...."[2|
00001550: 30 3A 54 55 52 4E 33 30 3A 49 46 54 50 4F 53 28 |0:TURN30:IFTPOS(|
00001560: 41 29 3E 31 38 30 54 48 45 4E 3A 45 58 49 54 00 |A)>180THEN:EXIT.|
00001570: 77 1D 94 07 99 22 5D 00 7F 1D 9E 07 8D 36 30 00 |w...."]......60.|
00001580: A8 1D A8 07 99 22 93 11 41 4E 59 20 47 52 41 50 |....."..ANY GRAP|
00001590: 48 49 43 20 50 49 43 54 55 52 45 20 53 48 4F 57 |HIC PICTURE SHOW|
000015A0: 4E 20 4F 4E 20 54 48 45 00 D0 1D B2 07 99 22 53 |N ON THE......"S|
000015B0: 43 52 45 45 4E 20 4D 41 59 20 42 45 20 44 55 4D |CREEN MAY BE DUM|
000015C0: 50 45 44 20 54 4F 20 41 20 50 52 49 4E 54 45 52 |PED TO A PRINTER|
000015D0: 00 F2 1D BC 07 99 22 45 58 43 45 50 54 20 46 4F |......"EXCEPT FO|
000015E0: 52 20 53 50 52 49 54 45 20 50 41 54 54 45 52 4E |R SPRITE PATTERN|
000015F0: 53 2E 00 08 1E C6 07 99 22 54 48 45 20 43 4F 4D |S......."THE COM|
00001600: 4D 41 4E 44 20 49 53 3A 00 1C 1E D0 07 99 22 11 |MAND IS:......".|
00001610: 20 20 12 48 41 52 44 20 5B 44 5D 92 00 41 1E DA | .HARD [D]..A..|
00001620: 07 99 22 11 20 20 44 3D 49 53 20 4F 50 54 49 4F |..". D=IS OPTIO|
00001630: 4E 41 4C 20 44 45 56 49 43 45 20 4E 55 4D 42 45 |NAL DEVICE NUMBE|
00001640: 52 00 67 1E E4 07 99 22 20 20 20 44 45 56 49 43 |R.g...." DEVIC|
00001650: 45 20 34 20 49 53 20 41 53 53 55 4D 45 44 20 49 |E 4 IS ASSUMED I|
00001660: 46 20 4E 4F 4E 45 2E 00 92 1E EE 07 99 22 4D 55 |F NONE......."MU|
00001670: 4C 54 49 43 4F 4C 4F 52 20 53 43 52 45 45 4E 53 |LTICOLOR SCREENS|
00001680: 20 53 48 4F 57 20 50 41 49 4E 54 42 52 55 53 48 | SHOW PAINTBRUSH|
00001690: 20 31 00 BF 1E F8 07 99 22 41 52 45 41 53 20 49 | 1......"AREAS I|
000016A0: 4E 20 54 48 45 20 44 41 52 4B 45 53 54 20 54 4F |N THE DARKEST TO|
000016B0: 4E 45 53 2C 20 50 41 49 4E 54 42 52 55 53 48 00 |NES, PAINTBRUSH.|
000016C0: EA 1E 02 08 99 22 32 20 49 4E 20 4D 45 44 49 55 |....."2 IN MEDIU|
000016D0: 4D 20 44 45 4E 53 49 54 59 20 41 4E 44 20 50 41 |M DENSITY AND PA|
000016E0: 49 4E 54 42 52 55 53 48 20 32 00 0B 1F 0C 08 99 |INTBRUSH 2......|
000016F0: 22 49 4E 20 4C 49 47 48 54 45 53 54 20 44 45 4E |"IN LIGHTEST DEN|
00001700: 53 49 54 59 20 50 52 49 4E 54 2E 00 13 1F 16 08 |SITY PRINT......|
00001710: 8D 36 30 00 40 1F 20 08 99 22 93 11 55 4C 54 52 |.60.@. .."..ULTR|
00001720: 41 42 41 53 49 43 2D 36 34 20 49 4E 43 4C 55 44 |ABASIC-64 INCLUD|
00001730: 45 53 20 4D 41 4E 59 20 43 4F 4D 4D 41 4E 44 53 |ES MANY COMMANDS|
00001740: 00 6D 1F 2A 08 99 22 46 4F 52 20 49 4E 50 55 54 |.m.*.."FOR INPUT|
00001750: 2C 20 46 52 4F 4D 20 4A 4F 59 53 54 49 43 4B 53 |, FROM JOYSTICKS|
00001760: 2C 20 50 41 44 44 4C 45 53 20 41 4E 44 00 96 1F |, PADDLES AND...|
00001770: 34 08 99 22 4C 49 47 48 54 50 45 4E 2E 20 41 4C |4.."LIGHTPEN. AL|
00001780: 4C 20 4F 46 20 54 48 45 53 45 20 44 45 56 49 43 |L OF THESE DEVIC|
00001790: 45 53 20 41 52 45 00 C4 1F 3E 08 99 22 41 54 54 |ES ARE...>.."ATT|
000017A0: 41 43 48 45 44 20 54 4F 20 54 48 45 20 50 4F 52 |ACHED TO THE POR|
000017B0: 54 53 20 4F 4E 20 54 48 45 20 52 49 47 48 54 20 |TS ON THE RIGHT |
000017C0: 53 49 44 45 00 EF 1F 48 08 99 22 4F 46 20 59 4F |SIDE...H.."OF YO|
000017D0: 55 52 20 43 4F 4D 50 55 54 45 52 2E 20 54 48 45 |UR COMPUTER. THE|
000017E0: 20 4C 49 47 48 54 20 50 45 4E 20 4D 55 53 54 00 | LIGHT PEN MUST.|
000017F0: 1B 20 52 08 99 22 42 45 20 41 54 54 41 43 48 45 |. R.."BE ATTACHE|
00001800: 44 20 54 4F 20 50 4F 52 54 20 31 2C 20 42 55 54 |D TO PORT 1, BUT|
00001810: 20 54 48 45 20 4F 54 48 45 52 53 00 3D 20 5C 08 | THE OTHERS.= \.|
00001820: 99 22 4D 41 59 20 42 45 20 50 4C 55 47 47 45 44 |."MAY BE PLUGGED|
00001830: 20 49 4E 54 4F 20 45 49 54 48 45 52 2E 00 6A 20 | INTO EITHER..j |
00001840: 66 08 99 22 11 41 4C 4C 20 4F 46 20 54 48 45 53 |f..".ALL OF THES|
00001850: 45 20 44 45 56 49 43 45 53 20 41 52 45 20 52 45 |E DEVICES ARE RE|
00001860: 41 44 20 54 48 52 4F 55 47 48 00 86 20 70 08 99 |AD THROUGH.. p..|
00001870: 22 55 4C 54 52 41 42 41 53 49 43 20 46 55 4E 43 |"ULTRABASIC FUNC|
00001880: 54 49 4F 4E 53 2E 00 8E 20 7A 08 8D 36 30 00 BA |TIONS... z..60..|
00001890: 20 84 08 99 22 93 11 54 48 45 20 4A 4F 59 53 54 | ..."..THE JOYST|
000018A0: 49 43 4B 53 20 41 52 45 20 52 45 41 44 20 57 49 |ICKS ARE READ WI|
000018B0: 54 48 20 54 48 45 20 4A 4F 59 00 CA 20 8E 08 99 |TH THE JOY.. ...|
000018C0: 22 46 55 4E 43 54 49 4F 4E 3A 00 DC 20 98 08 99 |"FUNCTION:.. ...|
000018D0: 22 11 20 20 12 4A 4F 59 28 50 29 92 00 F5 20 A2 |". .JOY(P)... .|
000018E0: 08 99 22 11 20 20 50 3D 50 4F 52 54 20 28 31 20 |..". P=PORT (1 |
000018F0: 4F 52 20 32 29 00 1E 21 AC 08 99 22 20 54 48 45 |OR 2)..!..." THE|
00001900: 20 56 41 4C 55 45 20 52 45 54 55 52 4E 45 44 20 | VALUE RETURNED |
00001910: 49 53 20 54 48 45 20 53 55 4D 20 4F 46 3A 00 30 |IS THE SUM OF:.0|
00001920: 21 B6 08 99 22 20 20 20 20 31 3D 4E 4F 52 54 48 |!..." 1=NORTH|
00001930: 00 42 21 C0 08 99 22 20 20 20 20 32 3D 53 4F 55 |.B!..." 2=SOU|
00001940: 54 48 00 53 21 CA 08 99 22 20 20 20 20 34 3D 57 |TH.S!..." 4=W|
00001950: 45 53 54 00 64 21 D4 08 99 22 20 20 20 20 38 3D |EST.d!..." 8=|
00001960: 45 41 53 54 00 7C 21 DE 08 99 22 20 20 20 31 36 |EAST.|!..." 16|
00001970: 3D 46 49 52 45 20 42 55 54 54 4F 4E 00 A9 21 E8 |=FIRE BUTTON..!.|
00001980: 08 99 22 11 46 4F 52 20 45 58 41 4D 50 4C 45 2C |..".FOR EXAMPLE,|
00001990: 20 54 4F 20 54 45 53 54 20 46 4F 52 20 54 48 45 | TO TEST FOR THE|
000019A0: 20 4A 4F 59 53 54 49 43 4B 00 D1 21 F2 08 99 22 | JOYSTICK..!..."|
000019B0: 42 45 49 4E 47 20 50 55 53 48 45 44 20 45 41 53 |BEING PUSHED EAS|
000019C0: 54 20 4F 4E 20 50 4F 52 54 20 31 2C 20 55 53 45 |T ON PORT 1, USE|
000019D0: 3A 00 F0 21 FC 08 99 22 20 20 49 46 20 4A 4F 59 |:..!..." IF JOY|
000019E0: 28 31 29 3D 38 20 54 48 45 4E 2E 2E 2E 2E 2E 2E |(1)=8 THEN......|
000019F0: 00 1B 22 06 09 99 22 42 45 43 41 55 53 45 20 54 |.."..."BECAUSE T|
00001A00: 48 45 52 45 20 57 49 4C 4C 20 42 45 20 54 49 4D |HERE WILL BE TIM|
00001A10: 45 53 20 4D 55 4C 54 49 50 4C 45 00 47 22 10 09 |ES MULTIPLE.G"..|
00001A20: 99 22 4C 49 4E 45 53 20 57 49 4C 4C 20 42 45 20 |."LINES WILL BE |
00001A30: 4F 4E 2C 20 41 20 42 45 54 54 45 52 20 54 45 53 |ON, A BETTER TES|
00001A40: 54 20 49 53 20 54 4F 00 6C 22 24 09 99 22 55 53 |T IS TO.l"$.."US|
00001A50: 45 3A 20 20 49 46 20 4A 4F 59 28 31 29 20 41 4E |E: IF JOY(1) AN|
00001A60: 44 20 38 20 54 48 45 4E 2E 2E 2E 2E 00 97 22 2E |D 8 THEN......".|
00001A70: 09 99 22 54 48 49 53 20 45 58 50 52 45 53 53 49 |.."THIS EXPRESSI|
00001A80: 4F 4E 20 57 49 4C 4C 20 42 45 20 54 52 55 45 20 |ON WILL BE TRUE |
00001A90: 45 56 45 4E 20 49 46 00 B8 22 38 09 99 22 4C 49 |EVEN IF.."8.."LI|
00001AA0: 4E 45 53 20 4F 54 48 45 52 20 54 48 41 4E 20 38 |NES OTHER THAN 8|
00001AB0: 20 41 52 45 20 4F 4E 2E 00 C0 22 42 09 8D 36 30 | ARE ON..."B..60|
00001AC0: 00 ED 22 4C 09 99 22 93 11 54 48 45 52 45 20 4D |.."L.."..THERE M|
00001AD0: 41 59 20 42 45 20 54 57 4F 20 50 41 44 44 4C 45 |AY BE TWO PADDLE|
00001AE0: 53 20 41 54 54 41 43 48 45 44 20 54 4F 00 1A 23 |S ATTACHED TO..#|
00001AF0: 56 09 99 22 45 41 43 48 20 50 4F 52 54 2E 20 54 |V.."EACH PORT. T|
00001B00: 48 45 20 50 4F 53 49 54 49 4F 4E 20 4F 46 20 41 |HE POSITION OF A|
00001B10: 20 50 41 44 44 4C 45 20 49 53 00 29 23 60 09 99 | PADDLE IS.)#`..|
00001B20: 22 52 45 41 44 20 42 59 3A 00 3F 23 6A 09 99 22 |"READ BY:.?#j.."|
00001B30: 20 12 50 41 44 44 4C 45 28 50 2C 50 44 29 92 00 | .PADDLE(P,PD)..|
00001B40: 58 23 74 09 99 22 11 20 20 50 3D 50 4F 52 54 20 |X#t..". P=PORT |
00001B50: 28 31 20 4F 52 20 32 29 00 73 23 7E 09 99 22 20 |(1 OR 2).s#~.." |
00001B60: 20 50 44 3D 50 41 44 44 4C 45 20 28 58 20 4F 52 | PD=PADDLE (X OR|
00001B70: 20 59 29 00 86 23 88 09 99 22 46 4F 52 20 45 58 | Y)..#..."FOR EX|
00001B80: 41 4D 50 4C 45 3A 00 B2 23 92 09 99 22 20 20 51 |AMPLE:..#..." Q|
00001B90: 3D 50 41 44 44 4C 45 28 32 2C 59 29 20 50 55 54 |=PADDLE(2,Y) PUT|
00001BA0: 53 20 54 48 45 20 56 41 4C 55 45 20 4F 46 20 54 |S THE VALUE OF T|
00001BB0: 48 45 00 DB 23 9C 09 99 22 20 20 59 20 50 41 44 |HE..#..." Y PAD|
00001BC0: 44 4C 45 20 41 54 54 41 43 48 45 44 20 54 4F 20 |DLE ATTACHED TO |
00001BD0: 50 4F 52 54 20 32 20 49 4E 54 4F 00 EE 23 A6 09 |PORT 2 INTO..#..|
00001BE0: 99 22 20 20 56 41 52 49 41 42 4C 45 20 51 00 0C |." VARIABLE Q..|
00001BF0: 24 B0 09 99 22 11 54 48 45 20 56 41 4C 55 45 20 |$...".THE VALUE |
00001C00: 49 53 20 30 20 54 4F 20 32 35 35 2E 00 38 24 BA |IS 0 TO 255..8$.|
00001C10: 09 99 22 11 20 45 41 43 48 20 50 41 44 44 4C 45 |..". EACH PADDLE|
00001C20: 20 48 41 53 20 41 20 46 49 52 45 20 42 55 54 54 | HAS A FIRE BUTT|
00001C30: 4F 4E 20 57 48 49 43 48 00 5D 24 C4 09 99 22 49 |ON WHICH.]$..."I|
00001C40: 53 20 52 45 41 44 20 55 53 49 4E 47 20 54 48 45 |S READ USING THE|
00001C50: 20 4A 4F 59 20 46 55 4E 43 54 49 4F 4E 00 87 24 | JOY FUNCTION..$|
00001C60: CE 09 99 22 54 48 45 20 46 49 52 45 20 42 55 54 |..."THE FIRE BUT|
00001C70: 54 4F 4E 20 4F 46 20 54 48 45 20 58 20 50 41 44 |TON OF THE X PAD|
00001C80: 44 4C 45 20 3D 20 34 00 A9 24 D8 09 99 22 41 4E |DLE = 4..$..."AN|
00001C90: 44 20 54 48 45 20 46 42 20 4F 4E 20 59 20 50 41 |D THE FB ON Y PA|
00001CA0: 44 44 4C 45 20 3D 20 38 2E 00 B1 24 E2 09 8D 36 |DDLE = 8...$...6|
00001CB0: 30 00 DD 24 EC 09 99 22 93 11 54 48 45 20 4C 49 |0..$..."..THE LI|
00001CC0: 47 48 54 20 50 45 4E 20 58 20 41 4E 44 20 59 20 |GHT PEN X AND Y |
00001CD0: 50 4F 53 49 54 49 4F 4E 53 20 41 52 45 00 00 25 |POSITIONS ARE..%|
00001CE0: F6 09 99 22 52 45 41 44 20 55 53 49 4E 47 20 54 |..."READ USING T|
00001CF0: 48 45 20 50 45 4E 20 46 55 4E 43 54 49 4F 4E 3A |HE PEN FUNCTION:|
00001D00: 00 11 25 00 0A 99 22 11 20 12 50 45 4E 28 44 29 |..%...". .PEN(D)|
00001D10: 92 00 2E 25 0A 0A 99 22 11 20 20 44 3D 44 49 52 |...%...". D=DIR|
00001D20: 45 43 54 4F 4E 20 28 58 20 4F 52 20 59 29 00 41 |ECTON (X OR Y).A|
00001D30: 25 14 0A 99 22 46 4F 52 20 45 58 41 4D 50 4C 45 |%..."FOR EXAMPLE|
00001D40: 3A 00 6B 25 1E 0A 99 22 20 20 57 57 3D 50 45 4E |:.k%..." WW=PEN|
00001D50: 28 58 29 20 53 45 54 53 20 54 48 45 20 56 41 52 |(X) SETS THE VAR|
00001D60: 49 41 42 4C 45 20 57 57 20 54 4F 00 98 25 28 0A |IABLE WW TO..%(.|
00001D70: 99 22 20 20 54 48 45 20 43 55 52 52 45 4E 54 20 |." THE CURRENT |
00001D80: 58 2D 43 4F 4F 52 44 49 4E 41 54 45 20 4F 46 20 |X-COORDINATE OF |
00001D90: 54 48 45 20 50 45 4E 2E 00 C3 25 32 0A 99 22 11 |THE PEN...%2..".|
00001DA0: 54 48 45 52 45 20 49 53 20 41 20 54 49 50 20 53 |THERE IS A TIP S|
00001DB0: 57 49 54 43 48 20 49 4E 20 54 48 45 20 50 45 4E |WITCH IN THE PEN|
00001DC0: 20 54 4F 00 ED 25 3C 0A 99 22 49 4E 44 49 43 41 | TO..%<.."INDICA|
00001DD0: 54 45 20 57 48 45 4E 20 49 54 20 49 53 20 50 52 |TE WHEN IT IS PR|
00001DE0: 45 53 53 45 44 20 41 47 41 49 4E 53 54 00 15 26 |ESSED AGAINST..&|
00001DF0: 46 0A 99 22 53 43 52 45 45 4E 2E 20 49 54 20 49 |F.."SCREEN. IT I|
00001E00: 53 20 54 45 53 54 45 44 20 57 49 54 48 20 54 48 |S TESTED WITH TH|
00001E10: 45 20 4A 4F 59 00 3B 26 50 0A 99 22 46 55 4E 43 |E JOY.;&P.."FUNC|
00001E20: 54 49 4F 4E 2E 20 49 54 53 20 56 41 4C 55 45 20 |TION. ITS VALUE |
00001E30: 49 53 20 31 20 49 46 20 4F 4E 2E 00 67 26 5A 0A |IS 1 IF ON..g&Z.|
00001E40: 99 22 54 48 45 20 4E 4F 52 4D 41 4C 20 4C 49 47 |."THE NORMAL LIG|
00001E50: 48 54 20 50 45 4E 20 54 45 53 54 20 52 4F 55 54 |HT PEN TEST ROUT|
00001E60: 49 4E 45 20 49 53 3A 00 8F 26 64 0A 99 22 49 46 |INE IS:..&d.."IF|
00001E70: 4A 4F 59 28 31 29 3D 31 54 48 45 4E 58 50 3D 50 |JOY(1)=1THENXP=P|
00001E80: 45 4E 28 58 29 3A 59 50 3D 50 45 4E 28 59 29 00 |EN(X):YP=PEN(Y).|
00001E90: 97 26 6E 0A 8D 36 30 00 BD 26 78 0A 99 22 93 11 |.&n..60..&x.."..|
00001EA0: 43 4F 4C 4C 49 53 49 4F 4E 53 20 42 45 54 57 45 |COLLISIONS BETWE|
00001EB0: 45 4E 20 53 50 52 49 54 45 53 20 4F 52 00 EA 26 |EN SPRITES OR..&|
00001EC0: 82 0A 99 22 42 45 54 57 45 45 4E 20 53 50 52 49 |..."BETWEEN SPRI|
00001ED0: 54 45 53 20 41 4E 44 20 54 48 45 20 42 41 43 4B |TES AND THE BACK|
00001EE0: 47 52 4F 55 4E 44 20 4D 41 59 00 02 27 8C 0A 99 |GROUND MAY..'...|
00001EF0: 22 42 45 20 54 45 53 54 45 44 20 45 41 53 49 4C |"BE TESTED EASIL|
00001F00: 59 2E 00 1B 27 96 0A 99 22 54 48 45 20 46 55 4E |Y...'..."THE FUN|
00001F10: 43 54 49 4F 4E 53 20 41 52 45 3A 00 3B 27 A0 0A |CTIONS ARE:.;'..|
00001F20: 99 22 11 20 12 53 43 4F 4C 4C 28 53 31 2C 53 32 |.". .SCOLL(S1,S2|
00001F30: 5B 2C 53 33 2E 2E 2E 2E 5D 29 92 00 59 27 AA 0A |[,S3....])..Y'..|
00001F40: 99 22 20 20 12 42 43 4F 4C 4C 28 53 31 5B 2C 53 |." .BCOLL(S1[,S|
00001F50: 32 2E 2E 2E 2E 2E 5D 29 92 00 78 27 B4 0A 99 22 |2.....])..x'..."|
00001F60: 11 20 53 31 3D 46 49 52 53 54 20 53 50 52 49 54 |. S1=FIRST SPRIT|
00001F70: 45 20 4E 55 4D 42 45 52 00 9D 27 BE 0A 99 22 20 |E NUMBER..'..." |
00001F80: 20 53 32 3D 53 45 43 4F 4E 44 20 53 50 52 49 54 | S2=SECOND SPRIT|
00001F90: 45 20 4E 55 4D 42 45 52 2C 20 45 54 43 00 CA 27 |E NUMBER, ETC..'|
00001FA0: D2 0A 99 22 54 48 45 20 53 43 4F 4C 4C 20 46 55 |..."THE SCOLL FU|
00001FB0: 4E 43 54 49 4F 4E 20 49 53 20 54 52 55 45 20 4F |NCTION IS TRUE O|
00001FC0: 4E 4C 59 20 49 46 20 41 4C 4C 00 F8 27 DC 0A 99 |NLY IF ALL..'...|
00001FD0: 22 4F 46 20 54 48 45 20 53 50 45 43 49 46 49 45 |"OF THE SPECIFIE|
00001FE0: 44 20 53 50 52 49 54 45 53 20 41 52 45 20 43 4F |D SPRITES ARE CO|
00001FF0: 4C 4C 49 44 49 4E 47 2E 00 23 28 E6 0A 99 22 54 |LLIDING..#(..."T|
00002000: 48 45 20 42 43 4F 4C 4C 20 46 55 4E 43 54 49 4F |HE BCOLL FUNCTIO|
00002010: 4E 20 49 53 20 54 52 55 45 20 49 46 20 41 4E 59 |N IS TRUE IF ANY|
00002020: 20 4F 46 00 48 28 F0 0A 99 22 53 50 52 49 54 45 | OF.H(..."SPRITE|
00002030: 53 20 41 52 45 20 43 4F 4C 4C 49 44 49 4E 47 20 |S ARE COLLIDING |
00002040: 57 49 54 48 20 54 48 45 00 5A 28 FA 0A 99 22 42 |WITH THE.Z(..."B|
00002050: 41 43 4B 47 52 4F 55 4E 44 2E 00 6F 28 04 0B 99 |ACKGROUND..o(...|
00002060: 22 11 20 46 4F 52 20 45 58 41 4D 50 4C 45 3A 00 |". FOR EXAMPLE:.|
00002070: 9A 28 0E 0B 99 22 20 49 46 20 53 43 4F 4C 4C 28 |.(..." IF SCOLL(|
00002080: 34 2C 36 29 20 57 49 4C 4C 20 42 45 20 54 52 55 |4,6) WILL BE TRU|
00002090: 45 20 49 44 20 34 20 26 20 36 00 AC 28 18 0B 99 |E ID 4 & 6..(...|
000020A0: 22 20 20 20 43 4F 4C 4C 49 44 45 2E 00 D8 28 22 |" COLLIDE...("|
000020B0: 0B 99 22 20 49 46 20 42 43 4F 4C 4C 28 33 29 20 |.." IF BCOLL(3) |
000020C0: 57 49 4C 4C 20 42 45 20 54 52 55 45 20 49 46 20 |WILL BE TRUE IF |
000020D0: 53 50 52 49 54 45 20 33 00 FD 28 2C 0B 99 22 20 |SPRITE 3..(,.." |
000020E0: 20 48 49 54 53 20 54 48 45 20 42 41 43 4B 47 52 | HITS THE BACKGR|
000020F0: 4F 55 4E 44 20 50 41 54 54 45 52 4E 2E 00 05 29 |OUND PATTERN...)|
00002100: 36 0B 8D 36 30 00 2E 29 40 0B 99 22 93 11 55 4C |6..60..)@.."..UL|
00002110: 54 52 41 42 41 53 49 43 2D 36 34 20 45 4E 41 42 |TRABASIC-64 ENAB|
00002120: 4C 45 53 20 59 4F 55 20 54 4F 20 55 53 45 00 5C |LES YOU TO USE.\|
00002130: 29 4A 0B 99 22 54 48 45 20 53 4F 55 4E 44 20 47 |)J.."THE SOUND G|
00002140: 45 4E 45 52 41 54 4F 52 53 20 49 4E 20 54 48 45 |ENERATORS IN THE|
00002150: 20 27 36 34 20 45 41 53 49 4C 59 21 00 80 29 54 | '64 EASILY!..)T|
00002160: 0B 99 22 54 48 45 20 54 48 52 45 45 20 54 4F 4E |.."THE THREE TON|
00002170: 45 20 47 45 4E 45 52 41 54 4F 52 53 20 41 52 45 |E GENERATORS ARE|
00002180: 00 9F 29 5E 0B 99 22 44 45 53 49 47 4E 41 54 45 |..)^.."DESIGNATE|
00002190: 44 20 41 53 20 31 2C 32 20 41 4E 44 20 33 2E 00 |D AS 1,2 AND 3..|
000021A0: C1 29 68 0B 99 22 54 48 45 59 20 41 52 45 20 53 |.)h.."THEY ARE S|
000021B0: 45 54 20 55 50 20 41 53 20 46 4F 4C 4C 4F 57 53 |ET UP AS FOLLOWS|
000021C0: 3A 00 E5 29 72 0B 99 22 20 20 31 3D 53 51 55 41 |:..)r.." 1=SQUA|
000021D0: 52 45 20 57 41 56 45 20 28 46 4C 55 54 59 20 53 |RE WAVE (FLUTY S|
000021E0: 4F 55 4E 44 29 00 0B 2A 7C 0B 99 22 20 20 32 3D |OUND)..*|.." 2=|
000021F0: 53 41 57 54 4F 4F 54 48 20 57 41 56 45 20 28 52 |SAWTOOTH WAVE (R|
00002200: 45 45 44 59 20 53 4F 55 4E 44 29 00 1B 2A 86 0B |EEDY SOUND)..*..|
00002210: 99 22 20 20 33 3D 4E 4F 49 53 45 00 48 2A 90 0B |." 3=NOISE.H*..|
00002220: 99 22 54 48 45 53 45 20 43 41 4E 20 42 45 20 43 |."THESE CAN BE C|
00002230: 4F 4E 54 52 4F 4C 4C 45 44 20 42 59 20 54 48 45 |ONTROLLED BY THE|
00002240: 20 43 4F 4D 4D 41 4E 44 00 5F 2A 9A 0B 99 22 11 | COMMAND._*...".|
00002250: 20 20 12 53 4F 55 4E 44 20 47 2C 50 2C 44 92 00 | .SOUND G,P,D..|
00002260: 7D 2A A4 0B 99 22 11 20 20 20 20 20 47 3D 47 45 |}*...". G=GE|
00002270: 4E 45 52 41 54 4F 52 20 28 31 2D 33 29 00 98 2A |NERATOR (1-3)..*|
00002280: AE 0B 99 22 20 20 20 20 20 50 3D 50 49 54 43 48 |..." P=PITCH|
00002290: 20 28 31 2D 32 35 35 29 00 C6 2A B8 0B 99 22 20 | (1-255)..*..." |
000022A0: 20 20 20 20 44 3D 44 55 52 41 54 49 4F 4E 20 28 | D=DURATION (|
000022B0: 49 4E 20 36 30 27 54 48 53 20 4F 46 20 41 20 53 |IN 60'THS OF A S|
000022C0: 45 43 4F 4E 44 29 00 F2 2A C2 0B 99 22 41 20 43 |ECOND)..*..."A C|
000022D0: 4F 4D 50 4C 45 54 45 20 53 45 54 20 4F 46 20 50 |OMPLETE SET OF P|
000022E0: 49 54 43 48 45 53 20 49 53 20 47 49 56 45 4E 20 |ITCHES IS GIVEN |
000022F0: 49 4E 00 1A 2B CC 0B 99 22 54 48 45 20 4D 41 4E |IN..+..."THE MAN|
00002300: 55 41 4C 2E 20 41 20 43 4F 55 50 4C 45 20 4F 46 |UAL. A COUPLE OF|
00002310: 20 4B 45 59 20 4F 4E 45 53 3A 00 3B 2B D6 0B 99 | KEY ONES:.;+...|
00002320: 22 4D 49 44 44 4C 45 20 43 3D 31 37 2C 45 3D 32 |"MIDDLE C=17,E=2|
00002330: 31 2C 47 3D 32 35 2C 43 3D 33 34 00 63 2B E0 0B |1,G=25,C=34.c+..|
00002340: 99 22 54 4F 20 53 4F 55 4E 44 20 41 20 4D 49 44 |."TO SOUND A MID|
00002350: 44 4C 45 20 43 20 46 4F 52 20 31 20 53 45 43 4F |DLE C FOR 1 SECO|
00002360: 4E 44 3A 00 77 2B EA 0B 99 22 20 53 4F 55 4E 44 |ND:.w+..." SOUND|
00002370: 32 2C 31 37 2C 36 30 00 8C 2B F4 0B 8D 36 30 3A |2,17,60..+...60:|
00002380: EB 32 2C 31 37 2C 36 30 3A 8D 36 30 00 B8 2B FE |.2,17,60:.60..+.|
00002390: 0B 99 22 93 11 54 4F 20 4D 41 4B 45 20 41 20 4E |.."..TO MAKE A N|
000023A0: 4F 49 53 45 20 53 4F 55 4E 44 20 46 4F 52 20 31 |OISE SOUND FOR 1|
000023B0: 20 53 45 43 4F 4E 44 3A 00 CC 2B 08 0C 99 22 20 | SECOND:..+..." |
000023C0: 53 4F 55 4E 44 33 2C 35 30 2C 36 30 00 E1 2B 12 |SOUND3,50,60..+.|
000023D0: 0C 8D 36 30 3A EB 33 2C 35 30 2C 36 30 3A 8D 36 |..60:.3,50,60:.6|
000023E0: 30 00 0D 2C 13 0C 99 22 93 11 54 4F 20 53 54 4F |0..,..."..TO STO|
000023F0: 50 20 54 48 45 20 53 4F 55 4E 44 2C 20 50 52 45 |P THE SOUND, PRE|
00002400: 53 53 20 54 48 45 20 46 31 20 4B 45 59 00 15 2C |SS THE F1 KEY..,|
00002410: 14 0C 8D 36 30 00 40 2C 1C 0C 99 22 93 11 54 48 |...60.@,..."..TH|
00002420: 45 20 43 48 41 52 41 43 54 45 52 49 53 54 49 43 |E CHARACTERISTIC|
00002430: 53 20 4F 46 20 45 41 43 48 20 4F 46 20 54 48 45 |S OF EACH OF THE|
00002440: 00 6C 2C 26 0C 99 22 54 48 52 45 45 20 47 45 4E |.l,&.."THREE GEN|
00002450: 45 52 41 54 4F 52 53 20 4D 41 59 20 42 45 20 56 |ERATORS MAY BE V|
00002460: 41 52 49 45 44 20 42 59 20 54 48 45 00 8D 2C 30 |ARIED BY THE..,0|
00002470: 0C 99 22 47 45 4E 45 52 41 54 4F 52 20 43 4F 4E |.."GENERATOR CON|
00002480: 54 52 4F 4C 20 43 4F 4D 4D 41 4E 44 3A 00 AC 2C |TROL COMMAND:..,|
00002490: 3A 0C 99 22 11 20 12 47 45 4E 20 41 2C 42 2C 43 |:..". .GEN A,B,C|
000024A0: 2C 44 2C 45 2C 46 2C 47 2C 48 2C 49 00 CC 2C 44 |,D,E,F,G,H,I..,D|
000024B0: 0C 99 22 20 41 3D 47 45 4E 45 52 41 54 4F 52 20 |.." A=GENERATOR |
000024C0: 4E 55 4D 42 45 52 20 28 31 2D 33 29 00 DF 2C 4E |NUMBER (1-3)..,N|
000024D0: 0C 99 22 20 42 3D 57 41 56 45 46 4F 52 4D 3A 00 |.." B=WAVEFORM:.|
000024E0: F3 2C 58 0C 99 22 20 20 20 31 3D 54 52 49 41 4E |.,X.." 1=TRIAN|
000024F0: 47 4C 45 00 07 2D 62 0C 99 22 20 20 20 32 3D 53 |GLE..-b.." 2=S|
00002500: 41 57 54 4F 4F 54 48 00 21 2D 6C 0C 99 22 20 20 |AWTOOTH.!-l.." |
00002510: 20 34 3D 50 55 4C 53 45 20 28 53 51 55 41 52 45 | 4=PULSE (SQUARE|
00002520: 29 00 32 2D 76 0C 99 22 20 20 20 38 3D 4E 4F 49 |).2-v.." 8=NOI|
00002530: 53 45 00 5A 2D 80 0C 99 22 20 43 3D 41 54 54 41 |SE.Z-..." C=ATTA|
00002540: 43 4B 20 53 50 45 45 44 20 28 30 2D 46 41 53 54 |CK SPEED (0-FAST|
00002550: 45 53 54 20 54 4F 20 31 35 29 00 81 2D 8A 0C 99 |EST TO 15)..-...|
00002560: 22 20 44 3D 44 45 43 41 59 20 53 50 45 45 44 20 |" D=DECAY SPEED |
00002570: 28 30 2D 46 41 53 54 45 53 54 20 54 4F 20 31 35 |(0-FASTEST TO 15|
00002580: 29 00 A7 2D 94 0C 99 22 20 45 3D 53 55 53 54 41 |)..-..." E=SUSTA|
00002590: 49 4E 20 4C 45 56 45 4C 20 28 30 2D 4E 4F 4E 45 |IN LEVEL (0-NONE|
000025A0: 20 54 4F 20 31 35 29 00 D0 2D 9E 0C 99 22 20 46 | TO 15)..-..." F|
000025B0: 3D 52 45 4C 45 41 53 45 20 53 50 45 45 44 20 28 |=RELEASE SPEED (|
000025C0: 30 2D 46 41 53 54 45 53 54 20 54 4F 20 31 35 29 |0-FASTEST TO 15)|
000025D0: 00 F8 2D A8 0C 99 22 20 47 3D 44 55 54 59 20 43 |..-..." G=DUTY C|
000025E0: 59 43 4C 45 20 46 4F 52 20 50 4C 55 53 45 20 57 |YCLE FOR PLUSE W|
000025F0: 41 56 45 46 4F 52 4D 53 00 19 2E B2 0C 99 22 20 |AVEFORMS......" |
00002600: 20 20 28 30 20 54 4F 20 31 35 29 20 38 3D 53 51 | (0 TO 15) 8=SQ|
00002610: 55 41 52 45 20 57 41 56 45 00 42 2E BC 0C 99 22 |UARE WAVE.B...."|
00002620: 20 48 3D 53 59 4E 43 48 52 4F 4E 49 5A 41 54 49 | H=SYNCHRONIZATI|
00002630: 4F 4E 20 43 4F 4E 54 52 4F 4C 20 28 30 2D 4F 46 |ON CONTROL (0-OF|
00002640: 46 29 00 6A 2E C6 0C 99 22 20 49 3D 52 49 4E 47 |F).j...." I=RING|
00002650: 20 4D 4F 44 55 4C 41 54 4F 52 20 43 4F 4E 54 52 | MODULATOR CONTR|
00002660: 4F 4C 20 28 30 2D 4F 46 46 29 00 91 2E D0 0C 99 |OL (0-OFF)......|
00002670: 22 20 5B 53 45 45 20 50 52 4F 47 20 52 45 46 20 |" [SEE PROG REF |
00002680: 4D 41 4E 55 41 4C 20 46 4F 52 20 48 20 26 20 49 |MANUAL FOR H & I|
00002690: 5D 00 99 2E DA 0C 8D 36 30 00 C2 2E E4 0C 99 22 |]......60......"|
000026A0: 93 11 54 48 45 20 4F 56 45 52 41 4C 4C 20 56 4F |..THE OVERALL VO|
000026B0: 4C 55 4D 45 20 4C 45 56 45 4C 20 41 4E 44 20 54 |LUME LEVEL AND T|
000026C0: 48 45 00 EE 2E EE 0C 99 22 46 49 4C 54 45 52 20 |HE......"FILTER |
000026D0: 43 4F 4E 54 52 4F 4C 53 20 41 52 45 20 43 4F 4E |CONTROLS ARE CON|
000026E0: 54 52 4F 4C 4C 45 44 20 42 59 20 54 48 45 00 0F |TROLLED BY THE..|
000026F0: 2F F8 0C 99 22 20 20 12 56 4F 4C 20 41 2C 42 2C |/..." .VOL A,B,|
00002700: 43 2C 44 2C 45 92 20 43 4F 4D 4D 41 4E 44 2E 00 |C,D,E. COMMAND..|
00002710: 3C 2F 02 0D 99 22 20 20 41 3D 4F 56 45 52 41 4C |</..." A=OVERAL|
00002720: 4C 20 53 4F 55 4E 44 20 4C 45 56 45 4C 20 28 30 |L SOUND LEVEL (0|
00002730: 2D 4E 4F 4E 45 20 54 4F 20 31 35 29 00 53 2F 0C |-NONE TO 15).S/.|
00002740: 0D 99 22 20 20 42 3D 46 49 4C 54 45 52 20 4D 4F |.." B=FILTER MO|
00002750: 44 45 3A 00 68 2F 16 0D 99 22 20 20 20 20 31 3D |DE:.h/..." 1=|
00002760: 4C 4F 57 20 50 41 53 53 00 7D 2F 20 0D 99 22 20 |LOW PASS.}/ .." |
00002770: 20 20 20 32 3D 42 41 4E 44 50 41 53 53 00 93 2F | 2=BANDPASS../|
00002780: 2A 0D 99 22 20 20 20 20 34 3D 48 49 47 48 20 50 |*.." 4=HIGH P|
00002790: 41 53 53 00 B3 2F 34 0D 99 22 20 20 20 20 38 3D |ASS../4.." 8=|
000027A0: 4E 4F 20 53 4F 55 4E 44 20 46 52 4F 4D 20 47 45 |NO SOUND FROM GE|
000027B0: 4E 20 33 00 D7 2F 3E 0D 99 22 20 20 20 20 20 20 |N 3../>.." |
000027C0: 28 54 48 45 53 45 20 4D 41 59 20 42 45 20 43 4F |(THESE MAY BE CO|
000027D0: 4D 42 49 4E 45 44 29 00 F0 2F 48 0D 99 22 20 20 |MBINED)../H.." |
000027E0: 43 3D 46 49 4C 54 45 52 20 43 4F 4E 54 52 4F 4C |C=FILTER CONTROL|
000027F0: 00 16 30 52 0D 99 22 20 20 20 20 31 3D 53 45 4E |..0R.." 1=SEN|
00002800: 44 20 31 20 4F 55 54 50 55 54 20 54 48 52 55 20 |D 1 OUTPUT THRU |
00002810: 46 49 4C 54 45 52 00 3C 30 5C 0D 99 22 20 20 20 |FILTER.<0\.." |
00002820: 20 32 3D 53 45 4E 44 20 32 20 4F 55 54 50 55 54 | 2=SEND 2 OUTPUT|
00002830: 20 54 48 52 55 20 46 49 4C 54 45 52 00 62 30 66 | THRU FILTER.b0f|
00002840: 0D 99 22 20 20 20 20 34 3D 53 45 4E 44 20 33 20 |.." 4=SEND 3 |
00002850: 4F 55 54 50 55 54 20 54 48 52 55 20 46 49 4C 54 |OUTPUT THRU FILT|
00002860: 45 52 00 8E 30 70 0D 99 22 20 20 20 20 38 3D 53 |ER..0p.." 8=S|
00002870: 45 4E 44 20 45 58 54 45 52 4E 41 4C 20 53 4F 55 |END EXTERNAL SOU|
00002880: 4E 44 20 54 48 52 55 20 46 49 4C 54 45 52 00 AF |ND THRU FILTER..|
00002890: 30 7A 0D 99 22 20 20 20 20 20 20 28 54 48 45 53 |0z.." (THES|
000028A0: 45 20 4D 41 59 20 42 45 20 41 44 44 45 44 29 00 |E MAY BE ADDED).|
000028B0: DB 30 84 0D 99 22 20 20 44 3D 46 49 4C 54 45 52 |.0..." D=FILTER|
000028C0: 20 46 52 45 51 55 45 4E 43 59 20 28 30 2D 4C 4F | FREQUENCY (0-LO|
000028D0: 57 45 53 54 20 54 4F 20 31 35 29 00 05 31 8E 0D |WEST TO 15)..1..|
000028E0: 99 22 20 20 45 3D 46 49 4C 54 45 52 20 52 45 53 |." E=FILTER RES|
000028F0: 4F 4E 41 4E 43 45 20 28 30 2D 46 4C 41 54 20 54 |ONANCE (0-FLAT T|
00002900: 4F 20 31 35 29 00 32 31 98 0D 99 22 49 54 20 49 |O 15).21..."IT I|
00002910: 53 20 4E 4F 54 20 4E 45 43 45 53 53 41 52 59 20 |S NOT NECESSARY |
00002920: 54 4F 20 46 49 4C 4C 20 49 4E 20 41 4C 4C 20 54 |TO FILL IN ALL T|
00002930: 48 45 00 54 31 A2 0D 99 22 56 41 4C 55 45 53 20 |HE.T1..."VALUES |
00002940: 4F 4E 20 45 41 43 48 20 56 4F 4C 20 43 4F 4D 4D |ON EACH VOL COMM|
00002950: 41 4E 44 2E 00 7B 31 AC 0D 99 22 54 4F 20 43 48 |AND..{1..."TO CH|
00002960: 41 4E 47 45 20 4F 4E 4C 59 20 54 48 45 20 56 4F |ANGE ONLY THE VO|
00002970: 4C 2C 20 4A 55 53 54 20 55 53 45 00 8A 31 B6 0D |L, JUST USE..1..|
00002980: 99 22 20 56 4F 4C 31 30 91 22 00 92 31 C0 0D 8D |." VOL10."..1...|
00002990: 36 30 00 BF 31 CA 0D 99 22 93 11 55 4C 54 52 41 |60..1..."..ULTRA|
000029A0: 42 41 53 49 43 2D 36 34 20 41 4C 53 4F 20 43 41 |BASIC-64 ALSO CA|
000029B0: 4E 20 27 50 52 4F 47 52 41 4D 27 20 54 48 45 00 |N 'PROGRAM' THE.|
000029C0: E5 31 D4 0D 99 22 50 49 54 43 48 45 53 20 4F 46 |.1..."PITCHES OF|
000029D0: 20 54 48 45 20 54 4F 4E 45 20 47 45 4E 45 52 41 | THE TONE GENERA|
000029E0: 54 4F 52 53 2E 00 0E 32 DE 0D 99 22 54 48 45 20 |TORS...2..."THE |
000029F0: 45 58 50 4C 41 4E 41 54 49 4F 4E 20 4F 46 20 54 |EXPLANATION OF T|
00002A00: 48 45 20 53 45 54 2C 20 54 44 41 54 41 2C 00 36 |HE SET, TDATA,.6|
00002A10: 32 E8 0D 99 22 41 4E 44 20 54 55 4E 45 20 43 4F |2..."AND TUNE CO|
00002A20: 4D 4D 41 4E 44 53 20 49 53 20 47 49 56 45 4E 20 |MMANDS IS GIVEN |
00002A30: 49 4E 20 54 48 45 00 61 32 E9 0D 99 22 4D 41 4E |IN THE.a2..."MAN|
00002A40: 55 41 4C 2E 20 54 48 45 20 52 45 53 55 4C 54 53 |UAL. THE RESULTS|
00002A50: 20 43 41 4E 20 53 4F 55 4E 44 20 4C 49 4B 45 3A | CAN SOUND LIKE:|
00002A60: 22 00 71 32 EA 0D 8D 36 30 3A EE 33 2C 33 35 36 |".q2...60:.3,356|
00002A70: 34 00 7C 32 EB 0D EC 33 2C 32 30 30 00 8C 32 EC |4.|2...3,200..2.|
00002A80: 0D ED 22 30 31 30 31 30 31 46 46 22 00 94 32 F2 |.."010101FF"..2.|
00002A90: 0D 8D 36 30 00 A7 32 F3 0D EE 32 2C 33 35 37 32 |..60..2...2,3572|
00002AA0: 3A EC 32 2C 32 35 34 00 C7 32 F4 0D ED 22 39 30 |:.2,254..2..."90|
00002AB0: 32 30 30 31 32 30 46 46 32 30 32 30 30 31 30 30 |200120FF20200100|
00002AC0: 31 30 45 30 30 31 22 00 CF 32 F5 0D 8D 36 30 00 |10E001"..2...60.|
00002AD0: F6 32 FC 0D 99 22 93 11 54 48 45 52 45 20 41 52 |.2..."..THERE AR|
00002AE0: 45 20 35 20 27 4A 49 46 46 59 27 A0 28 31 2F 36 |E 5 'JIFFY'.(1/6|
00002AF0: 30 20 53 45 43 29 00 22 33 06 0E 99 22 41 4E 44 |0 SEC)."3..."AND|
00002B00: 20 35 20 53 45 43 4F 4E 44 20 54 49 4D 45 52 53 | 5 SECOND TIMERS|
00002B10: 20 49 4E 20 55 4C 54 52 41 42 41 53 49 43 2D 36 | IN ULTRABASIC-6|
00002B20: 34 2E 00 4D 33 10 0E 99 22 45 41 43 48 20 4F 46 |4..M3..."EACH OF|
00002B30: 20 54 48 45 53 45 20 49 53 20 4C 49 4B 45 20 41 | THESE IS LIKE A|
00002B40: 4E 20 4F 56 45 4E 20 54 49 4D 45 52 2C 00 78 33 |N OVEN TIMER,.x3|
00002B50: 1A 0E 99 22 57 48 45 52 45 20 59 4F 55 20 53 45 |..."WHERE YOU SE|
00002B60: 54 20 49 54 20 54 4F 20 41 20 56 41 4C 55 45 20 |T IT TO A VALUE |
00002B70: 41 4E 44 20 54 48 45 4E 00 9D 33 24 0E 99 22 49 |AND THEN..3$.."I|
00002B80: 54 20 43 4F 55 4E 54 53 20 44 4F 57 4E 20 54 4F |T COUNTS DOWN TO|
00002B90: 20 30 20 41 4E 44 20 53 54 4F 50 53 2E 00 C7 33 | 0 AND STOPS...3|
00002BA0: 2E 0E 99 22 54 48 45 20 54 49 4D 45 52 53 20 41 |..."THE TIMERS A|
00002BB0: 52 45 20 4E 55 4D 42 45 52 45 44 20 30 2D 34 20 |RE NUMBERED 0-4 |
00002BC0: 46 4F 52 20 54 48 45 00 F1 33 38 0E 99 22 4A 49 |FOR THE..38.."JI|
00002BD0: 46 46 59 20 54 49 4D 45 52 53 20 41 4E 44 20 35 |FFY TIMERS AND 5|
00002BE0: 2D 39 20 46 4F 52 20 54 48 45 20 53 45 43 4F 4E |-9 FOR THE SECON|
00002BF0: 44 00 13 34 42 0E 99 22 54 49 4D 45 52 53 2E 20 |D..4B.."TIMERS. |
00002C00: 54 48 45 59 20 41 52 45 20 53 45 54 20 42 59 20 |THEY ARE SET BY |
00002C10: 54 48 45 00 2F 34 4C 0E 99 22 11 20 12 53 43 54 |THE./4L..". .SCT|
00002C20: 52 20 54 2C 56 92 20 43 4F 4D 4D 41 4E 44 2E 00 |R T,V. COMMAND..|
00002C30: 48 34 56 0E 99 22 11 20 20 20 54 3D 54 49 4D 45 |H4V..". T=TIME|
00002C40: 52 20 4E 55 4D 42 45 52 00 6E 34 60 0E 99 22 20 |R NUMBER.n4`.." |
00002C50: 20 20 20 56 3D 56 41 4C 55 45 20 54 4F 20 42 45 | V=VALUE TO BE|
00002C60: 20 53 45 54 20 28 31 2D 36 35 30 30 30 29 00 76 | SET (1-65000).v|
00002C70: 34 6A 0E 8D 36 30 00 A1 34 74 0E 99 22 93 11 54 |4j..60..4t.."..T|
00002C80: 48 45 20 54 49 4D 45 52 53 20 41 52 45 20 52 45 |HE TIMERS ARE RE|
00002C90: 41 44 20 42 59 20 41 20 46 55 4E 43 54 49 4F 4E |AD BY A FUNCTION|
00002CA0: 3A 00 B3 34 7E 0E 99 22 11 20 20 12 43 54 52 A0 |:..4~..". .CTR.|
00002CB0: 28 54 29 00 CD 34 88 0E 99 22 11 20 20 20 20 54 |(T)..4...". T|
00002CC0: 3D 54 49 4D 45 52 20 4E 55 4D 42 45 52 00 E1 34 |=TIMER NUMBER..4|
00002CD0: 92 0E 99 22 11 46 4F 52 20 45 58 41 4D 50 4C 45 |...".FOR EXAMPLE|
00002CE0: 3A 00 0F 35 9C 0E 99 22 20 20 20 53 43 54 52 20 |:..5..." SCTR |
00002CF0: 33 2C 35 30 20 28 53 45 54 20 54 49 4D 45 52 20 |3,50 (SET TIMER |
00002D00: 33 20 54 4F 20 35 30 2F 36 30 20 53 45 43 29 00 |3 TO 50/60 SEC).|
00002D10: 31 35 A6 0E 99 22 20 20 20 49 46 20 43 54 52 20 |15..." IF CTR |
00002D20: 28 33 29 20 3C 3E 30 20 54 48 45 4E 20 2E 2E 2E |(3) <>0 THEN ...|
00002D30: 2E 00 39 35 B0 0E 8D 36 30 00 67 35 BA 0E 99 22 |..95...60.g5..."|
00002D40: 93 11 20 20 4E 4F 57 20 59 4F 55 27 52 45 20 41 |.. NOW YOU'RE A|
00002D50: 4E 20 41 44 56 41 4E 43 45 44 20 50 52 41 43 54 |N ADVANCED PRACT|
00002D60: 49 54 49 4F 4E 45 52 00 92 35 C4 0E 99 22 20 20 |ITIONER..5..." |
00002D70: 20 4F 46 20 54 48 45 20 46 49 4E 45 20 41 52 54 | OF THE FINE ART|
00002D80: 20 4F 46 20 55 4C 54 52 41 42 41 53 49 43 2D 36 | OF ULTRABASIC-6|
00002D90: 34 21 00 C4 35 CE 0E 99 22 11 11 20 05 4D 41 59 |4!..5...".. .MAY|
00002DA0: 20 54 48 45 20 55 4C 54 52 41 42 41 53 49 43 20 | THE ULTRABASIC |
00002DB0: 46 4F 52 43 45 20 42 45 20 57 49 54 48 20 59 4F |FORCE BE WITH YO|
00002DC0: 55 21 1F 11 00 F5 35 CF 0E EE 31 2C 33 37 39 39 |U!....5...1,3799|
00002DD0: 3A EE 32 2C 33 37 39 38 3A EE 33 2C 33 37 39 37 |:.2,3798:.3,3797|
00002DE0: 3A EC 31 2C 32 35 34 3A EC 32 2C 32 35 34 3A EC |:.1,254:.2,254:.|
00002DF0: 33 2C 32 35 34 00 09 36 D4 0E ED 22 31 30 30 31 |3,254..6..."1001|
00002E00: 38 30 30 35 30 30 31 30 22 00 1D 36 D5 0E ED 22 |80050010"..6..."|
00002E10: 46 46 30 31 46 41 30 31 38 30 30 36 22 00 31 36 |FF01FA018006".16|
00002E20: D6 0E ED 22 31 30 30 35 30 35 31 30 30 42 31 30 |..."100505100B10|
00002E30: 22 00 41 36 D7 0E ED 22 38 30 30 31 30 31 46 46 |".A6..."800101FF|
00002E40: 22 00 00 00 5E |"...^ |
....... FRANK SPRENGER.9....
BRASSERTSTR.18.U.... 4300 ESS
EN 1.Q.... THOMAS SCHWARZ......
HATZPERSTR.129...... 4300
ESSEN-1......1,1.....T.C....G(147).....
." MUSTERGENERATOR"......:...
.#.....(.." FOLGENDE MUSTER SIND ABR
UFBAR:".'.,..:..W.2.."MITTELKREUZ (MK)
MITTELPUNKT (MP)"...<.."HORIZ.LINI
EN (HL) VERT.LINIEN (VL)"...F.."GI
TTERRASTER (GR) MITTENKREIS (MS)..
.P.."SCHIRM WEISS (SW) SCHIRM ROT
(SR)...Z.."SCHIRM BLAU (SB) KREI
SE (KR)".E.[.."SCHIRM GRUEN (SG)
MULTIRASTER (MR)".V.].."MIT F5 UND F
7 MENUE ODER MUSTER WAEHLEN!";.|.^....._
.."(PE) = PROGRAMM-ENDE "...D.. A$...N..
A$."MK" . . 1000:.260.Z.X.. A$."MP" . .
1100:.260...... A$."HL" . . 1200:.260..
.... A$."VL" . . 1300:.260.1.... A$."GR"
..1200:.1305:.260.L.... A$."MS" . .1500:
.260.C. .. A$."SW" . . 1700.Z.... A$."SR
" . . 1720...... A$."SB" . . 1740......
A$."SG" . . 1760.D.H.. A$."KR" . . 1600:
.260...R.. A$."MR" . . 2000...... A$."PE
" . .2500...... ". ..........."
...... 100.#....1,1.9...M 149,0,149,199,
2.O...M 150,0,150,199,2.E...M 0,100,299,
100,2.K.$...T.L..1,1...Q.. 149, 99,4,2..
.V..150, 98,2...`........ 1,1.....M 0,0,
299,0,2.K...M 0,19,299,19,2...D.M 0,39,2
99,39,2...N.M 0,59,299,59,2...X.M 0,79,2
99,79,2.....M 0,99,299,99,2.1...M 0,119,
299,119,2.G...M 0,139,299,139,2.]...M 0,
159,299,159,2.S...M 0,179,299,179,2.....
M 0,199,299,199,2............1,1.....M 0
,0,0,199,2.....M 1,0,1,199,2.P...M 19,0,
19,199,2.....M 20,0,20,199,2...#.M 39,0,
39,199,2...$.M 40,0,40,199,2. .(.M 59,0,
59,199,2.4.).M 60,0,60,199,2.H.-.M 79,0,
79,199,2.\...M 80,0,80,199,2.P.2.M 99,0,
99,199,2...3.M100,0,100,199,2...7.M119,0
,119,199,2...8.M120,0,120,199,2.D.<.M139
,0,139,199,2.Y.=.M140,0,140,199,2...A.M1
59,0,159,199,2...B.M160,0,160,199,2...F.
M179,0,179,199,2.-.G.M180,0,180,199,2.B.
K.M199,0,199,199,2.W.L.M200,0,200,199,2.
L.P.M219,0,219,199,2...Q.M220,0,220,199,
2...U.M239,0,239,199,2...V.M240,0,240,19
9,2...Z.M259,0,259,199,2.U.[.M260,0,260,
199,2..._.M279,0,279,199,2...`.M280,0,28
0,199,2...D.M299,0,299,199,2.).E.M300,0,
300,199,2./.N...8....1,1.J.... 149,99,99
,2.\.... 149,99,98,2.N.... 149,99,97,2.}
...L 149,99,2.........@.. 1,1...J.. 19,1
9,19,2...T.. 19,179,19,2.B.^.. 279,19,19
,2.U.H.. 279,179,19,2...R.. 149,99,50,2.
..|........2,2...... 260......3,3...B..
260...L..7,7.&.V.. 260./....6,6.9.... 26
0.O....10,10,2:.30,30,2:.290,10,2:.290,1
90,2:.270,170,2...L..270,30,2:.10,190,2:
.30,170,2...V.....P..1100:.1205:.1305:.1
510:.1610:.1800.E.....R.D.. G(147)...E..
53280,0:.53281,0...F.." .ICH,DEIN
C B M - 6 4 ":..A.I.."BIN UEBERGLUECKLI
CH DIR BEIM EINSTELLEN":..Q.N.."DES MONI
TORS ODER FERNSEHERS GEHOLFEN ZU"...X.."
HABEN ."......:.:.:.:.:.:.:.:.:..H...."
.EIN HEISSER TIP !."
.Z....I.1 . 3990:.......G(147)......5328
0,7:.53281,7......". H A L
L O !".%.....T...." ICH BIN AN WEITREN
KONTAKTEN ZWECKS":..{.(.." ERF
AHRUNGSAUSTAUSCH":....2.." SO
FTWARETAUSCH":....<.."
UND":....F.." SOFTWAREVERKAUF
":....P.."INTERESSIERT."...Z...*.D.."FAL
LS SIE INTERESSE HABEN,NEHMEN SIE".J.N..
"DOCH KONTAKT AUF MIT :":..L.X.."
FRANK SPRENGER"......" B
RASSERTSTR.18"......" 4300 E
SSEN 1".S...." TEL. 0201/7965
59"...@.SI.54272:FL.SI:FH.SI.1:W.S~....%
4..S..%4..C.K%4..#@.S...TBC.P.).MADE TO
DISAPPEAR.F...."WITH THE 'BYE COMMAND..U
.(..". .BYE....2..". ALTHOUGH THE TURTL
E DISAPPEARS, YOU...<.."CAN STILL CONTIN
UE TO DRAW WITH IT.P.F.."(AND IT ACTUALL
Y DRAWS FASTER!)...P..60:.:..45:.150:..1
20:.150...Z..70:T:.60.(.D.."..THE VALUES
OF THE X AND Y POSITION.P.N.."AND THE D
IRECTION (IN DEGREES) IN.Z.X.."WHICH THE
TURTLE IS POINTING CAN BE......"READ IN
TO YOUR PROGRAM......."THERE ARE THREE F
UNCTIONS:......". .TPOS(X). GIVES THE X
POSITION... ..". .TPOS(Y). GIVES THE Y
POSITION.0....". .TPOS(A). GIVES THE D
IRECTION.T...." (IN DEGR
EES).}...."THESE FUNCTIONS MAY BE USED T
O SET...H.."ANOTHER VARIABLE [ E=TPOS(X)
]...R.."OR IN A CONDITION......" [ IF T
POS (A) > 180 THEN ..... ]......"OR IN A
PRINT COMMAND [ PRINT TPOS(A) ]......60
.E...."..IN ORDER TO MAKE IT EASIER TO R
EPEAT.N...."GROUPS OF TURTLE GRAPHIC COM
MANDS,......"'REPEAT' COMMANDS ARE INCLU
DED......."THE COMMAND WHICH SHOWS THE B
EGINNING...".."OF THE COMMNANDS TO BE RE
PEATED AND...,.."THE NUMBER OF TIMES THE
Y ARE TO BE.:.6.."REPEATED IS THE LEFT B
RACKET .[..E.@.."IT MUST BE FOLLOWED BY
THE NUMBER OF..J.."REPEATS AND A COLON.
..T.."FOR EXAMPLE - .[3:. WILL CAUSE.P.^
.."THE FOLLOWING COMMANDS TO BE REPEATED
...H.."3 TIMES....R..60...|.."..THE END
OF THE GROUP OF COMMANDS IS.9...."MARKED
BY A COLON AND THE RIGHT.M...."BRACKET
.]. ..Z...."THE COMMANDS MAY BE ANY BASI
C COMMANDS......"AND MAY SPAN MANY LINES
OF PROGRAM......."FOR EXAMPLE:.Y...." [
2:PRINT'ABC':] WILL PRINT...B.."ABC...L.
."ABC...V.."IN TURTLE GRAPHICS, YOU CAN
DRAW AN.:...."EIGHT SIDED FIGURE (OCTAGO
N).]...."TURTLE2 : [8:MOVE30:TURN45:]...
...60:.1,7:.2:.8:.30:.45:.:.70:T:.60....
.."..OR TO DRAW A FIGUE WITH ANY NUMBER
OF.U...."SIDES, USE VARIABLES FOR THE...
..."NUMBER OF REPEATS AND TO COMPUTE THE
......"ANGLE.+.&.."INPUT'NUMBER OF SIDES
';N.B.0.."HIRES1,7:TURTLE2.^.:.."[N:MOVE
30:TURN360/N:].{.D..60:."NUMBER OF SIDES
";N...N..1,7:.2:.N:.30:.360.N:.:.70:T:.6
0.J.X.."..IF YOU NEED TO GET OUT OF ONE
OF...B.."THESE REPEATS BEFORE THE SPECIF
IED...L.."NUMBER OF TIMES IS UP, USE THE
.3.V..". .:EXIT. COMMNAND..G....".FOR E
XAMPLE:.O...."[20:TURN30:IFTPOS(A)>180TH
EN:EXIT.W...."].....60......"..ANY GRAP
HIC PICTURE SHOWN ON THE.P...."SCREEN MA
Y BE DUMPED TO A PRINTER......"EXCEPT FO
R SPRITE PATTERNS....F.."THE COMMAND IS:
...P..". .HARD [D]..A.Z..". D=IS OPTIO
NAL DEVICE NUMBER.G...." DEVICE 4 IS A
SSUMED IF NONE......."MULTICOLOR SCREENS
SHOW PAINTBRUSH 1......"AREAS IN THE DA
RKEST TONES, PAINTBRUSH......"2 IN MEDIU
M DENSITY AND PAINTBRUSH 2......"IN LIGH
TEST DENSITY PRINT.......60.@. .."..ULTR
ABASIC-64 INCLUDES MANY COMMANDS.M.*.."F
OR INPUT, FROM JOYSTICKS, PADDLES AND...
4.."LIGHTPEN. ALL OF THESE DEVICES ARE.D
.>.."ATTACHED TO THE PORTS ON THE RIGHT
SIDE...H.."OF YOUR COMPUTER. THE LIGHT P
EN MUST.. R.."BE ATTACHED TO PORT 1, BUT
THE OTHERS.= \.."MAY BE PLUGGED INTO EI
THER..J F..".ALL OF THESE DEVICES ARE RE
AD THROUGH.. P.."ULTRABASIC FUNCTIONS...
Z..60.. ..."..THE JOYSTICKS ARE READ WI
TH THE JOY.J ..."FUNCTION:.. ...". .JOY
(P)... ...". P=PORT (1 OR 2)..!..." THE
VALUE RETURNED IS THE SUM OF:.0!..."
1=NORTH.B!..." 2=SOUTH.S!J.." 4=W
EST.D!T.." 8=EAST.|!..." 16=FIRE BU
TTON..!...".FOR EXAMPLE, TO TEST FOR THE
JOYSTICK.Q!..."BEING PUSHED EAST ON POR
T 1, USE:..!..." IF JOY(1)=8 THEN......
.."..."BECAUSE THERE WILL BE TIMES MULTI
PLE.G"..."LINES WILL BE ON, A BETTER TES
T IS TO.L"$.."USE: IF JOY(1) AND 8 THEN
......"..."THIS EXPRESSION WILL BE TRUE
EVEN IF.."8.."LINES OTHER THAN 8 ARE ON.
.."B..60.."L.."..THERE MAY BE TWO PADDLE
S ATTACHED TO..#V.."EACH PORT. THE POSIT
ION OF A PADDLE IS.)#`.."READ BY:.?#J.."
.PADDLE(P,PD)..X#T..". P=PORT (1 OR 2)
.S#~.." PD=PADDLE (X OR Y)..#..."FOR EX
AMPLE:..#..." Q=PADDLE(2,Y) PUTS THE VA
LUE OF THE..#..." Y PADDLE ATTACHED TO
PORT 2 INTO..#..." VARIABLE Q..$...".TH
E VALUE IS 0 TO 255..8$...". EACH PADDLE
HAS A FIRE BUTTON WHICH.]$D.."IS READ U
SING THE JOY FUNCTION..$N.."THE FIRE BUT
TON OF THE X PADDLE = 4..$X.."AND THE FB
ON Y PADDLE = 8...$...60..$..."..THE LI
GHT PEN X AND Y POSITIONS ARE..%..."READ
USING THE PEN FUNCTION:..%...". .PEN(D)
...%...". D=DIRECTON (X OR Y).A%..."FOR
EXAMPLE:.K%..." WW=PEN(X) SETS THE VAR
IABLE WW TO..%(.." THE CURRENT X-COORDI
NATE OF THE PEN..C%2..".THERE IS A TIP S
WITCH IN THE PEN TO..%<.."INDICATE WHEN
IT IS PRESSED AGAINST..&F.."SCREEN. IT I
S TESTED WITH THE JOY.;&P.."FUNCTION. IT
S VALUE IS 1 IF ON..G&Z.."THE NORMAL LIG
HT PEN TEST ROUTINE IS:..&D.."IFJOY(1)=1
THENXP=PEN(X):YP=PEN(Y)..&N..60..&X.."..
COLLISIONS BETWEEN SPRITES OR..&..."BETW
EEN SPRITES AND THE BACKGROUND MAY..'...
"BE TESTED EASILY...'..."THE FUNCTIONS A
RE:.;' ..". .SCOLL(S1,S2[,S3....])..Y'..
." .BCOLL(S1[,S2.....])..X'...". S1=FIR
ST SPRITE NUMBER..'..." S2=SECOND SPRIT
E NUMBER, ETC.J'R.."THE SCOLL FUNCTION I
S TRUE ONLY IF ALL..'..."OF THE SPECIFIE
D SPRITES ARE COLLIDING..#(..."THE BCOLL
FUNCTION IS TRUE IF ANY OF.H(..."SPRITE
S ARE COLLIDING WITH THE.Z(..."BACKGROUN
D..O(...". FOR EXAMPLE:..(..." IF SCOLL(
4,6) WILL BE TRUE ID 4 & 6..(..." COLL
IDE..X(".." IF BCOLL(3) WILL BE TRUE IF
SPRITE 3..(,.." HITS THE BACKGROUND PAT
TERN...)6..60..)@.."..ULTRABASIC-64 ENAB
LES YOU TO USE.\)J.."THE SOUND GENERATOR
S IN THE '64 EASILY!..)T.."THE THREE TON
E GENERATORS ARE..)^.."DESIGNATED AS 1,2
AND 3..A)H.."THEY ARE SET UP AS FOLLOWS
:..)R.." 1=SQUARE WAVE (FLUTY SOUND)..*
|.." 2=SAWTOOTH WAVE (REEDY SOUND)..*..
." 3=NOISE.H*..."THESE CAN BE CONTROLLE
D BY THE COMMAND._*...". .SOUND G,P,D..
}*...". G=GENERATOR (1-3)..*..."
P=PITCH (1-255).F*..." D=DURATION (
IN 60'THS OF A SECOND)..*B.."A COMPLETE
SET OF PITCHES IS GIVEN IN..+L.."THE MAN
UAL. A COUPLE OF KEY ONES:.;+V.."MIDDLE
C=17,E=21,G=25,C=34.C+..."TO SOUND A MID
DLE C FOR 1 SECOND:.W+..." SOUND2,17,60.
.+...60:.2,17,60:.60..+..."..TO MAKE A N
OISE SOUND FOR 1 SECOND:.L+..." SOUND3,5
0,60..+...60:.3,50,60:.60..,..."..TO STO
P THE SOUND, PRESS THE F1 KEY..,...60.@,
..."..THE CHARACTERISTICS OF EACH OF THE
.L,&.."THREE GENERATORS MAY BE VARIED BY
THE..,0.."GENERATOR CONTROL COMMAND:..,
:..". .GEN A,B,C,D,E,F,G,H,I.L,D.." A=GE
NERATOR NUMBER (1-3)..,N.." B=WAVEFORM:.
.,X.." 1=TRIANGLE..-B.." 2=SAWTOOTH.
!-L.." 4=PULSE (SQUARE).2-V.." 8=NOI
SE.Z-..." C=ATTACK SPEED (0-FASTEST TO 1
5)..-..." D=DECAY SPEED (0-FASTEST TO 15
)..-..." E=SUSTAIN LEVEL (0-NONE TO 15).
P-..." F=RELEASE SPEED (0-FASTEST TO 15)
..-..." G=DUTY CYCLE FOR PLUSE WAVEFORMS
......" (0 TO 15) 8=SQUARE WAVE.B...."
H=SYNCHRONIZATION CONTROL (0-OFF).J.F..
" I=RING MODULATOR CONTROL (0-OFF)...P..
" [SEE PROG REF MANUAL FOR H & I]...Z..6
0.B...."..THE OVERALL VOLUME LEVEL AND T
HE......"FILTER CONTROLS ARE CONTROLLED
BY THE../..." .VOL A,B,C,D,E. COMMAND..
</..." A=OVERALL SOUND LEVEL (0-NONE TO
15).S/..." B=FILTER MODE:.H/..." 1=
LOW PASS.}/ .." 2=BANDPASS../*.."
4=HIGH PASS../4.." 8=NO SOUND FROM GE
N 3.W/>.." (THESE MAY BE COMBINED).
./H.." C=FILTER CONTROL..0R.." 1=SEN
D 1 OUTPUT THRU FILTER.<0\.." 2=SEND
2 OUTPUT THRU FILTER.B0F.." 4=SEND 3
OUTPUT THRU FILTER..0P.." 8=SEND EXTE
RNAL SOUND THRU FILTER..0Z.." (THES
E MAY BE ADDED)..0..." D=FILTER FREQUEN
CY (0-LOWEST TO 15)..1..." E=FILTER RES
ONANCE (0-FLAT TO 15).21..."IT IS NOT NE
CESSARY TO FILL IN ALL THE.T1..."VALUES
ON EACH VOL COMMAND..{1..."TO CHANGE ONL
Y THE VOL, JUST USE..1..." VOL10."..1...
60..1J.."..ULTRABASIC-64 ALSO CAN 'PROGR
AM' THE..1T.."PITCHES OF THE TONE GENERA
TORS...2..."THE EXPLANATION OF THE SET,
TDATA,.62..."AND TUNE COMMANDS IS GIVEN
IN THE.A2..."MANUAL. THE RESULTS CAN SOU
ND LIKE:".Q2...60:.3,3564.|2...3,200..2.
.."010101FF"..2...60..2...2,3572:.2,254.
G2..."90200120FF2020010010E001".O2...60.
.2..."..THERE ARE 5 'JIFFY' (1/60 SEC)."
3..."AND 5 SECOND TIMERS IN ULTRABASIC-6
4..M3..."EACH OF THESE IS LIKE AN OVEN T
IMER,.X3..."WHERE YOU SET IT TO A VALUE
AND THEN..3$.."IT COUNTS DOWN TO 0 AND S
TOPS..G3..."THE TIMERS ARE NUMBERED 0-4
FOR THE..38.."JIFFY TIMERS AND 5-9 FOR T
HE SECOND..4B.."TIMERS. THEY ARE SET BY
THE./4L..". .SCTR T,V. COMMAND..H4V..".
T=TIMER NUMBER.N4`.." V=VALUE TO BE
SET (1-65000).V4J..60..4T.."..THE TIMER
S ARE READ BY A FUNCTION:..4~..". .CTR
(T).M4...". T=TIMER NUMBER..4...".FOR
EXAMPLE:..5..." SCTR 3,50 (SET TIMER
3 TO 50/60 SEC).15..." IF CTR (3) <>0
THEN .....95...60.G5...".. NOW YOU'RE A
N ADVANCED PRACTITIONER..5D.." OF THE
FINE ART OF ULTRABASIC-64!.D5N..".. .MAY
THE ULTRABASIC FORCE BE WITH YOU!....5O
..1,3799:.2,3798:.3,3797:.1,254:.2,254:.
3,254..6T.."100180050010"..6U.."FF01FA01
8006".16V.."100505100B10".A6W.."800101FF
"...^
> CLICK IMAGE PREVIEW FOR FULL MODAL