19 lines
476 B
QBasic
19 lines
476 B
QBasic
border 0: paper 0: ink 7: bright 1: cls
|
|
print at 0,7;"\ .\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\. "
|
|
for i=1 to 15
|
|
print at i,7;"\ :\{0x11}\{5} \{0x11}\{6} \{0x11}\{4} \{0x11}\{3} \{0x11}\{1} \{0x11}\{0}\: "
|
|
next i
|
|
print " \ '\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\' "
|
|
print
|
|
print " 1 2 3 4 5"
|
|
print
|
|
print "https://daftlimmy.github.io/"
|
|
print " SwearingXylophone"
|
|
|
|
randomize usr 51000
|
|
|
|
@code:
|
|
clear 50999
|
|
load ""code
|
|
run
|