TI 700 MODEM
FILE INFORMATION
FILENAME(S): TI 700 MODEM
FILE TYPE(S): PRG
FILE SIZE: 812b
FIRST SEEN: 2025-10-19 22:48:30
APPEARS ON: 1 disk(s)
FILE HASH
0e56d5c61736808eb2605de36c2a78c4c508ed8777bc6651f9ad96a39ecf8b78
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITY 64 | TI 700 MODEM | PRG | Radd Maxx | 17 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 07 00 AB 42 49 54 20 C6 49 49 2C 4D |.......BIT .II,M| 00000010: 41 52 4B 20 50 41 52 49 54 59 00 5D 08 0A 00 8F |ARK PARITY.]....| 00000020: 20 54 48 49 53 20 50 52 4F 47 20 53 45 4E 44 53 | THIS PROG SENDS| 00000030: 20 26 20 52 45 43 45 49 56 45 53 20 44 41 54 41 | & RECEIVES DATA| 00000040: 20 20 20 20 20 54 4F 20 41 4E 44 20 46 52 4F 4D | TO AND FROM| 00000050: 20 41 20 53 49 4C 45 4E 54 20 37 30 30 00 83 08 | A SILENT 700...| 00000060: 0B 00 8F 20 54 45 52 4D 49 4E 41 4C 20 4D 4F 44 |... TERMINAL MOD| 00000070: 49 46 49 45 44 20 46 4F 52 20 50 45 54 20 41 53 |IFIED FOR PET AS| 00000080: 43 49 49 00 A8 08 14 00 8F 20 54 49 20 53 49 4C |CII...... TI SIL| 00000090: 45 4E 54 20 37 30 30 20 53 45 54 2D 55 50 3A 20 |ENT 700 SET-UP: | 000000A0: 33 30 30 20 42 41 55 44 00 BA 08 15 00 8F 20 46 |300 BAUD...... F| 000000B0: 55 4C 4C 20 44 55 50 4C 45 58 00 F5 08 1E 00 8F |ULL DUPLEX......| 000000C0: 20 53 41 4D 45 20 53 45 54 2D 55 50 20 41 54 20 | SAME SET-UP AT | 000000D0: 43 4F 4D 50 55 54 45 52 20 55 53 49 4E 47 20 20 |COMPUTER USING | 000000E0: 20 20 20 20 20 33 2D 4C 49 4E 45 20 49 4E 54 45 | 3-LINE INTE| 000000F0: 52 46 41 43 45 00 25 09 64 00 9F 32 2C 32 2C 33 |RFACE.%.d..2,2,3| 00000100: 2C C7 28 36 AA 33 32 29 AA C7 28 33 32 AA 31 32 |,.(6.32)..(32.12| 00000110: 38 29 3A 8F 20 4F 50 45 4E 20 54 48 45 20 43 48 |8):. OPEN THE CH| 00000120: 41 4E 4E 45 4C 00 5B 09 6E 00 A1 23 32 2C 41 24 |ANNEL.[.n..#2,A$| 00000130: 3A 8F 20 54 55 52 4E 20 4F 4E 20 52 45 43 45 49 |:. TURN ON RECEI| 00000140: 56 45 20 43 48 41 4E 4E 45 4C 20 20 20 20 28 54 |VE CHANNEL (T| 00000150: 4F 53 53 20 41 20 4E 55 4C 4C 29 00 6C 09 C8 00 |OSS A NULL).l...| 00000160: 8F 20 20 4D 41 49 4E 20 4C 4F 4F 50 00 91 09 D2 |. MAIN LOOP....| 00000170: 00 A1 42 24 3A 8F 20 47 45 54 20 46 52 4F 4D 20 |..B$:. GET FROM | 00000180: 43 4F 4D 50 55 54 45 52 20 4B 45 59 42 4F 41 52 |COMPUTER KEYBOAR| 00000190: 44 00 CC 09 DC 00 8B 42 24 B3 B1 22 22 A7 98 32 |D......B$..""..2| 000001A0: 2C 42 24 3B 3A 8F 20 49 46 20 41 20 4B 45 59 20 |,B$;:. IF A KEY | 000001B0: 20 20 20 50 52 45 53 53 45 44 2C 53 45 4E 44 20 | PRESSED,SEND | 000001C0: 54 4F 20 54 45 52 4D 49 4E 41 4C 2E 00 F1 09 E6 |TO TERMINAL.....| 000001D0: 00 A1 23 32 2C 43 24 3A 8F 20 47 45 54 20 41 20 |..#2,C$:. GET A | 000001E0: 4B 45 59 20 46 52 4F 4D 20 54 45 52 4D 49 4E 41 |KEY FROM TERMINA| 000001F0: 4C 00 28 0A F0 00 99 42 24 3B 43 24 3B 3A 8F 20 |L.(....B$;C$;:. | 00000200: 50 52 49 4E 54 20 41 4C 4C 20 49 4E 50 55 54 53 |PRINT ALL INPUTS| 00000210: 20 54 4F 20 43 4F 4D 2D 20 20 20 20 50 55 54 45 | TO COM- PUTE| 00000220: 52 20 53 43 52 45 45 4E 00 66 0A FA 00 53 52 B2 |R SCREEN.f...SR.| 00000230: 53 54 3A 8B 53 52 B2 30 B0 53 52 B2 38 A7 32 30 |ST:.SR.0.SR.8.20| 00000240: 30 3A 8F 20 43 48 45 43 4B 20 53 54 41 54 55 53 |0:. CHECK STATUS| 00000250: 20 49 46 20 47 4F 4F 44 20 54 48 45 4E 20 43 4F | IF GOOD THEN CO| 00000260: 4E 54 49 4E 55 45 00 7C 0A 2C 01 8F 20 45 52 52 |NTINUE.|.,.. ERR| 00000270: 4F 52 20 52 45 50 4F 52 54 49 4E 47 00 8C 0A 36 |OR REPORTING...6| 00000280: 01 99 22 45 52 52 4F 52 3A 20 22 3B 00 A0 0A 40 |.."ERROR: ";...@| 00000290: 01 8B 53 52 AF 31 A7 99 22 50 41 52 49 54 59 22 |..SR.1.."PARITY"| 000002A0: 00 B3 0A 4A 01 8B 53 52 AF 32 A7 99 22 46 52 41 |...J..SR.2.."FRA| 000002B0: 4D 45 22 00 D4 0A 54 01 8B 53 52 AF 34 A7 99 22 |ME"...T..SR.4.."| 000002C0: 52 45 43 45 49 56 45 20 42 55 46 46 45 52 20 46 |RECEIVE BUFFER F| 000002D0: 55 4C 4C 22 00 E9 0A 5E 01 8B 53 52 AF 31 32 38 |ULL"...^..SR.128| 000002E0: A7 99 22 42 52 45 41 4B 22 00 20 0B 68 01 8B 28 |.."BREAK". .h..(| 000002F0: C2 28 36 37 33 29 AF 31 29 A7 33 36 30 3A 8F 20 |.(673).1).360:. | 00000300: 57 41 49 54 20 55 4E 54 49 4C 20 41 4C 4C 20 43 |WAIT UNTIL ALL C| 00000310: 48 41 52 53 20 54 52 41 4E 53 4D 49 54 54 45 44 |HARS TRANSMITTED| 00000320: 00 29 0B 72 01 A0 32 3A 80 00 00 00 |.).r..2:.... |
.......BIT FII,MARK PARITY.].... THIS PR OG SENDS & RECEIVES DATA TO AND FROM A SILENT 700...... TERMINAL MODIFIED FO R PET ASCII...... TI SILENT 700 SET-UP: 300 BAUD...... FULL DUPLEX...... SAME SE T-UP AT COMPUTER USING 3-LINE INTE RFACE.%.D..2,2,3,G(6.32).G(32.128):. OPE N THE CHANNEL.[.N..#2,A$:. TURN ON RECEI VE CHANNEL (TOSS A NULL).L.H.. MAIN LOOP...R..B$:. GET FROM COMPUTER KEYBOAR D.L....B$..""..2,B$;:. IF A KEY PRESS ED,SEND TO TERMINAL.......#2,C$:. GET A KEY FROM TERMINAL.(....B$;C$;:. PRINT AL L INPUTS TO COM- PUTER SCREEN.F...SR. ST:.SR.0.SR.8.200:. CHECK STATUS IF GOOD THEN CONTINUE.|.,.. ERROR REPORTING...6 .."ERROR: ";. .@..SR.1.."PARITY"...J..SR .2.."FRAME".T.T..SR.4.."RECEIVE BUFFER F ULL"...^..SR.128.."BREAK". .H..(B(673).1 ).360:. WAIT UNTIL ALL CHARS TRANSMITTED .).R. 2:....
> CLICK IMAGE PREVIEW FOR FULL MODAL