1
Scripting / VBScripting help
« on: February 27, 2009, 07:53:42 PM »
ahh ok i under stand.
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
'talk
'0.2
Sub talk_Event_Load()
vbYellow "talk test loaded"
End Sub
sub talk_Event_UserTalk(Username, Flags, Message, Ping)
If Left(LCase(Text), Len(BotVars.Trigger) + 6) = BotVars.Trigger & "speak " Then
sayTheRest = Right(Message, Len(Message) - (Len(BotVars.Trigger) + 6)
AddQ sayTheRest
End If
End Sub
'talk
'0.1
Sub talk_Event_PressedEnter(Text)
If Left(LCase(Text), 11) = "/hai" Then
idk what to do here >.>
end sub
'talk
'0.1
sub {dont know what goes here, or is it talk_Event_Load()}
DSP Origin, "HAI PPL"
end sub