pokecrystal-board/maps/BattleTowerBattleRoom.asm

	object_const_def ; object_event constants
	const BATTLETOWERBATTLEROOM_YOUNGSTER
	const BATTLETOWERBATTLEROOM_RECEPTIONIST

BattleTowerBattleRoom_MapScripts:
	db 2 ; scene scripts
	scene_script .EnterBattleRoom ; SCENE_DEFAULT
	scene_script .DummyScene ; SCENE_FINISHED

	db 0 ; callbacks

.EnterBattleRoom:
	disappear BATTLETOWERBATTLEROOM_YOUNGSTER
	prioritysjump Script_BattleRoom
	setscene SCENE_FINISHED
.DummyScene:
	end

Script_BattleRoom:
	applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn
; beat all 7 opponents in a row
Script_BattleRoomLoop:
	setval BATTLETOWERBATTLEROOM_YOUNGSTER
	special LoadOpponentTrainerAndPokemonWithOTSprite
	appear BATTLETOWERBATTLEROOM_YOUNGSTER
	warpsound
	waitsfx
	applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksIn
	opentext
	battletowertext BATTLETOWERTEXT_INTRO
	buttonsound
	closetext
	special BattleTowerBattle ; calls predef startbattle
	special FadeOutPalettes
	reloadmap
	ifnotequal $0, Script_FailedBattleTowerChallenge
	readmem wNrOfBeatenBattleTowerTrainers
	ifequal BATTLETOWER_STREAK_LENGTH, Script_BeatenAllTrainers
	applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksOut
	warpsound
	disappear BATTLETOWERBATTLEROOM_YOUNGSTER
	applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksToPlayer
	applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceReceptionist
	opentext
	writetext Text_YourMonWillBeHealedToFullHealth
	waitbutton
	closetext
	playmusic MUSIC_HEAL
	special FadeOutPalettes
	special LoadMapPalettes
	pause 60
	special FadeInPalettes
	special RestartMapMusic
	opentext
	writetext Text_NextUpOpponentNo
	yesorno
	iffalse Script_DontBattleNextOpponent
Script_ContinueAndBattleNextOpponent:
	closetext
	applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceNextOpponent
	applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksAway
	sjump Script_BattleRoomLoop

Script_DontBattleNextOpponent:
	writetext Text_SaveAndEndTheSession
	yesorno
	iffalse Script_DontSaveAndEndTheSession
	setval BATTLETOWERACTION_SAVELEVELGROUP ; save level group
	special BattleTowerAction
	setval BATTLETOWERACTION_SAVEOPTIONS ; choose reward
	special BattleTowerAction
	setval BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave
	special BattleTowerAction
	playsound SFX_SAVE
	waitsfx
	special FadeOutPalettes
	special Reset
Script_DontSaveAndEndTheSession:
	writetext Text_CancelYourBattleRoomChallenge
	yesorno
	iffalse Script_ContinueAndBattleNextOpponent
	setval BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	setval BATTLETOWERACTION_06
	special BattleTowerAction
	closetext
	special FadeOutPalettes
	warpfacing UP, BATTLE_TOWER_1F, 7, 7
	opentext
	sjump Script_BattleTowerHopeToServeYouAgain

Script_FailedBattleTowerChallenge:
	pause 60
	special BattleTowerFade
	warpfacing UP, BATTLE_TOWER_1F, 7, 7
	setval BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	opentext
	writetext Text_ThanksForVisiting
	waitbutton
	closetext
	end

Script_BeatenAllTrainers:
	pause 60
	special BattleTowerFade
	warpfacing UP, BATTLE_TOWER_1F, 7, 7
Script_BeatenAllTrainers2:
	opentext
	writetext Text_CongratulationsYouveBeatenAllTheTrainers
	sjump Script_GivePlayerHisPrize

UnreferencedScript_0x9f4eb:
	setval BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	opentext
	writetext Text_TooMuchTimeElapsedNoRegister
	waitbutton
	closetext
	end

UnreferencedScript_0x9f4f7:
	setval BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	setval BATTLETOWERACTION_06
	special BattleTowerAction
	opentext
	writetext Text_ThanksForVisiting
	writetext Text_WeHopeToServeYouAgain
	waitbutton
	closetext
	end

