Comandos de Scripting

[♥ Stream ♥]

A continuación podreis ver la lista completa de comandos disponibles para ser usados via scripting en AlterEngine.

Como la mayoria sabeis nos basamos en Eclipse Source, por lo que usamos el motor de scripting de Eclipse, esta lista ha sido elaborada por Xenonyte de Eclipse.

Cita:Function GetVar(file As String, Header As String, Var As String) As String

Command Name: GetVar.
Parameters: Filename (string), SectionHeader (string), VariableName (string).
Description: this gets a variable value out of an INI file.
Return value: the variable value.

Cita:Sub PutVar(file As String, Header As String, Var As String, Value As String)

Command Name: PutVar.
Parameters: Filename (string), SectionHeader (string), VariableName (string), VariableValue (string).
Description: this sets a variable value in an INI file.
Return value: no return value.

Cita:Sub AdminMsg(Msg As String, Color As Byte)

Command Name: AdminMsg.
Parameters: Message (string), Color (byte).
Description: this sends an administrative message to the game.
Return value: no return value.

Cita:Sub GlobalMsg(Msg As String, Color As Byte)

Command Name: GlobalMsg.
Parameters: Message (string), Color (byte).
Description: this sends a global message to the game.
Return value: no return value.

Cita:Sub PlayerMsg(Index As Long, Msg As String, Color As Byte)

Command Name: PlayerMsg.
Parameters: Index (long), Message (string), Color (byte).
Description: this sends a player message to the player with Index as index in the game.
Return value: no return value.

Cita:Sub MapMsg(MapIndexAs Long, Msg As String, Color As Byte)

Command Name: MapMsg.
Parameters: MapIndex (long), Msg (string), Color (byte).
Description: sends a map message to the map as MapIndex in the game.
Return value: no return value.

Cita:Sub AlertMsg(Index As Long, Msg As String)

Command Name: AlertMsg.
Parameters: Index (long), Msg (string).
Description: sends an alert message to the player as Index in the game.
Return value: no return value.

Cita:Function GetPlayerLogin(Index As Long) As String

Command Name: GetPlayerLogin.
Parameters: Index (long).
Description: this gets the account name of the player.
Return value: the account name of the player.

Cita:Function GetPlayerName(Index As Long) As String

Command Name: GetPlayerName.
Parameters: Index (long).
Description: this gets the character name of the player.
Return value: the character name of the player.

Cita:Function GetPlayerGuild(Index As Long) As String

Command Name: GetPlayerGuild.
Parameters: Index (long).
Description: this gets the guild name of the player's guild.
Return value: the guild name of the player's guild.

Cita:Function GetPlayerGuildAccess(Index As Long) As Long

Command Name: GetPlayerGuildAccess.
Parameters: Index (long).
Description: this gets the guild access level of the player.
Return value: the guild access level of the player.

Cita:Sub SetPlayerGuildAccess(Index As Long, GuildAccess As Long)

Command Name: SetPlayerGuildAccess.
Parameters: Index (long), GuildAccess (long).
Description: this sets the guild access level of the player.
Return value: no return value.

Cita:Sub SetPlayerGuild(Index As Long, Guild As String)

Command Name: SetPlayerGuild.
Parameters: Index (long), Guild (string).
Description: this sets the guild of the player.
Return value: no return value.

Cita:Function GetPlayerClass(Index As Long) As Long

Command Name: GetPlayerClass.
Parameters: Index (long).
Description: this gets the class of the player.
Return value: the player's class.

Cita:Sub SetPlayerClass(Index As Long, ClassNum As Long)

Command Name: SetPlayerClass.
Parameters: Index (long), ClassNum (long).
Description: this sets the class of the player.
Return value: no return value.

Cita:Function GetPlayerClassName(Index As Long) As String

Command Name: GetPlayerClassName.
Parameters: Index (long).
Description: this gets the name of the player's class.
Return value: the name of the player's class.

Cita:Function GetPlayerSprite(Index As Long) As Long

Command Name: GetPlayerSprite.
Parameters: Index (long).
Description: this gets the sprite number of the player.
Return value: the player's sprite.

Cita:Sub SetPlayerSprite(Index As Long, Sprite As Long)

Function GetPlayerLevel(Index As Long) As Long

