home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Boston 2
/
boston-2.iso
/
DOS
/
PROGRAM
/
BASIC
/
POWBASIC
/
LIBRARY1
/
EXAMP1.ZIP
/
RMEX282.BAS
< prev
next >
Wrap
BASIC Source File
|
1990-04-03
|
225b
|
11 lines
' switch into medium-resolution graphics mode
SCREEN 1
House$ = "U20 G5 E20 F20 H5 D20 L30"
DRAW House$
DRAW "BE3"
DRAW "P1,3"
FOR I% = 1 TO 280 STEP 40
DRAW "M = " + VARPTR$(I%) + ",40"
DRAW House$
NEXT I%
END