Ev' nesto korisno
Moze jos da se preuredi...
Edit: Malo sam menjao Addone
- Code:
dialog modovi {
title "Modovi"
size -1 -1 61 144
option dbu
button "Invite on", 2, 4 5 53 12, flat
button "Invite off", 3, 4 20 53 12, flat
button "Prikazi Knocks ", 4, 4 50 53 12, flat
button "Ne prikazuj Knocks", 5, 4 65 53 12, flat
button "Spectator on", 6, 4 80 53 12, flat
button "Spectator off", 7, 4 95 53 12, flat
button "Postavi limit", 8, 4 35 53 12, flat
button "+smitw", 9, 4 110 53 12, flat
button "-smitw", 10, 4 125 53 12, flat
}
on *:dialog:modovi:sclick:2:{ mode $active +i }
on *:dialog:modovi:sclick:3:{ mode $active -i }
on *:dialog:modovi:sclick:4:{ mode $active +u }
on *:dialog:modovi:sclick:5:{ mode $active -u }
on *:dialog:modovi:sclick:6:{ mode $active +m }
on *:dialog:modovi:sclick:7:{ mode $active -m }
on *:dialog:modovi:sclick:8:{
mode $active +| $?="Upisi limit"
}
on *:dialog:modovi:sclick:9:{ mode $active +smitw }
on *:dialog:modovi:sclick:10:{ mode $active -smitw }
}
on *:Mode:#:{
If ($Nick == $Me) Halt
If (+h isin $1-) /Mode # -h
If (+i isin $1-) /Mode # -i
If (+m isin $1-) /Mode # -m
If (-t isin $1-) /Mode # +t
If (+s isin $1-) /Mode # -s
if (+k isin $1) /mode # -k $2
if (+l isin $1-) /Mode # +l 100
if (-n isin $1-) /mode # +n
if (+mwW isin $1-) /Mode # -mwW
If (+mnti isin $1-) /mode # -im
if (-nt isin $1-) /mode # +nt
if (-u isin $1-) /mode # +u
if (+W isin $1-) /mode # -W
if (+p isin $1-) /mode # -p
if (+smi isin $1-) /mode # -smi
}
- Code:
alias serlist { dialog -m serlist serlist }
dialog serlist {
title "Servers"
size -1 -1 196 189
option dbu
button "IRCSvet.com", 1, 8 15 80 10
button "Krstarica.com", 2, 8 30 80 10
button "Flywithdream.com", 3, 8 45 80 10
button "Ludomanija.net", 4, 8 60 80 10
button "Damebiraju.com", 5, 8 75 80 10
button "Medjed.org", 6, 8 90 80 10
button "Nasa-Mreza.info", 7, 8 105 80 10
button "Subotica.com", 8, 8 120 80 10
button "Chatomania.org", 9, 8 135 80 10
button "serbiancafe.com", 10, 9 150 80 10
box "U Aktivnom prozoru", 11, 4 6 90 162
box "U novom prozoru", 12, 100 6 90 162
button "IRCSvet.com", 13, 105 15 80 10
button "Krstarica.com", 14, 105 30 80 10
button "Flywithdream.com", 15, 105 45 80 10
button "Ludomanija.net", 16, 105 60 80 10
button "Damebiraju.com", 17, 105 75 80 10
button "Medjed.org", 18, 105 90 80 10
button "Nasa-Mreza.info", 19, 105 105 80 10
button "Subotica.com", 20, 105 120 80 10
button "Chatomania.org", 21, 105 135 80 10
button "Serbiancafe.com", 22, 105 150 80 10
button "New Status Window", 23, 4 169 60 15
button "Zatvori", 24, 130 169 60 15, ok cancel
link " Marvi-Konvic.co.cc", 25, 75 169 47 8
link " IRCSvet.com", 26, 75 180 33 8
}
on *:DIALOG:serlist:init:*:{
dll dll\mdx.dll SetMircVersion $version
dll dll\mdx.dll MarkDialog $dname
dll dll\mdx.dll SetDialog $dname bgcolor $rgb(0,0,0)
}
on 1:dialog:serlist:sclick:*: {
if $did == 1 { /server irc.ircsvet.com }
if $did == 2 { /server irc.krstarica.com }
if $did == 3 { /server irc.flywithdream.com }
if $did == 4 { /server irc.ludomanija.net }
if $did == 5 { /server irc.damebiraju.com }
if $did == 6 { /server irc.medjed.org }
if $did == 7 { /server irc.Nasa-Mreza.info }
if $did == 8 { /server irc.Subotica.com }
if $did == 9 { /server irc.Chatomania.org }
if $did == 10 { /server irc.serbiancafe.com }
if $did == 13 { /server -n irc.ircsvet.com }
if $did == 14 { /server -n irc.krstarica.com }
if $did == 15 { /server -n irc.Flywithdream.com }
if $did == 16 { /server -n irc.Ludomanija.net }
if $did == 17 { /server -n irc.Damebiraju.com }
if $did == 18 { /server -n irc.Medjed.org }
if $did == 19 { /server -n irc.Nasa-Mreza.info }
if $did == 20 { /server -n irc.Subotica.com }
if $did == 21 { /server -n irc.Chatomania.org }
if $did == 22 { /server -n irc.serbiancafe.com }
if $did == 25 { /run http://www.marvi-konvic.co.cc }
if $did == 26 { /run http://www.ircsvet.com }
if $did == 23 { /server -n }
Moze jos da se preuredi...
Edit: Malo sam menjao Addone