IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum (https://www.ircforumu.net/)
-   ConferenceRoom (https://www.ircforumu.net/conferenceroom/)
-   -   ConferenceRoom da İsimlerin Anlamını Öğrenme Kodu (https://www.ircforumu.net/conferenceroom/2831-conferenceroom-da-isimlerin-anlamini-ogrenme-kodu.html)

* iswm %hppn) { echo -a 12 $remove($htmlfree(%hppn),%isim) | sockclose anlam }
}
alias htmlfree {
  var %x, %i = $regsub($replace($1-,$+($chr(38),#8217,$chr(59)),'),/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
  return %x
}
alias anlam {
  isim $1
}
menu menubar,status,channel,query {
  İsim Anlamı:dialog -m isimsiz isimsiz
}
dialog isimsiz {
  title "iSim Anlam Arama PaneLi"
  size -1 -1 95 45
  option dbu
  box "iSim Anlam", 1, 3 1 90 42
  button "iSim-Anlam ARA", 2, 22 26 55 12
  edit "", 3, 10 12 76 10
}
on 1:dialog:isimsiz:init:*:{
  did -a $dname 3 Arancak Kelimeyi Yazınız.
}
on *:dialog:isimsiz:sclick:2:{
  isim $did(3).text
}
immortaL 01 Temmuz 2016 17:03
ConferenceRoom da İsimlerin Anlamını Öğrenme Kodu
 
Arkadaşlar Scriptinize Ekliyerek Kullana bilirsiniz Açılan Kutuya hangi İsmin anlamaını Öğrenmek İstiyorsanız Ahmet Gibi Mehmet Gibi Mustafa gibi İsimleri Yazın.

Kod:
alias isim {
  sockclose anlam
  sockopen anlam www.vazgectimsenden.com 80
  echo -a 4Arama yapılıyor bekleyiniz ..
  set %isim $1
}
on *:sockopen:anlam:{
  sockwrite -n $sockname GET /isimara.asp?ad= $+ $replace(%isim,ü,$chr(37) $+ FC,ş,$chr(37) $+ FE,ğ,$chr(37) $+ F0,ç,$chr(37) $+ E7,ı,$chr(37) $+ FD,ö,$chr(37) $+ F6) HTTP/1.1
  sockwrite -n $sockname Host: www.vazgectimsenden.com $+ $crlf $+ $crlf
}
on *:sockread:anlam:{
  var %hppn
  sockread %hppn
  if (*
*
* iswm %hppn) { echo -a $htmlfree(%hppn) | sockclose anlam }
  if (* 
*


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:13.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 3.6.0
Copyright ©2005 - 2023 IRCForumu.Net - Tüm Hakları Saklıdır.