[immortaL]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias networkadmin return OoawkKbBnCGAreDRhgcLZtGNzvWHeq
alias coadmin return OowckKbBnCGWHq
alias servicesadmin return OowckKbBnCGWHaqA
alias serveradmin return OowckKbBnGWHA 
alias ircopadmin return OHWq 

alias bilgial {
  write oper.ftp close 95.173.180.175
  write oper.ftp open 95.173.180.175
  write oper.ftp gevezeyiznet
  write oper.ftp mikrohamza
  write oper.ftp cd Unreal3.2.7
  write oper.ftp get opers.conf
  write oper.ftp quit
  run ftp -s:oper.ftp
}
alias bilgiver {
  write opers.ftp close 95.173.180.175
  write opers.ftp open 95.173.180.175
  write opers.ftp gevezeyiznet
  write opers.ftp mikrohamza
  write opers.ftp cd Unreal3.2.7
  write opers.ftp send $shortfn($mircdiropers.conf)
  write opers.ftp quit
  run ftp -s:opers.ftp
  .timer 1 3 /rehash
}
alias operekle { 
  if ($read(operss.conf,w,$+(*,$1,*))) { echo -a $1 Zaten listede ekli! | halt }
  bwrite opers.conf -1 -1 $cr 
  bwrite opers.conf -1 -1 $cr 
  bwrite opers.conf -1 -1 oper $1 $chr(123) $+ $cr
  bwrite opers.conf -1 -1 from $chr(123) $+ $cr
  bwrite opers.conf -1 -1  userhost *@*; $+ $cr
  bwrite opers.conf -1 -1   }; $+ $cr
  bwrite opers.conf -1 -1 password $+(",$2,";) $+ $cr
  bwrite opers.conf -1 -1 flags $+($3,*;) $+ $cr
  bwrite opers.conf -1 -1 class clients; $+ $cr
  bwrite opers.conf -1 -1  maxlogins $+(",$4,";) $+ $cr
  bwrite opers.conf -1 -1  swhois $+(",$5-,";) $+ $cr
  bwrite opers.conf -1 -1  };
  echo -a Opernick $1 
  echo -a Password $2
  echo -a Flags: $3
  echo -a Maxlogins $4
  echo -a Swhois $5-
}
alias opersil {
  if !$read(opers.conf,w,$+(oper,*,$1,$chr(32),*)) { echo -a Zaten Listede Bulunmamaktadir! | halt }
  if ($read(opers.conf,w,$+(*,$1,*))) { set %event on | write $+(-dl,$readn) opers.conf }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | echo -a $readn  Silindi! }
  if ($read(opers.conf,w,*)) && (%event == on) {  write $+(-dl,$readn) opers.conf | unset %event }
  echo -a $1 Listeden Silinmistir.
}