Sub SetPlayerLevel(Index As Long, Level As Long)

Function GetPlayerNextLevel(Index As Long) As Long

Function GetPlayerExp(Index As Long) As Long

Sub SetPlayerExp(Index As Long, Exp As Long)

Function GetPlayerAccess(Index As Long) As Long

Sub SetPlayerAccess(Index As Long, Access As Long)

Sub MapMsg(ByVal MapNum As Long, ByVal Msg As String, ByVal Color As Byte)

Sub AlertMsg(ByVal index As Long, ByVal Msg As String)

Function GetPlayerLogin(ByVal index As Long) As String

Function GetPlayerName(ByVal index As Long) As String

Function GetPlayerGuild(ByVal index As Long) As String

Function GetPlayerGuildAccess(ByVal index As Long) As Long

Sub SetPlayerGuildAccess(ByVal index As Long, ByVal GuildAccess As Long)

Sub SetPlayerGuild(ByVal index As Long, ByVal Guild As String)

Function GetPlayerClass(ByVal index As Long) As Long

Sub SetPlayerClass(ByVal index As Long, ByVal ClassNum As Long)

Function GetPlayerClassName(ByVal index As Long) As String

Function GetPlayerSprite(ByVal index As Long) As Long

Sub SetPlayerSprite(ByVal index As Long, ByVal Sprite As Long)

Function GetPlayerLevel(ByVal index As Long) As Long

Sub SetPlayerLevel(ByVal index As Long, ByVal LEVEL As Long)

Function GetPlayerNextLevel(ByVal index As Long) As Long

Function GetPlayerExp(ByVal index As Long) As Long

Sub SetPlayerExp(ByVal index As Long, ByVal Exp As Long)

Function GetPlayerAccess(ByVal index As Long) As Long

Sub SetPlayerAccess(ByVal index As Long, ByVal Access As Long)

Function GetPlayerPK(ByVal index As Long) As Long

Sub SetPlayerPK(ByVal index As Long, ByVal PK As Long)

Function GetPlayerHP(ByVal index As Long) As Long

Sub SetPlayerHP(ByVal index As Long, ByVal HP As Long)

Function GetPlayerMP(ByVal index As Long) As Long

Sub SetPlayerMP(ByVal index As Long, ByVal MP As Long)

Function GetPlayerSP(ByVal index As Long) As Long

Sub SetPlayerSP(ByVal index As Long, ByVal SP As Long)

Function GetPlayerMaxHP(ByVal index As Long) As Long

Function GetPlayerMaxMP(ByVal index As Long) As Long

Function GetPlayerMaxSP(ByVal index As Long) As Long

Function GetClassMaxHP(ByVal ClassNum As Long) As Long

Function GetClassMaxMP(ByVal ClassNum As Long) As Long

Function GetClassMaxSP(ByVal ClassNum As Long) As Long

Function GetClassSTR(ByVal ClassNum As Long) As Long

Function GetClassDEF(ByVal ClassNum As Long) As Long

Function GetClassSPEED(ByVal ClassNum As Long) As Long

Function GetClassMAGI(ByVal ClassNum As Long) As Long

Function GetPlayerSTR(ByVal index As Long) As Long

Sub SetPlayerSTR(ByVal index As Long, ByVal Str As Long)

Function GetPlayerDEF(ByVal index As Long) As Long

Sub SetPlayerDEF(ByVal index As Long, ByVal Def As Long)

Function GetPlayerSPEED(ByVal index As Long) As Long

Sub SetPlayerSPEED(ByVal index As Long, ByVal Speed As Long)

Function GetPlayerMAGI(ByVal index As Long) As Long

Sub SetPlayerMAGI(ByVal index As Long, ByVal Magi As Long)

Function GetPlayerPOINTS(ByVal index As Long) As Long

Sub SetPlayerPOINTS(ByVal index As Long, ByVal POINTS As Long)

Function GetPlayerMap(ByVal index As Long) As Long

Sub SetPlayerMap(ByVal index As Long, ByVal MapNum As Long)

Function GetPlayerX(ByVal index As Long) As Long

Sub SetPlayerX(ByVal index As Long, ByVal X As Long)

Function GetPlayerY(ByVal index As Long) As Long

Sub SetPlayerY(ByVal index As Long, ByVal Y As Long)

