;c3 is pirate
;c1 is earth
;NOTE: Tokens > 300 < 350 ARE DESIGNATED FOR SKILLS!
SCENE 72, skill, SCENE, "Skills"
ACTOR 1, "Teacher", la1, 2, 40, 90
LOCK 1
POSE 1,2
MUSIC Wellmusic.mid
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: So, you want the skills?
	1: Please, tell me which skill you want to learn:
	IF C1, @em1
	IF C4, @am1
	IF C2, @fm1
	@cm1
	MENU "Search=@search1","Missile=@missile1","Repair=@repair1"
	1: Right click me to bring this menu up again.
END	
    @eventActorClick1
    IF C1, @em1
	IF C4, @am1
	IF C2, @fm1
	IF C3, @cm1
END
	@nogofourth
	1: I'm sorry, I can only teach one person at a time.
END
	@em1
	MENU "Search=@search1","Missile=@missile1","Repair=@repair1","Reinforcements=@fighter1"
	1: Right click me to bring this menu up again.
END
	@am1
	MENU "Search=@search1","Missile=@missile1","Repair=@repair1","Death Ray=@ray1"
	1: Right click me to bring this menu up again.72
END
	@fm1
	MENU "Search=@search1","Missile=@missile1","Repair=@repair1","Speed Techniques=@speed1"
	1: Right click me to bring this menu up again.
