| Programming |
| Src |
| Obj |
| Opl |
| Html |
| ------------------ |
| Lit |
| Poems |
| Prose |
| ------------------ |
| Images |
| Photos |
| Graphic |
| ------------------ |
| Misc |
| Music |
| World of Computers |
| Xlock |
| Random Numbers |
PROC xlock:
global x,y,g
print "Enter Xlock character"
g = get
cls
at 23,7
print "Starting Xlock"
pause 35
cls
do
at 23,7
print "Revo is Xlocked"
pause 25
cls
until get = g
ENDP
Download Source
