lookjapan.COM - IRC ve mIRC dünyasının forumu!

lookjapan.COM - IRC ve mIRC dünyasının forumu! (http://www.lookjapan.com/index.php)
-   TCL Scriptler (http://www.lookjapan.com/forumdisplay.php?f=69)
-   -   Oto Helper Host TCL (http://www.lookjapan.com/showthread.php?t=635)

Ahmet 01 Şubat 2015 23:48

Oto Helper Host TCL
 
PHP- Kodu:

set hhost "Yonetim.KraLSheLL.Net" 
set hident "KraLSheLL" 
set hname "localhost. KraLSheLL Bilisim Hizmetleri" 
set hchan "#Yonetim" 
bind mode - * modes 
proc modes 
{eden b c kanal mode etken} { 
global 
hhost hident hname hchan 
if {$kanal == $hchan} { 
if {
$mode == "+o"} { 
putserv "CHGHOST $etken :$hhost
putserv "CHGIDENT $etken :$hident
putserv "CHGNAME $etken :$hname

if {
$mode == "-o"} { 
if {
$etken == $eden} { 
putserv "NOTICE $etken :Lutfen $kanal kanalinda Deop olmayiniz!" 
putserv "NOTICE $etken :Please Dont Deop yourself on $kanal channel!" 
putserv "MODE $kanal +oa $etken $etken

if {
$etken != $eden} { 
putserv "NOTICE $eden :Lutfen $kanal kanalinda $etken i Deop yapmayiniz!" 
putserv "NOTICE $eden :Please dont deop anyone on $kanal channel!" 
putserv "MODE $kanal +oa $etken $etken




putlog "Auto Helpop loaded." 
bind part - * partes 



All times are GMT +3. The time now is 11:42.

Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.