Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:start: {
dialog -ma toolbar toolbar
}
alias _mdx dll $shortfn(görünüm\dll\mdx.dll) $1-
alias mdx { return $dll(görünüm\DLL\mdx.dll,$1,$2-) }
alias Temabul { .comreg görünüm/dll/Tema.dll | .comopen toolbar Tema.buL | var %komut = $com(toolbar,TemaBul,1) | var %komut = $com(toolbar).result | .comclose toolbar | .comreg -u görünüm/dll/Tema.dll | return %komut }
alias rebar { dll görünüm\DLL\rebar.dll $$1- }
alias bars { return görünüm\DLL\bars.mdx }
alias rebar { dll görünüm\DLL\rebar.dll $$5- }
alias _mdxinit dll $shortfn(görünüm\dll\mdx.dll) SetMircVersion $version | dll $shortfn(görünüm\dll\mdx.dll) MarkDialog $dname
on *:connect: {
update.toolbar
}
on *:disconnect: {
update.toolbar
}
on *:close:*: {
update.toolbar
}
alias saat { if ($dialog(toolbar)) { did -a toolbar $1 $time } }
alias update.toolbar {
if (!$dialog(toolbar)) { halt }
else {
scid $activecid
if ( $scid($activecid).status = connecting || $scid($activecid).status = connected ) {
did -o toolbar 1 3 +a 2 $chr(32) Bağlantıyı Kes $chr(9) $+ IRC Serverle Bağlantınızı Koparır.
}
else {
did -o toolbar 1 3 +a 1 $chr(32) Servere Bağlan $chr(9) $+ IRC Servere Bağlantı Kurar.
}
}
}
dialog toolbar {
title "x"
size 0 0 550 $iif($temabul,18,21)
option dbu notheme notheme
list 1, 0 4 274 17, size
list 10, 350 8 270 12, size
text "", 2, 464 6 45 16, center
text "", 3, 467 10 39 11, center
}
on *:dialog:toolbar:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetFont $dname 1,14 Turkish 14 900 Cyrillic
mdx SetColor $dname 3 text $rgb(300,000,000)
mdx SetFont $dname 3 +a 20 600 arial 78538585
.timersaat 0 1 saat 3
rebar HideToolbar
rebar Dock $dialog(toolbar).hwnd > top
mdx SetControlMDX $dname 1,3,4 Progressbar smooth > $ctl
mdx SetControlMDX $dname 1,10,4 ToolBar flat wrap arrows nodivider > $bars
mdx SetBorderStyle 1,10
did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(250,250,250)
did -i $dname 1 1 bmpsize 30 30
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -i $dname 1 1 setimage icon large görünüm\bin\1.bmp
did -a $dname 1 +a -
did -a $dname 1 +a 1 $chr(32) iRCe Bağlan $chr(9) $+ IRC Servere Bağlantı Kurar.
did -a $dname 1 +a -
did -a $dname 1 +a 3 $chr(32) Bağlantı $chr(9) $+ Bağlantı PaneLini açar
did -a $dname 1 +a -
did -a $dname 1 +a 4 $chr(32) Ayarlar $chr(9) $+ korumalar Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 5 $chr(32) Radyo $chr(9) $+ Radyo yayın akışını açar
did -a $dname 1 +a -
did -a $dname 1 +a 6 $chr(32) Winamp $chr(9) $+ Mp3 Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 7 $chr(32) Forum $chr(9) $+ Forum Açar
did -a $dname 1 +a -
did -a $dname 1 +a 7 $chr(32) Efeck $chr(9) $+ away durumları
did -a $dname 1 +a -
did -a $dname 1 +a 7 $chr(32) Away $chr(9) $+ Girişleri açpı kapatır
did -a $dname 1 +a -
}
on *:dialog:toolbar:*:*: {
if $devent == sclick {
if $did == 10 {
if ($readini(dll\winamp.ini, winamp, enable)) {
var %click $did($dname,10).sel
if (%click == 3) {
var %a $dll(dll\ctlamp.dll,Command,previous)
}
}
}
if $did == 10 {
if ($readini(dll\winamp.ini, winamp, enable)) {
var %click $did($dname,10).sel
if (%click == 5) {
var %a $dll(dll\ctlamp.dll,Command,title)
}
}
}
if $did == 10 {
if ($readini(dll\winamp.ini, winamp, enable)) {
var %click $did($dname,10).sel
if (%click == 7) {
var %a $dll(dll\ctlamp.dll,Command,pause)
}
}
}
if $did == 10 {
if ($readini(dll\winamp.ini, winamp, enable)) {
var %click $did($dname,10).sel
if (%click == 9) {
var %a $dll(dll\ctlamp.dll,Command,stop)
}
}
}
if $did == 10 {
if ($readini(dll\winamp.ini, winamp, enable)) {
var %click $did($dname,10).sel
if (%click == 11) {
var %a $dll(dll\ctlamp.dll,Command,next)
}
}
}
if $did == 1 {
if ($did($dname,1).sel = 3) {
if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect }
else {
scid $activecid server
}
update.toolbar
did -f $dname 1
scid $activecid window -a "status window"
}
if ($did($dname,1).sel = 5) {
cm2
}
if ($did($dname,1).sel = 7) {
cm1
}
if ($did($dname,1).sel = 9) {
Radyo
}
if ($did($dname,1).sel = 11) {
.run Winamp.exe
}
if ($did($dname,1).sel = 13) {
.run xxxxxxxxxxxxxxxxxxxxxxxxxxx
}
if ($did($dname,1).sel = 15) {
efekt
}
if ($did($dname,1).sel = 17) {
dialog -m aways aways
}
if ($did($dname,1).sel = 19) {
dialog -m aways aways
}
if ($did($dname,1).sel = 21) {
}
}
}
}
iconlar error veriyor sebebi ne olabilir acaba ben yeni bşladım sorun ney bilmiyorum
bide ben bu iconları toolbarın ortasında yapmak istiyorum bunu nasıl yapacam yardım ederseniz sevinirim