Function GetPlayerDir(ByVal index As Long) As Long

Sub SetPlayerDir(ByVal index As Long, ByVal Dir As Long)

Function GetPlayerIP(ByVal index As Long) As String

Function GetPlayerInvItemNum(ByVal index As Long, ByVal InvSlot As Long) As Long

Sub SetPlayerInvItemNum(ByVal index As Long, ByVal InvSlot As Long, ByVal ItemNum As Long)

Function GetPlayerInvItemValue(ByVal index As Long, ByVal InvSlot As Long) As Long

Sub SetPlayerInvItemValue(ByVal index As Long, ByVal InvSlot As Long, ByVal ItemValue As Long)

Function GetPlayerInvItemDur(ByVal index As Long, ByVal InvSlot As Long) As Long

Sub SetPlayerInvItemDur(ByVal index As Long, ByVal InvSlot As Long, ByVal ItemDur As Long)

Function GetPlayerSpell(ByVal index As Long, ByVal SpellSlot As Long) As Long

Sub SetPlayerSpell(ByVal index As Long, ByVal SpellSlot As Long, ByVal SpellNum As Long)

Function GetPlayerArmorSlot(ByVal index As Long) As Long

Sub SetPlayerArmorSlot(ByVal index As Long, InvNum As Long)

Function GetPlayerWeaponSlot(ByVal index As Long) As Long

Sub SetPlayerWeaponSlot(ByVal index As Long, InvNum As Long)

Function GetPlayerHelmetSlot(ByVal index As Long) As Long

Sub SetPlayerHelmetSlot(ByVal index As Long, InvNum As Long)

Function GetPlayerShieldSlot(ByVal index As Long) As Long

Sub SetPlayerShieldSlot(ByVal index As Long, InvNum As Long)

Function GetPlayerNecklaceSlot(ByVal index As Long) As Long

Sub SetPlayerNecklaceSlot(ByVal index As Long, InvNum As Long)

Function GetPlayerRingSlot(ByVal index As Long) As Long

Sub SetPlayerRingSlot(ByVal index As Long, InvNum As Long)

Function GetPlayerLegsSlot(ByVal index As Long) As Long

Sub SetPlayerLegsSlot(ByVal index As Long, InvNum As Long)

Function GetMapBootMap(ByVal index As Long) As Long

Function GetMapBootX(ByVal index As Long) As Long

Function GetMapBootY(ByVal index As Long) As Long

Sub MutePlayer(ByVal index As Integer)

Sub UnMutePlayer(ByVal index As Integer)

Public Sub MakeDay()

Public Sub MakeNight()

Function IsScrolling() As Boolean

Function GetMaxPlayers() As Long

Sub SpawnItemSlot(ByVal MapItemSlot As Long, ByVal ItemNum As Long, ByVal ItemVal As Long, ByVal ItemDur As Long, ByVal MapNum As Long, ByVal X As Long, ByVal Y As Long)

Function IsConnected(ByVal index As Long) As Boolean

Function IsPlaying(ByVal index As Long) As Boolean

Sub SendInventory(ByVal index As Long)

Sub SendInventoryUpdate(ByVal index As Long, ByVal InvSlot As Long)

Sub SendIndexInventoryFromMap(ByVal index As Long)

Sub SendWornEquipment(ByVal index As Long)

Sub SendHP(ByVal index As Long)

Sub SendMP(ByVal index As Long)

Sub SendSP(ByVal index As Long)

Sub SendPTS(ByVal index As Long)

Sub SendStats(ByVal index As Long)

Sub Flash(ByVal index As Long, ByVal flashfile As String)

Sub Prompt(ByVal index As Long, ByVal question As String, ByVal Value As Long)

Sub PlaySound(ByVal index As Long, ByVal Sound As String)

Sub PlaySoundToMap(ByVal index As Long, ByVal Sound As String)

Sub SendPlayerData(ByVal index As Long)

Sub SendDataTo(ByVal index As Long, ByVal Data As String)

Sub SendDataToAll(ByVal Data As String)

Sub SendDataToAllBut(ByVal index As Long, ByVal Data As String)

Sub SendDataToMap(ByVal MapNum As Long, ByVal Data As String)

Sub SendDataToMapBut(ByVal index As Long, ByVal MapNum As Long, ByVal Data As String)

