Bi arkadaşın istegi üzerine
Basit Sunucu Giriş Kodunu Paneli
Kod: Kodu kopyalamak için üzerine çift tıklayın!
dialog Kodegir {
title "Giriş Kodu Giricisi"
size -1 -1 137 69
option dbu
button "/. . . ./ Şifreyi Girdim Tamam /. . . ./", 1, 2 40 132 25, default flat multi ok
box "Ekranda gördügün kodu kutucuğa giriniz", 2, 2 6 132 29
edit "", 3, 7 17 120 10, autohs
}
on *:snotice:*: {
if (*Kodu*GIRIS*Kod* iswm $1-) {
dialog -m Kodegir Kodegir
}
}
on *:dialog:Kodegir:sclick:1: {
if ($did(3).text) /Giris $did(3).text
}
on *:dialog:Kodegir:init:*: {
mdx MarkDialog $dname
mdx SetDialog $dname bgcolor $rgb(020,180,255)
mdx SetColor $dname 1,2,3 textbg $rgb(255,0,0)
mdx SetColor $dname 1,2 background $rgb(020,180,255)
mdx SetFont $dname 1,3 15 950 Tahoma
mdx SetColor $dname 1,3 background $rgb(50,50,50)
}
scriptinde
Mdx.dll bulunmayanlar için
Dll klasörüne Mdx.dll ekleyip kodenin en alt bölümüne bir alias yolu vermeleri gerekmektedir
alias mdx { return $dll(dll\mdx.dll,$1,$2-) }