:ClrHome
:0üÁ
:Lbl A
:1üX
:If Á=0:For(A,1,9,1)
:If Á=1:For(A,1,7,1)
:If A=1:Then
:Output(6,1,"O")
:Output(7,1,"+")
:Output(8,1,"^")
:End
:If A=2 or A=4 or A=6 or A=8:Then
:Output(6,X," O")
:Output(7,X," +")
:Output(8,X," '")
:X+1üX
:End
:If A=3 or A=5 or A=7 or A=9:Then
:Output(6,X," O")
:Output(7,X," +")
:Output(8,X," ^")
:X+1üX
:End
:End
:If Á=1:Goto B
:For(A,1,200,1)
:End
:Output(5,10,"/")
:Output(4,11,"HIYA!")
:For(A,1,300,1)
:End
:Output(4,2,"IT'S BILL AGAIN")
:For(A,1,300,1)
:End
:Output(4,2," ")
:Output(5,10," ")
:1üX
:For(A,1,8,1)
:If A=1:Output(6,1,"-")
:If A=2:Output(6,1,"--")
:If A=3:Output(6,1,")--")
:If A>3 and A÷8:Then
:Output(6,X," )--")
:X+1üX
:End
:End
:For(A,1,11,1)
:If X<13
:Output(6,X," )--O")
:If X=13
:Output(6,X," )--")
:If X=14
:Output(6,X," )-")
:If X=15
:Output(6,X," )")
:If X=16
:Output(6,16," ")
:X+1üX
:End
:1üÁ
:For(A,1,350,1)
:End
:Goto A
:Lbl B
:For(A,1,250,1)
:End
:Output(5,8,"/")
:Output(4,8,"HAHAHA!!")
:For(A,1,300,1)
:End
:Output(4,3,"I KILLED BILL!")
:For(A,1,700,1)
:End
:Output(4,3," ")
:Output(5,8," ")
:Output(1,2,"PRESS ANY KEY!")
:While getKey=0
:End
:ClrHome
:Output(1,2,"COPYRIGHT 1998")
:For(A,1,200,1)
:End
:Output(2,1,"SCOTT K BRADFORD")
:For(A,1,200,1)
:End
:Output(4,3,"JDYNE")
:For(A,1,200,1)
:End
:Output(5,3,"TECHNOLOGIES")
:For(A,1,200,1)
:End
:Disp "","","","","",""