-----------------------------------

ecookman

Sat Nov 01, 2008 11:57 am


game almost done final touches need to be applyed

-----------------------------------

O.K. i am almost done!!!! (yes the game sucks but so what i like it personal best)



so i am wondering what is wrong with this last bit instead of posting the whole lond thing here is a 'snippet'
it is at the place where i made a simle boss battle... it WILL NOT play the new file even the old one stoppes...




%before this i was playing  Music.PlayFileLoop ("hyrule field.wav")
Music.PlayFileStop 
%and wtf why is this not working is .wma not supported???????????
%_________HELP NEEDED HERE_____________
Music.PlayFile ("bossbattle.wma")
var playerhp, monsterhp : int 
var playerattk, monsterattk : int 
var playerdef: int 
var onetwo : int
var monsterchoice: int

randint (playerhp,50,100)
randint (monsterhp,75,250)

loop
randint (playerattk,1,10)
randint (monsterattk,1,15)
randint (playerdef,1,15)
randint (monsterchoice,1,2)

delay(2000)

%player attack or defend
color (brightred)
cls
locate (10,1)
put "your hp is ",playerhp
locate (11,1)
put "the monster's hp is ",monsterhp


locate (3,1)
color (42)
put "press 1 to attack or press 2 to defend and use a health potion"
get onetwo
if onetwo = 1 then
    %player attacks 
    color (88)
    put "you hit a ",playerattk
    monsterhp := monsterhp-playerattk
    
    %monster attacks or do nothing
        if monsterchoice = 1 then
            put "the monster attked and hit a ",monsterattk
            playerhp := playerhp-monsterattk
        end if
end if
color (44)
if onetwo = 2 then
    %player defends 
    color (brightblue)
    put "your defend and gain ",playerdef, " hp"
    playerhp:=playerhp+playerdef
    %monster attacks- attack or do nothing
        if monsterchoice= 1 then
        put "the monster attked and hit a ",monsterattk
          playerhp := playerhp-monsterattk    
        
            
        end if
end if
if monsterhp