|
|
|
|
Hotshot |
Lotto Number9th April 2015 Shortest Lotto Number [code] SeedRnd MilliSecs() For i=1 To 6 j=Rnd(49) If j=0 Then j=Rnd(49) Print j Next WaitKey [/code] |
|
|
|
|
Hotshot |
Twisters Demo in just 9 Lines of Codes!10th October 2011 [code] Const xRes = 800,yRes = 600,Pos1=175,Pos2=375;Global a#,x1#,x2#,x3#,x4#,ang#=0,amp#=7,HideMouse;Type Twister;Field X1#,X2#,X3#,X4#;Function twister();For a=1 To 600 Step 2;x1=((Sin((a/amp)+ang))*100)+300;x2=((Sin((a/amp)+ang+90))*100)+300;x3=((Sin(*snip* |
|
|
|
|
Hotshot |
Gradient25th July 2009 Amiga Effect :) |
|
|
|
|
Hotshot |
Create Box with Text18th December 2007 [code] ; Example Create_Box(155,120,255,0,0,''HELLO WORLD'',150,100,100,50) WaitKey ; My own Functions ; TX = Pos of Text X:TY = Pos of Text Y: RGB = Colors ; Text$= Type Anythings You like ; X,Y,X1,Y1 are the Positions Function Create_*snip* |
|
|
|
|
Hotshot |
HELLFIRE (Game)13th June 2007 It is shoot em up |
|
|
|
|
Hotshot |
Cool effect13th June 2007 [code] ; Credit by Phoenix SetBuffer BackBuffer() While Not KeyHit(1) angle = angle + 1 Color 50*Sin(angle)+200,50*Sin(angle)+100,10*Sin(angle)+20 For i = 0 To 120 Line 200*-Sin(i+(Cos(angle)*200))+400, 200*snip* |
|
|
|
|
Hotshot |
3D Text13th June 2007 [code] Graphics 640,480,16,2 SetBuffer BackBuffer() Global fntArial=LoadFont("Arial",65,True,False,False) Color 100,100,100 Rect 0,0,640,480 Text3D(25,100,"TEXT STANDING OUT",0) Text3D(25,300,"TEXT STANDING IN",1) Flip WaitKey Function TE*snip* |
|
|
|
|
Hotshot |
AI game Tutorial13th June 2007 [code] ; THIS IS COMMETS THAT U WANT TO SAY ANYTHINGS U LIKE AS IT DOESNT AFFECT IT ; Sarah FIRST PROGRAM =P ; WINDOW TITLE AppTitle "MY VERY FIRST COMPUTER AI PROGRAM" ; SHOPPING LIST ;--------------------------------------------------------------*snip* |
|
|
|
|
Hotshot |
Cos and Sin13th June 2007 It show cos and sin that move the text in circle |
| More - Older Posts |
|
| |||
|
| ||||