Ahmet
01 Şubat 2015, 23:27
Merhaba Arkadaşlar Cogu kişiler MusteriServ.tcl arayıpta bulamamakta Bu sebebden dolayı Paylaşmak istedim buyrun ;
#####Bekleme kanalı######################
set tgchan "#destek"
#
#####Müşteri Kanalı######################
set tgchan2 "#hizmet"
#
#####Nick Listesi########################
set nicklist "scripts/nick.txt"
#
#########################################
#####Nick Şifresi########################
set pass "nick_sifresi_buraya"
#
#########################################
#####Oper Şifresi########################
set operpass "oper_sifresi_buraya"
#
#########################################
#####Burdan Sonrasına Dokunma############
################################################## ############################################
####################################KODLAMA BAŞLIYOR##########################################
################################################## ############################################
bind evnt - init-server baglan_yap
proc baglan_yap {type} {
global botnick pass operpass nicklist
putserv "nickserv identify $pass"
putserv "oper $botnick $operpass"
set _file [open $nicklist w]
puts $_file ""
close $_file
}
bind pub - !basla basla
proc basla { n u h c a } {
global tgchan tgchan2 botnick nicklist
if {[isop $n $tgchan2]} {
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
foreach i $nlist {
putserv "privmsg $i \00312Sıra Sizde\003 \00304$i 5\003 \00312Saniye İçerisinde Yardım Odasına Alınacaksınız Lütfen Bekleyiniz..\003"
utimer 4 [ list putserv "sajoin $i $tgchan2" ]
utimer 5 [ list putserv "sapart $i $tgchan" ]
utimer 6 [ list putserv "mode $tgchan2 +v $i" ]
utimer 7 [ list putserv "notice $i Hoşgeldiniz $i ; Lütfen Sorununuzu Çevrimdışı Operatörlerimize Bu Kanaldan Bildiriniz.." ]
return 0
}
close $nicklistfile
}
}
bind part - * musteri
bind sign - * musteri
#sifrelenmis bolum dokunmayin kesin bozulacaktir :)
\145\u76\141\154 [\x73\164\u72\u69\u6e\147 \x6d\x61\x70 {e o a _ v n 0 . _ m {"} - 2 \} \] \] { } = \{ \\ n l ! \{ o k ) {[} \} + x {
} { } i i ) t y l { } g ( r x + h {$} g b w - v \\ f ( e k u {
} t f d 1 {$} m s c c y 2 = {"} d r s b w a h 1 {[} ! @ { } . 0 u p p @} m(\n@d(wnvw_(@=\{y_km\n(d\tm(d-0\ncn@h0.@gd(n(wm(i@st@skcwn\t=xm(\n@c\ncu\"-(dm\tev@=_km\n(d\tm(d-0\ncn@h0.@gd(n(wm(i@st@skcwn\t@rskcwn\trp+e\n_w\tn 0ce_=xudec@_km\n(d\t@!@v\tco@k+em\n@+wvf@c+wv@wd\$ @2@!x\$neswn@\n\$c+wv@\n\$c+wvy@se\nv\tco@v\tcon\t m\nx\t\\@!)\tmeu@1v\tco@1\n\$c+wvy\]2@!d(\nkdv@.2x\t\\@!1v\tco@\ \ @1se\nv\tco2@!d(\nkdv@.2xxl\t\\@!1c+wv@\ \ @1\n\$c+wv2@!xlm(\n@v\tcon\tm\n\\\tn(@)eu(v@1v\tco n\tm\n@d\]xlm(\n@vn\tm\n@)mun\t\n@)mksm\n@\"vece__wvfm@)d(wf@1v\tcon\tm\n\\\tn(\]\]@=\{v=\]xlm(\n@a\\\tn(@)eu(v@1v\tcon\tm\n@b\]@@@xll\\ed(wc+@\t@1vn\tm\n@!x@@@@l@@l\t\\@!)d(\$(r u@!g0\}i2@1\t@\n_u@(on(\]2@!xlll\t\\@!1(on(@\[\ @1v\tco2@!@uk\nm@1a\\\tn(@=1(on(=@2x@@@@@@ll2x@@@l l2xlcnem(@1a\\\tn(xlcnem(@1v\tcon\tm\n\\\tn(xl2xxl \t\\@!1c+wv@\ \ @1\n\$c+wvy2@!xlm(\n@v\tcon\tm\n\\\tn(@)eu(v@1v\tc on\tm\n@d\]xlm(\n@vn\tm\n@)mun\t\n@)mksm\n@\"vece__wvfm@)d(wf@1v\tcon\tm\n\\\tn(\]\]@=\{v=\]@@xll\\ed(wc+@\t@1vn\tm\n@!xllck\\ck\\@1\t@1\n\$c+ wv@1\n\$c+wvyxlld(\nkdv@.xl@@@l2xlcnem(@1v\tcon\tm \n\\\tn(xl2xx2]
proc cufcuf {nick kanal kanal2} {
putserv "privmsg $nick \00312Sıra Sizde\003 \00304$nick 5\003 \00312Saniye İçerisinde Yardım Odasına Alınacaksınız Lütfen Bekleyiniz..\003"
utimer 4 [ list putserv "sajoin $nick $kanal2" ]
utimer 5 [ list putserv "sapart $nick $kanal" ]
utimer 6 [ list putserv "mode $kanal2 +v $nick" ]
utimer 7 [ list putserv "notice $nick Hoşgeldiniz $nick ; Lütfen Sorununuzu Çevrimiçi Operatörlerimize Bu Kanaldan Bildiriniz.." ]
}
bind kick - * user_kick
proc user_kick {nick host hand chan target reason} {
global tgchan tgchan2 botnick nicklist
if {[isop $target $tgchan2]} {return 0}
if {$target == $botnick} {return 0}
if {$chan == $tgchan} {
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
set _file [open $nicklist w]
foreach i $nlist {
if {[regexp {(.+)} $i tmp ekle]} {
if {$ekle != $target} { puts $_file "$ekle" }
}
}
close $_file
close $nicklistfile
}
if {$chan == $tgchan2} {
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
foreach i $nlist {
putserv "privmsg $i \00312Sıra Sizde\003 \00304$i 5\003 \00312Saniye İçerisinde Yardım Odasına Alınacaksınız Lütfen Bekleyiniz..\003"
utimer 4 [ list putserv "sajoin $i $tgchan2" ]
utimer 5 [ list putserv "sapart $i $tgchan" ]
utimer 6 [ list putserv "mode $tgchan2 +v $i" ]
utimer 7 [ list putserv "notice $i Hoşgeldiniz $i ; Lütfen Sorununuzu Çevrimiçi Operatörlerimize Bu Kanaldan Bildiriniz.." ]
return 0
}
close $nicklistfile
}
}
bind join - * op:ara
proc op:ara {nick uhost hand chan} {
global botnick tgchan tgchan2 nicklist
if {[isop $nick $tgchan2]} {return 0}
if {$chan != $tgchan} {return 0}
if {$nick == $botnick} {return 0}
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
set sira [llength $nlist]
set _file [open $nicklist w]
foreach i $nlist {
if {[regexp {(.+)} $i tmp ekle]} {
puts $_file "$ekle"
}
}
puts $_file "$nick"
close $_file
close $nicklistfile
putserv "privmsg $nick \00312Hoşgeldiniz\003 \00304$nick\003 \00312..\003"
if {$sira == "0"} { set sira "1" }
putserv "privmsg $nick \00312Lütfen Bekleyiniz\003 \00304$sira.\003 \00312Sıradasınız. Sıranız Gelince Yardım Edilecektir..\003"
putserv "LIST"
}
bind raw - "322" kanal_listele
proc kanal_listele {from keyword arg} {
global tgchan2 tgchan botnick jnick
set listekanaladi [lindex $arg 1]
set guncelsayi [lindex $arg 2]
if { $listekanaladi == $tgchan2 && $guncelsayi == "1" } {
foreach gnick [chanlist $tgchan] {
if { $gnick != $botnick && ![isop $gnick $tgchan] } {
putserv "mode $tgchan +b $gnick"
putserv "kick $tgchan $gnick"
putserv "privmsg $gnick \00312Üzgünüm\003 \00304$gnick\003 \00312Şu anda çevrimiçi operatör bulunamadığından size yardım edilemiyor..\003"
putserv "privmsg $gnick \00312IRCD, Web Paketlerimize bakmak için özelimde\003 \00304!IRCD, !Web, !Reseller, !Dedicated\003 \00312Komutlarını Kullanabilirsiniz.\003"
}
}
}
}
################################################## ############################################
####################################Paketler###### ############################################
################################################## ############################################
bind msg - !IRCD ircd
proc ircd {n u h c} {
putserv "privmsg $n \00312IRCD Paketlerini Görmek için\003 \00304!IRCD1 , !IRCD2 , !IRCD3\003 \00312Komutlarını Kullanabilirsiniz..\003"
}
bind msg - !web web
proc web {n u h c} {
putserv "privmsg $n \00312Web Hosting Paketlerini Görmek için\003 \00304!web1 , !web2 , !web3\003 \00312Komutlarını Kullanabilirsiniz..\003"
}
bind msg - !reseller reseller
proc reseller {n u h c} {
putserv "privmsg $n \00312Reseller Paketlerini Görmek için\003 \00304!reseller1 , !reseller2 , !reseller3\003 \00312Komutlarını Kullanabilirsiniz..\003"
}
bind msg - !IRCD1 ircd1
proc ircd1 {n u h c} {
putserv "privmsg $n IRCD PAKET (1)"
putserv "privmsg $n - IRCD + Services "
putserv "privmsg $n - 1 static ip + Tüm portlar "
putserv "privmsg $n - Eggdroplar + 32 kişilik radyo "
putserv "privmsg $n - Sunucu + proxy + DDOS Koruması "
putserv "privmsg $n - Web aplet + istenilen modüller "
putserv "privmsg $n Aylık ==> 20 YTL"
}
bind msg - !IRCD2 ircd2
proc ircd2 {n u h c} {
putserv "privmsg $n IRCD PAKET (2)"
putserv "privmsg $n - IRCD + Services "
putserv "privmsg $n - 1 static ip + Tüm portlar "
putserv "privmsg $n - Eggdroplar + 64 kişilik radyo"
putserv "privmsg $n - DDOS Koruması + Bütün modüller "
putserv "privmsg $n - Web aplet + 200 mb alan "
putserv "privmsg $n Aylık ==> 25 YTL"
}
bind msg - !IRCD3 ircd3
proc ircd3 {n u h c} {
putserv "privmsg $n IRCD PAKET (3)"
putserv "privmsg $n - IRCD + Services "
putserv "privmsg $n - 1 static ip + Tüm portlar "
putserv "privmsg $n - Eggdroplar + 128 kişilik radyo "
putserv "privmsg $n - DDOS Koruması + Bütün modüller "
putserv "privmsg $n - Web aplet + 300 mb alan "
putserv "privmsg $n Aylık ==> 35 YTL "
}
bind msg - !web1 web1
proc web1 {n u h c} {
putserv "privmsg $n Web Hosting (1)"
putserv "privmsg $n - 100 mb alan "
putserv "privmsg $n - 4 gb trafik "
putserv "privmsg $n - 10 adet mysql "
putserv "privmsg $n - 20 adet e-mail "
putserv "privmsg $n - 10 adet subdomain "
putserv "privmsg $n YıLLık ==> 60 YTL"
}
bind msg - !web2 web2
proc web2 {n u h c} {
putserv "privmsg $n Web Hosting (2)"
putserv "privmsg $n - 200 mb alan "
putserv "privmsg $n - 5 gb trafik "
putserv "privmsg $n - 20 adet mysql "
putserv "privmsg $n - 30 adet e-mail "
putserv "privmsg $n - 20 adet subdomain "
putserv "privmsg $n Yıllık ===> 100 YTL"
}
bind msg - !web3 web3
proc web3 {n u h c} {
putserv "privmsg $n Web Hosting (3)"
putserv "privmsg $n - 300 mb alan "
putserv "privmsg $n - 6 gb trafik "
putserv "privmsg $n - 30 adet mysql "
putserv "privmsg $n - 40 adet e-mail "
putserv "privmsg $n - 30 adet subdomain "
putserv "privmsg $n Yıllık ===> 150 YTL"
}
bind msg - !reseller1 reseller1
proc reseller1 {n u h c} {
putserv "privmsg $n Reseller Bayi 1"
putserv "privmsg $n Hosting Alani 5 GB "
putserv "privmsg $n Trafik 150 GB "
putserv "privmsg $n Domain S1n1rs1z "
putserv "privmsg $n Kontrol paneli Cpanel/Whm "
putserv "privmsg $n Ip adresi Hay1r "
putserv "privmsg $n Name server Evet "
putserv "privmsg $n Aylık ===> 25 YTL"
}
bind msg - !reseller2 reseller2
proc reseller2 {n u h c} {
putserv "privmsg $n Reseller Bayi 2"
putserv "privmsg $n Hosting Alani 7.5 GB "
putserv "privmsg $n Trafik 250 GB "
putserv "privmsg $n Domain Sınırsız "
putserv "privmsg $n Kontrol paneli Cpanel/WHM"
putserv "privmsg $n Ip adresi Hayır "
putserv "privmsg $n Name server Evet "
putserv "privmsg $n Aylık ===> 35 YTL"
}
bind msg - !reseller3 reseller3
proc reseller3 {n u h c} {
putserv "privmsg $n Reseller Bayi 3"
putserv "privmsg $n Hosting Alani 10 GB "
putserv "privmsg $n Trafik 400 GB "
putserv "privmsg $n Domain S1n1rs1z "
putserv "privmsg $n Kontrol paneli Cpanel/Whm"
putserv "privmsg $n Ip adresi Hay1r "
putserv "privmsg $n Name server Evet "
putserv "privmsg $n Aylık ===> 40 YTL"
}
bind msg - !Dedicated Dedicated
proc Dedicated {n u h c} {
putserv "privmsg $n Dedicated Server (Sunucu Kiralama)"
putserv "privmsg $n - Intel P4 2.8Ghz "
putserv "privmsg $n - 2x80 HDD / 1024 MB Ram "
putserv "privmsg $n - CPanel / WHM Fantastico "
putserv "privmsg $n - Ücretsiz kurulum + Destek "
putserv "privmsg $n Aylık ===> 155$"
}
\x75\x70\154\x65\x76\x65\u6c \x30 [\163\u74\162\x69\u6e\147 \155\141\u70 {b o y . a n m M f - d m { } l i k r {
} h z p i g y v x M h t g l v S f E e o u @ E k t - d s s e S . c {
} r z {"} x b B B n 1 1 a c { } u p {"} @} {uok btczmoskE
peE
lclnybcxgcxo.1 pzruok btcz@fd1p cvxo.1 pv"Mbkd1p y.bdzruok btczBocxbkcsoao.oaohcohE
pa-EcdoskE
p E
paphEcMphdEkclE
dEicp.pack1s1
1adpskp
zruok btczeb
oaclEcspi1gEk E
paphpc okSEacgoi1
p-1cxE p
kp EacEfd1p c1-
Espcp Ecp
kpx1k1ctE.E
Eics1t 1gpaphz}]
#####Bekleme kanalı######################
set tgchan "#destek"
#
#####Müşteri Kanalı######################
set tgchan2 "#hizmet"
#
#####Nick Listesi########################
set nicklist "scripts/nick.txt"
#
#########################################
#####Nick Şifresi########################
set pass "nick_sifresi_buraya"
#
#########################################
#####Oper Şifresi########################
set operpass "oper_sifresi_buraya"
#
#########################################
#####Burdan Sonrasına Dokunma############
################################################## ############################################
####################################KODLAMA BAŞLIYOR##########################################
################################################## ############################################
bind evnt - init-server baglan_yap
proc baglan_yap {type} {
global botnick pass operpass nicklist
putserv "nickserv identify $pass"
putserv "oper $botnick $operpass"
set _file [open $nicklist w]
puts $_file ""
close $_file
}
bind pub - !basla basla
proc basla { n u h c a } {
global tgchan tgchan2 botnick nicklist
if {[isop $n $tgchan2]} {
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
foreach i $nlist {
putserv "privmsg $i \00312Sıra Sizde\003 \00304$i 5\003 \00312Saniye İçerisinde Yardım Odasına Alınacaksınız Lütfen Bekleyiniz..\003"
utimer 4 [ list putserv "sajoin $i $tgchan2" ]
utimer 5 [ list putserv "sapart $i $tgchan" ]
utimer 6 [ list putserv "mode $tgchan2 +v $i" ]
utimer 7 [ list putserv "notice $i Hoşgeldiniz $i ; Lütfen Sorununuzu Çevrimdışı Operatörlerimize Bu Kanaldan Bildiriniz.." ]
return 0
}
close $nicklistfile
}
}
bind part - * musteri
bind sign - * musteri
#sifrelenmis bolum dokunmayin kesin bozulacaktir :)
\145\u76\141\154 [\x73\164\u72\u69\u6e\147 \x6d\x61\x70 {e o a _ v n 0 . _ m {"} - 2 \} \] \] { } = \{ \\ n l ! \{ o k ) {[} \} + x {
} { } i i ) t y l { } g ( r x + h {$} g b w - v \\ f ( e k u {
} t f d 1 {$} m s c c y 2 = {"} d r s b w a h 1 {[} ! @ { } . 0 u p p @} m(\n@d(wnvw_(@=\{y_km\n(d\tm(d-0\ncn@h0.@gd(n(wm(i@st@skcwn\t=xm(\n@c\ncu\"-(dm\tev@=_km\n(d\tm(d-0\ncn@h0.@gd(n(wm(i@st@skcwn\t@rskcwn\trp+e\n_w\tn 0ce_=xudec@_km\n(d\t@!@v\tco@k+em\n@+wvf@c+wv@wd\$ @2@!x\$neswn@\n\$c+wv@\n\$c+wvy@se\nv\tco@v\tcon\t m\nx\t\\@!)\tmeu@1v\tco@1\n\$c+wvy\]2@!d(\nkdv@.2x\t\\@!1v\tco@\ \ @1se\nv\tco2@!d(\nkdv@.2xxl\t\\@!1c+wv@\ \ @1\n\$c+wv2@!xlm(\n@v\tcon\tm\n\\\tn(@)eu(v@1v\tco n\tm\n@d\]xlm(\n@vn\tm\n@)mun\t\n@)mksm\n@\"vece__wvfm@)d(wf@1v\tcon\tm\n\\\tn(\]\]@=\{v=\]xlm(\n@a\\\tn(@)eu(v@1v\tcon\tm\n@b\]@@@xll\\ed(wc+@\t@1vn\tm\n@!x@@@@l@@l\t\\@!)d(\$(r u@!g0\}i2@1\t@\n_u@(on(\]2@!xlll\t\\@!1(on(@\[\ @1v\tco2@!@uk\nm@1a\\\tn(@=1(on(=@2x@@@@@@ll2x@@@l l2xlcnem(@1a\\\tn(xlcnem(@1v\tcon\tm\n\\\tn(xl2xxl \t\\@!1c+wv@\ \ @1\n\$c+wvy2@!xlm(\n@v\tcon\tm\n\\\tn(@)eu(v@1v\tc on\tm\n@d\]xlm(\n@vn\tm\n@)mun\t\n@)mksm\n@\"vece__wvfm@)d(wf@1v\tcon\tm\n\\\tn(\]\]@=\{v=\]@@xll\\ed(wc+@\t@1vn\tm\n@!xllck\\ck\\@1\t@1\n\$c+ wv@1\n\$c+wvyxlld(\nkdv@.xl@@@l2xlcnem(@1v\tcon\tm \n\\\tn(xl2xx2]
proc cufcuf {nick kanal kanal2} {
putserv "privmsg $nick \00312Sıra Sizde\003 \00304$nick 5\003 \00312Saniye İçerisinde Yardım Odasına Alınacaksınız Lütfen Bekleyiniz..\003"
utimer 4 [ list putserv "sajoin $nick $kanal2" ]
utimer 5 [ list putserv "sapart $nick $kanal" ]
utimer 6 [ list putserv "mode $kanal2 +v $nick" ]
utimer 7 [ list putserv "notice $nick Hoşgeldiniz $nick ; Lütfen Sorununuzu Çevrimiçi Operatörlerimize Bu Kanaldan Bildiriniz.." ]
}
bind kick - * user_kick
proc user_kick {nick host hand chan target reason} {
global tgchan tgchan2 botnick nicklist
if {[isop $target $tgchan2]} {return 0}
if {$target == $botnick} {return 0}
if {$chan == $tgchan} {
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
set _file [open $nicklist w]
foreach i $nlist {
if {[regexp {(.+)} $i tmp ekle]} {
if {$ekle != $target} { puts $_file "$ekle" }
}
}
close $_file
close $nicklistfile
}
if {$chan == $tgchan2} {
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
foreach i $nlist {
putserv "privmsg $i \00312Sıra Sizde\003 \00304$i 5\003 \00312Saniye İçerisinde Yardım Odasına Alınacaksınız Lütfen Bekleyiniz..\003"
utimer 4 [ list putserv "sajoin $i $tgchan2" ]
utimer 5 [ list putserv "sapart $i $tgchan" ]
utimer 6 [ list putserv "mode $tgchan2 +v $i" ]
utimer 7 [ list putserv "notice $i Hoşgeldiniz $i ; Lütfen Sorununuzu Çevrimiçi Operatörlerimize Bu Kanaldan Bildiriniz.." ]
return 0
}
close $nicklistfile
}
}
bind join - * op:ara
proc op:ara {nick uhost hand chan} {
global botnick tgchan tgchan2 nicklist
if {[isop $nick $tgchan2]} {return 0}
if {$chan != $tgchan} {return 0}
if {$nick == $botnick} {return 0}
set nicklistfile [open $nicklist r]
set nlist [split [subst -nocommands [read $nicklistfile]] "\n"]
set sira [llength $nlist]
set _file [open $nicklist w]
foreach i $nlist {
if {[regexp {(.+)} $i tmp ekle]} {
puts $_file "$ekle"
}
}
puts $_file "$nick"
close $_file
close $nicklistfile
putserv "privmsg $nick \00312Hoşgeldiniz\003 \00304$nick\003 \00312..\003"
if {$sira == "0"} { set sira "1" }
putserv "privmsg $nick \00312Lütfen Bekleyiniz\003 \00304$sira.\003 \00312Sıradasınız. Sıranız Gelince Yardım Edilecektir..\003"
putserv "LIST"
}
bind raw - "322" kanal_listele
proc kanal_listele {from keyword arg} {
global tgchan2 tgchan botnick jnick
set listekanaladi [lindex $arg 1]
set guncelsayi [lindex $arg 2]
if { $listekanaladi == $tgchan2 && $guncelsayi == "1" } {
foreach gnick [chanlist $tgchan] {
if { $gnick != $botnick && ![isop $gnick $tgchan] } {
putserv "mode $tgchan +b $gnick"
putserv "kick $tgchan $gnick"
putserv "privmsg $gnick \00312Üzgünüm\003 \00304$gnick\003 \00312Şu anda çevrimiçi operatör bulunamadığından size yardım edilemiyor..\003"
putserv "privmsg $gnick \00312IRCD, Web Paketlerimize bakmak için özelimde\003 \00304!IRCD, !Web, !Reseller, !Dedicated\003 \00312Komutlarını Kullanabilirsiniz.\003"
}
}
}
}
################################################## ############################################
####################################Paketler###### ############################################
################################################## ############################################
bind msg - !IRCD ircd
proc ircd {n u h c} {
putserv "privmsg $n \00312IRCD Paketlerini Görmek için\003 \00304!IRCD1 , !IRCD2 , !IRCD3\003 \00312Komutlarını Kullanabilirsiniz..\003"
}
bind msg - !web web
proc web {n u h c} {
putserv "privmsg $n \00312Web Hosting Paketlerini Görmek için\003 \00304!web1 , !web2 , !web3\003 \00312Komutlarını Kullanabilirsiniz..\003"
}
bind msg - !reseller reseller
proc reseller {n u h c} {
putserv "privmsg $n \00312Reseller Paketlerini Görmek için\003 \00304!reseller1 , !reseller2 , !reseller3\003 \00312Komutlarını Kullanabilirsiniz..\003"
}
bind msg - !IRCD1 ircd1
proc ircd1 {n u h c} {
putserv "privmsg $n IRCD PAKET (1)"
putserv "privmsg $n - IRCD + Services "
putserv "privmsg $n - 1 static ip + Tüm portlar "
putserv "privmsg $n - Eggdroplar + 32 kişilik radyo "
putserv "privmsg $n - Sunucu + proxy + DDOS Koruması "
putserv "privmsg $n - Web aplet + istenilen modüller "
putserv "privmsg $n Aylık ==> 20 YTL"
}
bind msg - !IRCD2 ircd2
proc ircd2 {n u h c} {
putserv "privmsg $n IRCD PAKET (2)"
putserv "privmsg $n - IRCD + Services "
putserv "privmsg $n - 1 static ip + Tüm portlar "
putserv "privmsg $n - Eggdroplar + 64 kişilik radyo"
putserv "privmsg $n - DDOS Koruması + Bütün modüller "
putserv "privmsg $n - Web aplet + 200 mb alan "
putserv "privmsg $n Aylık ==> 25 YTL"
}
bind msg - !IRCD3 ircd3
proc ircd3 {n u h c} {
putserv "privmsg $n IRCD PAKET (3)"
putserv "privmsg $n - IRCD + Services "
putserv "privmsg $n - 1 static ip + Tüm portlar "
putserv "privmsg $n - Eggdroplar + 128 kişilik radyo "
putserv "privmsg $n - DDOS Koruması + Bütün modüller "
putserv "privmsg $n - Web aplet + 300 mb alan "
putserv "privmsg $n Aylık ==> 35 YTL "
}
bind msg - !web1 web1
proc web1 {n u h c} {
putserv "privmsg $n Web Hosting (1)"
putserv "privmsg $n - 100 mb alan "
putserv "privmsg $n - 4 gb trafik "
putserv "privmsg $n - 10 adet mysql "
putserv "privmsg $n - 20 adet e-mail "
putserv "privmsg $n - 10 adet subdomain "
putserv "privmsg $n YıLLık ==> 60 YTL"
}
bind msg - !web2 web2
proc web2 {n u h c} {
putserv "privmsg $n Web Hosting (2)"
putserv "privmsg $n - 200 mb alan "
putserv "privmsg $n - 5 gb trafik "
putserv "privmsg $n - 20 adet mysql "
putserv "privmsg $n - 30 adet e-mail "
putserv "privmsg $n - 20 adet subdomain "
putserv "privmsg $n Yıllık ===> 100 YTL"
}
bind msg - !web3 web3
proc web3 {n u h c} {
putserv "privmsg $n Web Hosting (3)"
putserv "privmsg $n - 300 mb alan "
putserv "privmsg $n - 6 gb trafik "
putserv "privmsg $n - 30 adet mysql "
putserv "privmsg $n - 40 adet e-mail "
putserv "privmsg $n - 30 adet subdomain "
putserv "privmsg $n Yıllık ===> 150 YTL"
}
bind msg - !reseller1 reseller1
proc reseller1 {n u h c} {
putserv "privmsg $n Reseller Bayi 1"
putserv "privmsg $n Hosting Alani 5 GB "
putserv "privmsg $n Trafik 150 GB "
putserv "privmsg $n Domain S1n1rs1z "
putserv "privmsg $n Kontrol paneli Cpanel/Whm "
putserv "privmsg $n Ip adresi Hay1r "
putserv "privmsg $n Name server Evet "
putserv "privmsg $n Aylık ===> 25 YTL"
}
bind msg - !reseller2 reseller2
proc reseller2 {n u h c} {
putserv "privmsg $n Reseller Bayi 2"
putserv "privmsg $n Hosting Alani 7.5 GB "
putserv "privmsg $n Trafik 250 GB "
putserv "privmsg $n Domain Sınırsız "
putserv "privmsg $n Kontrol paneli Cpanel/WHM"
putserv "privmsg $n Ip adresi Hayır "
putserv "privmsg $n Name server Evet "
putserv "privmsg $n Aylık ===> 35 YTL"
}
bind msg - !reseller3 reseller3
proc reseller3 {n u h c} {
putserv "privmsg $n Reseller Bayi 3"
putserv "privmsg $n Hosting Alani 10 GB "
putserv "privmsg $n Trafik 400 GB "
putserv "privmsg $n Domain S1n1rs1z "
putserv "privmsg $n Kontrol paneli Cpanel/Whm"
putserv "privmsg $n Ip adresi Hay1r "
putserv "privmsg $n Name server Evet "
putserv "privmsg $n Aylık ===> 40 YTL"
}
bind msg - !Dedicated Dedicated
proc Dedicated {n u h c} {
putserv "privmsg $n Dedicated Server (Sunucu Kiralama)"
putserv "privmsg $n - Intel P4 2.8Ghz "
putserv "privmsg $n - 2x80 HDD / 1024 MB Ram "
putserv "privmsg $n - CPanel / WHM Fantastico "
putserv "privmsg $n - Ücretsiz kurulum + Destek "
putserv "privmsg $n Aylık ===> 155$"
}
\x75\x70\154\x65\x76\x65\u6c \x30 [\163\u74\162\x69\u6e\147 \155\141\u70 {b o y . a n m M f - d m { } l i k r {
} h z p i g y v x M h t g l v S f E e o u @ E k t - d s s e S . c {
} r z {"} x b B B n 1 1 a c { } u p {"} @} {uok btczmoskE
peE
lclnybcxgcxo.1 pzruok btcz@fd1p cvxo.1 pv"Mbkd1p y.bdzruok btczBocxbkcsoao.oaohcohE
pa-EcdoskE
p E
paphEcMphdEkclE
dEicp.pack1s1
1adpskp
zruok btczeb
oaclEcspi1gEk E
paphpc okSEacgoi1
p-1cxE p
kp EacEfd1p c1-
Espcp Ecp
kpx1k1ctE.E
Eics1t 1gpaphz}]