home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 2: PC
/
frozenfish_august_1995.bin
/
bbs
/
d09xx
/
d0977.lha
/
Forth
/
Basic-Benchmarks
/
read
< prev
next >
Wrap
Text File
|
1994-04-03
|
168b
|
11 lines
t=TIMER
300 NR=512
320 OPEN "ram:TEST" FOR INPUT AS #1
340 FOR I=1 TO NR
360 B$=INPUT$(128,1)
380 NEXT I
400 CLOSE
t=TIMER-t
420 PRINT "Done in ";t;" seconds"
input a$