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

In reply to: I have a redoing of the knambeast4 program -- Mickey 16:01:12 10-09-2005

Here is the edited knambeast4
Posted by: Mickey
16:42:09 10-09-2005

Here is the edited knambeast4:








#include("system.prg")
#ambientred!=-100
#ambientgreen!=-100
#ambientblue!=-25
#newplyr("blank.tem")
#send("knam_story2.brd",10,9,1)
#walkspeed("slow")
#characterspeed(characterspeed!)
#Hero[HP]!=Hero[MaxHP]!
#Hero[MP]!=Hero[MaxMP]!
#Hero[Stanima]!=1000
#setimagetransparent("hero_down_night.gif",256,256,64,66,254,254,254)
#addplayer("Darken.tem")
#putplayer("Darken",12,5,1)
#posture(4,"Darken")
#putplayer("Raze",10,7,1)
#posture(0,"Raze")
#delay(1)
#savescreen
#setimage("raze_appear1.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear2.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear3.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear4.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear5.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear6.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear7.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear8.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear9.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear10.pcx",288,0,32,128)
#delay(.1)
#setimage("raze_appear11.pcx",288,0,32,128)
#delay(.1)
#restorescreen
#addplayer("Mortis.tem")
#putplayer("Mortis",10,8,2)
#posture(0,"Mortis")
#delay(1)
#posture(3,Hero[name]$)
#mbottom("Mortis","Mortis_l.bmp")
#m6((To tink I created Darken)
#m7(with my black magic. What)
#m8(a pity that my servant)
#m9(vlamin died))
#pause
#restorescreen
#mbottom("Darken","Darken2_l.bmp")
#m6("I thought I told you to")
#m7("go easy on him...")
#pause
#restorescreen
#mbottom("Raze","Raze2_l.gif")
#m6("S...sorry...  I didn't")
#m7("think he'd be so...")
#m8("weak...")
#pause
#restorescreen
#mbottom("Darken","Darken2_l.bmp")
#m6("You DO realize what it")
#m7("means if he dies, correct?")
#pause
#restorescreen
#mbottom("Raze","Raze3_l.gif")
#m6("... Yeah...")
#pause
#restorescreen
#posture(2,"Raze")
#mbottom("Darken","Darken2_l.bmp")
#m6("All right.  Grab him.")
#m7("We're leaving...")
#pause
#mbottom("Mortis","Mortis2_l.bmp")
#m6(Immediatly!)
#restorescreen
#push("ws","Raze")
#delay(1)
#clear
#perfectbattle.perfectbattle("Death_Mortis","Darken","evilsky.jpg","LastBoss.mid")
#setimage("demo_end1.jpg",1,1,456,360)
#delay(0.1)
#clear
#setimage("demo_end2.jpg",1,1,342,270)
#delay(0.1)
#clear
#setimage("demo_end3.jpg",1,1,257,203)
#delay(1)
#setimage("promo1.gif",290,10,300,150)
#delay(2)
#setimage("promo2.gif",290,165,300,150)
#delay(2)
#setimage("promo3.gif",290,315,300,150)
#delay(2)
#pause
#bitmap("promo4.gif")
#done!=0
#while(done!=0)
{
#if(counter!=12){#counter!=1}
#castlit(counter!,counter$)
#command$="#setimage(DA2fire"+counter$+".gif,35,155,536,128)"
#counter!=counter!+1
#rpgcode(command$)
#get(a$)
#if(a$~="")
{
#fade(1)
#done!=1
#delay(1)
#mediarest
#dos
}
}