| Shmack - Jun-16-2005 server time |
| woot woot fixed it now to finsh the other 99% D: var race : string var str, agi, vit, wiz : int procedure charRace (var str, agi, vit, wiz : int) var choice : int put "Pick your Race." put " " put "1-Human (Str: 15 Agi:15 Vit:15 Wiz:15)" put " " put "2-Night elf (Str: 15 Agi:20 Vit:10 Wiz:15)" put " " put "3-Orc (Str: 20 Agi:10 Vit:20 Wiz:10)" put " " put "4-Undead (Str: 10 Agi:10 Vit:20 Wiz:20)" get choice if choice = 1 then race := "Human" str := 15 agi := 15 vit := 15 wiz := 15 elsif choice = 2 then race := "Night Elf" str := 15 agi := 20 vit := 10 wiz := 15 elsif choice = 3 then race := "Orc" str := 20 agi := 10 vit := 20 wiz := 10 elsif choice = 4 then race := "Undead" str := 10 agi := 10 vit := 20 wiz := 20 end if end charRace procedure atkBox setscreen ("graphics:600;600") drawline (300, 0, 300, 600, 3) end atkBox charRace (str, agi, vit, wiz) put race, str, agi, vit, wiz |
| Shmack - Jun-16-2005 server time |
| hmm for my final project due in a few days i dont got much done only got this so far :s var choice : int put "Pick your Race." put " " put "1-Human (Str: 15 Agi:15 Vit:15 Wiz:15)" put " " put "2-Night elf (Str: 15 Agi:20 Vit:10 Wiz:15)" put " " put "3-Orc (Str: 20 Agi:10 Vit:20 Wiz:10)" put " " put "4-Undead (Str: 10 Agi:10 Vit:20 Wiz:20)" get choice if choice = 1 then race := "Human" str := 15 agi := 15 vit := 15 wiz := 15 elsif choice = 2 then race := "Human" str := 15 agi := 20 vit := 10 wiz := 15 elsif choice = 3 then race := "Human" str := 20 agi := 10 vit := 20 wiz := 10 elsif choice = 4 then race := "Human" str := 10 agi := 10 vit := 20 wiz := 20 end if end charRace charRace put race, str, agi, vit, wiz ::keep getting error:: left side of assignment is not a variable and hence cannot be assigned to that even has errors in it im used to useing turing 4.0.0 ^^;; but ya if any one could give me some help with how i would make it so i can add status and buttuns that would really help gah im gonna fail XD |