Knutschkugel
Banned
- Registriert
- 15 Februar 2008
- Beiträge
- 9
- Punkte Reaktionen
- 0
ich hab eig alle Threads dazu durchgelsen bin aber immer noch ned schlauer geworden wo ich die games eintragen muss, die angezeigt werden sollen wenn sie von einem Spieler aus der fl gejoint werden.
Hier mein BaalScript:
Hier mein BaalScript:
'bs
'1.0
Const d2_GERMAN_MESSAGE = "ihr freund * hat sich in ein diablo ii lord of destruction-spiel mit dem namen * eingeklinkt."
Sub bs_event_ServerInfo(Message)
If Match(LCase(Message), "*: *, (mutual) using diablo ii lord of destruction in the game *.baal", False) then
Dim TEMP_User, TEMP_Game
TEMP_User = Split(Split(Message, ": ")(1), ",")(0)
TEMP_Game = Replace(Split(Message, "game ")(1), "(private)", vbNullString)
AddQ TEMP_User & " is Baaling in: " & TEMP_Game
End If
End Sub
Sub bs_event_UserTalk(Username, Flags, Message, Ping)
If Left(Message, 6) = BotVars.Trigger & "game" then _
AddQ "/f l"
End Sub
Sub bs_event_WhisperFromUser(Username, Flags, Message)
If Match(LCase(Message), d2_GERMAN_MESSAGE, True) Then
Dim TEMP_User, TEMP_Game
TEMP_User = Split(Message)(2)
TEMP_Game = Replace(Split(Message, " Namen ")(1), "eingeklinkt." , "")
AddQ TEMP_User & " entered in: " & TEMP_Game
End If
End Sub
Sub bs_event_PressedEnter(Text)
Call bs_event_UserTalk(BotVars.Username, 0, Text, 0)
End Sub