TELETRON.BAS
FILE INFORMATION
FILENAME(S): TELETRON.BAS
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 21:24:07
APPEARS ON: 1 disk(s)
FILE HASH
fdbfdb6bbdbd4f7a826816eaefde116ad7735f37efed5d48b1f46803ed025499
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TELETRON1200 3 1 | TELETRON.BAS | PRG | DuncanTwain | 16 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 37 08 64 00 42 B2 31 32 AC 34 30 39 36 3A |..7.d.B.12.4096:| 00000010: 8B 28 C2 28 42 29 B2 31 32 30 29 AF 28 C2 28 42 |.(.(B).120).(.(B| 00000020: AA 31 29 B2 32 34 29 AF 28 C2 28 42 AA 32 29 B2 |.1).24).(.(B.2).| 00000030: 33 32 29 A7 31 32 30 00 4F 08 6E 00 93 22 54 45 |32).120.O.n.."TE| 00000040: 4C 45 54 52 4F 4E 20 24 43 30 22 2C 38 2C 31 00 |LETRON $C0",8,1.| 00000050: 5F 08 78 00 9F 32 2C 32 2C 30 2C C7 28 38 29 00 |_.x..2,2,0,.(8).| 00000060: 75 08 82 00 97 35 33 32 38 30 2C 39 3A 97 35 33 |u....53280,9:.53| 00000070: 32 38 31 2C 39 00 80 08 8C 00 99 C7 28 31 34 29 |281,9.......(14)| 00000080: 00 A0 08 96 00 42 B2 31 32 AC 34 30 39 36 3A 52 |.....B.12.4096:R| 00000090: 42 B2 42 AA 32 35 36 3A 54 42 B2 42 AA 35 31 32 |B.B.256:TB.B.512| 000000A0: 00 CE 08 A0 00 42 52 B2 20 34 3A 54 4C B2 20 20 |.....BR. 4:TL. | 000000B0: 32 3A 54 48 B2 31 32 3A 43 52 B2 36 3A 52 4C B2 |2:TH.12:CR.6:RL.| 000000C0: 32 31 32 3A 52 48 B2 31 32 3A 43 4F B2 31 00 DC |212:RH.12:CO.1..| 000000D0: 08 AA 00 97 35 36 35 39 30 2C 36 34 00 E9 08 B4 |....56590,64....| 000000E0: 00 97 35 36 35 38 31 2C 35 00 F7 08 BE 00 97 35 |..56581,5......5| 000000F0: 36 35 39 30 2C 36 35 00 05 09 C8 00 97 35 36 35 |6590,65......565| 00000100: 38 38 2C 42 52 00 38 09 D2 00 99 22 9E 93 AF AF |88,BR.8...."....| 00000110: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................| 00000120: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................| 00000130: AF AF AF AF AF AF 22 3B 00 4C 09 DC 00 99 22 12 |......";.L....".| 00000140: 20 C2 41 55 44 20 20 3A 92 A1 22 3B 00 6D 09 E6 | .AUD :..";.m..| 00000150: 00 8B 42 52 B2 20 34 A7 99 22 33 30 30 20 CF D2 |..BR. 4.."300 ..| 00000160: C9 C7 20 20 20 20 20 20 20 20 20 22 3B 00 8E 09 |.. ";...| 00000170: F0 00 8B 42 52 B2 20 35 A7 99 22 33 30 30 20 C1 |...BR. 5.."300 .| 00000180: CE D3 D7 20 20 20 20 20 20 20 20 20 22 3B 00 AF |... ";..| 00000190: 09 FA 00 8B 42 52 B2 31 34 A7 99 22 31 32 30 30 |....BR.14.."1200| 000001A0: 20 CF D2 C9 C7 3D 31 32 30 30 2F 37 35 22 3B 00 | ....=1200/75";.| 000001B0: D0 09 04 01 8B 42 52 B2 20 36 A7 99 22 31 32 30 |.....BR. 6.."120| 000001C0: 30 20 C1 CE D3 D7 3D 37 35 2F 31 32 30 30 22 3B |0 ....=75/1200";| 000001D0: 00 E4 09 0E 01 99 22 20 12 20 C3 4F 4E 56 2E 3A |......" . .ONV.:| 000001E0: 92 A1 22 3B 00 FA 09 18 01 8B 43 4F B2 30 A7 99 |..";......CO.0..| 000001F0: 22 CF C6 C6 12 A1 20 92 22 3B 00 10 0A 22 01 8B |"..... .";..."..| 00000200: 43 4F B2 31 A7 99 22 CF CE 20 12 A1 20 92 22 3B |CO.1..".. .. .";| 00000210: 00 26 0A 2C 01 99 22 12 20 CE 55 4D 42 45 52 3A |.&.,..". .UMBER:| 00000220: 92 A1 22 4E 31 24 00 42 0A 2E 01 99 22 91 22 3B |.."N1$.B....".";| 00000230: A6 32 36 29 22 20 12 20 CC 49 4E 45 20 3A 92 A1 |.26)" . .INE :..| 00000240: 22 3B 00 62 0A 30 01 8B 28 C2 28 35 36 35 37 37 |";.b.0..(.(56577| 00000250: 29 AF 34 29 B2 30 A7 99 22 CF CE 20 12 A1 20 92 |).4).0..".. .. .| 00000260: 22 3B 00 80 0A 32 01 8B 28 C2 28 35 36 35 37 37 |";...2..(.(56577| 00000270: 29 AF 34 29 A7 99 22 CF C6 C6 12 A1 20 92 22 3B |).4).."..... .";| 00000280: 00 B1 0A 36 01 99 22 B7 B7 B7 B7 B7 B7 B7 B7 B7 |...6..".........| 00000290: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................| 000002A0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 |..............."| 000002B0: 3B 00 C8 0A 40 01 99 22 20 31 2D 20 D3 45 54 20 |;...@.." 1- .ET | 000002C0: 42 41 55 44 52 41 54 45 00 DE 0A 4A 01 99 22 20 |BAUDRATE...J.." | 000002D0: 32 2D 20 C4 49 41 4C 20 4E 55 4D 42 45 52 00 F1 |2- .IAL NUMBER..| 000002E0: 0A 54 01 99 22 20 33 2D 20 D4 45 52 4D 49 4E 41 |.T.." 3- .ERMINA| 000002F0: 4C 00 0E 0B 5E 01 99 22 20 34 2D 20 D2 45 4C 45 |L...^.." 4- .ELE| 00000300: 41 53 45 20 50 48 4F 4E 45 20 4C 49 4E 45 00 21 |ASE PHONE LINE.!| 00000310: 0B 68 01 A1 50 24 3A 8B 50 24 B2 22 22 A7 33 36 |.h..P$:.P$."".36| 00000320: 30 00 37 0B 72 01 8B 50 24 B2 22 31 22 A7 8D 34 |0.7.r..P$."1"..4| 00000330: 32 30 3A 89 32 31 30 00 4D 0B 7C 01 8B 50 24 B2 |20:.210.M.|..P$.| 00000340: 22 32 22 A7 8D 37 31 30 3A 89 32 31 30 00 64 0B |"2"..710:.210.d.| 00000350: 86 01 8B 50 24 B2 22 33 22 A7 8D 31 30 39 30 3A |...P$."3"..1090:| 00000360: 89 32 31 30 00 A4 0B 90 01 8B 50 24 B2 22 34 22 |.210......P$."4"| 00000370: A7 99 22 13 11 11 11 11 11 11 11 12 20 34 2D 20 |.."......... 4- | 00000380: D2 45 4C 45 41 53 45 20 50 48 4F 4E 45 20 4C 49 |.ELEASE PHONE LI| 00000390: 4E 45 20 22 3A 97 35 36 35 37 37 2C 32 35 35 3A |NE ":.56577,255:| 000003A0: 89 32 31 30 00 AD 0B 9A 01 89 33 36 30 00 B3 0B |.210......360...| 000003B0: A4 01 8F 00 CE 0B AE 01 8F 20 2A 2A 2A 20 53 45 |......... *** SE| 000003C0: 54 20 42 41 55 44 52 41 54 45 20 2A 2A 2A 00 D4 |T BAUDRATE ***..| 000003D0: 0B B8 01 8F 00 FE 0B C2 01 99 22 13 11 11 11 11 |..........".....| 000003E0: 12 20 31 2D 20 D3 45 54 20 42 41 55 44 52 41 54 |. 1- .ET BAUDRAT| 000003F0: 45 20 20 20 20 20 20 20 11 11 11 11 11 11 00 17 |E ........| 00000400: 0C CC 01 99 22 20 31 2D 20 33 30 30 20 20 C2 41 |...." 1- 300 .A| 00000410: 55 44 20 CF D2 C9 C7 00 30 0C D6 01 99 22 20 32 |UD .....0...." 2| 00000420: 2D 20 33 30 30 20 20 C2 41 55 44 20 C1 CE D3 D7 |- 300 .AUD ....| 00000430: 00 53 0C E0 01 99 22 20 33 2D 20 31 32 30 30 20 |.S...." 3- 1200 | 00000440: C2 41 55 44 20 CF D2 C9 C7 20 28 31 32 30 30 2F |.AUD .... (1200/| 00000450: 37 35 29 00 76 0C EA 01 99 22 20 34 2D 20 31 32 |75).v...." 4- 12| 00000460: 30 30 20 C2 41 55 44 20 C1 CE D3 D7 20 28 37 35 |00 .AUD .... (75| 00000470: 2F 31 32 30 30 29 00 92 0C F4 01 99 22 11 11 20 |/1200)......".. | 00000480: D2 C5 D4 D5 D2 CE 20 3A 20 CD 41 49 4E 20 4D 45 |...... : .AIN ME| 00000490: 4E 55 00 A5 0C FE 01 A1 50 24 3A 8B 50 24 B2 22 |NU......P$:.P$."| 000004A0: 22 A7 35 31 30 00 BE 0C 08 02 8B 50 24 B2 C7 28 |".510......P$..(| 000004B0: 31 33 29 B0 50 24 B2 22 85 22 A7 37 30 30 00 C9 |13).P$.".".700..| 000004C0: 0C 12 02 42 52 B2 32 35 35 00 FA 0C 1C 02 8B 50 |...BR.255......P| 000004D0: 24 B2 22 31 22 A7 42 52 B2 20 34 3A 54 4C B2 20 |$."1".BR. 4:TL. | 000004E0: 20 32 3A 54 48 B2 31 32 3A 43 52 B2 36 3A 52 4C | 2:TH.12:CR.6:RL| 000004F0: B2 32 31 32 3A 52 48 B2 31 32 00 2B 0D 26 02 8B |.212:RH.12.+.&..| 00000500: 50 24 B2 22 32 22 A7 42 52 B2 20 35 3A 54 4C B2 |P$."2".BR. 5:TL.| 00000510: 20 20 32 3A 54 48 B2 31 32 3A 43 52 B2 36 3A 52 | 2:TH.12:CR.6:R| 00000520: 4C B2 32 31 32 3A 52 48 B2 31 32 00 5C 0D 30 02 |L.212:RH.12.\.0.| 00000530: 8B 50 24 B2 22 33 22 A7 42 52 B2 31 34 3A 54 4C |.P$."3".BR.14:TL| 00000540: B2 31 30 30 3A 54 48 B2 34 38 3A 43 52 B2 38 3A |.100:TH.48:CR.8:| 00000550: 52 4C B2 20 32 35 3A 52 48 B2 20 33 00 8D 0D 3A |RL. 25:RH. 3...:| 00000560: 02 8B 50 24 B2 22 34 22 A7 42 52 B2 20 36 3A 54 |..P$."4".BR. 6:T| 00000570: 4C B2 32 32 30 3A 54 48 B2 20 32 3A 43 52 B2 32 |L.220:TH. 2:CR.2| 00000580: 3A 52 4C B2 20 38 30 3A 52 48 B2 35 31 00 9D 0D |:RL. 80:RH.51...| 00000590: 44 02 8B 42 52 B2 32 35 35 A7 35 31 30 00 AB 0D |D..BR.255.510...| 000005A0: 4E 02 97 35 36 35 39 30 2C 36 34 00 B8 0D 58 02 |N..56590,64...X.| 000005B0: 97 35 36 35 38 31 2C 35 00 C6 0D 62 02 97 35 36 |.56581,5...b..56| 000005C0: 35 39 30 2C 36 35 00 D4 0D 6C 02 97 35 36 35 38 |590,65...l..5658| 000005D0: 38 2C 42 52 00 ED 0D 76 02 99 22 11 20 30 2D 20 |8,BR...v..". 0- | 000005E0: CE 4F 20 43 4F 4E 56 45 52 53 49 4F 4E 00 07 0E |.O CONVERSION...| 000005F0: 80 02 99 22 20 31 2D 20 D7 49 54 48 20 43 4F 4E |..." 1- .ITH CON| 00000600: 56 45 52 53 49 4F 4E 00 1A 0E 8A 02 A1 50 24 3A |VERSION......P$:| 00000610: 8B 50 24 B2 22 22 A7 36 35 30 00 2C 0E 94 02 8B |.P$."".650.,....| 00000620: 50 24 B2 C7 28 31 33 29 A7 37 30 30 00 42 0E 9E |P$..(13).700.B..| 00000630: 02 8B 50 24 B2 22 30 22 A7 43 4F B2 30 3A 89 37 |..P$."0".CO.0:.7| 00000640: 30 30 00 58 0E A8 02 8B 50 24 B2 22 31 22 A7 43 |00.X....P$."1".C| 00000650: 4F B2 31 3A 89 37 30 30 00 61 0E B2 02 89 36 35 |O.1:.700.a....65| 00000660: 30 00 71 0E BC 02 8E 3A 8F 20 54 4F 20 4D 41 49 |0.q....:. TO MAI| 00000670: 4E 00 77 0E C6 02 8F 00 91 0E D0 02 8F 20 2A 2A |N.w.......... **| 00000680: 2A 20 44 49 41 4C 20 4E 55 4D 42 45 52 20 2A 2A |* DIAL NUMBER **| 00000690: 2A 00 97 0E DA 02 8F 00 A6 0E E4 02 97 35 36 35 |*............565| 000006A0: 37 37 2C 32 35 35 00 D1 0E EE 02 99 22 13 11 11 |77,255......"...| 000006B0: 11 11 11 12 20 32 2D 20 C4 49 41 4C 20 4E 55 4D |.... 2- .IAL NUM| 000006C0: 42 45 52 20 20 20 20 20 20 20 20 11 11 11 11 11 |BER .....| 000006D0: 11 00 F0 0E F8 02 99 22 11 11 11 11 11 20 D2 C5 |......."..... ..| 000006E0: D4 D5 D2 CE 20 3A 20 CD 41 49 4E 20 4D 45 4E 55 |.... : .AIN MENU| 000006F0: 00 0D 0F 02 03 99 22 11 20 20 20 2A 20 20 20 20 |......". * | 00000700: 3A 20 CC 41 53 54 20 4E 55 4D 42 45 52 00 35 0F |: .AST NUMBER.5.| 00000710: 0C 03 4E 24 B2 22 22 3A 85 22 91 91 91 91 91 91 |..N$."":."......| 00000720: 91 91 20 20 20 D7 48 49 43 48 20 4E 55 4D 42 45 |.. .HICH NUMBE| 00000730: 52 22 3B 4E 24 00 48 0F 16 03 8B 4E 24 B2 22 2A |R";N$.H....N$."*| 00000740: 22 A7 4E 24 B2 4E 31 24 00 57 0F 20 03 8B 4E 24 |".N$.N1$.W. ..N$| 00000750: B2 22 22 A7 39 31 30 00 6F 0F 2A 03 97 35 36 35 |."".910.o.*..565| 00000760: 37 37 2C 32 3A 81 58 B2 31 A4 39 39 39 3A 82 00 |77,2:.X.1.999:..| 00000770: 7A 0F 34 03 4E 31 24 B2 4E 24 00 96 0F 3E 03 81 |z.4.N1$.N$...>..| 00000780: 54 B2 31 A4 C3 28 4E 24 29 3A 41 24 B2 CA 28 4E |T.1..(N$):A$..(N| 00000790: 24 2C 54 2C 31 29 00 B8 0F 48 03 A1 50 24 3A 8B |$,T,1)...H..P$:.| 000007A0: 50 24 B2 C7 28 31 33 29 A7 97 35 36 35 37 37 2C |P$..(13)..56577,| 000007B0: 32 35 35 3A 89 39 31 30 00 C8 0F 52 03 8B 41 24 |255:.910...R..A$| 000007C0: B2 22 2D 22 A7 38 38 30 00 DE 0F 5C 03 41 B2 C5 |."-".880...\.A..| 000007D0: 28 41 24 29 3A 8B 41 B2 30 A7 41 B2 31 30 00 F0 |(A$):.A.0.A.10..| 000007E0: 0F 66 03 81 4E B2 31 A4 41 3A 8D 39 32 30 3A 82 |.f..N.1.A:.920:.| 000007F0: 00 FF 0F 70 03 81 58 B2 31 A4 35 30 30 3A 82 00 |...p..X.1.500:..| 00000800: 05 10 7A 03 82 00 18 10 84 03 97 36 33 31 2C 35 |..z........631,5| 00000810: 31 3A 97 31 39 38 2C 31 00 29 10 8E 03 8E 20 3A |1:.198,1.).... :| 00000820: 8F 20 54 4F 20 4D 41 49 4E 00 38 10 98 03 97 35 |. TO MAIN.8....5| 00000830: 36 35 37 37 2C 32 35 35 00 41 10 A2 03 8D 39 37 |6577,255.A....97| 00000840: 30 00 4E 10 AC 03 97 35 36 35 37 37 2C 32 00 57 |0.N....56577,2.W| 00000850: 10 B6 03 8D 39 37 30 00 5D 10 C0 03 8E 00 6D 10 |....970.].....m.| 00000860: CA 03 81 58 B2 30 A4 32 30 3A 82 3A 8E 00 73 10 |...X.0.20:.:..s.| 00000870: D4 03 8F 00 8A 10 DE 03 8F 20 2A 2A 2A 20 54 45 |......... *** TE| 00000880: 52 4D 49 4E 41 4C 20 2A 2A 2A 00 90 10 E8 03 8F |RMINAL ***......| 00000890: 00 A7 10 F2 03 A1 23 32 2C 50 24 3A 8B 50 24 B2 |......#2,P$:.P$.| 000008A0: 22 22 A7 31 30 34 30 00 BC 10 FC 03 8B 43 4F B2 |"".1040......CO.| 000008B0: 30 A7 99 50 24 3B 3A 89 31 30 34 30 00 D1 10 06 |0..P$;:.1040....| 000008C0: 04 99 C7 28 C2 28 52 42 AA C6 28 50 24 29 29 29 |...(.(RB..(P$)))| 000008D0: 3B 00 E5 10 10 04 A1 50 24 3A 8B 50 24 B2 22 22 |;......P$:.P$.""| 000008E0: A7 31 30 31 30 00 FE 10 1A 04 8B 50 24 B2 22 85 |.1010......P$.".| 000008F0: 22 A7 8E 20 3A 8F 20 54 4F 20 4D 41 49 4E 00 16 |".. :. TO MAIN..| 00000900: 11 24 04 8B 43 4F B2 30 A7 50 B2 C6 28 50 24 29 |.$..CO.0.P..(P$)| 00000910: 3A 89 31 30 38 30 00 28 11 2E 04 50 B2 C2 28 54 |:.1080.(...P..(T| 00000920: 42 AA C6 28 50 24 29 29 00 38 11 38 04 8D 31 31 |B..(P$)).8.8..11| 00000930: 38 30 3A 89 31 30 31 30 00 3E 11 42 04 8F 00 59 |80:.1010.>.B...Y| 00000940: 11 4C 04 8F 20 2A 2A 2A 20 53 45 54 20 54 45 52 |.L.. *** SET TER| 00000950: 4D 49 4E 41 4C 20 2A 2A 2A 00 5F 11 56 04 8F 00 |MINAL ***._.V...| 00000960: 73 11 5B 04 99 22 13 11 11 22 A6 33 35 29 22 CF |s.[.."...".35)".| 00000970: CE 20 22 00 9D 11 60 04 99 22 13 11 11 11 11 11 |. "...`.."......| 00000980: 11 12 20 33 2D 20 D4 45 52 4D 49 4E 41 4C 20 20 |.. 3- .ERMINAL | 00000990: 20 20 20 20 20 20 20 20 20 11 11 11 11 00 B3 11 | .......| 000009A0: 6A 04 99 22 20 C6 31 20 3A 20 CD 41 49 4E 20 4D |j.." .1 : .AIN M| 000009B0: 45 4E 55 00 CF 11 74 04 97 36 35 39 2C 43 52 3A |ENU...t..659,CR:| 000009C0: 97 36 36 35 2C 52 4C 3A 97 36 36 36 2C 52 48 00 |.665,RL:.666,RH.| 000009D0: DC 11 7E 04 97 35 36 35 37 37 2C 32 00 E4 11 88 |..~..56577,2....| 000009E0: 04 99 22 11 00 ED 11 92 04 89 39 38 30 00 F3 11 |..".......980...| 000009F0: 9C 04 8F 00 0F 12 A6 04 8F 20 2A 2A 2A 20 50 55 |......... *** PU| 00000A00: 54 20 43 48 41 52 41 43 54 45 52 20 2A 2A 2A 00 |T CHARACTER ***.| 00000A10: 15 12 B0 04 8F 00 37 12 BA 04 97 32 35 33 2C 54 |......7....253,T| 00000A20: 4C 3A 97 32 35 34 2C 54 48 AA 31 32 38 3A 97 32 |L:.254,TH.128:.2| 00000A30: 35 35 2C 50 3A 9E 42 00 3D 12 C4 04 8E 00 00 00 |55,P:.B.=.......|
..7.D.B.12.4096:.(B(B).120).(B(B.1).24). (B(B.2).32).120.O.N.."TELETRON $C0",8,1. _.X..2,2,0,G(8).U....53280,9:.53281,9... ...G(14). ...B.12.4096:RB.B.256:TB.B.512 .N. .BR. 4:TL. 2:TH.12:CR.6:RL.212:RH.1 2:CO.1......56590,64......56581,5......5 6590,65...H..56588,BR.8.R.."............ ..............................";.L....". BAUD :..";.M....BR. 4.."300 ORIG ";......BR. 5.."300 ANSW ";.. ....BR.14.."1200 ORIG=1200/75";.P....BR. 6.."1200 ANSW=75/1200";......" . CONV.: ..";......CO.0.."OFF.. .";..."..CO.1.."O N .. .";.&.,..". NUMBER:.."N1$.B...."."; .26)" . LINE :..";.B.0..(B(56577).4).0.. "ON .. .";...2..(B(56577).4).."OFF.. ."; ...6.."................................. .......";.H.@.." 1- SET BAUDRATE...J.." 2- DIAL NUMBER...T.." 3- TERMINAL...^.." 4- RELEASE PHONE LINE.!.H..P$:.P$."".36 0.7.R..P$."1"..420:.210.M.|..P$."2"..710 :.210.D....P$."3"..1090:.210......P$."4" .."......... 4- RELEASE PHONE LINE ":.56 577,255:.210......360.......N.... *** SE T BAUDRATE ***.T.......B.."...... 1- SET BAUDRATE .........L.." 1- 300 BA UD ORIG.0.V.." 2- 300 BAUD ANSW.S...." 3- 1200 BAUD ORIG (1200/75).V...." 4- 12 00 BAUD ANSW (75/1200)......".. RETURN : MAIN MENU......P$:.P$."".510......P$.G( 13).P$.".".700.I...BR.255......P$."1".BR . 4:TL. 2:TH.12:CR.6:RL.212:RH.12.+.&.. P$."2".BR. 5:TL. 2:TH.12:CR.6:RL.212:RH .12.\.0..P$."3".BR.14:TL.100:TH.48:CR.8: RL. 25:RH. 3...:..P$."4".BR. 6:TL.220:TH . 2:CR.2:RL. 80:RH.51...D..BR.255.510... N..56590,64...X..56581,5.F.B..56590,65.T .L..56588,BR...V..". 0- NO CONVERSION... ..." 1- WITH CONVERSION......P$:.P$."".6 50.,....P$.G(13).700.B....P$."0".CO.0:.7 00.X....P$."1".CO.1:.700.A....650.Q....: . TO MAIN.W.F.....P.. *** DIAL NUMBER ** *...Z........56577,255.Q...."....... 2- DIAL NUMBER ............"..... RE TURN : MAIN MENU......". * : LAST N UMBER.5...N$."":."........ WHICH NUMBE R";N$.H....N$."*".N$.N1$.W. ..N$."".910. O.*..56577,2:.X.1.999:..Z.4.N1$.N$...>.. T.1.C(N$):A$.J(N$,T,1)...H..P$:.P$.G(13) ..56577,255:.910.H.R..A$."-".880...\.A.E (A$):.A.0.A.10...F..N.1.A:.920:....P..X. 1.500:....Z........631,51:.198,1.).... : . TO MAIN.8....56577,255.A....970.N....5 6577,2.W....970.].....M.J..X.0.20:.:..S. T........ *** TERMINAL ***............#2 ,P$:.P$."".1040......CO.0..P$;:.1040.Q.. ..G(B(RB.F(P$)));......P$:.P$."".1010... ...P$.".".. :. TO MAIN...$..CO.0.P.F(P$) :.1080.(...P.B(TB.F(P$)).8.8..1180:.1010 .>.B...Y.L.. *** SET TERMINAL ***._.V... S.[.."...".35)"ON "...`.."........ 3- TE RMINAL .......J.." F1 : MAIN M ENU.O.T..659,CR:.665,RL:.666,RH...~..565 77,2......".......980............ *** PU T CHARACTER ***.......7....253,TL:.254,T H.128:.255,P:.B.=.D.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL