Search
Web Applications
install Joomla Wordpress Phpbb Drupal FluxBB PunBB osCommerce simple-machines MYBB moodle vBulletin Dolphin-v.7.1.1 PHPNUKE XOOPSServices
install BorkNet Services X3 Services Anope Atheme Services Srvx IRC SrervicesIRCD
install Snircd IRCU INSPIRCD UNREAL Nefarious Bircd Bahamut Asuka CharybdisTCL SCRIPT
TCL SCRIPT FOR EGGDROP
Allprotection4.7 AntiproxyBots
Bots install FishBot bobot++ Eggdrop janus Omega Security Services Botnix Bopm SupyBot PyLink HopmLatest topics
Affiliates
Affiliates
הורדה קליינים במהירות לאדמינים
BMT IRC Network :: BMT :: BMT
Page 1 of 1
הורדה קליינים במהירות לאדמינים
Admin Sat Sep 03, 2011 6:20 am
- Code:
dialog klm {
title "Kline Mangement"
size -1 -1 194 136
option dbu
box "Kline Mangment", 2, 0 0 192 135
button "Done", 6, 152 119 37 12, ok
tab "View", 1, 2 5 186 109
list 8, 4 24 178 86, tab 1 size
tab "Edit", 7
list 9, 4 24 178 86, tab 7 size
button "Clear", 4, 29 119 21 12, tab 7
button "Load From File", 5, 55 119 47 12, tab 7
button "Del", 3, 2 119 23 12, tab 7
button "Save To File", 10, 106 119 37 12, tab 7
}
#viewkline off
raw 223:*:{
did -a klm 8 $+([,$gettok($1-,3,32),]) $+([,$gettok($gettok($1-,6,32),1,33),]) $+([,$7-,])
did -a klm 9 $+([,$gettok($1-,3,32),])
halt
}
raw 219:*:{ .disable #viewkline }
#viewkline end
on *:dialog:klm:init:0:{
.enable #viewkline
.stats g
.stats z
.stats k
}
on *:dialog:klm:sclick:5:{
selfile
var %x 1
while ($read(%selfile,%x)) {
did -a $dname 9 $+($chr(91),$read(%selfile,%x),$chr(93))
did -a $dname 8 $+($chr(91),$read(%selfile,%x),$chr(93),$chr(32),$chr(91),$me,$chr(93),$chr(32),$chr(91),Proxy Not Allowed Here,$chr(93))
inc %x
}
loadkline
}
on *:dialog:klm:sclick:4:{
filter -cik $dname 9 clearkline
did -r $dname 9
did -r $dname 8
}
on *:dialog:klm:sclick:10:{
selfile
filter -cik $dname 9 writtofile
}
on *:dialog:klm:sclick:3:{
kline - $+ $mid($did(klm,9).seltext,2,-1)
zline - $+ $mid($did(klm,9).seltext,2,-1)
gline - $+ $mid($did(klm,9).seltext,2,-1)
gzline - $+ $mid($did(klm,9).seltext,2,-1)
did -d $dname 8 $did(9).sel
did -d $dname 9 $did(9).sel
}
alias loadkline {
var %i 1
while ($read(%selfile,%i)) {
.gline $read(%selfile,%i) - Proxy\Botnets Not Allowed Here
inc %i
}
}
alias selfile { set %selfile $sfile($mircdir,Select File,Select) }
alias writtofile $iif(!$read(%selfile,w,$remove($1-,[,])),write %selfile $remove($1-,[,]))
alias clearkline {
kline - $+ $mid($1-,2,-1)
zline - $+ $mid($1-,2,-1)
gline - $+ $mid($1-,2,-1)
gzline - $+ $mid($1-,2,-1)
}
menu channel {
Kline Mangement: .//dialog -m klm klm
}
http://pastie.org/2471704
Admin- Admin
- מספר הודעות : 269
Join date : 2009-09-12
Age : 44
מיקום : mIRCX IRC Network -
BMT IRC Network :: BMT :: BMT
Page 1 of 1
Permissions in this forum:
You cannot reply to topics in this forum
» mIRCx IRC Network Config
» ircu2.10.12-pk with dnsbl
» Guide install PyLink on New version FreeBSD
» מדריך התקנה PBot על מערכת הפעלה FreeBsd-12
» install Nefarious2 && X3 IRC Services in FreeBsd
» help problem with adduser in Freebsd 12
» מדריך פקודות והתקנה בסרביס X3
» מדריך הגדרות WebIRC in Nefarious2