Blogcu - Blogcu.com - Ücretsiz Türkçe Blog Servisi

` This code was downloaded from The Game Creators` It is reproduced here with full permission` http://www.thegamecreators.comrem Clocksync on : sync rate 0rem Main Program...

Devamı

Dark Basic Türkiye ANA SAYFA ARŞİV PROFİL FORUMBENİM KODLARIM Network Game Alfa Romeo Oyuncaklar Oda Malkoçoğlu Ay Savaşçıları Buzul Kalbin Kitabı Hellball Tank 2001...

Devamı

REM Project: overheadshooterREM Created: 5/24/2007 5:30:00 PMREMREM ***** Main Source File *****REMglobal s as wordglobal st as wordglobal e1 as byteglobal e2 as byteglobal e3...

Devamı

sync onsync rate 0if check display mode(1024,768,32)=1 set display mode 1024,768,32endifrandomize timer()autocam offhide mouse#Constant plyr 1#Constant platform 2speed#=1turnspeed#=0.7bulletspeed#=5cbullet=51shottime=0health=100btime=timer()make object cube plyr,10position object plyr,0,6,0color object plyr,0x00ff88position camera...

Devamı

sync on:sync rate 120syncmake camera 1color backdrop 1,0set text font "Times New Roman"set text size 50global swglobal shglobal winsglobal finaltimeglobal timesw=screen width()sh=screen height()finaltime=1000center text sw/2,sh/2-200,"Wait...

Devamı

set display mode 1024,768,32:sync on:sync rate 60:backdrop on:color backdrop rgb(255,160,50):hide mouse:set ambient light 40:dim d(18) as float:lock pixels:for t=1 to 5000:g=rnd(360):r=rnd(200): for p=1 to 25:x=256+((r+p)*sin(g)):z=256+((r+p)*cos(g)):c=255-(p*10):dot...

Devamı

set display mode 1024,768,32:sync on:sync rate 30:backdrop on:color backdrop 0:hide mouse:autocam offink rgb(255,0,0),0:box 0,0,16,16:get image 1,0,0,16,16:set ambient light 40dim p#(7,2) as float:dim g#(7,2) as floatfor...

Devamı

set display mode 1024,768,32:sync on:sync rate 60:autocam off:position camera 0,0,-10:hide mousedim s#(12) as float:x1#=-3.0for t=1 to 12 inc g,14 ...

Devamı

set display mode 1024,768,32:sync on:sync rate 30:set camera range 0.3,20000:set camera fov 40:hide mouse:w=rgb(255,255,255):lock pixels:for t=195 to 205:c=325-(t*15):ink rgb(c,c,c),0:line t,0,t,80:next t:for t=5 to 50:c=255-(t*20):ink rgb(c,c,c),0:line...

Devamı

set display mode 1024,768,32:sync on:sync rate 60:point light 0,0,-1,3:backdrop on:color backdrop rgb(50,0,255):hide mouse:set camera fov 60:cls rgb(255,255,255):ink 0,0text 16,24," :) :( ...

Devamı

Sync on:Sync Rate 60:Autocam Offautocam offType Coordinates x as float y as float z as floatendtypeType Direction ...

Devamı

set display mode 1024,768,32hide mousehide light 0set ambient light 20make light 1autocam offcolor backdrop 0randomize timer()fog onfog distance 1000fog color 0gosub make_texturessync onsync rate 25gosub...

Devamı

sync onsync rate 60for i=0 to 31 ink rgb(i*8,i*8,i*8),0 line 0,i,31,i ink rgb(sin(i*5.625)*255,sin(i*5.625)*80,0),0 line i,32,i,63next iget image 3,0,32,31,63autocam offtype coordXYZ ...

Devamı

sync on : sync rate 50 : hide mouseautocam off : randomize timer()`d2l3=1`load music "d2l3.mid",d2l3`loop music d2l3stars=1for i=0 to 10000 dot rnd(screen width()),rnd(screen...

Devamı

REM Project: Space InvadersREM Created: 7/11/2006 10:41:16 AMREMREM ***** Main Source File *****REMcreatesound("explosion",1,100,1000,8000,0.01,0,0,0,0,0,10)createsound("opening1",2,400,2000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening2",3,350,2000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening3",4,300,2000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening4",5,350,1500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening5",6,375,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening6",7,256,1000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening6",8,256,4000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening7",9,213,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("opening9",10,150,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("shot",16,100,100,8000,0,1.5,0,0,0,0,10)createsound("enemy,explosion",17,500,500,8000,0,0,0.05,0.4,0.5,1800,10)createsound("move",18,256,100,4000,0,0,0.05,0.3,0.05,1800,10)createsound("down",19,235,100,4000,0,0,0.05,0.3,0.05,1800,10)createsound("ending 1",20,128,1000,8000,0,0,0,0,0,0,10)createsound("ending 2",21,118,1000,4000,0,0,0,0,0,0,10)createsound("ending 3",22,98,6000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen1",23,293.67,1000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen2",24,440,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen3",25,349.23,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen4",26,392,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen5",27,329.63,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen6",28,261.6,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen7",29,220,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen8",30,146.83,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen9",31,493.88,500,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen10",32,146.83,1000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen11",33,329.63,1000,4000,0,0,0.05,0.3,0.05,1800,10)createsound("titlescreen12",34,493.88,1000,4000,0,0,0.05,0.3,0.05,1800,10)dim dotx(300)dim doty(300)dim shots(2)global finnalnote=1make camera 1dim l(8)dim fire(4)dim score#(2)dim...

Devamı