END
;------
;BELOW THIS IS FOR THE MISSILE LEARN CODE.  NOTHING ELSE GOES HERE.
	@missile1
	COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	IF T4001+T302, @noskill
	IF T306, @noskill
	IF T305+C3-#20-T4001, @305
	IF T305, @noskill
	IF T304+#20, @noskill
	IF T304-#20-T4001, @barrage
	IF T303-T4001, @303
	IF T302-T4001, @302
	IF T301, @301
	1: This will allow you to learn the offensive skill "Missile".
	1: It fires a projectile at your target.
	1: To learn this, you must be at least level 15 and have 20,000 Gold Coins.
	IF -V15, @noreq
	IF -G20000, @noreq
	1: You can learn this.  Do you want to? (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G20000
	1: Excellent, I will teach you the ancient arts...
	GIVE T301
	GIVE S750
	1: You learn quickly!  This weapon now does 100 damage to any opponent.
;NOW D100, L1
END
	@301
	1: To learn this, you must be at least level 30 and have 50000 Gold Coins.
	IF -V30, @noreq
	IF -G50000, @noreq
	1: You can learn this.  Do you want to? (YES/NO)
	ASK 9999999
	IF No, @no
	TAKE G50000
	1: Excellent, prepare to be taught..
	GIVE T302
	TAKE S750
	GIVE S757
	1: You learn quickly!  This weapon now does 200 damage to any opponent.
END
	@302
	1: To learn this, you must be at least level 40 and have 75000 Gold Coins.
	IF -V40, @noreq
	IF -G75000, @noreq
	1: Excellent, you can learn.  Do you still wish to? (YES/NO)
	ASK 99999
	IF No, @no
	TAKE G75000
	1: Prepare to be taught the arts...
	TAKE S757
	GIVE T303
	GIVE S758
	1: You learn quickly!  This weapon now does 300 damage to any opponent.
END
	@303
	1: To learn this, you must be at least level 50 and have 100,000 Gold Coins.
	IF -V50, @noreq
	IF -G100000, @noreq
	1: Do you wish to learn this?
	ASK 99999
	IF No, @no
	TAKE G100000
	1: Prepare to learn..
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	TAKE S758
	GIVE T304
	GIVE S759
	1: You are a very fast learner. Your missiles will now do 400 damage to any enemy.
END
	@barrage
	1: To learn this, you must be at least level 50 and have 100,000 Gold Coins.
	1: You must also allready know the spell: Missile Level 4
	IF -V50, @noreq
	IF -G100000, @noreq
	IF -S759, @noreq
	1: Do you wish to learn this?  It will not replace your current Missile Skill. (YES/NO)
	ASK 99999
	IF No, @no
	TAKE G100000
	1: Prepare to learn the ancient arts....
	GIVE T305
	GIVE S760
	IF C3, @otalt
	1: Your missiles will now attack numerous enemies.  You have mastered the Missile Skill, and I can teach you no more.
	END
	@otalt
	1: Amazing.  You are a very fast learner...
END
;---------
	@305
	1: Because you a are a pirate, I believe I can find a way to upgrade your multi-missile skill.
	1: To do this, you must be at least level 75 and have 500,000 Gold Coins.
	IF -V75, @noreq
	IF -G500000, @noreq
	IF -S760, @noreq
	1: Do you wish to learn this?  It will replace your current Multi Missile Skill. (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G500000
	1: Prepare to learn..
	GIVE T306
	TAKE S760
	GIVE S761
	1: Amazing, you have mastered this skill.  Your missiles will now attack numerous enemies with more power.
	1: I can teach you no more in this field...
END
;-----
;BELOW THIS IS FOR THE SEARCH LEARN CODE.  NOTHING ELSE GOES HERE.
	@search1
	IF T4001+T123, @noskill
	IF T126, @noskill
	IF T125+C3-#20-T4001, @125
	IF T125, @noskill
	IF T124+#20-T4001, @124
	IF T124-#20-T4001, @124
	IF T123-T4001, @123
	IF T122, @122
	1: To learn this, you must be at least level 5 and have 2,000 Gold Coins.
	1: This will help you find special quest items, and get more money for battles.
	1: This will bring your search skill to: 20% 
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	IF V5+G2000, @s1234
	1: You do not have the requirements.  Please return with the basic requirements...
END
	@s1234
      1: Do you still wish to learn?
	ASK 999999
	IF No, @no
	TAKE G2000
	1: Excellent.  You will now learn the ancient arts..
	GIVE T122
	1: You are a very fast learner!  The knowledge is now known to you.
;NOW LEVEL 1 In search!
;-------------
END
	@122
	1: Your skill level in searching is currently 20%.  In order to advance it, you need to be level 15 with 15,000 GP.
	IF -V15, @noreq
	IF -G35000
	1: Excellent, you can learn this skill.  Do you still wish to? (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G15000
	1: Great!  Prepare to be taught the ancient arts...
	GIVE T123
	1: You are a very fast learner!  The knowledge is now known to you.  Your search skill is now at 40%.
END
;NOW LEVEL 2 In search!
;-----------
	@123
	1: Your skill level in searching is currently 40%.  In order to advance it, you need to be level 25 with 35,000 GP.
	IF -V25, @noreq
	IF -G35000, @noreq
	1: You can learn this, do you still wish to? (YES/NO)
	ASK 99999999
	IF No, @no
	TAKE G35000
	1: Excellent.  You will now learn the ancient arts..
	GIVE T124
	1: You are a very fast learner!  The knowledge is now known to you.  Your search skill is now at 50%.
END
; NOW LEVEL 3!
;----------
	@124
	1: Your skill level in searching is currently 50%.  In order to advance it, you need to be level 35 with 50,000 GP.
	IF -V35, @noreq
	IF -G50000, @noreq
	1: You can learn this, if you wish. (YES/NO)
ASK 9999999
	If No, @no
	TAKE G50000
	1: Prepare to be taught the ancient arts...
	GIVE T125
	IF C3, @alt
	1: Excellent!  You now have learned all of the search skill I can teach.  Your search skill is at the maximum.
	END
	@alt
	1: Excellent!  You are a very fast learner...
END
	@125
	1: Because you are a pirate, I believe you have the ability to hold more advanced scanners..
	1: In order to do this, you must be a level 65 ship with 100,000 GP.
	IF -V65, @noreq
	IF -G100000, @noreq
	1: You can learn this, if you wish. (YES/NO)
ASK 9999999
	IF No, @no
	TAKE G100000
	1: Prepare to be taught the ancient arts...
	GIVE T126
	1: Excellent!  You have now learned all the search skill I can teach.
END
; NOW LEVEL 4, COMPLETE
;--------------------
;+++++HEAL CODE STARTS HERE++++++
;T310-T315!
	@repair1
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	IF T311+T4001, @noskill
	IF T314, @noskill
	IF T313+C3-#20-T4001, @repairulto
	IF T313, @noskill
	IF T312-#20, @noskill
	IF T312+#20-T4001, @repair4
	IF T311-T4001, @repair3
	IF T310, @repair2
	1: This skill will cause your ship to sometimes be repaired just before a battle.
	1: Level One Gives a 20% chance of a repair.
	1: In order to learn this, you must be level 15 with 20,000 Gold Coins.
	IF -V15, @noreq
	IF -G20000, @noreq
	1: Do you wish to learn this? (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G20000
	1: Prepare to learn the ancient arts...
	GIVE T310
	1: Amazing, you have mastered the skill.  You will now heal 20% of the time before battles.
END
	@repair2
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: Level Two Gives a 30% chance of repair just before a battle.
	1: In order to learn this, you must be level 25 with 50,000 Gold Coins.
	IF -V25, @noreq
	IF -G50000, @noreq
	1: Do you wish to learn this? (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G50000
	1: Prepare to learn...
	GIVE T311
	1: Amazing, you have mastered the skill.  You now will heal 30% of the time.
END
	@repair3
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: Level Three Gives a 40% chance of repair just before a battle.
	1: In order to learn this, you must be level 35 with 75,000 Gold Coins.
	IF -V35, @noreq
	IF -G75000, @noreq
	1: Do you wish to learn this? (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G75000
	1: Prepare to learn...
	GIVE T312
	1: Amazing, you have mastered the skill.  You now will heal 40% of the time.
END
	@repair4
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: Level Four Gives a 50% chance of repair just before a battle.
	1: In order to learn this, you must be level 50 with 100,000 Gold Coins.
	IF -V50, @noreq
	IF -G100000, @noreq
	1: Do you wish to learn this? (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G100000
	1: Prepare to learn...
	GIVE T313
	1: Amazing, you have mastered the skill.  You now will heal 50% of the time.
END
	@repairulto
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: Level Five Gives you a 65% chance of repair just before a battle.	
	1: In order to learn this, you must be a level 75 Pirate with 600,000 Gold Coins.
	IF -V75, @noreq
	IF -G600000, @noreq
	1: Do you wish to learn this? (YES/NO)
	ASK 999999
	IF No, @no
	TAKE G600000
	1: Prepare to learn...
	GIVE T314
	1: Amazing, you have mastered this skill.  You will now heal 65% of the time.
END
;-------------
;-----
; Earth Reinforcements uses 326-
	@fighter1
COMPARE "1","#<num.peopleInScene>"
	IF=, @okay
	IF>, @nogofourth
	IF<, @nogofourth
	IF T329+T4001, @noskill
	IF T329-T4001, @killskill
	IF T328-T4001-#20, @fighter4
	IF T328+#20, @noskill
	IF T328+T4001, @noskill
	IF T327-T4001, @fighter3
	IF T327+T4001, @noskill
	IF T326, @fighter2
	1: This skill adds a small chance of a single friendly fighter coming to your assistance.
	1: The requirements for this are:
	1: You must be level 15 and you must have at least 10,000 Gold.
	1: You can turn this skill off or on at any time in your camp scene.
	IF -V15, @noreq
	IF -G10000, @noreq
	1: Do you wish to learn this skill? (YES/NO)
	ASK 99999
	IF No, @no
	IF -G10000, @noreq
	TAKE G10000
	1: Excellent, prepare to learn...
	SET helpme, "20"
	SET savehelpme, "20"
	GIVE T326
	1: You are a very quick learner.  There is now a 20 percent chance a fighter will appear to help you.
	1: Return later for additional skills.
END
	@killskill
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: At Sometime during your venture, if you decide you would like to temporary stop this skill, you can.
	1: Mearly come here and tell me.
	@hty
	1: Would you like to set your skill level to 0% or 50%? (0 or 50 or No)
	ASK 99999
	IF No, @no
	IF Q50, @50kse
	IF Q0, @kse
	IF Q50%, @50kse
	IF Q0%, @kse
	GOTO @hty
END
	@kse
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: Okay.  I will set your ability in this skill to 0%.  Come back here to return it to 50%.
	set helpme, "0"
	1: It is done.
END
	@50kse
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: Okay, I will now reset your ability in this skill to 50%.  Come back here to change it to 0%.
	set helpme, "50"
	1: It is done.
END
	@fighter2
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: This will raise your skill in Reinforcements to level 2.
	1: It increases the chance of a friendly assist to 30 percent.
	1: The requirements for this are:
	1: You must be level 30 and you must have at least 45,000 Gold.
	IF -V30, @noreq
	IF -G45000, @noreq
	1: Do you wish to learn this skill? (YES/NO)
	ASK 999999
	IF No, @no
	IF -G45000, @noreq
	TAKE G45000
	1: Excellent, prepare to learn....
	SET helpme, "30"
	SET savehelpme, "30"
	GIVE T327
	1: You have mastered level 2 of this skill.  There is now a 30 percent cance a fighter will appear to help you.
	1: Return later for additonal skills.
END
	@fighter3
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: This will raise your skill in Reinforcements to level 3.
	1: It increases the chance of a friendly assist to 40 percent.
	1: The requirements for this are:
	1: You must be level 45 and you must have at least 60,000 Gold.
	IF -V45, @noreq
	IF -G60000, @noreq
	1: Do you wish to learn this skill? (YES/NO)
	ASK 999999
	IF No, @no
	IF -G60000, @noreq
	TAKE G60000
	1: Excellent, prepare to learn....
	SET helpme, "40"
SET savehelpme, "40"
	GIVE T328
	1: You have mastered level 3 of this skill.  There is now a 40 percent cance a fighter will appear to help you.
	1: Return later for additonal skills.
END
	@fighter4
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: This will raise your skill in Reinforcements to level 4.
	1: it increases the chance of a friendly assist to 50 percent.
	1: The requirements for this are:
	1: you must be level 65 and you must have at least 100,000 Gold.
	IF -V65, @noreq
	IF -G100000, @noreq
	1: Do you wish to learn this skill? (YES/NO)
	ASK 99999
	IF No, @no
	IF -G100000, @noreq
	TAKE G100000
	1: Excellent, prepare to be learned...
	SET helpme, "50"
	SET savehelpme, "50"
	GIVE T329
	1: You have mastered this skill.
	1: Congratulations, your are now a master in this field.
END
;-------------
;Alien Uses No tokens
@ray1
IF S749, @noskill
IF S766+T4001, @noskill
IF S767+T4001, @noskill
IF S767+#20, @noskill
IF S767-T4001-#20, @ray4
IF S766-T4001, @ray3
IF S765, @ray2
1: This skill gives you a Death Ray which you can use to obliderate enemies.
1: This skill is much more powerful and requires less energy to cast than a missile.
1: It requires you to be level 15 with 2000 Gold, however.
IF -G2000, @noreq
IF -V15, @noreq
1: Do you still wish to learn this skill? (YES/NO)
IF No, @no
1: Okay, please wait while you learn this skill...
IF -G2000, @noreq
GIVE S765
TAKE G2000
1: You are a very fast learner.  Please return to learn more.
END
@ray2
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
1: This skill gives you a Death Ray Mk. 2, which is nearly twice as powerful.
1: It requires you to be level 20 with 5000 Gold, however.
IF -G5000, @noreq
IF -V20, @noreq
1: Do you still wish to learn this? (YES/NO)
ASK 9999999
IF No, @no
IF -G5000, @noreq
TAKE G5000
1: Okay, please wait while I teach you the skill.
TAKE S765
GIVE S766
1: You are a very fast learner.  Please return to learn more.
END
@ray3
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
1: This skill gives you a Death Ray Mk. 3, which is even more powerful than the previous.
1: It requires you to be level 30 with 20,000 Gold, however.
IF -G20000, @noreq
IF -V30, @noreq
1: Do you still wish to learn this? (YES/NO)
ASK 99999999
IF No, @no
IF -G20000, @noreq
TAKE S766
GIVE S767
TAKE G20000
1: You are a fast learner.  Please return to learn more.
END
@ray4
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
1: This skill gives you the final, most powerful, Death Ray Mk. 4.
1: It requires you to be level 70 with 100,000 Gold, however.
IF -G100000, @noreq
IF -V70, @noreq
1: Do you still wish to learn this? (YES/NO)
ASK 999999
IF No, @no
IF -G100000, @noreq
TAKE S767
GIVE S749
TAKE G100000
1: Congratulations, you now have mastered the Death Ray skill.
END
;------------
@speed1
	IF S764, @noskill
	IF S762-T4001-#20, @fm3
	IF S763-T4001, @fm2
	IF -T4001, @pou
	GOTO @noskill
END
	@pou
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: Being a fighter, you can use many different tactics other ships cannot.
	1: The first of these is the ability to speed yourself up temporarily.
	1: This is called a 'speed boost'.  You must be level 15 with 2,000 Gold to learn this.
	IF -G2000, @noreq
	IF -V15, @noreq
	1: Do you still wish to learn this? (YES/NO)
	ASK 999999
	IF No, @no
	IF -G2000, @noreq
	TAKE G2000
	1: Okay, please wait while I teach you the skills.
	GIVE S763
	1: You are a very fast learner.  Please, return to learn more.
END
	@fm2
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: The second skill you can learn as a fighter is the ability to slow your enemy.
	1: This is called a speed net.
	1: To learn this, you must be level 25 with 25,000 Gold.
	IF -G25000, @noreq
	IF -V25, @noreq
	1: Do you still wish to learn this? (YES/NO)
	ASK 999999
	IF No, @no
	IF -G25000, @noreq
	TAKE G25000
	1: Okay, please wait while I teach you the skills.
	GIVE S762
	1: You are a fast learner.  Please, return to learn more.
END
	@fm3
COMPARE "1","#<num.peopleInScene>"
	IF>, @nogofourth
	IF<, @nogofourth
	1: This is the third and last skill you can learn as a fighter.
	1: This gives you the ability to confuse your enemies and use them against your opponents.
	1: To learn this, you must be level 50 with 50,000 Gold.
	IF -G50000, @noreq
	IF -V25, @noreq
	1: Do you still wish to learn this? (YES/NO)
	ASK 99999
	IF No, @no
	IF -G50000, @noreq
	TAKE G50000
	1: Okay, please wait while I teach you the skills.	
	GIVE S764
	1: Congratulations, you have mastered the Fighter's skills.
	1: Excellent job.
END
	@no
	1: Okay, leave this place in peace.
END
	@noreq
	1: You do not have the required.  Please return when you are ready.
END
	@noskill
	1: I have taught you all I can about this skill.
END
;-----
