552
« on: December 16, 2011, 02:30:14 am »
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:.Bitmap
[18181DC00038E000F9FF80FFFFC05FFFF00F7C180E7C0C1EFC6E1EFC6E3E7C0E7FBE1F7F9FFF7F1FFE7F43FC7FC2D87FD8023FD25E3FF3FE1FFFFC0FFFF807FFF003FFE000FFC0003F00]->Pic666
:Fix 5
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:DispGraph
:Text(0,64,"Eat Netham
:DispGraph
:Pause 1234
:.Clears the Screen
:Asm(EF4045
:0->X
:Repeat Getkey(15)
:.Randomize coordinates
:rand^41->Y
:Bitmap(X,Y,Pic666)
:Dispgraph
:If getKey(42)
:TEH()
:If getKey(54)
:TY()
:End
:If getKey(3)
:LOL()
:End
:If getKey(41)
:L1()
:End
:Lbl L1
:ClrDraw
:Text(0,0,"YOU ARE A SMILEY
:Text(0,8,"FLY AROUND!
:Pause 2000:20→A→B:ClrDraw
:Repeat getKey(15)
:Pt-On(A,B,Pic1S
:DispGraphClrDraw
:rand^89->A
:Rand^57->B
:Pause 123
:End
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
:Pause 1800
:ClrDraw
:.Code for flames incoming
:[FEFDFBF7EFDFBD7F]->Str1
:Line(0,63,95,63
:Repeat getKey(15)
:For(F,L6+12,L6+767
:{F} and {rand^8+Str1}->{F-12}
:End
:DispGraph
:End
:Fix 4
:Return
:LOL()
:. Jetpack dude!
:[0004EAF430C84080]->Pic7
:64->Y
:0->X
:Repeat Y<<1
:Y--
:X++
:Pt-On(X,Y,Pic7)
:DispGraphClrDraw
:End
:Return
:Lbl TEH
:."You pressed tyop"->Str1TEH
:."Teh!"->Str1TEH
:"TEH HAS BEEN SELECTED. DIE, MORTAL"->Str1TEH
:.DECIDE WHICH TO USE LATER. PERHAPS CONDUCT POLL
:.SPACES WITH WIDTH 4 TO 1 IN SMALL FONT
:[04EDEE20]->Str1SP
:0->r1
For(Q,0,length(Str1TEH))
:0->r2
:{Q+Str1TEH}->r1
:For(R,0,3)
:{R+Str1SP}->r2
:Text(Q*4,0,r1
:Text(Q*4+R,0,r2
:DispGraph
:End
:End
Show Posts
