- Joined
- Apr 26, 2008
- Messages
- 830
Alright so here is the problem, my triggerer made this system for me, but somehow he has quitted wc3 and I am not able to contact him anymore, thus im stuck with this problem, basically it's a skill system for pokemons, you know the learning/forgetting thing, so when forgetting a spell and learning a new one the pokemon_skill(1-4) is not setted or it doesn't switch with the teach abillity so when forgetting another spell the new learned spell will not be shown, and thus when learning another spell in place of the new learned spell we have 2 spells not 1, so here is the trigger...
-
Teach Pokemon
- Ereignisse
- Bedingungen
-
Aktionen
- -------- Func - trigger used to teach an ability to a pokemon --------
- -------- Parameters: Teach_Pokemon, Teach_Ability --------
- -------- lZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZl --------
- -------- Don't learn what it already knows --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- (Level of Teach_Ability for Teach_Pokemon) Größer als 0
-
'THEN'-Aktionen
- Skip remaining actions
- 'ELSE'-Aktionen
-
'IF'-Bedingungen
- -------- Get data --------
- Set i = (Custom value of Teach_Pokemon)
- Set p = (Player number of Pokemon_Owner[i])
- -------- Check number of current abilities --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- Pokemon_Skill_n[i] Größer gleich 4
-
'THEN'-Aktionen
- -------- Oh noes, gotta forget something --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
-
Or - Any (Conditions) are true
-
Bedingungen
- (Owner of Teach_Pokemon) Gleich Neutral feindlich
- (Owner of Teach_Pokemon) Gleich Spieler 12 (Braun)
- Teach_Silent Gleich True
-
Bedingungen
-
Or - Any (Conditions) are true
-
'THEN'-Aktionen
- -------- Neutral pokemons have no owner to decide for them --------
- -------- ...And ownerless pokemon don't like forgetting things --------
- Skip remaining actions
- -------- (also, if Teach_Silent is true, let's not bother the player) --------
- 'ELSE'-Aktionen
-
'IF'-Bedingungen
- -------- But if it's an owned pokemon.... --------
- Set Teach_WaitingAbility = Teach_Ability
- Set Teach_Forgetting = True
- -------- Pause and invul pokemon and trainer --------
- Einheit - Pause ein PlayerTrainer
- Einheit - Make PlayerTrainer Unverwundbar
- Einheit - Pause ein tmpPokemon
- Einheit - Make tmpPokemon Unverwundbar
- -------- Show his current skills --------
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: ((|cff00ff00 + ((Proper name of Teach_Pokemon) + |r wants to learn |cff00ff00)) + ((Name of Teach_Ability) + |r!))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: |cffffff00Your poke...
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (1 - + (Name of Pokemon_Skill1[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (2 - + (Name of Pokemon_Skill2[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (3 - + (Name of Pokemon_Skill3[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (4 - + (Name of Pokemon_Skill4[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (|cffffff80skip - Don't learn + ((Name of Teach_Ability) + |r))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: |cffffff00Type -sho...
-
'ELSE'-Aktionen
- -------- Ohyeah, I can learn it! --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- Teach_Silent Gleich False
-
'THEN'-Aktionen
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: ((|cff00ff00 + ((Name of Teach_Pokemon) + |r just learned |cff00ff00)) + ((Name of Teach_Ability) + |r!))
- 'ELSE'-Aktionen
-
'IF'-Bedingungen
- Set Pokemon_Skill_n[i] = (Pokemon_Skill_n[i] + 1)
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- Pokemon_Skill_n[i] Gleich 1
-
'THEN'-Aktionen
- Set Pokemon_Skill1[i] = Teach_Ability
-
'ELSE'-Aktionen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- Pokemon_Skill_n[i] Gleich 2
-
'THEN'-Aktionen
- Set Pokemon_Skill2[i] = Teach_Ability
-
'ELSE'-Aktionen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- Pokemon_Skill_n[i] Gleich 3
-
'THEN'-Aktionen
- Set Pokemon_Skill3[i] = Teach_Ability
-
'ELSE'-Aktionen
- Set Pokemon_Skill4[i] = Teach_Ability
-
'IF'-Bedingungen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- Einheit - Add Teach_Ability to Teach_Pokemon
-
'IF'-Bedingungen
-
Forget Skill
-
Ereignisse
- Spieler - Spieler 1 (Rot) types a chat message containing - as Ein Teil-String
- Spieler - Spieler 2 (Blau) types a chat message containing - as Ein Teil-String
- Spieler - Spieler 3 (Blaugrau) types a chat message containing - as Ein Teil-String
-
Bedingungen
- Teach_Forgetting[(Player number of (Triggering player))] Gleich True
-
Aktionen
- Set p = (Player number of (Triggering player))
- Set tmpPokemon = Pokemon_Out
- Set i = (Custom value of tmpPokemon)
- -------- If player typed "show", show current skills --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- (Substring((Entered chat string), 2, (Length of (Entered chat string)))) Gleich show
-
'THEN'-Aktionen
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: ((|cff00ff00 + ((Name of Teach_Pokemon) + |r wants to learn |cff00ff00)) + ((Name of Teach_WaitingAbility) + |r!))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: |cffffff00Your poke...
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (1 - + (Name of Pokemon_Skill1[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (2 - + (Name of Pokemon_Skill2[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (3 - + (Name of Pokemon_Skill3[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (4 - + (Name of Pokemon_Skill4[i]))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: (|cffffff80-skip = Don't learn + ((Name of Teach_WaitingAbility) + |r))
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: |cffffff00Type -sho...
- 'ELSE'-Aktionen
-
'IF'-Bedingungen
- -------- If player typed a number between 1 and 4, learn ability --------
- Set tmpSlot = (Integer((Substring((Entered chat string), 2, (Length of (Entered chat string))))))
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- tmpSlot Größer als 0
- tmpSlot Kleiner gleich 4
-
'THEN'-Aktionen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- tmpSlot Gleich 1
-
'THEN'-Aktionen
- Set tmpAbility = Pokemon_Skill1[i]
-
'ELSE'-Aktionen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- tmpSlot Gleich 2
-
'THEN'-Aktionen
- Set tmpAbility = Pokemon_Skill2[i]
-
'ELSE'-Aktionen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- tmpSlot Gleich 3
-
'THEN'-Aktionen
- Set tmpAbility = Pokemon_Skill3[i]
-
'ELSE'-Aktionen
- Set tmpAbility = Pokemon_Skill4[i]
-
'IF'-Bedingungen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: ((|cff00ff00 + ((Name of Teach_Pokemon) + |r forgot |cff00ff00)) + ((Name of tmpAbility) + (|r and learned |cff00ff00 + ((Name of Teach_WaitingAbility) + |r!))))
- Einheit - Remove tmpAbility from tmpPokemon
- Einheit - Add Teach_WaitingAbility to tmpPokemon
- -------- Finish! --------
- Einheit - Pause aus PlayerTrainer
- Einheit - Make PlayerTrainer Verwundbar
- Einheit - Pause aus tmpPokemon
- Einheit - Make tmpPokemon Verwundbar
- Set Teach_Forgetting = False
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- 'ELSE'-Aktionen
-
'IF'-Bedingungen
- -------- If player typed "skip", finish --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
'IF'-Bedingungen
- (Substring((Entered chat string), 2, (Length of (Entered chat string)))) Gleich skip
-
'THEN'-Aktionen
- Spiel - Display to (Player group(Pokemon_Owner[i])) for 15.00 seconds the text: ((|cff00ff00 + ((Name of Teach_Pokemon) + |r did not learn |cff00ff00)) + ((Name of Teach_WaitingAbility) + |r!))
- -------- Finish! --------
- Einheit - Pause aus PlayerTrainer
- Einheit - Make PlayerTrainer Verwundbar
- Einheit - Pause aus tmpPokemon
- Einheit - Make tmpPokemon Verwundbar
- Set Teach_Forgetting = False
- 'ELSE'-Aktionen
-
'IF'-Bedingungen
-
Ereignisse