ArmannY Founder

Data inscrierii: 04/Iun/2008 Mesaje: 17
|
Trimis: 06/06/2008 16:44 Titlul subiectului: Adons pentru Helper ScriptS |
|
|
| Cod: | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; ;
; #L&L Helper (script) Addon, vers.2.1 (vers. modificata si inbunatatita de #L&L team) ;
; ;
; ;
; Author: ArmannY | Undernet.Org ;
; ;
; ;
; Modul de instalare: ;
; Download helper.rar/zip in calculator. ;
; Dezarhivati arhiva in directorul in care e instalat mirc-ul. ;
; Dintr-o fereastra de mIRC scrieti : /load -rs botlending.mrc ;
; Daca e cazul.. selectati yes la install. ;
; ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
alias init {
.enable #main
.enable #channel
.enable #clone
.enable #short
}
#main on
menu nicklist {
-
[Raspunde]: /msg # $snicks $+ : $$?="Textul de raspuns"
[ØROMANAØ]
.[ØServicii]
..ØGeneral
...ØIntreaba: /msg # $snicks $+ : Bine ai venit pe 4 $+ $chan spune problema intr-o singura linie te rog.
...ØConditii: /msg # $snicks $+ : pentru a primi un bot de la canalul 4 $+ $chan trebuie sa ai o medie de minim 8 oameni pe canal (fara X daca e cazul), sa fii logat cu userul de 500 la X (daca nu ai X - trebuie sa ai statutul de op[@] si sa ai un psyBNC pe canal pentru a putea da autoop la bot).
...ØNo Bots Free: /msg # $snicks $+ : nu sunt boti cu canale libere, revino in 1-2 zile. Daca nu mai ai alte intrebari, te rog, /part.
...ØNO Bots Now: /msg # $snicks $+ : deocamdata canalul este inchis, te rog sa revii in circa 1-2 zile. Daca nu mai ai alte intrebari te rog /part.
...ØBots DoWn: /msg # $snicks $+ : deocamdata avem boti down, te rog sa astepti pana vor reveni, daca nu mai ai intrebari te rog /part.
...ØNo admin: /msg # $snicks $+ : pentru ocazie nu e nici un admin online, te rog revino mai tarziu, daca nu mai ai intrebari te rog /part.
...ØClient Ajutat: /msg # $snicks $+ : ai primit un BOT de la 4 $+ $chan ca sa vezi comenzile foloseste !commands pe canal, explicatii la comenzi & flaguri pe http://1and1.uv.ro , daca mai ai intrebari in plus sau ai necesitate de ajutor la setarea BOT-ului intreaba acum pe canal, daca nu te rog /part.
...ØAlte Intrebari ?: /msg # $snicks $+ : daca nu mai ai alte intrebari, te rog, /part.
...ØRaspunzi la "mersi": /msg # $snicks $+ : cu placere. Echipa 4 $+ $chan iti ureaza un chat placut in continuare, daca nu mai ai alte intrebari, te rog, /part.
.ØAdauga
..ØX
...ØAcc 499 & Autoop:{
/set %temp_chan $$?="Canal care este ajutat (ex: #Quest)!"
/set %temp_user $$?="Userul botului (ex: UPprotect)!"
/msg # $snicks $+ : /msg x adduser %temp_chan %temp_user 499 , si: /msg x modinfo %temp_chan automode %temp_user op - Astept confirmarile aici pe canal.
}
..ØpsyBNC
...ØAutoop(user): /msg # $snicks $+ : /addautoop $$?="Canal care este ajutat. (ex: #Quest)!" :*!*@ $+ $$?="Userul botului (ex: UpProtect)!" $+ .users.undernet.org - Astept confirmarea aici pe canal.
...ØAutoop(ip): /msg # $snicks $+ : /addautoop $$?="Canal care este ajutat. (ex: #Quest)!" :*!*@ $+ $$?="Masca botului (ex: Use.The.Force.net sau 212.93.45.7)!" - Astept confirmarea aici pe canal.
.ØDe ce
..Ø499 access: /msg # $snicks $+ : conform termenilor & regulilor %canal trebuie sa dai access de 499 + autoop la X pentru BOT, daca BOT-ul are remuser el pleaca. Ai dreptul de a cere un BOT din nou peste o saptamana.
..Ø15 pers: /msg # $snicks $+ : conform termenilor & regulilor %canal trebuie sa ai o medie de 15 oameni pe chan (fara X daca este cazul) pentru a avea un BOT , in caz contrar BOT-ul pleaca. Ai dreptul de a cere un BOT din nou in 2 saptamani.
..ØAutoop: /msg # $snicks $+ : conform termenilor & regulilor %canal trebuie sa asiguri OP pentru BOT, sa setezi autoop la un bnc de pe canal & si sa dai flagul +oaf la toti BOT-ii de pe canal, in caz contrar BOT-ul pleaca. Ai dreptul de a cere un BOT din nou peste o saptamana.
.ØNo help
..ØTrivia: /msg # $snicks $+ : nu indeplinesti conditiile ca sa fii ajutat, dupa ce vei scoate botul de trivia de pe canal vei fi ajutat, daca nu mai ai alte intrebari, te rog, /part.
..ØFlood: /msg # $snicks $+ : nu indeplinesti conditiile ca sa fii ajutat, dupa ce vei opri floodul de pe canal vei fi ajutat, daca nu mai ai alte intrebari, te rog, /part.
..ØNo ppl: /msg # $snicks $+ : nu indeplinesti conditiile ca sa fii ajutat, pentru a avea un BOT pe canal trebuie sa ai o medie de peste 10 persoane pe canal, daca nu mai ai alte intrebari, te rog, /part.
..ØBoti: /msg # $snicks $+ : nu indeplinesti conditiile ca sa fii ajutat, scoate toti botii de pe canal si poti reveni pentru a cere un bot, daca nu mai ai alte intrebari, te rog, /part.
..ØBOT: /msg # $snicks $+ : nu indeplinesti conditiile ca sa fii ajutat, ai deja pe canal un alt bot de pe un canal BotLending, daca nu mai ai alte intrebari, te rog, /part.
..ØNo BNC: /msg # $snicks $+ : nu indeplinesti conditiile ca sa fii ajutat, fa rost de cel putin 1 psyBNC pe care il vei seta sa dea autoop la BOT-ul nostru, daca nu mai ai alte intrebari, te rog, /part.
..ØNo 499: /msg # $snicks $+ : nu indeplinesti conditiile ca sa fii ajutat, doar cu acces de 500 la X poti cere un bot pentru un canal cu X, daca nu mai ai alte intrebari, te rog, /part.
.[ØComenziØ]
..ØGeneral
...Øpass: /msg # $snicks $+ : parola la BOT se seteaza de tine insuti. Pentru asta scrii : /msg BOTnick pass <parola ta>. Te asiguri sa ai o parola care nu poate fi usor ghicita! Parola se seteaza o singura data.
...Øauth: /msg # $snicks $+ : pentru autorizare la BOT se foloseste comanda auth. Pentru a te autoriza scrii : /msg BOTnick auth <parola ta>. Daca BOT-ul zice ca nu te cunoaste (ai alt host, nick) foloseste autorizare avansata - /msg BOTnick auth Parola_Ta Userul_Tau_La_BOT.
...Øadduser: /msg # $snicks $+ : pentru a da access cuiva folosesti urmatoarea comanda: !chattr <user> +<flag>. Unde <flag> e o litera sau un set de litere (n=owner, m=master, o=op, v=voice, f=friend, etc). Ca sa vezi toate flagurile & semnficatia lor verifica %site .
...Ødeluser: /msg # $snicks $+ : pentru a sterge accessul cuiva folosesti urmatoarea comanda: !remuser <user>. Sau poti doar sa ii modifici anumite drepturi modificand flagurile astfel !chattr <user> -<flag>.Unde <flag> e o litera sau un set de litere (n=owner, m=master, o=op, v=voice, f=friend, etc) .Ca sa vezi toate flagurile & ce inseamna verifica %site .
...Øchaninfo: /msg # $snicks $+ : pentru a vedea setarile canalului foloseste !chaninfo.
...Øchanset: /msg # $snicks $+ : pentru a seta anumite proprietati canalului foloseste !chanset +<setare>. Setarile le poti vedea folosind !chaninfo sau pe site %site .
...Øpermident: /msg # $snicks $+ : !userset permident on . Daca ai permident pus poti da comenzi botului fara sa te autentifici.
..ØProtectii
...ØProtectii canal
....Øantitake: /msg # $snicks $+ : ca sa ai o protectie cat mai buna antitake eu iti recomand setarile astea: modes +tn-ik, revenge-mode 1, flood-chan 7:20, flood-ctcp 2:20, flood-join 4:40, flood-kick 3:20, flood-deop 3:20, flood-nick 4:40, ban-time 0, +enforcebans, +dynamicbans, +protectops, +protectfriends, +dontkickops, +revenge, +cycle, +bitch, -autoop, -op .
....Østrict: /msg # $snicks $+ : strict activeaza un set de setari pentru protejarea canalului. ex: (+antipub, +anticolour, +antibold, +antireverse, +antiunderline, +antinotice, +antirepeat).
....Øparanoia: /msg # $snicks $+ : paranoia. Activeaza +antitake & +strict.
...ØAnti
....Øpub: /msg # $snicks $+ : !chanset +antipub. Pedepseste pe cei care fac reclama la alte canale, ban pe durata specificata in !chanset ban-time.
....Øcolour: /msg # $snicks $+ : !chanset +anticolour. Pedepseste pe cei care scriu colorat, ban pe durata specificata in !chanset ban-time.
....Øbold: /msg # $snicks $+ : !chanset +antibold. Pedepseste pe cei care scriu ingrosat, ban pe durata specificata in !chanset ban-time.
....Øunderline: /msg # $snicks $+ : !chanset +antiunderline. Pedepseste pe cei care scriu subliniat, ban pe durata specificata in !chanset ban-time.
....Ønotice: /msg # $snicks $+ : !chanset +antinotice. Pedepseste pe cei care fac notice, ban pe durata specificata in !chanset ban-time.
....Ørepeat: /msg # $snicks $+ : !chanset +antirepeat. Pedepseste pe cei care se repeta, ban pe durata specificata in !chanset ban-time.
....ØFlood
.....Ø-chan: /msg # $snicks $+ : !chanset flood-chan x:y (nu mai mult de x linii in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-ctcp: /msg # $snicks $+ : !chanset flood-ctcp x:y (nu mai mult de x ctcp in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-join: /msg # $snicks $+ : !chanset flood-join x:y (nu mai mult de x join in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-kick: /msg # $snicks $+ : !chanset flood-kick x:y (nu mai mult de x kickuri in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-deop: /msg # $snicks $+ : !chanset flood-deop x:y (nu mai mult de x deop in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-nick: /msg # $snicks $+ : !chanset flood-nick x:y (nu mai mult de x schimbari de nick in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
..ØProtectii user
...Øflaguri: /msg # $snicks $+ : Pentru a proteja un user de pe canalul tau poti sa dai anumite flaguri : +f (friend-userul nu va fi pedepsit) +P (protected - userul va fi protejat de deop/kick/ban. Cel care a comis actiunea va fi deopat) +H (heavy-protected - protejeaza userul impotriva deop/kick/ban. Cel care a comis actiunea va fi banat).
...Øprotectops: /msg # $snicks $+ : !chanset +protectops. Reopeaza un user care are +o daca userul e deopat.
...Øprotectfriends: /msg # $snicks $+ : !chanset +protectfriends. Reopeaza un user care are +f daca userul e deopat.
...Ødontkickops: /msg # $snicks $+ : !chanset dontkickops. Botul nu va pedepsii operatorii care fac flood-kick.
.[ØGeneralØ]
..ØNext: /msg # n
..ØHelped: /msg # h $1
..ØNoidle: /msg # b $1
..ØStats Purge: /msg # !stats $$?="Canal care este ajutat. (ex: #Quest)!" purge
..ØStats Join: /msg # !stats $$?="Canal care este ajutat. (ex: #Quest)!" join
..ØChannels free: /msg # !channels f
..ØVerifica X accessØ: /msg x access $$?="Canal care este ajutat. (ex: #Quest)!" $$?="Userul BOT-ului (ex: UpProtect)!"
-
[ØENGLEZAØ]
.[ØServicies]
..ØGeneral
...ØQuestion: /msg # $snicks $+ : Welcome on 4 $+ $chan say your problem in ONE LINE please.
...ØConditions: /msg # $snicks $+ : if u want a bot from 4 $+ $chan you must have a par to min 8 peoples on channel (without X if is the case), you must be logged at 500 user at X (if you don't have X - you have must op[@] and you must have a psyBNC on channel for get autoop to bot).
...ØNo Bots Free: /msg # $snicks $+ : we don't have bots with free channels, please comeback in 1-2 days. If you don't have any questions, please , /part .
...ØNO Bots Now: /msg # $snicks $+ : At this clipă the channel is close, Please comeback in 1-2 days. If you don't have any questions, please , /part .
...ØNo admin: /msg # $snicks $+ : At this moment isn't an admin online, please comeback later. If you don't have any questions, please , /part .
...ØClient Helped: /msg # $snicks $+ : You have receive a BOT from 4 $+ $chan if you want to see the commands use !commands on channel, explations from commands & flags on http://1and1.uv.ro , if you need help to set up the bot pls say now on the channel, if you don't have please, /part.
...ØAnother Questions ?: /msg # $snicks $+ : If you don't have any questions, please , /part.
...ØReply to "Thanks": /msg # $snicks $+ : with pleasure. 4 $+ $chan TEAM have a liked chat, If you don't have any questions, please , /part .
..ØAddEn
...ØX
....ØAcc 499 & Autoop:{
/set %temp_chan $$?="Channel to be helped (ex: #Quest)!"
/set %temp_user $$?="BOT users (ex: UPprotect)!"
/msg # $snicks $+ : /msg x adduser %temp_chan %temp_user 499 , si: /msg x modinfo %temp_chan automode %temp_user op - I wait the confirmations here on channel..
}
..ØpsyBNC
...ØAutoop(user): /msg # $snicks $+ : /addautoop $$?="Channel to be Helped. (ex: #Quest)!" :*!*@ $+ $$?="BOT user (ex: UpProtect)!" $+ .users.undernet.org - I wait the confirmation here on channel.
...ØAutoop(ip): /msg # $snicks $+ : /addautoop $$?="Channel to be Helped. (ex: #Quest)!" :*!*@ $+ $$?="BOT host (ex: Use.The.Force.net sau 212.93.45.7)!" - I wait the confirmation here on channel.
.ØWhy ?
..Ø499 access: /msg # $snicks $+ : conform the terms & rules %canal you must give 499 access + autoop at X for BOT, if the BOT have remuser he part the channel. You have right to aks from a BOT again after ONE week.
..Ø15 pers: /msg # $snicks $+ : conform the terms & rules %canal you must have a par to 15 peoples on channel (without X if the case) to have a BOT , in contrar case the BOT part the channel. You have right to aks from a BOT again after TWO weeks.
..ØAutoop: /msg # $snicks $+ : conform the terms & rules %canal you must ensure OP for BOT, to set autoop from a BNC to the channel and to get +oaf flags to all BOT-s on the channel, in contrar case the BOT part the channel. You have right to aks from a BOT again after ONE week.
.ØNo help
..ØTrivia: /msg # $snicks $+ : you don't have the performance to be helped, when you part the TRIVIA-BOT to the channel you will be helped, if you don't have any questions, please, /part.
..ØFlood: /msg # $snicks $+ : you don't have the performance to be helped, when you stop the flooding you will be helped, if you don't have any questions, please, /part.
..ØNo ppl: /msg # $snicks $+ : you don't have the performance to be helped, to have a BOT on channel you must have a par across 10 Persons on channel, if you don't have any questions, please, /part.
..ØBots: /msg # $snicks $+ : you don't have the performance to be helped, part all bots from the channel and you comeback to ask from a BOT, if you don't have any questions, please, /part.
..ØOther BOT: /msg # $snicks $+ : you don't have the performance to be helped, you have already a bot from another BotLending channel, if you don't have any questions, please, /part.
..ØNo BNC: /msg # $snicks $+ : you don't have the performance to be helped, you must have 1 psyBNC to set autoop from our BOT, if you don't have any questions, please, /part.
..ØNo 499: /msg # $snicks $+ : you don't have the performance to be helped, only persons with 500 at X can ask for a BOT to a channel with X, if you don't have any questions, please, /part.
.[ØCommandsØ]
..ØGeneral
...Øpass: /msg # $snicks $+ : Password to BOT it set up by you. For this write : /msg BOTnick pass <your password>. You have ensure to have a password who cannot be easyly predict! The password is set up ONE date.
...Øauth: /msg # $snicks $+ : for atuhorization to the BOT use auth command. To authorize write: /msg BOTnick auth <your password>. If the BOT don't recognize you (you have another host , nick) use advenced authorization - /msg BOTnick auth <your password> <user>.
...Øadduser: /msg # $snicks $+ : to give access someone use the next command: !chattr <user> +<flag>. Where <flag> is a letter or a letter set (n=owner, m=master, o=op, v=voice, f=friend, etc). If you wanna see the flags and the semnifications verify %site .
...Ødeluser: /msg # $snicks $+ : to remuser someone access use the next command: !remuser <user>. Or you can modify certain his/her certain modifycating the flags thereby !chattr <user> -<flag>.Where <flag> is a letter or a letter set (n=owner, m=master, o=op, v=voice, f=friend, etc) .If you wanna see the flags and the semnifications verify %site .
...Øchaninfo: /msg # $snicks $+ : to see the channel settings use !chaninfo.
...Øchanset: /msg # $snicks $+ : to set another settings from channel use !chanset +<settings>. The settins you can see using !chaninfo or on the site %site .
...Øpermident: /msg # $snicks $+ : !userset permident on . If you have permident on can you give commands on BOT without you autentificating.
.ØProtections
..ØChannel Protections
...Øantitake: /msg # $snicks $+ : if you want to have a better protection (antitake) i recommand you this settings: modes +tn-ik, revenge-mode 1, flood-chan 7:20, flood-ctcp 2:20, flood-join 4:40, flood-kick 3:20, flood-deop 3:20, flood-nick 4:40, ban-time 0, +enforcebans, +dynamicbans, +protectops, +protectfriends, +dontkickops, +revenge, +cycle, +bitch, -autoop, -op .
...Østrict: /msg # $snicks $+ : strict activation a set of settings to cover the channel ex: (+antipub, +anticolour, +antibold, +antireverse, +antiunderline, +antinotice, +antirepeat).
...Øparanoia: /msg # $snicks $+ : paranoia. Activate +antitake & +strict.
..ØAnti
...Øpub: /msg # $snicks $+ : !chanset +antipub. Penalize persons who does publicity from other channel/s, ban on standing specification in !chanset ban-time.
...Øcolour: /msg # $snicks $+ : !chanset +anticolour. Penalize persons who use collour letters, ban on standing specification in !chanset ban-time.
...Øbold: /msg # $snicks $+ : !chanset +antibold. Penalize persons who does writes bold, ban on standing specification in !chanset ban-time.
...Øunderline: /msg # $snicks $+ : !chanset +antiunderline. Penalize persons who writes underline, ban on standing specification in !chanset ban-time.
...Ønotice: /msg # $snicks $+ : !chanset +antinotice. Penalize persons who does notice, ban on standing specification in !chanset ban-time.
...Ørepeat: /msg # $snicks $+ : !chanset +antirepeat. Penalize persons who does repeat, ban on standing specification in !chanset ban-time.
....ØFlood
.....Ø-chan: /msg # $snicks $+ : !chanset flood-chan x:y (nu mai mult de x linii in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-ctcp: /msg # $snicks $+ : !chanset flood-ctcp x:y (nu mai mult de x ctcp in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-join: /msg # $snicks $+ : !chanset flood-join x:y (nu mai mult de x join in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-kick: /msg # $snicks $+ : !chanset flood-kick x:y (nu mai mult de x kickuri in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-deop: /msg # $snicks $+ : !chanset flood-deop x:y (nu mai mult de x deop in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
.....Ø-nick: /msg # $snicks $+ : !chanset flood-nick x:y (nu mai mult de x schimbari de nick in y secunde), in caz contrar ban pe durata specificata in !chanset ban-time.
..ØProtectii user
...Øflaguri: /msg # $snicks $+ : If you want to protect an user from your channel you can give him/her certain flags : +f (friend-user don't be punitive) +P (protected - the user will be protected from deop/kick/ban. The person who do this will be deopped) +H (heavy-protected - covered user from deop/kick/ban. The person who do this will be banned).
...Øprotectops: /msg # $snicks $+ : !chanset +protectops. Reopeaza an user who have +o flag if the user was deopped.
...Øprotectfriends: /msg # $snicks $+ : !chanset +protectfriends. Reop an user who have +f flag if the user was deopped.
...Ødontkickops: /msg # $snicks $+ : !chanset dontkickops. BOT do not certain operators who do flood-kick.
.[ØGeneralØ]
..ØNext: /msg # .next
..ØHelped: /msg # .helped $1
..ØNoidle: /msg # .noidle $1
..ØStats Purge: /msg # !stats $$?="Channel who will be helped. (ex: #Quest)!" purge
..ØStats Join: /msg # !stats $$?="Channel who will be helped. (ex: #Quest)!" join
..ØChannels free: /msg # !channels f
..ØVerifica X accessØ: /msg x access $$?="Canal care este ajutat. (ex: #Quest)!" $$?="Userul BOT-ului (ex: UpProtect)!"
}
#main end
#channel on
menu channel {
[ØMeniu BotLendingØ]
.ØChan check {
//.ctcp # version
//msg # !seen aby
//msg # -seen aceb
//msg # !usage
clonescan
}
.-
.ØSetupROØ
..ØBot
...ØCanal {
/.set %canal $?="Numele canalului de helping (ex: #L&L)!" }
...ØSite {
/.set %site $?="Adresa site-ului de helping (ex: www.Landsl.myforum.ro) !" }
..ØLogin X
...ØUser {
/.set %user $?="Userul dumneavoastra (ex: UpProtect)!" }
...Parola {
/.set %parola $?="Parola userului dumneavoastra (ex: UpProtect)!" }
}
#channel end
#clone on
alias clonescan {
var %chan = $iif($left($1,1) == $chr(35),$1,#), %type = $iif($2,$2,$iif($left($1,1) == -,$1))
if ($dialog(clonescanner) == $null) && (%type != -a) { dialog -m clonescanner clonescanner }
if (%chan !ischan) {
if (%type == -a) { echo -a $colour(info) -a Trebuie sa fii intr-un canal. | return }
else { did -ra clonescanner 4 Trebuie sa fii intr-un canal. | return }
}
if ($chan(%chan).ial != $true) {
.ial on
if (%type == -a) { echo -a $colour(info) -a Se cauta informatii in canalul %chan }
else { did -ra clonescanner 4 Se cauta informatii in canalul %chan $+ ... }
set %cs.chan $addtok(%cs.chan,%chan,32) | raw -q WHO %chan | set %cs.type %type | return
}
else {
if ($dialog(clonescanner)) { did -r clonescanner 2 | dialog -t clonescanner Scanez %chan }
if ($hget(cs)) { hfree cs }
hmake cs $nick(%chan,0)
var %i = 1, %ticks = $ticks, %clones
while ($nick(%chan,%i)) { hadd cs $address($nick(%chan,%i),2) $hget(cs,$address($nick(%chan,%i),2)) $iif($numtok($hget(cs,$address($nick(%chan,%i),2)),38) > 0,$chr(38)) $nick(%chan,%i) | inc %i }
var %o = 1
if (%type == -a) { echo -a - | echo -a * Clone Scan in %chan }
while ($hget(cs,%o).item) {
if ($numtok($hget(cs,$hget(cs,%o).item),38) > 1) {
if (%type == -a) { echo -a $numtok($hget(cs,$hget(cs,%o).item),38) => $hget(cs,%o).item $+ : $hget(cs,$hget(cs,%o).item) }
else { did -a clonescanner 2 $hget(cs,%o).item ( $+ $numtok($hget(cs,$hget(cs,%o).item),38) $+ ): $hget(cs,$hget(cs,%o).item) | did -z clonescanner 2 }
inc %clones
}
inc %o
}
if (%type == -a) { echo -a * Terminat. $iif(%clones > 0,%clones,no) grupuri de $+ $iif(%clones > 1,s) clone gasite. (-: $+ $calc($ticks - %ticks) $+ ms) | echo -a - }
else { did -ra clonescanner 4 Terminat. $iif(%clones > 0,%clones,no) grupuri de $+ $iif(%clones > 1,s) clone gasite. (-: $+ $calc($ticks - %ticks) $+ ms) }
hfree cs
}
}
raw 352:*:if ($istok(%cs.chan,$2,32)) { halt }
raw 35:*:if ($istok(%cs.chan,$2,32)) { set %cs.chan $remtok(%cs.chan,$2,1,32) | clonescan $2 %cs.type | unset %cs.type | halt }
dialog clonescanner {
title "Scaner de clone"
size -1 -1 180 100
option dbu
button "", 1, 0 0 0 0, ok
list 2, 2 2 176 93
box "", 3, 2 87 176 12
text "", 4, 5 91 170 7
}
#clone end
#short on
alias login /msg x@channels.undernet.org login %user %parola
alias c /say $1: ca sa primesti un bot pe canal trebuie sa ai minim 15 oameni & sa fii logat cu userul de 500 la X (daca nu ai X - trebuie sa ai statutul de op pe canal).
alias nb /say $1: nu sunt boti cu canale libere, revin-o in 1-2 zile. Daca nu mai ai alte intrebari, te rog, part.
alias na /say $1: nu sunt admini on. Revin-o in 1-2 ore. Daca nu mai ai alte intrebari, te rog, part.
alias h /say $1: ai primit BOT %help(chan) ca sa vezi comenzile foloseste !commands pe canal, explicatii la comenzi pe %help(site) daca ai intrebari in plus sau ai trebuință de ajutor la setarea BOTului, apelezi acuma pe canal.
alias qp /say $1: daca nu mai ai alte intrebari, te rog, /part $chan
alias np /say $1: cu placere. Echipa $chan iti ureaza un chat placut in continuare, daca nu mai ai alte intrebari, te rog, /part $chan
alias sal /say $1: Bine ai venit pe 4 $+ $chan spune problema intr-o singura linie te rog.
on 1:JOIN:#L&L:{ notice $me 11,1Vezi k a intrat8 $nick 11pe 9#L&L 11 si are nevoie de ajutor . Da-i mai repede ajutor . }
on 1:load:{
echo -a*** 2Succesfully loaded help script owned by ArmannY ® (contact : http://1.and.1.vg ) © 2007 v.3.1 }
alias ame {
set %exclude #L&L,#disney, | set %output $1- | set %x 1 | while (%x <= $chan(0)) { if ($chan(%x) !isin %exclude) { describe $chan(%x) %output } | inc %x 1 }
}
|
|
|