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

Help!
Posted by: spitfire
21:01:43 11-28-2004

OK, here's the problem. I want to have a program that checks the character's health.
-If it is below 2/3, Condition$ would equal 'Stable'
-If it is below 1/3, Condition$ would equal 'Critical'
-If it is above 2/3, Condition$ would equal 'Superior'

My problem is that it dosen't display the word on my menu system when I call it..

Well.. here.. look at the code:

MENU SYSTEM CODE
rpgcode:

001: *Angels Of Darkness :: Divine Light is Copyright (c) 2004 Keifer Furzland*
002: *Menu System*
003: Include("system.Prg")
004: SaveScreen()
005: Setup_Zhak_Initial() //delete this
006: SetImagetranslucent("Menu_Bkg.png", 1, 1, 800, 600)
007: got_kara! = 0//Delete this
008: Zhak[TotalCondition]! = Zhak[MaxHP]!+Zhak[MaxMP]!
009: Zhak[Condition]! = Zhak[HP]!+Zhak[MP]
010:
011: If(Zhak[Condition]! < .33*=Zhak[TotalCondition]!)
012: {
013:      
014:      Zhak[Condition]$ = "Critical"
015: }
016: ElseIf(Zhak[Condition]! <.66*Zhak[TotalCondition]! && >.33*=Zhak[TotalCondtion]!)
017: {
018:      
019:      Zhak[Condition]$ = "Stable"
020: }
021: ElseIf((Zhak[Condition]! <=Zhak[TotalCondition]! && >.66*=Zhak[TotalCondition]!)
022: {
023:      
024:      Zhak[Condition]$ = "Superior"
025: }
026: }
027:
028: SetImageTransparent("zhak_menu_profile.bmp", 3, 3, 100, 107, 0, 255, 0)
029:
030:
031: Font("Verdana")
032: FontSize(17)
033: Bold("on")
034: Italics("on")
035: ColorRGB(255, 0, 0)
036:
037: Text(8, 1, "Zhak")
038: ColorRGB(200, 0, 0)
039: FontSize(13)
040:
041: PixelText(100, 40, "HP:")
042:
043: PixelText(100, 60, "MP:")
044:
045: PixelText(100, 80, "ST:")
046:
047: PixelText(100, 120, "<Zhak[Condition]$>")
048:
049: ColorRGB(255, 255, 255)
050:
051: If(Zhak[HP]!<10000)
052: {
053:      PixelText(125, 40, "<Zhak[HP]!>/<Zhak[MaxHP]!>")
054: }
055:
056: {
057:      PixelText(125, 40, "<Zhak[HP]!>")
058: }
059:
060:
061: If(Zhak[MP]! < 10000)
062: {
063:      PixelText(125, 60, "<Zhak[MP]!>/<Zhak[MaxMP]!>")
064: }
065:
066: {
067:      PixelText(125, 60, "<Zhak[MP]!>")
068: }
069:
070: If(Zhak[ST]! < 10000)
071: {
072:      PixelText(125, 80, "<Zhak[ST]!>/<Zhak[MaxST]!>")
073: }
074:
075: {
076:      PixelText(125, 80, "<Zhak[ST]!>")
077: }


Please help! Reply with any questions.


Oh and I need PhpMYSql access.
|spitfire|