Verfügbare Informationen zu "Random Text"
Qualität des Beitrags: Beteiligte Poster: Yoshio Forum: #TCL aus dem Unterforum: Bau Land Antworten: 1 Forum gestartet am: Donnerstag 11.01.2007 Sprache: deutsch Link zum Originaltopic: Random Text Letzte Antwort: vor 17 Jahren, 2 Monaten, 27 Tagen, 18 Stunden, 12 Minuten
Alle Beiträge und Antworten zu "Random Text"
Re: Random Text
Yoshio - 28.01.2007, 20:25Random Text
bind pub - !leck spass:leck
proc msgchan {chan msg} {puthelp "PRIVMSG $chan :$msg"}
proc actchan {chan msg} {puthelp "PRIVMSG $chan :\001ACTION $msg\001"}
proc spass:leck {nick host handle chan text} {
if {[string tolower [lindex $text 0]] == "BadGirl"} {
putchan $chan "OK $nick - hier haste ein eis - und nun verschwinde!"
} elseif {$text != ""} {
set wem [lindex $text 0]
# set r1 [rand 8]
# if {$r1 == 0} {set p1 "schreit"}
# if {$r1 == 1} {set p1 "stellt"}
# if {$r1 == 2} {set p1 "bringt"} Dieser Part wurde $r2 zugefügt
# if {$r1 == 3} {set p1 "schiebt"}
# if {$r1 == 4} {set p1 "zerrt"}
# if {$r1 == 5} {set p1 "schnappt"}
# if {$r1 == 6} {set p1 "greift"}
# if {$r1 == 7} {set p1 "schleift"}
set r2 [rand 7]
if {$r2 == 0} {set p2 "schreit wie ein bekloppter hund und freut sich das $nick, $text voll die muschi lecken will."}
if {$r2 == 1} {set p2 "zerrt eine gebrauchte Liege in channel .. Bitte $nick, aber megger nicht rum wenn deine zunge am ende weh tut wenn du zu stürmisch $text die votze lecken tust.!"}
if {$r2 == 2} {set p2 "schiebt ein Wasserbett in $chan .. Bitte $nick, nun wollen wir mal bissel was sehen wie du $text die nasse muschi voll durch schlecken und lecken tust."}
if {$r2 == 3} {set p2 "bringt geschwind ein taschentuch zu $nick, immer nach dem lecken mit $text schön den sabber von dein lippen ab wischen. .. p.s. bissel wasser hilft auch *g*" }
if {$r2 == 4} {set p2 "schnappt sich eine flasche sahne strizt $text die muschi voll, damit $nick auch mit zunge in dir sein kann *gg* hm.. $nick hast du überhaupt so ein langen lappen?" }
if {$r2 == 5} {set p2 "greift sich $text und wirft $text zu boden! bitte $nick! jetzt leck was das zeug hällt. p.s. aber nicht am arsch lecken schmeckt bestimmt nicht gut :p" }
if {$r2 == 6} {set p2 "schleift $text in eine dunkle kammer wo $nick schön wartet, Bitte $nick aber rutsch nicht ab beim lecken weiter unten is das a...loch und das schmeckt sicher nich ;)" }
set r3 [rand 4]
if {$r3 == 0} {set p3 "nu wollen wir aber mal was sehen $nick und $text"}
if {$r3 == 1} {set p3 "ich hoffe du hast spass $text ;)"}
if {$r3 == 2} {set p3 "Frauen an der Macht oder $text :))"}
if {$r3 == 3} {set p3 "arg mir juckt da jetzt auch was :("}
if {$r3 == 4} {set p3 "schieb die möhre in die röhre"}
set arg1 [lindex $text 1]
set arg2 [lindex $text 2]
set arg3 [lindex $text 3]
set arg4 [lindex $text 4]
set arg5 [lindex $text 5]
actchan $chan "$p2"
msgchan $chan "$p3"
}
}
Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken
Weitere Beiträge aus dem Forum #TCL
Leck Code mit Random Text - gepostet von Yoshio am Sonntag 28.01.2007
Looksharp.at ist online! - gepostet von HighAce am Sonntag 15.04.2007
Ähnliche Beiträge wie "Random Text"
32min Random Arena lol - Hans Olo (Samstag 15.04.2006)
Bilder in einem Text einfügen - drohne (Donnerstag 09.08.2007)
Code für Buttons - Anonymous (Mittwoch 30.11.2005)
28. Spieltag - zepy02 (Freitag 01.02.2013)
Text für Einladung - melek1 (Dienstag 06.03.2007)
code - Elchi (Dienstag 21.08.2007)
Text SB - dagober7 (Montag 29.01.2007)
Ein dummer spruch im Theater Text - Charly (Samstag 12.08.2006)
Hier ein text für euch - dan the fan (Dienstag 25.04.2006)
Frage:Freunde Code - Anonymous (Dienstag 29.11.2005)