AmJano (12.11.2012)
Thema: [VB] Brauche jemaden
-
12.11.2012, 00:51 #1
[VB] Brauche jemaden
Schönen Guten Abend,
ich brauche da jemand der sich in VB auskennt.
Paar Infos:
Bin gerade dabei ein MafiaBot zu machen, es fehlt nur noch eins das mit dem lu , sv usw.
Was kann ich dafür Bieten:
10x Knuddels kann ich leider nur dafür bieten (Falls Interesse)
Es seih denn es hat jemand das Paket ?
Derjenige bitte per PN melden!
Danke.
Mfg
-
12.11.2012, 01:17 #2
AW: [VB] Brauche jemaden
Was genau hat das nun Mit VB zu tun?!
Logg dir die Packete am besten selbst, sonst stehst du vor einem Problem und bist wieder auf andere Hilfe angewiesen, wenn was an den Packeten geändert wird.
B2T: Wende dich mal an DbzFreak1337
-
12.11.2012, 01:57 #3
AW: [VB] Brauche jemaden
So weit bin ich ja, aber es klappt nicht?!
PHP-Code:Dim input As String = "r\0James\0NICK\0-\0_NICK_ macht dir einen _leicht unverdächtigen_ Eindruck.\0 \0"
Dim msg As String = input.Split("\0")(4)
Dim toNick = msg.Substring(1, msg.IndexOf("_"))
Dim what = msg.Substring(1, msg.IndexOf("_"))
If what = "leicht verdächtigen" Then
client.Send("/tip " + toNick + " :lv") ' lv steht für leicht verdächtigt'
End If
-
12.11.2012, 03:12 #4
AW: [VB] Brauche jemaden
Gibt es sowas wie .contains in der Lib nicht? Gab es früher doch auch.. dann einfach eine If-Abfrage machen und denn su sv usw.. senden.
-
12.11.2012, 14:09 #5
AW: [VB] Brauche jemaden
Code:Dim inp As String = "r" & vbNullChar & "James" & vbNullChar & "NICK" & vbNullChar & "-" & vbNullChar & "_NICK_ macht dir einen _leicht verdächtigen_ Eindruck." & vbNullChar & " " & vbNullChar Dim msg As String = inp.Split(ControlChars.NullChar)(4) Dim index As Integer = msg.IndexOf("_", 1) If index > 0 Then Dim toNick As String = msg.Substring(1, index - 1) index = msg.IndexOf("_", toNick.Length + 2) If index > 0 Then index += 1 Dim state As String = msg.Substring(index, msg.IndexOf("_", index + 1) - index) Select Case state Case "leicht verdächtigen" client.Send(String.Format("/tip {0}:{1}", toNick, "lv")) Exit Select End Select End If End If
PHP-Code:string inp = "r\0James\0NICK\0-\0_NICK_ macht dir einen _leicht verdächtigen_ Eindruck.\0 \0";
string msg = inp.Split('\0')[4];
int index = msg.IndexOf('_', 1);
if (index > 0)
{
string toNick = msg.Substring(1, index - 1);
index = msg.IndexOf('_', toNick.Length + 2);
if (index > 0)
{
index++;
string state = msg.Substring(index, msg.IndexOf('_', index + 1) - index);
switch (state)
{
case "leicht verdächtigen":
client.Send(string.Format("/tip {0}:{1}", toNick, "lv"));
break;
}
}
}
-
The Following User Says Thank You to DnL For This Useful Post:
Ähnliche Themen
-
Brauche ich ein Virenprogramm auf Android?
Von PartyFreak im Forum AndroidAntworten: 16Letzter Beitrag: 03.01.2014, 03:28 -
[Liebe] Brauche Hilfe -.-
Von Disturbed im Forum ZwischenmenschlichesAntworten: 13Letzter Beitrag: 03.06.2012, 19:46
Diese Seite nutzt Cookies, um das Nutzererlebnis zu verbessern. Klicken Sie hier, um das Cookie-Tracking zu deaktivieren.