Can anyone tell us how to make the visual characters?

[MikeJake]

WE started making this game. (see below for current progress) We were wondering if anyone could tell us how to make the characters.

code:

[syntax="%%%The Army Game%%% %By: Mike Orr and Jake Klassen% import GUI GUI.SetBackgroundColour (green) procedure Start GUI.Quit end Start var b1 := GUI.CreateButton (120, 250, 10, "Start Game", Start ) loop     exit when GUI.ProcessEvent end loop cls put "Its Time To Fight" put skip var Name : string put "Enter your soldier's name. " .. get Name : * var Gender : string put "Enter your Gender: " .. get Gender var Specialty : string if Gender = "Male" then put "Choose your specialty from the list below" put "Engineer" put "Infantry" put "Communications" put "Armoured" put "Artillery" put "Medic" put "Military Police" put "Airborne" put "Ammunition Technician" put "Scottish Infantry" put " " .. get Specialty end if if Gender = "Female" then put "Choose your specialty from the list below" put "Communications" put "Artillery" put "Medic" put " " .. get Specialty end if cls var Corps : string put "Choose your Corps. or Division" put "Marine Corps." put "Canadian Army" put "Army Cadet" put " " .. get Corps : * var Regiment : string if Corps = "Canadian Army" then put "Choose a regiment" put "The Essex and Kent Scottish" put "The Lake Superior Highlanders" put "The Black Watch Royal Highland Regiment of Canada" put "Princess Patricia's Canadian Light Infantry" put "Royal Canadian Electrical and Mechanical Engineers" put "Royal Canadian Field Ambulance" put "Lord Strathcona's Horse" put "Royal Canadian Horse Artillery" put "Canadian Military Police" put "Canadian Signal Corps." put "Royal Canadian Regiment" put " " .. get Regiment end if if Corps = "Marine Corps." then put "Choose a company." put "Alpha" put "Bravo" put "Charlie" put "Delta" put "Echo" put "Foxtrot" put "Gulf" put "Hotel" put "India" put "Juliette" put "Kilo" put " " .. get Regiment if Corps = "Army Cadet" then put "Choose your corps." put "59 LHRC(ARMY)CC" put "1084 Walkerville Legion" put "CC 04 Blackwatch" put "#44 Port Perry" put " " .. get Regiment end if var Weapon : string put "Choose your weapon" put "Colt Canada C7" put "Colt Canada C6" put "Colt Canada C8" put "Colt Canada C9" put "Armalite M-14" put "Armalite M-15" put "Armalite M-16" put "M1 Carbine" put "Remmington .22, semi auto" put "Daisy 853C" put "Lee Enfield No. 7 Bolt Action, Rim Fire, 22 calibre Rifle" put " " .. get Weapon end if cls var User_XP : real var User_CurrentHealth : real var User_NextLevel : real var WeaponDamage: int var Weapon : string if Specialty = "Engineer" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 200 end if if Specialty = "Infantry" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 1000 end if if Specialty = "Communications" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 100 end if if Specialty = "Armoured" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 400 end if if Specialty = "Artillery" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 500 end if if Specialty = "Medic" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 700 end if if Specialty = "Military Police" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 350 end if if Specialty = "Airborne" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 950 end if if Specialty = "Ammunition Technician" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 470 end if if Specialty = "Scottish Infantry" then User_CurrentHealth :=100 User_XP :=0 User_NextLevel := 1250 if Weapon = "Colt Canada C7" then WeaponDamage :=30 end if "][/syntax]

[Zren]

Okay, what do you meen by characters? Do you meen like a guy moving around on screen?

If so, is it a platformer type like ALIAS > http://www.goriya.com/flash/alias_2.shtml
or a top-down view like StickArena > http://www.xgenstudios.com/play/stickarena

In other words, try to describe what kind of game your trying to make. Draw a picture if necessary. It'll not only help us but you as well.

Here's a bit of stuff I found to clean up you code and such.

code:

%line ~108 get Regiment [color=darkgreen]end if[/color] if Corps = "Army Cadet" then

I also suggest doing something like this:

code:

%psuedo code get Corps Corps = toLowerCase(Corps) if (Corps == "army") then  .... end if

This way people can type in lowercase and not throw errors. You might also want to consider looping the menu if an incorrect option is submitted.

[MikeJake]

We are making an RPG, so we want to use pictures like some of the ones we found to make the characters. Can you help us?

[copthesaint]

For pictures use
var picture:= Pic.FileNew (pic id)

[andrew.]

Zren @ Mon Jan 19, 2009 1:16 pm wrote:

I also suggest doing something like this:

code:

%psuedo code get Corps Corps = toLowerCase(Corps) if (Corps == "army") then  .... end if

This way people can type in lowercase and not throw errors. You might also want to consider looping the menu if an incorrect option is submitted.

That makes sense, but in Turing, you would have to make a procedure to convert everything into lower case. It might just be better to have something like:

code:

if Corps = "army" or Corps = "Army" then .... end if

Yeah, it's kind of not right and if you type lIke THiS it won't work but still. I think it's good enough for a project of this calibre.

[TheGuardian001]

andrew. @ Tue Jan 20, 2009 5:22 pm wrote:

That makes sense, but in Turing, you would have to make a procedure to convert everything into lower case.

no you wouldn't

Turing:

Str.Lower(stringName)

and yes, characters can be made from images using Pic.FileNew.