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ü:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Kod: Kodu kopyalamak için üzerine çift tıklayın!
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
}