- Joined
- Apr 26, 2008
- Messages
- 830
Hi,
Wanted to know if somebody can detect some mistake?
Wanted to know if somebody can detect some mistake?
-
GiveSquirtle
-
Ereignisse
-
Spieler - Spieler 1 (Rot) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 1 (Rot) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 2 (Blau) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 2 (Blau) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 3 (Blaugrau) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 3 (Blaugrau) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 4 (Lila) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 4 (Lila) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 5 (Gelb) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 5 (Gelb) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 6 (Orange) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 6 (Orange) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 7 (Grün) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 7 (Grün) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 8 (Rosa) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 8 (Rosa) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 9 (Grau) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 9 (Grau) types a chat message containing -water as Exakte Übereinstimmung
-
Spieler - Spieler 10 (Hellblau) types a chat message containing -Squirtle as Exakte Übereinstimmung
-
Spieler - Spieler 10 (Hellblau) types a chat message containing -water as Exakte Übereinstimmung
-
-
Bedingungen
-
((Triggering player) is in AlreadyGotPokemon) Gleich False
-
Or - Any (Conditions) are true
-
Bedingungen
-
(Choose Pokemon Beginning 2 <gen> contains PlayerTrainer[(Player number of (Triggering player))]) Gleich True
-
(Choose Pokemon Beginning <gen> contains PlayerTrainer[(Player number of (Triggering player))]) Gleich True
-
-
-
-
Aktionen
-
Spielergruppe - Add (Triggering player) to AlreadyGotPokemon
-
Set Give_Player = (Triggering player)
-
Set Give_Type = Basic Squirtle
-
Set Give_Level = 8
-
Auslöser - Run Give Pokemon 2 <gen> (checking conditions)
-
-
-
Give Pokemon 2
-
Ereignisse
-
Bedingungen
-
Aktionen
-
-------- Func - trigger used to give a pokemon to a player --------
-
-------- Parameters: Give_Type, Give_Player --------
-
-------- lZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZl --------
-
Set tmpPlayerId = (Player number of Give_Player)
-
Set tmpTrainer = PlayerTrainer[tmpPlayerId]
-
-------- Create pokemon --------
-
Set point = (Random point in Rect_PokemonArea)
-
Einheit - Create 1 Give_Type for Give_Player at point facing Vorgabe für Gebäude-Ausrichtung degrees
-
For each (Integer GiveINT[1]) from 1 to Give_Level, do (Actions)
-
Schleifen - Aktionen
-
Held - Set (Last created unit) Hero-level to ((Hero level of (Last created unit)) + 1), Verbergen level-up graphics
-
-
-
Custom script: call RemoveLocation( udg_point )
-
Set tmpPokemon = (Last created unit)
-
Spiel - Display to (Player group(Give_Player)) for 5.00 seconds the text: (Congratulations! You have been given + ((Proper name of (Last created unit)) + ! Be sure to train him well =)))
-
-------- Gotcha! Get a new pokemon index --------
-
Set Pokemon_Max = (Pokemon_Max + 1)
-
-------- Create full pokeball and link it to the pokemon --------
-
Held - Create Item_FullPokeball and give it to tmpTrainer
-
Set Pokemon_Ball[Pokemon_Max] = (Last created item)
-
Gegenstand - Set the custom value of (Last created item) to Pokemon_Max
-
Einheit - Set the custom value of tmpPokemon to Pokemon_Max
-
Set Pokemon_List[Pokemon_Max] = tmpPokemon
-
Set Pokemon_Owner[Pokemon_Max] = Give_Player
-
-