IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Asci Kod Çevirici Dialog'lu (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/762779-asci-kod-cevirici-dialoglu.html)

Asci Kod Çevirici Dialog'lu

Merhaba arkadaşlar

Asci Kod Çevirici sistemini bitirmiş bulunmaktayım. Umarım beğenirsiniz..

İconlar ve Kalın harfler için mdx.dll,bars.mdx kullanılmıstır..

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

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

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

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

Zip içinde çıkan dosyaları mIRC ana dizine yerleştiriniz..
mirc içinde /load -rs asci.mrc komutunu yazınız.. Kolay gelsin

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

Cevap: Asci Kod Çevirici Dialog'lu

Bide senin scriptini gorsek DeLiTiM eminim saheser olur.

Cevap: Asci Kod Çevirici Dialog'lu

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] bunun için bir fikir, karakterlerin/rakamların sadece Karakter/Decimal veya Decimal/Karakter karşılığı ile sınırlı bırakma. Hex Octal Binary vb varyasyonları da eklersen daha zengin ve güzel olur düşüncesindeyim. İyi çalışmalar.

Cevap: Asci Kod Çevirici Dialog'lu

slm
buna benzer bir addon'da benden..
belirteyim alintidir ben degisiklikler yapip kendime göre ayarladim..
ama kimden nerden almisim hatirlamiyorum ve yazmiyorda addon'da..

Görüntü: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

dialog chr {

  title "$chr table"

  size -1 -1 198 270

  option dbu

  list 1, 24 20 75 176, size

  list 2, 102 20 75 176, size

  text "", 3, 27 200 200 10

  text "$CHR(N)", 4, 27 5 57 15

  text "SYMBOL", 5, 105 5 60 15

  button "MSG ACTIVE", 6, 46 220 126 10

  button "COPY CLIPBOARD", 7, 46 235 126 10 

  button "SET EDITBOX", 8, 46 250 126 10

}

alias chars { 

  dialog $iif($dialog(chr),-v,-m) chr chr  

}

menu nicklist,menubar { 

  .25 $chr(11) $!Chr List:{ dialog $iif($dialog(chr),-v,-m) chr chr } 

}

on *:dialog:chr:init:*:{

  var %x = 33

  while (%x < 255) { 

    if (%x isnum 33-126) || (%x isnum 160-254) { did -a chr 1 %x | did -a chr 2 $chr(%x) }

    inc %x

  }

}

on *:dialog:chr:sclick:1,2:{

  var %id = $iif($did == 1, 2, 1)

  did -c chr %id $did($did).sel

  did -ar chr 3 $!chr( $+ $did(1).seltext $+ ) = $did(2).seltext

}

on *:dialog:chr:sclick:6:{

  msg $active $did(2).seltext

}

on *:dialog:chr:sclick:7:{

  clipboard $did(2).seltext 

}

on *:dialog:chr:sclick:8:{

  editbox $active $did(2).seltext 

}