IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Knight Online (USKO) Server Status Checker (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/20391-knight-online-usko-server-status-checker.html)

SCouNDReL 06 Temmuz 2006 02:13
Knight Online (USKO) Server Status Checker
 
Umarım Aranızda Knight Online Oynayan VardIr (:

Knight Online'nın USKO Server'larının Oyuna girme Durumlarını, Oyuna Login Olma Durumlarını,Update Etme Durumlarını Bu Addonla Görebilirsiniz.
İşte Kod ;
Kod:
; Knight Online (USKO) Server Status Checker By SCouNDReL
;
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
e teşekkürler

alias -l sok { sockwrite -n $sockname $1- }
alias knight { sockclose knight | sockopen knight
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }
on *:SockOpen:knight:{
  sok GET /uskoserver/ HTTP/1.1
  sok host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sok $crlf
}
on *:SockRead:knight:{
  var %a
  sockread %a
  tokenize 32 %a 
  if (Login isin %a) { echo -a Oyuna Giris Ve Update Etme ->  $replace($remove($gettok($15,3,$asc(>)),<,>,/i,/td,/font),Online,3Aktif,Offline,4Kapali,InActive,13Aktif Degil,Error,8Hata) }
  if ($istok(Ares Beramus Dies Xigenon Manes Edana Cypher Olympia,$gettok($6,2,$asc(>)),32)) { echo -a $gettok($6,2,$asc(>)) $gettok($7,1,$asc(<)) -> $replace($remove($gettok($12,3,$asc(>)),<,>,/i,/td,/font),Online,3Aktif,Offline,4Kapali,InActive,13Aktif Degil,Error,8Hata)  }
}
/knight Komutu ile çalıştırın..

LeadeR 06 Temmuz 2006 18:39
Yanıt: Knight Online (USKO) Server Status Checker
 
ellerine sağlık güzelimde ; bu oyunu pek tasvip etmiyorum gerçi insanları bilgisayar başına kitleyen , ve dış dünyayı unutturan hiçbir oyunu tavsiye etmiyorum daha önce hiç oynamadım nasıl birşey olduğunda merak ediyorum acıkcası :) birgün denerim belki

SCouNDReL 06 Temmuz 2006 19:09
Yanıt: Knight Online (USKO) Server Status Checker
 