Text_ReturnedAfterSave_Mobile:
	text "You'll be returned"
	line "after you SAVE."
	done

BattleTowerBattleRoom_MapEvents:
	db 0, 0 ; filler

	db 2 ; warp events
	warp_event  3,  7, BATTLE_TOWER_HALLWAY, 4
	warp_event  4,  7, BATTLE_TOWER_HALLWAY, 4

	db 0 ; coord events

	db 0 ; bg events

	db 2 ; object events
	object_event  4,  0, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_BATTLE_TOWER_BATTLE_ROOM_YOUNGSTER
	object_event  1,  6, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1
"object_const_def" instead of "const_def 2" 2019-04-21 14:42:25 -07:00			`object_const_def ; object_event constants`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`const BATTLETOWERBATTLEROOM_YOUNGSTER`
			`const BATTLETOWERBATTLEROOM_RECEPTIONIST`

map_header → map_def; map_header_2 → map_data 2018-01-16 19:57:19 -08:00			`BattleTowerBattleRoom_MapScripts:`
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 2 ; scene scripts`
Meaningful scene constant names (Two common patterns: 0=default event and 1=nothing; and 0=nothing and 1=some event) 2018-02-01 09:40:58 -08:00			`scene_script .EnterBattleRoom ; SCENE_DEFAULT`
SCENE_DEFAULT=0 and SCENE_FINISHED=1 (generic constants for a common scene pattern) 2018-02-01 12:06:06 -08:00			`scene_script .DummyScene ; SCENE_FINISHED`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0 ; callbacks`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remaining map labels: UnknownText and MovementData 2018-03-01 14:33:43 -08:00			`.EnterBattleRoom:`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`disappear BATTLETOWERBATTLEROOM_YOUNGSTER`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`prioritysjump Script_BattleRoom`
SCENE_DEFAULT=0 and SCENE_FINISHED=1 (generic constants for a common scene pattern) 2018-02-01 12:06:06 -08:00			`setscene SCENE_FINISHED`
Renaming: (fix #412) - MapTriggers / maptrigger → SceneScripts / scene_script - XYTriggers / xy_trigger → CoordEvents / coord_event - Signposts / signpost → BGEvents / bg_event - PersonEvents / person_event → ObjectEvents / object_event 2017-12-24 10:46:34 -08:00			`.DummyScene:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`end`

Remaining map labels: UnknownText and MovementData 2018-03-01 14:33:43 -08:00			`Script_BattleRoom:`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn`
change more labelss 2015-08-24 16:56:30 -07:00			`; beat all 7 opponents in a row`
Remaining map labels: UnknownText and MovementData 2018-03-01 14:33:43 -08:00			`Script_BattleRoomLoop:`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERBATTLEROOM_YOUNGSTER`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special LoadOpponentTrainerAndPokemonWithOTSprite`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`appear BATTLETOWERBATTLEROOM_YOUNGSTER`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`warpsound`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitsfx`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksIn`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
More Battle Tower map script constants, fewer raw hex values 2018-01-14 16:26:55 -08:00			`battletowertext BATTLETOWERTEXT_INTRO`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerBattle ; calls predef startbattle`
			`special FadeOutPalettes`
more 3pt macro labels; shorten 3pt macros to take just a label static addresses should be avoided anyway 2013-12-02 11:18:03 -08:00			`reloadmap`
Script commands don't have underscores 2018-02-02 18:09:17 -08:00			`ifnotequal $0, Script_FailedBattleTowerChallenge`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`readmem wNrOfBeatenBattleTowerTrainers`
Script commands don't have underscores 2018-02-02 18:09:17 -08:00			`ifequal BATTLETOWER_STREAK_LENGTH, Script_BeatenAllTrainers`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksOut`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`warpsound`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`disappear BATTLETOWERBATTLEROOM_YOUNGSTER`
			`applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksToPlayer`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceReceptionist`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
Pkmn -> Mon Since we're aiming for consistency across the codebase, I believe it includes a uniform way to refer to the creatures this game consists of in the labels of the code. The only exceptions to this rule are labels referring to things named through the use of the <PK><MN> or <PKMN> characters, in which case PKMN is used. Most of this was already consistent enough™, I just picked the convention with the most occurences and fixed the outliers. 2018-02-22 08:13:29 -08:00			`writetext Text_YourMonWillBeHealedToFullHealth`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
Music and sound effect constants in map events. 2014-04-30 03:04:35 -07:00			`playmusic MUSIC_HEAL`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special FadeOutPalettes`
			`special LoadMapPalettes`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`pause 60`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special FadeInPalettes`
Use labels for script specials instead of constants/static values. 2015-02-11 15:03:42 -08:00			`special RestartMapMusic`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_NextUpOpponentNo`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`yesorno`
change more labelss 2015-08-24 16:56:30 -07:00			`iffalse Script_DontBattleNextOpponent`
Remaining map labels: UnknownText and MovementData 2018-03-01 14:33:43 -08:00			`Script_ContinueAndBattleNextOpponent:`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceNextOpponent`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksAway`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump Script_BattleRoomLoop`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remaining map labels: UnknownText and MovementData 2018-03-01 14:33:43 -08:00			`Script_DontBattleNextOpponent:`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_SaveAndEndTheSession`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`yesorno`
change more labelss 2015-08-24 16:56:30 -07:00			`iffalse Script_DontSaveAndEndTheSession`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_SAVELEVELGROUP ; save level group`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_SAVEOPTIONS ; choose reward`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Music and sound effect constants in map events. 2014-04-30 03:04:35 -07:00			`playsound SFX_SAVE`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitsfx`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special FadeOutPalettes`
Use labels for script specials instead of constants/static values. 2015-02-11 15:03:42 -08:00			`special Reset`
Remaining map labels: UnknownText and MovementData 2018-03-01 14:33:43 -08:00			`Script_DontSaveAndEndTheSession:`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_CancelYourBattleRoomChallenge`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`yesorno`
change more labelss 2015-08-24 16:56:30 -07:00			`iffalse Script_ContinueAndBattleNextOpponent`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_CHALLENGECANCELED`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_06`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special FadeOutPalettes`
Clean up some hex values in map scripts 2018-01-09 15:45:25 -08:00			`warpfacing UP, BATTLE_TOWER_1F, 7, 7`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump Script_BattleTowerHopeToServeYouAgain`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Battle Tower 2015-11-03 12:05:19 -08:00			`Script_FailedBattleTowerChallenge:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`pause 60`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerFade`
Clean up some hex values in map scripts 2018-01-09 15:45:25 -08:00			`warpfacing UP, BATTLE_TOWER_1F, 7, 7`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_CHALLENGECANCELED`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_ThanksForVisiting`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
			`end`

Remaining map labels: UnknownText and MovementData 2018-03-01 14:33:43 -08:00			`Script_BeatenAllTrainers:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`pause 60`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerFade`
Clean up some hex values in map scripts 2018-01-09 15:45:25 -08:00			`warpfacing UP, BATTLE_TOWER_1F, 7, 7`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`Script_BeatenAllTrainers2:`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_CongratulationsYouveBeatenAllTheTrainers`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump Script_GivePlayerHisPrize`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`UnreferencedScript_0x9f4eb:`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_CHALLENGECANCELED`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_TooMuchTimeElapsedNoRegister`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
			`end`

Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`UnreferencedScript_0x9f4f7:`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_CHALLENGECANCELED`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`setval BATTLETOWERACTION_06`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_ThanksForVisiting`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_WeHopeToServeYouAgain`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
			`end`

Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`Text_ReturnedAfterSave_Mobile:`
Text macros in maps/. Looks fine at a glance. 2014-03-05 21:29:44 -08:00			`text "You'll be returned"`
			`line "after you SAVE."`
			`done`
remove incbins in BattleTower 2013-05-01 10:29:45 -07:00
map_header → map_def; map_header_2 → map_data 2018-01-16 19:57:19 -08:00			`BattleTowerBattleRoom_MapEvents:`
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0, 0 ; filler`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 2 ; warp events`
Align map event coordinate columns 2018-02-01 19:22:07 -08:00			`warp_event 3, 7, BATTLE_TOWER_HALLWAY, 4`
			`warp_event 4, 7, BATTLE_TOWER_HALLWAY, 4`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0 ; coord events`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0 ; bg events`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 2 ; object events`
Align map event coordinate columns 2018-02-01 19:22:07 -08:00			`object_event 4, 0, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_BATTLE_TOWER_BATTLE_ROOM_YOUNGSTER`
			`object_event 1, 6, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1`