Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias site {
dialog -m windows windows
}
on *:dialog:windows:init:*: {
mdx MarkDialog $dname
mdx SetDialog $dname bgcolor $rgb(99,184,255)
mdx SetFont $dname 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62 +b Turkish 12 600 Arial
mdx SetColor $dname 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62 textbg $rgb(99,184,255)
mdx SetColor $dname 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62 background $rgb(99,184,255)
mdx SetColor $dname 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62 text $rgb(0,0,0)
}
on *:dialog:windows:sclick:*: {
if $did == 61 { //run appwiz.cpl }
if $did == 2 { //run calc }
if $did == 3 { //run charmap }
if $did == 4 { //run cmd }
if $did == 5 { //run control }
if $did == 6 { //run timedate.cpl }
if $did == 7 { //run devmgmt.msc }
if $did == 8 { //run diskmgmt.msc }
if $did == 9 { //run firefox.exe }
if $did == 10 { //run iexplore }
if $did == 11 { //run notepad }
if $did == 12 { //run desk.cpl }
if $did == 13 { //run gpedit.msc }
if $did == 14 { //run mspaint }
if $did == 15 { //run write }
if $did == 16 { //run main.cpl }
if $did == 17 { //run powershell.exe }
if $did == 18 { //run sysdm.cpl }
if $did == 19 { //run mstsc }
if $did == 20 { //run wscui.cpl }
if $did == 21 { //run services.msc }
if $did == 22 { //run msinfo32 }
if $did == 23 { //run eventvwr }
if $did == 24 { //run cttune }
if $did == 25 { //run intl.cpl }
if $did == 26 { //run taskmgr }
if $did == 27 { //run regedit }
if $did == 28 { //run winver }
if $did == 29 { //run winamp.exe }
if $did == 30 { //run wmplayer }
if $did == 31 { //run magnify }
if $did == 32 { //run firewall.cpl }
if $did == 33 { //run explorer }
if $did == 34 { //run joy.cpl }
if $did == 35 { //run telnet }
if $did == 36 { //run downloads }
if $did == 37 { //run cleanmgr }
if $did == 38 { //run dpiscaling }
if $did == 39 { //run dvdplay }
if $did == 40 { //run taskschd.msc }
if $did == 41 { //run fonts }
if $did == 42 { //run ncpa.cpl }
if $did == 43 { //run optionalfeatures.exe }
if $did == 44 { //run rekeywiz }
if $did == 45 { //run msra }
if $did == 46 { //run mmsys.cpl }
if $did == 47 { //run resmon.exe }
if $did == 48 { //run sndvol }
if $did == 49 { //run wf.msc }
if $did == 50 { //run wuapp }
if $did == 51 { //run powercfg.cpl }
if $did == 52 { //run lusrmgr.msc }
if $did == 53 { //run inetcpl.cpl }
if $did == 58 { //run lusrmgr.msc }
if $did == 60 { //run syskey }
}
alias odialog {
; Using
; /odialog
if !$dialog($1) { dialog -m $1 $1 | dialog -s $1 -1 -1 0 0 }
var %x $2,%y $3,%dname $1
if %x && %y && %dname {
var %a 1
while %a <= %y {
dialog -s %dname -1 -1 %a 1
set %c %a
inc %a
}
var %s 1
while %s <= %x {
dialog -s %dname -1 -1 %c %s
inc %s
}
}
unset %c
}
alias site {
odialog site 410 570
}
alias mdx_fullpath { return $+(",dll\mdx.dll,") }
alias mdx { dll $mdx_fullpath $1- }
alias bars { return dll\bars.mdx }
dialog windows {
title "Windows 7 Uygulama Kısayolları"
size -1 -1 407 198
option dbu
icon icon\tai.ico
button "Program Ekle / Kaldır", 61, 337 44 62 12
button "Hesap Makinesi", 2, 89 74 62 12
button "Karakter Haritası", 3, 337 74 62 12
button "Komut Satırı (cmd)", 4, 173 44 62 12
button "Kontrol Paneli", 5, 8 149 62 12
button "Tarih ve Saat Ayarla", 6, 8 14 62 12
button "Sürücü Yöneticisi", 7, 173 74 62 12
button "Disk Yönetimi", 8, 173 89 62 12
button "Mozilla Firefox", 9, 89 14 62 12
button "İnternet Explorer", 10, 89 29 62 12
button "Not Defteri", 11, 89 134 62 12
button "Görüntü Pixel Ayarları", 12, 8 29 62 12
button "Local Policy Ayarları", 13, 8 44 62 12
button "Paint", 14, 89 104 62 12
button "Word", 15, 89 119 62 12
button "Fare Ayarları", 16, 8 163 62 12
button "PowerShell", 17, 173 14 62 12
button "Bilgisayarın Adı", 18, 337 14 62 12
button "Uzaktan Bağlantı", 19, 254 149 62 12
button "Güvenlik Merkezi", 20, 254 14 62 12
button "Windows Servisler", 21, 173 119 62 12
button "Sistem Bilgisi", 22, 173 104 62 12
button "Windows Loglar", 23, 254 44 62 12
button "Yazı Tipi Düzeltme", 24, 89 164 62 12
button "Yer ve Klavye Ayarları", 25, 8 89 62 12
button "Kayıt Defteri", 27, 173 164 62 12
button "Görev Yöneticisi", 26, 173 59 62 12
button "Windows Versionu", 28, 173 134 62 12
button "Winamp", 29, 89 44 62 12
button "Windows Media Player", 30, 89 89 62 12
button "Windows Büyüteç", 31, 337 89 62 12
button "Windows Firewall", 32, 254 89 62 12
button "Windows Explorer", 33, 173 149 62 12
button "Joistic Ayarları", 34, 8 104 62 12
button "Telnet", 35, 173 29 62 12
button "Downloads Klasörü", 36, 337 59 62 12
button "Disk Clean", 37, 254 104 62 12
button "Ekran Büyüklüğü", 38, 337 29 62 12
button "DVD Player", 39, 89 59 62 12
button "Zamanlı Görevler", 40, 89 149 62 12
button "Font / YazıTipi", 41, 337 149 62 12
button "Ağ Bağlantıları", 42, 254 119 62 12
button "Win. Özellik Aç/Kapat", 43, 337 119 62 12
button "EFS", 44, 337 134 62 12
button "Remote Asistanı", 45, 254 134 62 12
button "Müzik ve Ses Ayarları", 46, 8 59 62 12
button "PC Bellek Performansı", 47, 254 59 62 12
button "Program Ses Ayarı", 48, 8 74 62 12
button "Firewall Gelişmiş", 49, 254 29 62 12
button "Windows Update", 50, 254 74 62 12
button "Güç Ayarları", 51, 8 134 62 12
button "İnternet Explorer Ayarı", 53, 8 119 62 12
box "Windows Ayarlar Menüsü", 54, 1 3 76 177
box "Uygulamalar/Applications", 55, 83 3 76 177
box "Windows System Bilgi", 56, 166 3 76 177
box "Windows Güvenlik", 57, 249 3 76 177
button "Users ve Groups", 58, 337 104 62 12
box "Diğer Özellikler", 59, 330 3 76 177
button "Kullanıcı ve Gruplar", 52, 337 164 62 12
button "Windows Şifre Merkezi", 60, 254 164 62 12
button "MENÜYÜ KAPAT",62,167 182 74 14,ok flat
}
alias site { dialog -m windows windows }
İşletim sistemini belirtmemişsin.. Windows varsayarak gönderdim.. Kırmızı renk ile belirttiğim dll'ler ve ico'yu kendine göre uyarlarsın.. Diyalog menüsüdür..