Sub SetPlayerName(ByVal index As Long, ByVal Name As String)

Function GetPlayerCharNum(ByVal index As Long) As Long

Function FindPlayer(ByVal Name As String) As Long

Sub PlayerWarp(ByVal index As Long, ByVal MapNum As Long, ByVal X As Long, ByVal Y As Long)

Sub JoinWarp(ByVal index As Long, ByVal MapNum As Long, ByVal X As Long, ByVal Y As Long)

Sub AddLog(ByVal Text As String, ByVal FN As String)

Sub HackingAttempt(ByVal index As Long, ByVal Reason As String)

Sub BattleMsg(ByVal index As Long, ByVal Msg As String, ByVal Color As Byte, ByVal Side As Long)

Function Rand(ByVal Low As Long, ByVal High As Long) As Long

Function GetPlayerBankItemNum(ByVal index As Long, ByVal BankSlot As Long) As Long

Sub SetPlayerBankItemNum(ByVal index As Long, ByVal BankSlot As Long, ByVal ItemNum As Long)

Function GetPlayerBankItemValue(ByVal index As Long, ByVal BankSlot As Long) As Long

Sub SetPlayerBankItemValue(ByVal index As Long, ByVal BankSlot As Long, ByVal ItemValue As Long)

Function GetPlayerBankItemDur(ByVal index As Long, ByVal BankSlot As Long) As Long

Sub SetPlayerBankItemDur(ByVal index As Long, ByVal BankSlot As Long, ByVal ItemDur As Long)

Function GetPlayerTarget(ByVal index As Long)

Sub SetTimer(ByVal Name As String, ByVal Interval As Long)

Function GetTimer(ByVal Name As String) As Long

Sub RemoveTimer(ByVal Name As String)

Sub SetTile(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long, ByVal xset As Long, ByVal yset As Long, ByVal tileset As Long, ByVal layer As Long)

Function GetTileX(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long, ByVal layer As Long)

Function GetTileY(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long, ByVal layer As Long)

Function GetTileSet(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long, ByVal layer As Long)

Sub SendMap(ByVal mapper As Long)

