Dark Age Games
Home Dark Age EX Dark Age 2 Message Board Fan Art FAQ Kelzar Mage DALpedia MS Forum
Board Index Dark Age General Bug Report Website Off Topic Register User Edit User User List Search

over and over again..
Posted by: William
07:08:39 12-26-2004

I go to this site and ask you for help... =)

I don't know whats wrong, but when I press the last key to enter the game, before the thread. Then it goes back to the start program... Maybe you can find something wrong with it. =/


#clear()
MediaPlay("dw1over.mid")

:top
#SetImage("TitleScreen.bmp",0,0,640,480)

#FontSize(16)
#ColorRGB(255,255,255)

#exp!=1
#maxexp!=100

#accuracy!=5

#Move!=1
#SaveScreen()
#Done! = 0
#While(Done! == 0)
{
#If(Move!=0){#Move!=1}
#If(Move!=4){#Move!=3}
#If(Move!=1){#SetImageTransparent("cursor-sword.bmp",440,403,34,17,255,255,255)}
#If(Move!=2){#SetImageTransparent("cursor-sword.bmp",479,432,34,17,255,255,255)}
#If(Move!=3){#SetImageTransparent("cursor-sword.bmp",545,460,34,17,255,255,255)}
#Wait(a$)
#RestoreScreen()
#If(a$="UP"){#Move!=Move!-1}
#If(a$="DOWN"){#Move!=Move!+1}
#If(a$="ENTER"){#Options()}
}

**********Methods**********





#Method Options()
{
#Done! = 1
#if(move!=1){#NewGame()}
#if(move!=2){#LoadGame()}
#if(move!=3){#Exit()}
}



#Method LoadGame()
{
#Clear()
#DirSav(load$)
#if(load$="CANCEL"){#branch(:top)}
}




#Method NewGame()
{
#SetImage("credits.bmp",0,0,640,480)
#Wait()
#SetImage("StoryPart1.bmp",0,0,640,480)
#Wait()
#SetImage("StoryPart2.bmp",0,0,640,480)
#Wait()
#SetImage("StoryPart3.bmp",0,0,640,480)
#Wait()
#SetImage("characteroption.bmp",0,0,640,480)
#stats!=10
#char!=1
#wisdom!=2
#Luck!=2
#AddPlayer("start.tem")
#SaveScreen()
#Done2! = 0
#while(done2! == 0)
{
#RestoreScreen()
If(stats!=10){Text(10.7,18,"<stats!>")}
If(stats!<10){Text(10.9,18,"<stats!>")}

#Text(11,7,"<name$>")
#Text(11.8,8,"<class$>")
#If(age1!=1){#If(age!>0){#Text(10.7,9,"<age!>")}}
#Text(13,10.1,"<interest$>")
#Text(21,21.7,"<stathp!>")
#Text(21,22.7,"<statsmp!>")
#Text(21,23.7,"<statfp!>")
#Text(21,24.8,"<statdp!>")
#Text(21,25.8,"<statw!>")
#Text(21,26.9,"<statl!>")

#Text(32,21.7,"<charmaxhealth!>/<charmaxhealth!>")
#Text(32,22.7,"<charmaxsmp!>/<charmaxsmp!>")
#Text(32,23.7,"<charfight!>")
#Text(32,24.8,"<chardefence!>")
#Text(32,25.8,"<wisdom!>")
#Text(32,26.9,"<luck!>")

If(profile$="female.bmp"){SetImageTransparent("block.bmp",232,162,9,9,255,255,255)}
If(profile$="male.bmp"){SetImageTransparent("block.bmp",374,162,9,9,255,255,255)}
#If(char!=0){#char!=1}
#If(char!=15){#char!=14}
#If(char!=1){#SetImageTransparent("cursor.bmp",105,101,8,7,255,255,255)}
#If(char!=2){#SetImageTransparent("cursor.bmp",105,118,8,7,255,255,255)}
#If(char!=3){#SetImageTransparent("cursor.bmp",105,135,8,7,255,255,255)}
#If(char!=4){#SetImageTransparent("cursor.bmp",105,150,8,7,255,255,255)}
#If(char!=5){#SetImageTransparent("cursor.bmp",222,163,8,7,255,255,255)}
#If(char!=6){#SetImageTransparent("cursor.bmp",364,163,8,7,255,255,255)}
#If(char!=7){#SetImageTransparent("cursor.bmp",105,337,8,7,255,255,255)}
#If(char!=8){#SetImageTransparent("cursor.bmp",105,354,8,7,255,255,255)}
#If(char!=9){#SetImageTransparent("cursor.bmp",105,370,8,7,255,255,255)}
#If(char!=10){#SetImageTransparent("cursor.bmp",105,386,8,7,255,255,255)}
#If(char!=11){#SetImageTransparent("cursor.bmp",105,403,8,7,255,255,255)}
#If(char!=12){#SetImageTransparent("cursor.bmp",105,420,8,7,255,255,255)}
#If(char!=13){#SetImageTransparent("cursor.bmp",105,437,8,7,255,255,255)}
#If(char!=14){#SetImageTransparent("cursor.bmp",105,453,8,7,255,255,255)}
#Wait(a$)
#If(a$="UP"){#char!=char!-1}
#If(a$="DOWN"){#char!=char!+1}
#If(a$="RIGHT"){If(char!=5){char!=char!+1}}
#If(a$="LEFT"){If(char!=6){char!=char!-1}}
#If(a$="ENTER")
{
#If(char!=1){#Prompt("What's your name?",name$)}
#If(char!=2){#Prompt("What class are you? ' Warrior, Mage, Archer...'",class$)}
#If(char!=3){#Prompt("What age are you? 'only numbers'",age!) #age1!=1}
#If(char!=4){#Prompt("What's your interests? 'fighting, books...'",interest$)}
#If(char!=5){#AddPlayer("start1.tem") #profile$="female.bmp"}
#If(char!=6){#AddPlayer("start.tem") #profile$="male.bmp"}
#If(char!=7){#If(stats!>0){#charmaxhealth!=charmaxhealth!+3 #stats!=stats!-1 #statHP!=statHP!+1 #charhealth!=charmaxhealth!}}
#If(char!=8){#If(stats!>0){#charMaxSMP!=charMaxSMP!+3 #stats!=stats!-1 #statSMP!=statSMP!+1 #charSMP!=charMaxSMP!}}
#If(char!=9){#If(stats!>0){#charFight!=charFight!+1 #stats!=stats!-1 #statfp!=statfp!+1}}
#If(char!=10){#If(stats!>0){#charDefence!=chardefence!+1 #stats!=stats!-1 #statdp!=statdp!+1}}
#If(char!=11){#If(stats!>0){#Wisdom!=Wisdom!+2 #stats!=stats!-1 #statw!=statw!+1}}
#If(char!=12){#If(stats!>0){#Luck!=Luck!+2 #stats!=stats!-1 #statl!=statl!+1}}
#If(char!=13){#SetImage("help.bmp",162,115,316,149) #Wait()}
#If(char!=14){#If(stats!<1){#Done2! = 1 #CharOption()}}
}
}
}




