Ayuda con script de manejo por pm

SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" Accept_Party 57
SET_EVENT "<&SCRIPTEVENT_CHAT&>" "<&SYSTEM_CURRENTFILE&>" Leer_Chat

PRINT_TEXT "-> ----------------------------------------------"
PRINT_TEXT "-> Inicio del Script: AutoAcceptParty"
PRINT_TEXT "-> ----------------------------------------------"

//Definimos el PJ al cual se asistirá
DEFINE_GLOBAL STRING MASTER "PJX"

DO
SLEEP 1000 //1 second
LOOP TRUE == TRUE

END_SCRIPT

//---------------------------------------------------
// Funcion Accept_Party
//---------------------------------------------------
FUNCTION Accept_Party

DEFINE INT PacketType 0
DEFINE STRING INVITER ""

PACKET.READ_BYTE PacketType
PACKET.READ_STRING INVITER

PRINT_TEXT "-> Recibiendo Invitacion de Party de: <&INVITER&>"

//Si es el PJ que puse en MASTER acepto
IF INVITER == MASTER
INJECT "43 01 00 00 00"
PRINT_TEXT "-> Party aceptada !"
ELSE
PRINT_TEXT "-> Party rechazada ! solo de <&MASTER&> se aceptaran invitaciones automaticamente."
ENDIF

RETURN VOID


//---------------------------------------------------
// Funcion Leer_Chat
//---------------------------------------------------
FUNCTION Leer_Chat

DEFINE STRING MSG_PT "pt"
DEFINE STRING MSG_TRADE "trade"
DEFINE STRING MSG_STOP "para"
DEFINE STRING MSG_FOLLOW "ven"
DEFINE STRING MSG_LEAVE "sal"
DEFINE STRING MSG_SIT "sit"
DEFINE STRING MSG_ASSIST "pega"
DEFINE STRING MSG_PVP "pvp"
DEFINE STRING MSG_HELP "help"

//Si el mensaje recibido es por wisp
IF MESSAGETYPE == CHANNEL_PRIVATE
PRINT_TEXT "-> Chat Privado Detectado - Enviado por <&SenderName&>"

//Si el mensaje recibido es del MASTER indicado
IF SenderName == MASTER
PRINT_TEXT "-> Mensaje de <&SenderName&> aceptado."

IF MESSAGE == MSG_PT
//Mando party al MASTER
COMMAND "/invite <&MASTER&>"
SLEEP 1000
PRINT_TEXT "-> Mandando party."
ENDIF

IF MESSAGE == MSG_TRADE
//Mando trade al MASTER
COMMAND "/target <&MASTER&>"
SLEEP 1000
COMMAND "/trade"
SLEEP 1000
PRINT_TEXT "-> Mandando trade."
ENDIF

IF MESSAGE == MSG_STOP
//Paro de seguir al MASTER
MOVE_TO "<&CHAR_X&>" "<&CHAR_Y&>" "<&CHAR_Z&>"
SLEEP 1000
COMMAND "/stand"
SLEEP 1000
PRINT_TEXT "-> Parar"
ENDIF

IF MESSAGE == MSG_FOLLOW
//Me pongo en follow
COMMAND "/target <&MASTER&>"
SLEEP 1000
COMMAND "/target <&MASTER&>"
PRINT_TEXT "-> Modalidad Follow - ON"
ENDIF

IF MESSAGE == MSG_LEAVE
//Salgo de la party
COMMAND "/leave"
SLEEP 1000
PRINT_TEXT "-> Se salio de la party."
ENDIF

IF MESSAGE == MSG_SIT
//Me siento
COMMAND "/sit"
SLEEP 1000
PRINT_TEXT "-> Se siento."
ENDIF

IF MESSAGE == MSG_ASSIST
//Asisto al master.
COMMAND "/assist <&MASTER&>"
SLEEP 1000
COMMAND "/attack"
SLEEP 1000
PRINT_TEXT "-> Ayudando al Master."
ENDIF

IF MESSAGE == MSG_PVP
//Asisto al master.
COMMAND "/assist <&MASTER&>"
SLEEP 1000
COMMAND "/attackforce"
SLEEP 1000
PRINT_TEXT "-> Ayudando al Master con el PvP."
ENDIF

IF MESSAGE == MSG_HELP
SAY_TEXT "<&CHANNEL_PRIVATE&>" "Comandos:" "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "pt = Te manda party" "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "trade = Te manda trade" "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "ven = Activa el follow." "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "para = Desactiva el follow." "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "sal = Quita de la party." "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "sit = Sentarse." "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "pega = Asistir al Master. "<&MASTER&>"
SLEEP 500
SAY_TEXT "<&CHANNEL_PRIVATE&>" "pvp = Asistir al Master con el pvp. "<&MASTER&>"
SLEEP 500
PRINT_TEXT "-> Comandos de ayuda enviados."
ENDIF
ELSE
PRINT_TEXT "-> Mensaje de <&SenderName&> rechazado."
ENDIF
ENDIF

RETURN VOID