Sub SpellAnim(ByVal SpellNum As Long, ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Sub SetAttribute(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long, ByVal Attrib As Long, ByVal Data1 As Long, ByVal Data2 As Long, ByVal Data3 As Long, ByVal String1 As String, ByVal String2 As String, ByVal String3 As String)

Function GetAttribute(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Function GetTileData1(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Function GetTileData2(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Function GetTileData3(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Function GetTileString1(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Function GetTileString2(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Function GetTileString3(ByVal mapper As Long, ByVal X As Long, ByVal Y As Long)

Sub PlayerQueryBox(ByVal index As Long, ByVal Message As String, ByVal Script As Long)

Sub UpdatePaperDoll(ByVal index As Long)

Sub UpdateSprite(ByVal index As Long)

Sub SetMapNpcNumber(ByVal MapNum As Long, ByVal index As Long, ByVal Number As Long)

Sub SetMapNpcTarget(ByVal MapNum As Long, ByVal index As Long, ByVal Target As Long)

Public Sub SetMapName(ByVal MapNum As Long, ByVal MapName As String)

Sub SetMapNpcDir(ByVal MapNum As Long, ByVal index As Long, ByVal Direction As Long)

Sub SetMapNpcY(ByVal MapNum As Long, ByVal index As Long, ByVal NPC_Y As Long)

Sub SetMapNpcX(ByVal MapNum As Long, ByVal index As Long, ByVal NPC_X As Long)

Sub SetMapNpcHP(ByVal MapNum As Long, ByVal index As Long, ByVal HitPoints As Long)

Sub SendNPC(ByVal MapNum As Long, ByVal MapNpcNum As Long)

Function GetNpcMaxHP(ByVal index As Long) As Long

Function GetMapNpcNumber(ByVal MapNum As Long, ByVal index As Long) As Long

Function GetMapNpcHP(ByVal MapNum As Long, ByVal index As Long) As Long

Function GetNpcName(ByVal Number As Long) As String

Function GetNpcBehavior(ByVal Number As Long) As Long

Function GetNpcExp(ByVal Number As Long) As Long

Function GetNpcDefense(ByVal Number As Long) As Long

Function GetNpcStrength(ByVal Number As Long) As Long

Sub SendIndexWornEquipment(ByVal index As Long)

Sub SendIndexWornEquipmentFromMap(ByVal index As Long)

Function GetPlayersOnMap(ByVal MapNum As Long) As Long

Sub ScriptSpawnNpc(ByVal MapNpcNum As Long, ByVal MapNum As Long, ByVal spawn_X As Long, ByVal spawn_Y As Long, ByVal NPCnum As Long)

Sub SpawnItemOnMap(ByVal Map As Long, ByVal X As Long, ByVal Y As Long, ByVal ItemNum As Long, ByVal Amount As Long, ByVal durability As Long)

Function GetItemName(ByVal Number As Long)

Sub ClearItemSlot(ByVal Map As Long, ByVal ItemIndex As Long)

Sub SendWhosOnline(ByVal index As Integer)

Sub GoShopping(ByVal index As Long, ByVal ShopNum As Long)

Sub LockPlayer(ByVal index As Long, ByVal Locked As Long)

Function IsPlayerLocked(ByVal index As Long) As Boolean

Public Sub SetServerTime(ByVal Time_Hour As Long, ByVal Time_Minute As Long, ByVal Time_Second As Long)

Function GetServerTime(ByVal TimeType As Long) As Long

Function GetInvItemslot(index, F_item_num, F_Min_value, F_Min_dur)

Sub GivePlayerItemToSlot(index, F_slot, F_num, F_Val, F_dur)

Sub GivePlayerItem(index, F_num, F_Val, F_dur)

Sub TextBubble(player_index, bubble_index, F_text, F_map, F_X, F_Y, F_colour)

Sub MapTextBubble(bubble_index, F_text, F_map, F_X, F_Y, F_colour)

Function GetMapName(F_map)

Function GetMapUp(F_map)

Function GetMapDown(F_map)

Function GetMapLeft(F_map)

Function GetMapRight(F_map)

Sub CustomMenuShow(ByVal index As Long, ByVal Title As String, ByVal FileName As String, ByVal closable As Long)

Sub CustomMenuClose(ByVal index As Long)

Sub CustomMenuPicture(ByVal player_index As Long, ByVal picture_index As Long, ByVal FileName As String, ByVal Left As Long, ByVal top As Long)

Sub CustomMenuLabel(ByVal player_index As Long, ByVal picture_index As Long, ByVal caption As String, ByVal Left As Long, ByVal top As Long, ByVal customsize As Long, ByVal customcolour As Long, ByVal alignment As Long, ByVal width As Long, ByVal height As Long)

Sub CustomMenuTextBox(ByVal player_index As Long, ByVal customIndex As Long, ByVal width As Long, ByVal Left As Long, ByVal top As Long, ByVal Text As String)

Function GetPlayerMenuClickTitle(ByVal player_index As Long)

Function GetPlayerMenuClickMsg(ByVal player_index As Long)

Sub LoadInternet(ByVal index As Long, ByVal address As String)

Sub UpdatePlayerMenuText(ByVal player_index As Long, ByVal box_index As Long)

Function GetPlayerMenuText(ByVal player_index As Long)

Sub NPCMoving(ByVal MapNum As Long, ByVal MapNpcNum As Long, ByVal Direction As Long, ByVal Speed As Long)

Function GetPlayerDirX(index)

Function GetPlayerDirY(index)

Sub SetSpeed(ByVal index As Long, ByVal Movement As String, ByVal Speed As Long)

Function GetNpcX(ByVal MapNum As Long, ByVal MapNpcNum As Long)

Function GetPlayerTargetNpc(ByVal index As Long)

Function GetNpcY(ByVal MapNum As Long, ByVal MapNpcNum As Long)

Sub SetWeather(ByVal MapNum As Long, ByVal Weather As Long, ByVal Interval As Long)

Function GetWeather(ByVal MapNum As Long)

Sub Image(ByVal index As Long, ByVal X As Long, ByVal Y As Long, ByVal Tile As Long, ByVal top As Long, ByVal height As Long, ByVal Left As Long, ByVal width As Long)

Sub SetPlayerNameColor(ByVal index As Long, ByVal Color As Long)

Sub LockSpells(ByVal index As Long, ByVal Locked As Long)

Sub LockItems(ByVal index As Long, ByVal Locked As Long)

Sub LockAttack(ByVal index As Long, ByVal Locked As Long)

Function GetIndexPlayerOnMap(ByVal Map As Long, ByVal X As Long, ByVal Y As Long)

Function GetPlayerHead(ByVal index As Long)

Sub SetPlayerHead(ByVal index As Long, ByVal Head As Long)

Function GetPlayerBody(ByVal index As Long)

Sub SetPlayerBody(ByVal index As Long, ByVal Body As Long)

Function GetPlayerleg(ByVal index As Long)

Sub SetPlayerLeg(ByVal index As Long, ByVal Leg As Long)

Sub MovePlayer(ByVal index As Long, ByVal Direction As Long, ByVal Movement As Long)

Sub SavePlayer(ByVal index As Long)

Function GetPlayerGender(ByVal index As Long) As Long

Function GetPlayerPaperdoll(ByVal index As Long) As Byte

Sub SetPlayerPaperdoll(ByVal index As Long, ByVal Mode As Byte)

Sub ChangeMapName(ByVal index As Long, ByVal Name As String)

Sub PlayerMapDropItem(ByVal index As Long, ByVal InvNum As Long, ByVal Amount As Long)

Function ScriptGetTickCount() As Long

Function GetMaxMapX() As Byte

Function GetMaxMapY() As Byte

Sub SetMapMoral(ByVal MapNum As Long, ByVal Moral As Long)

Function GetMapMoral(ByVal MapNum As Long) As Byte

Sub ShopReload(ByVal ShopNum As Long)

Sub DamageNPC(ByVal index As Long, ByVal NPCnum As Long, ByVal Damage As Long)

Sub DamagePlayer(ByVal index As Long, ByVal PIndex As Long, ByVal Damage As Long)

Sub NPCAttack(ByVal X As Long, ByVal Target As Long, ByVal Damage As Long)

Sub FireArrow(ByVal index As Long, ByVal arrow As Long, ByVal Dir As Long)

Cita:Public Function GetPetHp(ByVal Index As Long) As Long


Public Sub SetPetHp(ByVal Index As Long, ByVal HP As Long)


Public Function GetPetLevel(ByVal Index As Long) As Long


Public Sub SetPetLevel(ByVal Index As Long, ByVal Level As Long)


Public Function GetPetSTR(ByVal Index As Long) As Long


Public Sub SetPetSTR(ByVal Index As Long, ByVal STR As Long)


Public Function GetPetDEF(ByVal Index As Long) As Long


Public Function GetPetSPEED(ByVal Index As Long) As Long


Public Sub SetPetSPEED(ByVal Index As Long, ByVal Speed As Long)


Public Function GetPetMAGI(ByVal Index As Long) As Long


Public Sub SetPetMAGI(ByVal Index As Long, ByVal Magi As Long)


Public Sub SetPetDEF(ByVal Index As Long, ByVal DEF As
Long)


Public Function GetPetX(ByVal Index As Long) As Long


Public Function GetPetY(ByVal Index As Long) As Long


Public Function SetPetToGo(ByVal Index As Long, ByVal X As Long, ByVal y As Long)


Public Function IsPetAliveOnLogin(ByVal Index As Long) As Long


Public Sub SetPlayerPetSprite(ByVal Index As Long, ByVal PetSprite As Long)


Public Function GetPlayerPetSprite(ByVal Index As Long) As Long


Public Sub SetPlayerPetAlive(ByVal Index As Long, ByVal PetAlive As Long)


Public Function GetPlayerPetAlive(ByVal Index As Long) As Long


Public Sub SetPlayerPetMap(ByVal Index As Long, ByVal PetMap As Long)


Public Function GetPlayerPetMap(ByVal Index As Long) As Long


Public Sub SetPlayerPetX(ByVal Index As Long, ByVal PetX As Long)


Public Function GetPlayerPetX(ByVal Index As Long) As Long


Public Sub SetPlayerPetY(ByVal Index As Long, ByVal PetY As Long)


Public Function GetPlayerPetY(ByVal Index As Long) As Long


Public Sub SetPlayerPetDIR(ByVal Index As Long, ByVal PetDIR As Long)


Public Function GetPlayerPetDIR(ByVal Index As Long) As Long


Public Sub SetPlayerPetHP(ByVal Index As Long, ByVal PetHP As Long)


Public Function GetPlayerPetHP(ByVal Index As Long) As Long


Public Sub SetPlayerPetSP(ByVal Index As Long, ByVal PetSP As Long)

Public Function GetPlayerPetSP(ByVal Index As Long) As Long


Public Sub SetPlayerPetMP(ByVal Index As Long, ByVal PetMP As Long)

Public Function GetPlayerPetMP(ByVal Index As Long) As Long


Public Sub SetPlayerPetFP(ByVal Index As Long, ByVal PetFP As Long)


Public Function GetPlayerPetFP(ByVal Index As Long) As Long


Public Sub SetPlayerPetMaxHP(ByVal Index As Long, ByVal PetMaxHP As Long)


Public Function GetPlayerPetMaxHP(ByVal Index As Long) As Long


Public Sub SetPlayerPetMaxSP(ByVal Index As Long, ByVal PetMaxSP As Long)


Public Function GetPlayerPetMaxSP(ByVal Index As Long) As Long


Public Sub SetPlayerPetMaxMP(ByVal Index As Long, ByVal PetMaxMP As Long)


Public Function GetPlayerPetMaxMP(ByVal Index As Long) As Long


Public Sub SetPlayerPetMaxFP(ByVal Index As Long, ByVal PetMaxFP As Long)


Public Function GetPlayerPetMaxFP(ByVal Index As Long) As Long


Public Sub SetPlayerPetLevel(ByVal Index As Long, ByVal PetLevel As Long)


Public Function GetPlayerPetLevel(ByVal Index As Long) As Long


Public Sub SetPlayerPetSTR(ByVal Index As Long, ByVal PetSTR As Long)


Public Function GetPlayerPetSTR(ByVal Index As Long) As Long


Public Sub SetPlayerPetDEF(ByVal Index As Long, ByVal PetDEF As Long)


Public Function GetPlayerPetDEF(ByVal Index As Long) As Long


Public Sub SetPlayerPetMAGI(ByVal Index As Long, ByVal PetMAGI As Long)


Public Function GetPlayerPetMAGI(ByVal Index As Long) As Long


Public Sub SetPlayerPetSPEED(ByVal Index As Long, ByVal PetSPEED As Long)


Public Function GetPlayerPetSPEED(ByVal Index As Long) As Long


Public Sub SetPlayerPetEXP(ByVal Index As Long, ByVal PetEXP As Long)


Public Function GetPlayerPetEXP(ByVal Index As Long) As Long


Public Sub SetPlayerPetPOINTS(ByVal Index As Long, ByVal PetPOINTS As Long)


Public Function GetPlayerPetPOINTS(ByVal Index As Long) As Long


Public Sub SetPlayerPetNAME(ByVal Index As Long, ByVal PetNAME As String)


Public Function GetPlayerPetNAME(ByVal Index As Long) As String


Public Sub SetPlayerPetTNL(ByVal Index As Long, ByVal PetTNL As Long)


Public Function GetPlayerPetTNL(ByVal Index As Long) As Long


Public Function GetPetPOINTS(ByVal Index As Long) As Long


Public Sub SetPetPOINTS(ByVal Index As Long, ByVal POINTS As Long)


Public Function GetPetMAXHP(ByVal Index As Long) As Long


Public Function GetPetMAXSP(ByVal Index As Long) As Long


Public Function GetPetMAXMP(ByVal Index As Long) As Long


Public Function GetPetMAXFP(ByVal Index As Long) As Long


Public Function GetPetSP(ByVal Index As Long) As Long


Public Sub SetPetSP(ByVal Index As Long, ByVal SP As Long)


Public Function GetPetMP(ByVal Index As Long) As Long


Public Sub SetPetMP(ByVal Index As Long, ByVal MP As Long)


Public Function GetPetFP(ByVal Index As Long) As Long


Public Sub SetPetFP(ByVal Index As Long, ByVal FP As Long)


Public Function GetPetExp(ByVal Index As Long) As Long


Public Sub SetPetExp(ByVal Index As Long, ByVal EXP As Long)


Public Function GetPetNextLevel(ByVal Index As Long) As Long

[6Dragon6]

Agregados comandos de SadScript para las mascotas.