#Method CharOption()
{
#char!=1
#SetImage("gameoptions.bmp",0,0,640,480)
#SaveScreen()
#Done2!=1
#Done!=1
#Done1! = 0
#While(Done1! == 0)
{
#RestoreScreen()

If(realtime!=2){SetImageTransparent("block.bmp",100,100,9,9,255,255,255)}
If(realtime!=1){SetImageTransparent("block.bmp",100,117,9,9,255,255,255)}
If(gamelevel1!=1){SetImageTransparent("block.bmp",100,167,9,9,255,255,255)}
If(gamelevel1!=2){SetImageTransparent("block.bmp",100,184,9,9,255,255,255)}
If(gamelevel1!=3){SetImageTransparent("block.bmp",100,201,9,9,255,255,255)}
If(Window$="mwin.bmp"){SetImageTransparent("block.bmp",100,251,9,9,255,255,255)}
If(Window$="mwin1.bmp"){SetImageTransparent("block.bmp",100,268,9,9,255,255,255)}
If(Window$="mwin2.bmp"){SetImageTransparent("block.bmp",100,285,9,9,255,255,255)}
#If(char!=0){#char!=1}
#If(char!=10){#char!=9}
#If(char!=1){#SetImageTransparent("cursor.bmp",90,101,8,7,255,255,255)}
#If(char!=2){#SetImageTransparent("cursor.bmp",90,118,8,7,255,255,255)}
#If(char!=3){#SetImageTransparent("cursor.bmp",90,168,8,7,255,255,255)}
#If(char!=4){#SetImageTransparent("cursor.bmp",90,186,8,7,255,255,255)}
#If(char!=5){#SetImageTransparent("cursor.bmp",90,202,8,7,255,255,255)}
#If(char!=6){#SetImageTransparent("cursor.bmp",90,252,8,7,255,255,255)}
#If(char!=7){#SetImageTransparent("cursor.bmp",90,269,8,7,255,255,255)}
#If(char!=8){#SetImageTransparent("cursor.bmp",90,286,8,7,255,255,255)}
#If(char!=9){#SetImageTransparent("cursor.bmp",100,317,8,7,255,255,255)}
#Wait(a$)
#If(a$="UP"){#char!=char!-1}
#If(a$="DOWN"){#char!=char!+1}
#If(a$="ENTER")
{
#If(char!=1){realtime!=2}
#If(char!=2){realtime!=1}
#If(char!=3)
{
gamelevel1!=1
gamelevel!=4
}
#If(char!=4)
{
gamelevel1!=2
gamelevel!=7
}
#If(char!=5)
{
gamelevel1!=3
gamelevel!=10
}
#If(char!=6){Window$="mwin.bmp"}
#If(char!=7){Window$="mwin1.bmp"}
#If(char!=8){Window$="mwin2.bmp"}
#If(char!=9)
{
#Done1! = 1
#Branch(:down)
}
}
}
:down
#Clear()
#MassiveLittleDelay()
#SetImage("line1.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#SetImage("line2.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#SetImage("line3.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#SetImage("line4.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#SetImage("line5.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#SetImage("line6.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#SetImage("line7.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#SetImage("line8.bmp",0,0,640,480)
#MassiveLittleDelay()
#MassiveLittleDelay()
#Clear()
#MassiveLittleDelay()
#Fade(2) #Fade(2)
#Thread("healthbar.prg", 1)
}






#Method Exit()
{
#done!=1
#Clear()
#dos()
#end()
#run("end.prg")
}


#Method MassiveLittleDelay()
{
#LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay()
#LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay()
#LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay() #LittleDelay()
}

#Method LittleDelay(){}

_______________
Fan of DA. Keep it going.

Working on other things now. Trying to get my life to pieces.
That was a long time ago I wrote this:
Project: Marovia
Finished: 32%
Edit Post