Disk and Cassette Storage
Video (09:09)
This episode is a look at software storage on the TI, using cassettes and diskettes.
We cover the following:
- Using storage to save your work
- Floppy disks
- Floppy disk storage as a random-access medium
- How floppies and drives work
- The TI-99 floppy format
- Managing the capacity of disks
- Cassettes
- Cassette storage as a sequential medium
- How cassette storage works
- Digital recorders and MP3
- File types
- Data types (display/fixed, display/variable, internal/fixed, internal/variable)
- Accessing data files
- Program file type
- BASIC file layout
CATTY
A very simple disk catalog display.
10 CALL CLEAR
20 CALL SCREEN(15)
30 PRINT "DISK CATALOG"
40 PAD$=" "
50 PRINT
60 PRINT "DISK TYPE SIZE"
70 PRINT "---- ---- -----"
80 OPEN #1:"DSK1.",INPUT ,INTERNAL,RELATIVE
90 INPUT #1:A$,B,C,D
100 APAD=11-LEN(A$)
110 IF A$="" THEN 180
120 PRINT A$;SEG$(PAD$,1,APAD);
130 FMT$="---"
140 ON B+1 GOSUB 210,230,250,270,290,310
150 PRINT FMT$;" ";C
160 GOTO 90
170 PRINT
180 PRINT "COMPLETE."
190 CLOSE #1
200 END
210 FMT$="DSK"
220 RETURN
230 FMT$="D/F"
240 RETURN
250 FMT$="D/V"
260 RETURN
270 FMT$="I/F"
280 RETURN
290 FMT$="I/V"
300 RETURN
310 FMT$="PGM"
320 RETURN
SAVEMYDATA
Example of saving a data file from BASIC.
10 OPEN #1:"DSK1.MYDATA",OUTPUT,FIXED(32)
20 PRINT #1:"LONDON"
30 PRINT #1:"FRANCE"
40 PRINT #1:"UNDERPANTS"
50 CLOSE #1
LOADMYDATA
Example of loading a data file from BASIC.
10 OPEN #1:"DSK1.MYDATA",INPUT ,FIXED(32)
20 INPUT #1:A$
30 PRINT A$
40 IF EOF (1)=0 THEN 20
70 PRINT
80 PRINT "END OF FILE!"
90 CLOSE #1