Catalogiseren Van Files; Voorbeeld-Programma's - Texas Instruments Php 1240 Bedienungsanleitung

4P
TEXAS INSTRUMENTS
een numerieke expressie die, wanneer zii wordt afgerond naar het
dichtstbijzijnde gehele getal, een getal vormt van 1 tot 255 en h et num-
mer van een file die al open is.
N.B.: Files kunnen alleen verwijderd worden wanneer ze niet be-
schermd zijn.
CALL RLES - Het FILES subprogramma wordt gebruikt o m h et aantal
files (maximaal negen) dat tegelijkertijd OPEN kan zijn, te wijzigen.
(Wanneer u geen aantal OPEN fil es aangeeft, d an gaat de computer er
in TI BASIC uit van drie OPEN files). De hoeveelheid beschikbare ge-
heugen (RAM) wordt verminderd met 534 bytes, plus 518 extra bytes
voor elke toegestane OPEN file.
De CALL RLES heeft de volgende algemene vorm:
CALL FILES (aantal)
NEW
H et aantal moet een cijfer zijn, va n 1 t/m 9. Dit is h et aantal files dat teg-
lijkertijd OPEN kan zijn. De opdracht NEW moet onmiddellijk na de
CALL FILES-opdracht gegeven worden. Wanneer CALL RLES niet
wordt uitgevoerd, dan stelt de computer h et aantal files dat OPEN kan
in o drie.
WAARSCHUWING
CALL FILES kan alleen gebruikt worden als een opdracht in TI BASIC.
Het kan niet gebruikt worden als een instructie in een TI BASIC pro-
gramma. Het gebruik van CALL FILES in een programma of het wegla-
ten v an NEW kan leiden tot onvoorspelbare gevolgen, inclusief verlies
van een programma en/of verlies van data op een diskette.
CATALOGISEREN VAN RLES
Door de file-index op een diskette vast te leggen, kunt u TI BASIC ge-
bruiken om een catalogus van de diskette-inhoud te lezen. De disket-
te-index (of catalogus) file is een file zonder naam, met de INTERNAL
vorm en een FIXED lengte. Hiervolgt een voorbeeld van een OPEN-in-
structie die toegang biedt tot de catalogus op aandrijvingssysteem
Een.
100 OPEN ;é1:"DSK1.",1NPUT,RELATIVE,INTERNAL
N.B.: De file-naam wordt weggelaten, daar de catalogus een file zon-
der naam is.
Elke record in de catalogus file bevat vier elementen: een rij en drie
numerieke waarden. geschreven in de INTERNAL vorm. Er zijn pre-
cies 128 records in de file, genummerd van O t/m 128,
Record O bevat informatie over de diskette. De rij (maximaal10 te-
kens lang) geeft de naam van de diskette en de numerieke elementen
geven de volgende informatie:
e
het record-type (altijd een nul voor record ;éO)
e
h et totale aantal sectoren op een enkelzijdige diskette (358 of 313)
en op een dubbelzijdige diskette (716 of 626)
Records 1 t/m 127 bevatten informatie overde corresponderendefiles
in de index. Het rij-element is de file-naam en de numerieke elemen-
ten zijn als volgt:
e
Het file-type (een negatieve waarde indien de file beschermd is)
1
=
DISPLAYED/FIXED data file
2
=
DISPLAYEDNARIABLE data file
3
=
INTERNAUFIXED data file
0
PHP 1240
4
=
INTERNALNARIABLE data file
5
=
BASIC programma of andere "geheugen image" data
e
het totaal aantal sectoren dat aan de file is toegekend
e
het totaal aantal bytes per record
Een type-5 file heeft altijd nul (0) als h et aantal bytes per record, daar
deze meting geen verband houdt met geheugen imaga data.
Een voorbeeld programma aan h et einde van deze paragraaf laat zien
hoe een diskette catalogus op het scherm gebracht kan worden.
VOORBEELD-PROGRAMMA'S
In deze paragraaf worden drie programma's behandeld. De eerste
tonnt enkele technieken die gebruikt kunnen worden bij file-bewer-
king: hoe wordt een file geopend, hoe schrijft men er random records
bij, hoe leest men er random records van. Het tweede programma laat
zien hoe de inhoud van h et scherm bewaard kan worden op een file
e n later weer terug o p h et scherm gebracht kan worden. Di t is handig
wanneer u een grafiek-scherm gemaakt hebt en dit wilt opslaan ente-
rugroepen. H et derde programma toont hoe de catalogus van een dis-
kette gelezen kan worden met behulp van TI BASIC.
ALGEMEEN PROGRAMMA- H et volgende programma toont algeme-
ne file-bewerking-technieken voor een file met random toegang:
Het eerste dee l, de regels 100 t/m 130 geven de invoerings-instructie:
1 00 CALL CLEAR
110 OPEN
*
10:"DSK1.GENFILE",
RELATIVE 50,1NTERNAL
120 PRINT "ENTER'XXX'
TO LEAVE ENTRY."
130 PRINT
Het volgende deel, de regels 140 t/m 220 bieden de mogelijkheid voor
invoering van maximaal 50 records, genummerd vanO t/m 49. Regel
180 controllerd of de laatste record ingevoerd is. Wanneer 50 records
zijn ingevoerd, deelt regel 220 de gebruiker mee dat de file voi is.
140 REM ENTRY
150 FOR RECORD1 =O TO 49
160 PRINT "RECORD"; RECORD1;
170 INPUT X$
180 IF X$ = "XXX" THEN 230
190 PRINT
*
1 O, REC RECORD1 :X$
200 NEXT RECORD1
210 REM FULL
220 PRINT "FILE FULL"
Het voglende deel, de regels 230 t/m 370 stellen de programmage-
bruiker in staat te kiezen wat hij wil doen.
230 REM CONTROL SECTION
240 PRINT
250 PRINT "ENTER 'S' TO PRINT FILE"
260 PRINT "SEQUENTIALLY."
270 PRINT "ENTER 'C' TO CHANGE OR ADO"
280 PRINT "A RECORD."
290 PRINT "ENTER 'R' TO PRINT A RECORD."
300 PRINT "ENTER 'L' TO LEAVE THE"
310 PRINT "PROGRAM."
320 INPUT "YOUR CHOICE: ":Y$
330 PRINT
340 IF Y$ = "S" THEN 440
350 IF Y$ = "C" THEN 530
360 IF Y$ = "L" THEN 630
370 IF Y$
< >
"R" THEN 230