home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Set of Apple II Hard Drive Images
/
eric.hdv
/
TEST
/
GUITAR.bas
< prev
next >
Wrap
BASIC Source File
|
2020-08-13
|
587b
|
10 lines
5 PRINT CHR$(4)"PR#3"
10 NU$ = "0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20"
20 HL$ = "________________________________________________________________________________"
30 FR$ = "| | | | | | | | | | | | | | | | | | | | |"
40 BO$ = "|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__|"
50 ST$ = "|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|--|"
100 PRINT : VTAB 10: PRINT
105 PRINT NU$;HL$;FR$;
120 PRINT ST$;ST$;ST$;ST$;ST$;ST$;
130 PRINT BO$