İRC PAYLASİM www.ircpaylasim.tr.gg

http://ircpaylasim.tr.gg

İRCPAYLASİM SIK KULLANILANLARA EKLE!
   
  İRc Paylaşım
  Korumaları açıp kapamak
 
PHP- Kodu:
; /grouplist tool
by ch1zra
ch1zra@gmail.com
http://uptheirons.co.sr/
#Scripters @ irc.krstarica.com
Copyright © Up The Irons incScripting Team
;
; <----------------------- 
$Comments ----------------------->
made for scriptersaka developers ;]
just a handy tool for checking #group status
; and a option to enable/disable selected group.
enjoy ;]
alias grouplist  {
  if (
$dialog(grouplist)) {
    
dialog -ve grouplist grouplist 
  
}
  else 
dialog -mdro grouplist grouplist
}
dialog grouplist {
  
title "/grouplist manager v1.1 by ch1zra "
  
size --1 150 85
  option dbu
  
list 15 5 70 75size
  text 
"Kapa yada aç "280 25 65 8
  radio 
"Aç"380 35 20 10
  radio 
"Kapa"4102 35 20 10
  text 
"Dosya adı :"580 45 65 8
  edit 
""680 55 65 10disable
  text 
"Kontrol paneli :]"780 5 65 15
  button 
"Tamam"880 70 30 10flat
  button 
"Kapat"9115 70 30 10flat ok
}
on *:dialog:grouplist:init:*: { 
  var %
i 1
  
while (%<= $group(0)) {
    
did -a $dname 1 $group(%i).name
    inc 
%i
  
}
}
on *:dialog:grouplist:sclick:*: { 
  if (
$did == 1) {
    if (
$did(1).seltext == $null)  { 
      
did -u $dname 3,
    
}
    else {
      if  (
$group($did(1).seltext).status == on)  { did -c $dname 3 did -u $dname 4 }
      else  { 
did -c $dname 4 did -u $dname 3 }
      
did -ra $dname 6 $nopath($group($did(1).seltext).fname)
      
did -ra $dname 2 Status for $group($did(1).seltext).name
    
}
  }
  if (
$did == 3) {
    .
enable $did(1).seltext
  
}
  if (
$did == 4) {
    .
disable $did(1).seltext
  
}
  if (
$did == 8) {
    
dialog -i grouplist
    
if ($input(/grouplist tool $crlf $crlf by ch1zra $crlf $crlf ch1zra@gmail.com $&
      
$crlf http://uptheirons.co.sr/ $crlf #Scripters @ irc.krstarica.com $&
      
,oi,About /grouplist))  {
      
dialog -e grouplist
    
}
  }
}
menu menubar,channel,status,query {
  
Grouplist:grouplist


Gayet güzel bir kod denenmiştir . Yükleyip istediğiniz korumalarınızı aktif/deaktif edebilirsiniz .

 
 
  Bugün 28 ziyaretçi (35 klik) kişi burdaydı! (2008-2020 © Copyright By ircpaylasim ® Tüm Hakları saklıdır)  
 
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol