16-09-2008, 03:23 AM
Ok...I was able to compile it without any errors, but it's not working. I'm typing "/aida" and it doesn't do anything. It's not even getting rid of the text after I type it and press enter.
Here is my code so far...
What have I done wrong? Sorry for all the trouble...
Here is my code so far...
Code:
' AIDA command
If Mid$(MyText, 1, 5) = "/aida" Then
MyText = Mid$(MyText, 5, Len(MyText) - 4)
Call SendData(CAida & END_CHAR)
End If
MyText = ""
Exit Sub
Code:
' :::::::::::::::::
' :: AIDA Packet ::
' :::::::::::::::::
Case CAida
If HasItem(Index, 200) Then
Call Aida
End If
Exit Sub
Code:
Public Sub Aida()
Call SetPlayerVital(Index, HP, GetPlayerMaxVital(Index, Vitals.HP, 5000))
End Sub
What have I done wrong? Sorry for all the trouble...