Free programs Part 1

[ScottieB]

Imagine scrolling without a buffer. Only a virtual one.

[ScottieB]

Imagine scrolling without a buffer.
Only a virtual one.

[ScottieB]

Ooops! Sorry for the double
Here's a game premise.

Watch it evolve.
Cells grow and die according to the rules.

[ScottieB]

Ice, Ice baby
Sort of like blood but not

[ScottieB]

This is not much but it shows the math for 2d primitives.

Scale,Translation and Rotation.

Core Stuff here

[ScottieB]

I will be releaseing large programs soon.
When someone can tell me an easy way to upload big stuff.

[ATLUS]

Again nice codes. I can tell you way to upload big staff.
Here's:
http://rghost.ru/

[micky4fun]

Hi all

scottieB ,

you have been busy over the last 6 years , lots of stuff here for me to go through as soon as i get a few mins , thanks for sharing and look forward to your other stuff no matter how big or small

keep up the good work , all this maths stuff is over my head

mick :)

[ScottieB]

Thanks for the comments guys and there's lots to follow in the near future.
I'm trying out a file shareing site now.
the link below should bring you to a asteroid game you can download and play and mod please do!

I'm starting to send larger files and we have to use other sites for large ones.

The link will be good for 30 days so get your free copy now!
And remember as always the code is opensrource from me.
please just show me what you can do with the stuff I'm sending.
Thanks

http://rghost.net/41100458

[ScottieB]

Ok, guys this seems to work so here's another one.
I't's a skeet shooting program. My friend likes it he says it's one of my best though I do'nt agree.

All code is free from me.

It'll be up for 30 days. So get your copies quick. and remeber with this one happy shooting.


http://rghost.net/41100568

[BlinkOk]

nice gfx scottie but it lags a lot on my pc. very sluggish.

[ScottieB]

Sorry that one was made on my tri-core but this one and some of the other should be just fine.

Have phun and remember to pass on the good news please.

This one also is free for all includeing all source code. Only 30 days to get though so grab it while you can!

http://rghost.net/41100644

[BlinkOk]

this is what i get scottie

[ScottieB]

I don't know why you get a blank weird screen i'm running windows xp I don't know what this stuff looks like on windows 7???
They all did'nt give you that problem did they?
Because they all work over here.
Sorry your experianceing problems. maybe others know the solution for you? Sorry again I can't help with that.
other people don't all have the problem I think because I'm getting good replies.

I working on getting some more up people seem to want more by the sounds of it.
But once again I'm sorry some are'nt working for you.

[kevin]

 The skeet program is slow for number of reasons, the main one being it's fetching video memory when blending.  Reducing the  dead pixels count in the textures would also be beneficial as well removing inner loop redundancy.    

Download,  
  http://rghost.net/41100568

Load project and replace the code with this.

PlayBASIC Code: [Select]

screenwidth = 800
screenheight = 600

nos = 18            ; number of skeets 
g# = 25           ; gravity constant  
scalefactor# = 10 ; size of skeets
inc1 = 1           ; step increment

nobs = 40  ; number of grass blades

u1# = 0
v1# = 0

u2# = 511
v2# = 0

u3# = 511
v3# = 511

u4# = 0
v4# = 511

; Array dimensions

dim xvel#(nos)
dim yvel#(nos)
dim zvel#(nos)

dim x3d#(nos)
dim y3d#(nos)
dim z3d#(nos)

dim x2d#(nos)
dim y2d#(nos)

dim scale#(nos)
dim angle1#(nos)
dim angle2#(nos)
dim speed#(nos)
dim gravity#(nos)
dim scale#(nos)

dim st#(nos)
dim t#(nos)
dim pull(nos)

dim hit(nos)

dim x3d7#(nobs)
dim y3d7#(nobs)
dim z3d7#(nobs)

dim x3d8#(nobs)
dim y3d8#(nobs)
dim z3d8#(nobs)

dim x3d9#(nobs)
dim y3d9#(nobs)
dim z3d9#(nobs)

dim x3d10#(nobs)
dim y3d10#(nobs)
dim z3d10#(nobs)

dim x2d7#(nobs)
dim y2d7#(nobs)

dim x2d8#(nobs)
dim y2d8#(nobs)

dim x2d9#(nobs)
dim y2d9#(nobs)

dim x2d10#(nobs)
dim y2d10#(nobs)

dim sway#(nobs)

fontsize = 32

loadfont "timesnewroman",1,fontsize,0
setfont 1

; load in sound effects

loadsound "sfx\shotgunblast01.mp3",1
loadsound "sfx\explosion01.mp3",2

; load in shotgun images

loadfximage "bitmaps\shotgun01.bmp",1
loadfximage "bitmaps\shotgun02.bmp",2

loadfximage "bitmaps\shotgun01leftmid.bmp",3
loadfximage "bitmaps\shotgun02leftmid.bmp",4

loadfximage "bitmaps\shotgun01left.bmp",5
loadfximage "bitmaps\shotgun02left.bmp",6

loadfximage "bitmaps\shotgun01rightmid.bmp",7
loadfximage "bitmaps\shotgun02rightmid.bmp",8

loadfximage "bitmaps\shotgun01right.bmp",9
loadfximage "bitmaps\shotgun02right.bmp",10

loadfximage "bitmaps\shotgun02flash.bmp",50
loadfximage "bitmaps\shotgun02leftmidflash.bmp",51
loadfximage "bitmaps\shotgun02leftflash.bmp",52
loadfximage "bitmaps\shotgun02rightmidflash.bmp",53
loadfximage "bitmaps\shotgun02rightflash.bmp",54

loadfximage "bitmaps\skeet01.bmp",11  ; required fx format for scaleing and transparentcy
imagemaskcolour 11,rgb(0,0,255)

loadfximage "bitmaps\crosshair01.bmp",12
imagemaskcolour 12,rgb(0,0,0)

loadfximage "bitmaps\grass01.bmp",13
loadfximage "bitmaps\sky02.jpg",14

loadfximage "bitmaps\blades01.bmp",15

loadfximage "bitmaps\glow01.bmp",16

imagemaskcolour 15,rgb(0,128,0)

; create skeet sprites

for skeets = 1 to nos

   createsprite skeets
   spriteimage skeets,11
   spritedrawmode skeets,2 ; rotatetion mode for scaling
   spritecollisionmode skeets,6  ; pixel perfect

next skeets

; set transparentcy

for frame = 1 to 10
   imagemaskcolour frame,rgb(0,0,255)
next frame

; transparentcy for muzzle flash

for frame = 50 to 54
   imagemaskcolour frame,rgb(0,0,0)
   createsprite frame
   spriteimage frame,frame

Login required to view complete source code