|
|
|
|
Hotshot |
Lotto NumberShortest 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![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)+30 0;x2=((Sin((a/amp)+ang+90))*100) +300;x3=((S*snip* |
|
|
|
|
Hotshot |
Gradient25th July 2009 Blitz Max
Amiga Effect :) |
|
|
|
|
Hotshot |
Create Box with Text[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 , 2*snip* |
|
|
|
|
Hotshot |
3D Text13th June 2007
[code]Graphics 640,480,16,2 SetBuffer BackBuffer() Global fntArial=LoadFont("Arial",65,Tru e,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 T*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 |
|
| |||
|
| ||||