Sharp MZ-700 Bedienungshandbuch PDF herunterladen (Seite 23)

22

Problem 2

Divide, and re-register, the BSD file "ADDRESS LIST" into two: a BSD file which

registers names only and a

BSD file which registers addresses only.

Example solution

500

ROPEN

#6,

" F D 1 :

ADDRESS

LIST"

5 1 0

WOPEN

#7,

" F

D1

:

na

me"

520

WOPEN

#8,

"F

D1

:

address"

530

INPUT

#6,

NA$,

AD$

540

I F E OF

(

#6)

THEN

600

550

PRI

NT

#7,

NA$

560

PRI

NT

#8,

AD$

570

GOTO

530

600

CLOSE

#6,

#7,

#8

610

END

Problem 3

Register the string input by INPUT command in a BSD file. But to close the file, key

input

"CLOSE" and to cancel it, key input "KILL".

Example solution

100

WOPEN

#30,

"FD1:

DATA"

110

I

NPUT

"DATA

=

";A$

120

IF

A$="CLOSE"

THEN

CLOSE

#30:

END

130

IF

A$="KI

LL"

THEN

KI

LL

#30:

END

140

PRINT

#30,A$:GOTO

110

1 2 ... 18 19 20 21 22 23 24 25 26 27 28 ... 108 109

Kommentare zu diesen Handbüchern

Keine Kommentare