News:

PlayBASIC2DLL V0.99 Revision I Commercial Edition released! - Convert PlayBASIC programs to super fast Machine Code. 

Main Menu

Water wescue final released

Started by micky4fun, May 31, 2009, 06:31:01 PM

Previous topic - Next topic

micky4fun

Hi all

will do web site as soon as possible , tried google sites , but came out crap , so will try another soon

ok heres my latest w.i.p , will get a demo asap

story line , theres been an earth quake , and some old buildings have came down near waters edge and fell into water , you have to rescue , sorry no wescue the traped victims under the water before there time runs out , but be carfull as buildings are very fragile and may collapse any second ,,

well that the idea , lets see if i can pull it of

screenie below

mick :)


Get Download Here



Final Video

 





Work In Progress Video

Watch Water rescue on youtube









micky4fun

sorry , been tied up with something else at work that pays the bills so will get back to this in a few days

mick ;D

micky4fun

#2
Hi all

well just getting a little more time to myself again

heres where i am , lots and lots still to do , buts heres a screenie teaser

main boat image to change into some kind of gunboat as that is what you controll fighting of helicopters and subs , also background underwater may change a little
slightly over subscribed with subs at mo , all to be fine tuned..

mick ;D

micky4fun

#3
Hi All

ok starting to take shape , heres a quick demo , controll of ship will be keyboard with mousr for crosshair and firing back at enemy , still lots to do
as you can see your ship looks a mean bugger ,, lol , will update that as soon as i find an image

mick ;D

micky4fun

#4
Hi all

This is now the main frame of the game , just some animations to do , still not completely happy with main boat , but will try to tidy it up ,
still got explosion images to add , fish , bubbles etc
controll mouse for aim , left mouse to fire at helicopters , left and right arrows to move your boat , down arrow for ship bombs only 1 a second allowed at mo , still got to do amount of missiles fired by you and enemy so its not to easy or hard , but this is the basic game , i know its been done a million times , but had to do something with Kevins water effect , also learning me how easy it is to use linked list's , well for now all seems well ,
ok ive borrowed the gfx from a well known game

ile post when i feel its a update worth having

mick ;D

mick

micky4fun

#5
Hi all

well thought it was going to easy with this program using linked list , but after playing lastest demo attached it causes windows to stop program , im using vista , pb 1.64h
but i think its something to do with my linked list that im doing wrong , if anyone can point me in the right direction before i continue that would be great

thanks
mick ;D

kevin


  PB1.64h ?  upgrade -> PB1.64i

  I don't think the crash is list related, but you find you yourself (locate what the cause is) by inserting break points and running in debug mode. 

  #break   = break point


micky4fun

#7
hi Kevin

thanks for the fast reply , i did upgrade but still the same , seems if you play it for 5-10 mins windows vista stops and exits the program
does this on both pc and laptop of mine

i did do a debug mode and stopped it now and then and could not see any values that looked wrong , trouble is when windows stops the program in debug mode you can't getin debug to read values and states ,

what im going to do is run program with some bits taken out see if i can narrow it down

just one question does the currentlistpos and setlistpos have to be in the for each loops or can they be left out as i have remarked out here?
or if they do have be be in the code is this the correct way ?

also i doing a for next link list loop within a for next link loop would this cause a problem ?

For Each shells()
      ;CurrentListPOs=GetListPos(shells())
        ;SetListPos shells(),CurrentListPos
        if shells.whathit=0
        shells.x#=shells.x#+shells.speed#*2
        shells.y#=shells.y#+4
        endif
       
        positionsprite shells.sprite,shells.x#,shells.y#
        ;drawsprite shells.sprite
        ThisSprite=SpriteHit(shells.sprite,GetFirstSprite(),1)
  if thissprite=boatone
  shells.whathit=1
  shells.y#=shells.y#+1
endif
       
        if shells.y#>cc#+SinusTable(2)
      deletesprite shells.sprite
      shells = null
      endif
      next
        return


thanks
mick ;D

kevin


You can't really nest  for each's loops without projecting the outer list position.


    For each MyList()
        ; cycle through and look from some in this same list
         for each MyList()   ;<< nested list iteration
              do stuff
         next
     next


    The reason for this is the list is really a container, inside this container is the objects and a pointer to the current object.    In the example above the inner loop is altering the outer loops pointer.   So if you need to search through the same loop, while iterating through it.  Then you need to protect the pointer.


    For each MyList()
        CurrentPos=GetLIstPOs(MyList())
        ; cycle through and look from some in this same list
         for each MyList()   ;<< nested list iteration
              do stuff
         next
       ; reset this position
       SetListPos MyList(), CurrentPos
  next

 
   Having said that,  I don't really think this is where your crash is coming from.  However without a repeatable cause,  there's not too much I can really do.


medwayman

Had a good few 10 min+ goes on my Vista machine (PB 1.64j) without any problems. Great work so far btw.

Strange that both your machines have the same problem... Are they both from the same manufacture? I know that Acer eSecurity causes  some software to shut down in vista but you obviously had no problems with your other games. Just a shot in the dark.

Good luck tracking it down :)


micky4fun

#10
Hi medwayman , Thanks for coments , but if you keep rapid firing the missiles in all direction it does eventually crash ,

and Kevin for all this info on getlistpos and setlistpos ,

but i think ive found the problemm ,
buy changing the following lines it seems fine now

ThisSprite=SpriteHit(bm.sprite,GetFirstSprite(),1) change it to ThisSprite=SpriteHit(bm.sprite,GetFirstSprite(),2)
ThisSprite=SpriteHit(shells.sprite,GetFirstSprite(),1  change it to) ThisSprite=SpriteHit(shells.sprite,GetFirstSprite(),4)
ThisSprite=SpriteHit(subsmissile.sprite,GetFirstSprite(),1) change it to ThisSprite=SpriteHit(subsmissile.sprite,GetFirstSprite(),4)

then make the boatone sprites collisionclass 4
and heli.sprite sprites make them collisionclass 2
i was going to make boat , missiles , helicopter etc different sprite collisionclasses later in the game anyway , so might as well do it now
so i think its either these statements or the code that follows

its seems ok so far , ile keep testing

mick ;D

u9

Quote from: micky4fun on May 31, 2009, 06:31:01 PM
screenie below

Hi mick, you keep saying see screenshots and stuff, but is it just me or have you not added them yet? Anyways, this sounds interesting. I am looking forward seeing it.

micky4fun

#12
Hi U9

first of all thanks for all your help on clowning around game , great programming , and very much appreciated

ok heres a screenie , looks like ive found the problem so i will carry on with game now , as i did'nt want to spend loads of time doing it and when anyone played it , it crashed

i knew that it must be something i was doing wrong , so just taking bits out i finally suss it ,
a good way of testing code above , is taking out the if mousebutton=1 line and putting in

delay=delay+1
 if delay=8
     delay=0

you may have to adjust delay value a little

this will make it auto fire , then just move mouse 1/4 down screen and move left and right fast and circle movements , it will crash with a few mins

mick ;D

u9

No problem. It was a joy to participate. I am glad you finished it. I must admit i still have not had a chance to try the final release. I have been quite busy with my new iPhone developer job :) so between my mac and my eeepc, xp doesn't get much time.

Anywho... this looks like a very interesting project.

micky4fun

ok thanks u9

QuoteI have been quite busy with my new iPhone developer job
well wish you all the best with that  , got an ipod touch at moment , getting phone soon , some good games and apps on this platform and its getting better all the time ..


mick  :)