home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nibble Magazine
/
nib32b.dsk
/
SPEED.TEST.bas
< prev
next >
Wrap
BASIC Source File
|
2023-02-26
|
347b
|
10 lines
10 REM **********************
20 REM * SPEED.TEST *
30 REM * BY JON THOMASON *
40 REM * COPYRIGHT (C) 1987 *
50 REM * BY MICROSPARC, INC *
60 REM * CONCORD, MA 01742 *
70 REM **********************
80 FAST = PEEK(49206) >127: REM $C036
90 IF FAST THEN PRINT "Fast mode."
100 IF NOT FAST THEN PRINT "Normal mode."