Dediklerin Az geldi Bazen Adımı Unuttuum Oluo Geçenlerde Arkadaş Kafasını Monitorde Buldu Bi Arkadaşta Öğle Yemeende Ne Yediini Hatırlayamaz Hale geldi. böLe piS bi Oyun.. (:

LeadeR 06 Temmuz 2006 20:24
Yanıt: Knight Online (USKO) Server Status Checker
 
lazımsın , dikkat et kendine

SCouNDReL 17 Ağustos 2006 17:37
Yanıt: Knight Online (USKO) Server Status Checker
 
Addon Güncellenmiştir ;

Güncelleştirme Bilgileri ;

- Data Alım Hatası Düzeltilmiştir.
- Patos Serverı Durumu Eklenmiştir.
- XTrap Serverı Durum Eklenmiştir.
- Window Görüntüsü Eklenmiştir.
- /SockOpen Hatası Düzeltilmiştir.
- Server Hızı Eklenmiştir.

ScreenShot ;

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:
; Knight Online (USKO) Server Status Checker By SCouNDReL
;
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
e teşekkürler
; /knight komutuyla çalıştırın

alias -l sok { sockwrite -n $sockname $1- }
alias knight { close -@ @knight | kowin | unset %sjn.rdata | unset %sjn.data | unset %sjn.install | inc %sjn.install | sockclose knight* | sockopen $+(knight,$ticks)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }
on *:SockOpen:knight*:{
  if ($sockerr) { if ($window(@knight)) { drawrect -fr @knight $rgb(231,209,162) 17 20 643 300 17 | drawtext -r @knight 1 Tahoma 15 30 $calc(32 * 20) Hata! Lütfen Tekrar Deneyin.. } | echo -a deneme }
  sok GET /uskoserver/ HTTP/1.1
  sok host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sok $crlf
}
on *:SockRead:knight*:{
  var %a 
  sockread %a
  if (/tr isin %a) {     
    if (Login isin %sjn.rdata) { inc %sjn.install | writetowin Login & Game Update Server ¿ $remove($gettok($gettok(%sjn.rdata,15,32),3,$asc(>)),<,>,/i,/td,/font) ¿ $gettok($gettok($remove($gettok(%sjn.rdata,20,32),<i>),2,$asc(>)),1,$asc(<)) ¿ $replace($remove($gettok($gettok(%sjn.rdata,15,32),3,$asc(>)),<,>,/i,/td,/font),Online,$rgb(0,98,0),Offline,$rgb(255,0,0),InActive,$rgb(255,0,255),Error,$rgb(255,255,0)) }
    if (XTrap isin %sjn.rdata) { inc %sjn.install | writetowin $gettok($gettok($gettok(%sjn.rdata,6-8,32),2,$asc(>)),1,$asc(<)) ¿ $remove($gettok($gettok(%sjn.rdata,13,32),3,$asc(>)),<,>,/i,/td,/font) ¿ $gettok($gettok($remove($gettok(%sjn.rdata,18,32),<i>),2,$asc(>)),1,$asc(<)) ¿ $replace($remove($gettok($gettok(%sjn.rdata,13,32),3,$asc(>)),<,>,/i,/td,/font),Online,$rgb(0,98,0),Offline,$rgb(255,0,0),InActive,$rgb(255,0,255),Error,$rgb(255,255,0)) }
    if ($istok(Ares.Beramus.Dies.Xigenon.Manes.Edana.Cypher.Olympia.Patos,$gettok($gettok(%sjn.rdata,6,32),2,$asc(>)),46)) { inc %sjn.install | writetowin $gettok($gettok(%sjn.rdata,6,32),2,$asc(>)) $gettok($gettok(%sjn.rdata,7,32),1,$asc(<)) ¿ $remove($gettok($gettok(%sjn.rdata,12,32),3,$asc(>)),<,>,/i,/td,/font) ¿ $gettok($gettok($remove($gettok(%sjn.rdata,17,32),<i>),2,$asc(>)),1,$asc(<)) ¿ $replace($remove($gettok($gettok(%sjn.rdata,12,32),3,$asc(>)),<,>,/i,/td,/font),Online,$rgb(0,98,0),Offline,$rgb(255,0,0),InActive,$rgb(255,0,255),Error,$rgb(255,255,0))  }
    if (Patos 3 isin %sjn.rdata) {  if ($window(@knight)) { drawrect -fr @knight $rgb(231,209,162) 17 20 643 300 17 | drawtext -r @knight 1 Tahoma 15 30 $calc(32 * 20) Tamamlandi. } } 
    unset %sjn.rdata 
    unset %sjn.data
  }
  if (%sjn.data) && (< isin %a) { if ($calc($len(%sjn.rdata) + $len(%a)) < 900) { set %sjn.rdata $+(%sjn.rdata,%a) } }
  if (<tr isin %a) { set %sjn.data Ok }
}
alias -l kowin {
  window -pxk[1] @knight 
  drawrect -fr @knight $rgb(182,114,51) 99999 1 1 99999 99999 
  drawrect -fr @knight $rgb(231,209,162) 401 10 20 401 641
  drawrect -fr @knight 1  1 10 20 1 640
  drawrect -fr @knight 1  1 250 20 1 620
  drawrect -fr @knight 1  1 330 20 1 620
  drawrect -fr @knight 1  1 410 20 1 640
  var %i 1
  while %i <= 33 {
    drawrect -fr @knight 1 1 10 $calc(%i * 20) 400 1
    inc %i
  }
  drawtext -r @knight 1 Tahoma 15 30 $calc(32 * 20) Yükleniyor...
  drawtext -ro @knight 1 Tahoma 15 30 20 Sunucu Adı
  drawtext -ro @knight 1 Tahoma 15 260 20 Durum
  drawtext -ro @knight 1 Tahoma 15 340 20 Hız
}
alias -l writetowin {
  if ($window(@knight)) { 
    drawtext -r @knight 1 Tahoma 15 30 $calc(%sjn.install * 20) $gettok($1-,1,191)
    drawtext -r @knight $gettok($1-,4,191) Tahoma 15 260 $calc(%sjn.install * 20) $replace($gettok($1-,2,191),Online,Aktif,Offline,Kapali,InActive,Aktif Degil,Error,Hata)
    drawtext -r @knight $iif(Error isin $gettok($1-,3,191),$rgb(255,0,0),1) Tahoma 15 340 $calc(%sjn.install * 20) $replace($gettok($1-,3,191),Error,Hata) 
  }
}
menu @knight {
  Yenile:knight
  -
  Kapat:close -@ @knight
}

SeRDaR406 17 Ağustos 2006 17:58
Yanıt: Knight Online (USKO) Server Status Checker
 
Güzel çalışma Jan'ım ellerine sağlık :)

17 Ağustos 2006 18:00
Yanıt: Knight Online (USKO) Server Status Checker
 
:) İlginç çalışmalar. Bu oyuna başlamamanızı şiddetle tavsiye ediyoruz.. :D Sayın coderler ;)

Hasan 17 Ağustos 2006 19:35
Yanıt: Knight Online (USKO) Server Status Checker
 
Güzel paylaşımlar Fakat Leader'e katılıyorum :) insanlar'ı % 99 Pc'e yapıstıran bi oyun , cafe işlettigim dönemde Knight oynayanlar beni fazlası ile delirtmişti :)

izmit_Lee 17 Ağustos 2006 20:17
Yanıt: Knight Online (USKO) Server Status Checker
 
15 saat çalıştığım kafede o oyunu oynayanı bilirim :) Knigth online hayat offline adamlarda :)

SCouNDReL 18 Ağustos 2006 04:28
Yanıt: Knight Online (USKO) Server Status Checker
 
öncelikle yorumlarınız için tşk.
walla bırakalı 3-4 gün oldu bu oyunu bende başlamayı düşünmüom ama Allah Kerim... Bu Oyunun Başında öLen İnsan biLe Var.. Hakkattende Knight Online Hayat Offline xD


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:38.
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk