home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
database
/
cubs.zip
/
BOMB.PRG
< prev
next >
Wrap
Text File
|
1989-03-31
|
217b
|
23 lines
*BOMB.PRG
CLEAR
? 'Please move away from the Central Processing Unit to avoid ì
schrapnel wounds.'
?
?
?
?
?
WAIT
CLEAR
X=0
DO WHILE X < 10
X=X+1
@ 13,35 SAY 'BOOM!!!'
? CHR(7)
ENDDO
RETURN