[settings]
nick=L]e[G
anick=L]e[G_Away
reason=afk
time=1241726243
silent=off
multi=on
logger=on
pager=on
amsg=<c>7è AwAy, PeRchè: <c>8<b><reason><b><c>7. Pager è: <c>4<b><pager><b><c>7 e LoGGer è: <c>4<b><logger><b> <b>
bmsg=<c>7è ToRnaTo dA :<c>8<b><reason><b><c>7, E' StaTo Via <c>4<b><duration><b> <b>
mtype=ame
areasons=AfKµ
anicks=ArC_Awayµ
away=off
anstat=on

[script]
n0=Alias barzat { /dialog -m barzat barzat |  if ( %cc181p == on ) { $tunder TDDialog $dialog(barzat).hwnd > 2 } }
n1=menu menubar {
n2=  -
n3=  Arcan]G[elo Games
n4=  .» Pesta game:/barzat
n5=  -
n6=}
n7=on *:dialog:barzat:edit:4:{ %cnl43 = $did(4) }
n8=on *:DIALOG:barzat:sclick:2: { Set %cp18 $did(2) }
n9=on *:dialog:barzat:init:*: {
n10=  dll dlls/mdx/mdx.dll SetMircVersion $version
n11=  dll dlls/mdx/mdx.dll MarkDialog $dname
n12=  if (%unome == 1) {
n13=    dll dlls/mdx/mdx.dll SetDialog $dname bgcolor $rgb(0,72,170)
n14=    dll dlls/mdx/mdx.dll SetColor $dname 1 background $rgb(255,134,0)
n15=    dll dlls/mdx/mdx.dll SetColor 2,20,3,4,6 background $dname bgcolor $rgb(0,72,170)
n16=    dll dlls/mdx/mdx.dll SetColor $dname 2,20,3,6 textbg $rgb(0,72,170)
n17=    dll dlls/mdx/mdx.dll SetColor $dname 4 textbg $rgb(0,0,0)
n18=    dll dlls/mdx/mdx.dll SetColor 2,20,3,4,6 text $rgb(255,255,255)
n19=    dll dlls/mdx/mdx.dll SetColor 2,20,3,6 background $rgb(0,72,170)
n20=    /dll dlls\mdx\mdx.dll SetColor $dname 5 background $rgb(0,72,170)
n21=  }
n22=  if (%unome == 2) {
n23=    dll dlls/mdx/mdx.dll SetDialog $dname bgcolor $rgb(0,0,95)
n24=    dll dlls/mdx/mdx.dll SetColor $dname 1 background $rgb(196,196,196)
n25=    dll dlls/mdx/mdx.dll SetColor 2,20,3,4,6 background $dname bgcolor $rgb(0,0,55)
n26=    dll dlls/mdx/mdx.dll SetColor $dname 2,20,3,6 textbg $rgb(0,0,95)
n27=    dll dlls/mdx/mdx.dll SetColor $dname 4 textbg $rgb(0,0,0)
n28=    dll dlls/mdx/mdx.dll SetColor 2,20,3,4,6 text $rgb(255,255,255)
n29=    dll dlls/mdx/mdx.dll SetColor 2,20,3,6 background $rgb(0,0,95)
n30=    /dll dlls\mdx\mdx.dll SetColor $dname 5 background $rgb(0,0,95)
n31=  }
n32=  if %cp18 = ON { did -c barzat 2 }  
n33=  did -a $dname 4 %cnl43
n34=}
n35=on *:dialog:barzat:sclick:5: { 
n36=  if ($did(barzat,2).state = 1) { %cp18 = on } | else { %cp18 = off }
n37=}
n38=alias pestanick { .set %pestallnick $nick($gamechan,0) | .set %pestanickrand $rand(1,%pestallnick) | .set %pestanick $nick($gamechan,%pestanickrand) | .msg $gamechan 9,0pestaNick 7by 12Super 7 Avviato Vediamo Beccate il + 12,0Pestato! }
n39=on *:text:!pesta *:#: {
n40=  if (%cp18 = on) && ($2 ison %cnl43) && (%pestanick) && ($chan == %cnl43) { if ( $eval($+(%,contatore.pesta,$gamechan),2) >= 15 ) { .msg $gamechan 4Il nick inizia con la lettere 12 $left(%pestanick,1) } }
n41=  if (%cp18 = on) && ($2 == stop) && ($chan == %cnl43)   { msg %cnl43 9 iL 4pEsTaTo 8ErA 0,4 %pestanick | classifica  | .finepesta }
n42=  if (%cp18 = on) && ($2 == sukoni) { if (!$gamechan) && ($chan == %cnl43) { set %gamechan %cnl43 } | .sukoni | if (!$gamechan) { unset %gamechan %cnl43 } }
n43=  if (%cp18 = on) && ($2 == start) && ($chan == %cnl43) { .set %gamechan %cnl43 | .pestanick | //notice $me %pestanick | msg %cnl43 4PartiTa 7AvvIaTa 11diGiTarE 8!pesta nick 9Per ParTeCiParE }
n44=  if (%cp18 = on) && ($2 == %pestanick) && ($chan == %cnl43) { .msg $gamechan 13 complimenti $nick hai indovinato che il più pestato è 12,0 $2 | vittoria $nick | pestato $2 | .finepesta }
n45=  if (%cp18 = on) && (!$istok(start stop comandi %pestanick classifica sukoni,$2,32)) && ($chan == %cnl43) && ($2 ison $chan) { .msg %cnl43 0,6 mi dispiace $nick ma $2 non è il + pestato }
n46=  if (%cp18 = on) && ($2 !ison %cnl43) && (%pestanick) && ($chan == %cnl43) && (!$istok(start stop comandi %pestanick classifica sukoni,$2,32)) { .msg $gamechan 0,6Vaffanculo $nick lo sai che $2 non è nel chan pestati questo 13 8=======4D }
n47=}
n48=on *:text:!comandi pesta:#: {
n49=  if (%cp18 = on && $chan == %cnl43 ) { msg %cnl43 4I 11ComaNDi 9SoNo 7!pesta start 13PeR 8AvvIaRe 4!pesta nick 7pER 13IndoViNarE 11e 8!pesta stop 9Per 4FerMare 7Il 13GioCo }
n50=}
n51=alias finepesta {
n52=  .msg %cnl43 0,13 pesta by 12Super 0,13Terminato 
n53=  .unset %pestallnick %pestanickrand %pestanick %gamechan $+(%,contatore.pesta,$gamechan)
n54=  .halt
n55=}
n56=alias gamechan { return %gamechan }
n57=alias vittoria { if (!$readini(txt\vittorie.ini,Vittorie,$1)) { writeini txt\vittorie.ini Vittorie $1 1 } | else { writeini txt\vittorie.ini Vittorie $1 $calc($readini(txt\vittorie.ini,Vittorie,$1) + 1) } | msg $gamechan 12,4 $1 Ha indovinato in tutto $readini(txt\vittorie.ini,Vittorie,$1) Partit $+ $iif($readini(txt\vittorie.ini,Vittorie,$1) != 1,e,a) | .msg $gamechan 4Classifica: | classifica }
n58=alias classifica {
n59=  var %primo.punti 0
n60=  var %secondo.punti 0
n61=  var %terzo.punti 0
n62=  var %lettura 2
n63=  :lettura
n64=  if (!$read(txt\vittorie.ini,%lettura)) { goto fine }
n65=  if ($gettok($read(txt\vittorie.ini,%lettura),2,61) > %primo.punti) { %secondo.nick = %primo.nick | %secondo.punti = %primo.punti | %primo.nick = $gettok($read(txt\vittorie.ini,%lettura),1,61) | %primo.punti = $ifmatch | goto inc }
n66=  if ($gettok($read(txt\vittorie.ini,%lettura),2,61) > %secondo.punti) { %terzo.nick = %secondo.nick | %terzo.punti = %secondo.punti | %secondo.nick = $gettok($read(txt\vittorie.ini,%lettura),1,61) | %secondo.punti = $ifmatch | goto inc }
n67=  if ($gettok($read(txt\vittorie.ini,%lettura),2,61) > %terzo.punti) { %terzo.nick = $gettok($read(txt\vittorie.ini,%lettura),1,61) | %terzo.punti = $ifmatch | goto inc }
n68=  :inc
n69=  inc %lettura
n70=  goto lettura
n71=  :fine
n72=  if (%primo.punti) { msg $gamechan 4 1) : %primo.nick Vittorie: %primo.punti } | else { msg $gamechan 4 1) : <none> 4 Vittorie <none> }
n73=  if (%secondo.punti) { msg $gamechan 7 2) : %secondo.nick Vittorie: %secondo.punti } | else { msg $gamechan 7 2) : <none> 7 Vittorie <none> }
n74=  if (%terzo.punti) { msg $gamechan 9 3) : %terzo.nick Vittorie: %terzo.punti } | else { msg $gamechan 9 3) :  <none> 9 Vittorie <none> }
n75=}
n76=alias pestato { if (!$readini(txt\pestate.ini,pestate,$1)) { writeini txt\pestate.ini pestate $1 1 } | else { writeini txt\pestate.ini pestate $1 $calc($readini(txt\pestate.ini,pestate,$1) + 1) } | msg $gamechan 0,10 $1 E' Stato Pestato 7 per $readini(txt\pestate.ini,pestate,$1) Partit $+ $iif($readini(txt\pestate.ini,pestate,$1) != 1,e,a) | .msg $gamechan 4Classifica Sukoni: | sukoni }
n77=alias sukoni {
n78=  var %primo.punti 0
n79=  var %secondo.punti 0
n80=  var %terzo.punti 0
n81=  var %lettura 2
n82=  :lettura
n83=  if (!$read(txt\pestate.ini,%lettura)) { goto fine }
n84=  if ($gettok($read(txt\pestate.ini,%lettura),2,61) > %primo.punti) { %secondo.nick = %primo.nick | %secondo.punti = %primo.punti | %primo.nick = $gettok($read(txt\pestate.ini,%lettura),1,61) | %primo.punti = $ifmatch | goto inc }
n85=  if ($gettok($read(txt\pestate.ini,%lettura),2,61) > %secondo.punti) { %terzo.nick = %secondo.nick | %terzo.punti = %secondo.punti | %secondo.nick = $gettok($read(txt\pestate.ini,%lettura),1,61) | %secondo.punti = $ifmatch | goto inc }
n86=  if ($gettok($read(txt\pestate.ini,%lettura),2,61) > %terzo.punti) { %terzo.nick = $gettok($read(txt\pestate.ini,%lettura),1,61) | %terzo.punti = $ifmatch | goto inc }
n87=  :inc
n88=  inc %lettura
n89=  goto lettura
n90=  :fine
n91=  if (%primo.punti) { msg $gamechan 4 1) : %primo.nick pestate: %primo.punti } | else { .msg $gamechan 4 1) : <none> pestate <none> }
n92=  if (%secondo.punti) { msg $gamechan  7 2) : %secondo.nick pestate: %secondo.punti } | else { .msg $gamechan 7 2) : <none> pestate <none> }
n93=  if (%terzo.punti) { msg $gamechan 9 3) : %terzo.nick pestate: %terzo.punti } | else { .msg $gamechan 9 3) : <none> pestate <none> }
n94=}
n95=alias away {
n96=  if (!$away) { a_save away on | a_save time $ctime | a_save nick $me | if ($left($1,1) == $chr(45)) { if ($left($1,2) != $chr(45)) { a_save pager $iif(p isincs $1,on,off) | a_save multi $iif(m isincs $1,on,$network) | a_save logger $iif(l isincs $1,on,off) | a_save silent $iif(s isincs $1,on,off) | a_save anstat $iif(n isincs $1,on,off) | a_save reason $iif($2- != $null,$2-,afk) } | else { a_save reason $iif($2- != $null,$2-,afk) } } | else { a_save reason $iif($1- != $null,$1-,afk) } | a_set away | if ($a_get(logger) == on) || ($a_get(pager) == on) { $iif($window(@away.log),window -c @away.log) | window -aBhk0s +estxL @away.log } }
n97=  else { a_save away off | a_set back | if ($a_get(logger) == on) || ($a_get(pager) == on) { if ($window(@away.log)) && ($input(Vuoi vedere i messaggi i log e le pages di quando eri away?,y,Vedere i logs?)) { window -a @away.log } } }
n98=}
n99=alias -l a_get { return $readini(" $+ $script $+ ",settings,$$1) }
n100=alias -l a_save { writeini " $+ $script $+ " settings $1 $2- }
n101=alias -l a_set {
n102=  if ($1 isincs away) { if ($a_get(silent) == off) { $iif($a_get(multi) == on,scid -at1) $a_get(mtype) $replace($a_get(amsg),<b>,$chr(2),<u>,$chr(31),<i>,$chr(22),<c>,$chr(3),<logger>,$a_get(logger),<pager>,$a_get(pager),<reason>,$a_get(reason)) %scriptlogo } | $iif($a_get(anstat) == on,$iif($a_get(multi) == on,scid -at1) nick $a_get(anick)) | $iif($a_get(multi) == on,scid -at1) .quote away $replace($a_get(reason),$chr(32),$chr(160)) }
n103=  if ($1 isincs back) { if ($a_get(silent) == off) { $iif($a_get(multi) == on,scid -at1) $a_get(mtype) $replace($a_get(bmsg),<b>,$chr(2),<u>,$chr(31),<i>,$chr(22),<c>,$chr(3),<logger>,$a_get(logger),<pager>,$a_get(pager),<reason>,$a_get(reason),<duration>,$duration($calc($ctime - $a_get(time)))) %scriptlogo } | $iif($a_get(anstat) == on,$iif($a_get(multi) == on,scid -at1) nick $a_get(nick)) | $iif($a_get(multi) == on,scid -at1) .quote away }
n104=}
n105=alias -l mas_combo { if ($$1 == check) { var %mas = 1 | while (%mas <= $gettok($a_get($$2),0,181)) { if ($$3 == $gettok($a_get($$2),%mas,181)) { return $true } | if (%mas == $gettok($a_get($$2),0,181)) && ($$3 != $gettok($a_get($$2),%mas,181)) { return $false } | inc %mas } } | if ($1 == load) { did -r mas_dialog $iif($2 == areasons,3,6) | var %mas = 1 | while (%mas <= $gettok($a_get($2),0,181)) { did -a mas_dialog $iif($2 == areasons,3,6) $gettok($a_get($2),%mas,181)) | inc %mas } } | if ($$1 = line) { var %mas = 1 | while (%mas <= $did(mas_dialog,$$2).lines) { if ($$3 == $did(mas_dialog,$$2,%mas)) { return %mas } | inc %mas } } }
n106=alias mas { dialog -m mas_dialog mas_dialog |  if ( %cc181p == on ) { $tunder TDDialog $dialog(mas_dialog).hwnd > 2 } }
n107=alias eam { dialog -m eam_dialog eam_dialog | if ( %cc181p == on ) { $tunder TDDialog $dialog(eam_dialog).hwnd > 10 } }
n108=alias -l mas_logwin { if (!$window(@away.log)) { window -aBhk0s +estxL @away.log } }
n109=dialog mas_dialog {
n110=  title "Arcan]G[elo AwaY SiSTeM"
n111=  size -1 -1 131 58
n112=  option dbu
n113=  box "", 1, 1 -2 129 33
n114=  text "Motivo Away  :", 2, 5 6 37 8
n115=  combo 3, 44 5 60 52, drop edit size
n116=  button "", 4, 106 5 20 11
n117=  check "", 5, 5 17 10 10
n118=  text "Away nick :", 50, 15 17 37 10
n119=  combo 6, 44 17 60 52, drop edit size
n120=  button "", 7, 106 17 20 11
n121=  box "", 8, 1 29 88 28
n122=  check "", 9, 5 34 10 10
n123=  check "", 10, 44 34 10 10
n124=  check "", 11, 5 45 10 10
n125=  check "", 12, 44 45 10 10
n126=  text "Pager", 90, 15 34 25 10
n127=  text "Logger", 100, 54 34 25 10
n128=  text "Silent", 110, 15 45 28 10
n129=  text "Tutte le net", 120, 54 45 40 10
n130=  button "", 13, 90 32 40 12, ok
n131=  button "Annulla", 14, 90 45 40 12, cancel
n132=}
n133=dialog eam_dialog {
n134=  title "Arcan]G[elo Away System - Message Editor"
n135=  size -1 -1 200 58
n136=  option dbu
n137=  box "", 1, 1 -2 198 33
n138=  text "Mesg Away:", 2, 5 6 39 8, right
n139=  edit "", 3, 46 5 118 10, autohs
n140=  button "Preview", 4, 165 5 30 10
n141=  text "Mesg Ritorno:", 5, 5 18 39 8, right
n142=  edit "", 6, 46 17 118 10, autohs
n143=  button "Anteprima", 7, 165 17 30 10
n144=  box "", 8, 1 29 40 28
n145=  radio "", 9, 7 34 10 10
n146=  radio "", 10, 7 45 10 10
n147=  text "/amsg", 90, 17 34 25 10
n148=  text "/ame", 100, 17 45 28 10
n149=  box "", 11, 42 29 115 28
n150=  text " <reason>", 12, 46 35 40 8
n151=  text "<duration>", 13, 46 46 40 8
n152=  text "<logger> - logger (on/off)", 14, 82 35 100 8
n153=  text "<pager>  - pager (on/off)", 15, 82 46 100 8
n154=  button "Salva", 16, 159 32 40 12, ok
n155=  button "Annulla", 17, 159 45 40 12, cancel
n156=}
n157=on *:dialog:mas_dialog:*:*:{
n158=  if ($devent == init) {
n159=    dll $mdx SetMircVersion $version
n160=    dll $mdx MarkDialog $dname $dialog($dname).hwnd
n161=    if (%unome == 1) {
n162=      dll $mdx SetColor $dname 1,8 background $rgb(255,134,0)
n163=      dll $mdx SetDialog $dname bgcolor $rgb(0,72,170)
n164=      dll $mdx  SetColor 2,3,5,50,6,9,10,11,12,90,100,110,120 background $rgb(0,72,170)
n165=      dll $mdx  SetColor $dname 2,3,5,50,6,9,10,11,12,90,100,110,120 textbg $rgb(0,72,170)
n166=      dll $mdx  SetColor 2,3,5,50,6,9,10,11,12,90,100,110,120 text $rgb(255,255,255)
n167=      dll $mdx  SetColor $dname 4,7,13,14 background $rgb(0,0,0)
n168=    }
n169=    if (%unome == 2) {
n170=      dll $mdx SetColor $dname 1,8 background $rgb(196,196,196)
n171=      dll $mdx SetDialog $dname bgcolor $rgb(0,0,95)
n172=      dll $mdx  SetColor 2,3,5,50,6,9,10,11,12,90,100,110,120 background $rgb(0,0,95)
n173=      dll $mdx  SetColor $dname 2,3,5,50,6,9,10,11,12,90,100,110,120 textbg $rgb(0,0,95)
n174=      dll $mdx  SetColor 2,3,5,50,6,9,10,11,12,90,100,110,120 text $rgb(255,255,155)
n175=      dll $mdx  SetColor $dname 4,7,13,14 background $rgb(0,0,95)
n176=    }
n177=    did - $+ $iif($away,b,e) $dname 2,3,4,5,6,7,9,10,11,12 | did -a $dname 13 Setta $iif($away,Back,Away) | if ($a_get(anstat) == on) { did -c $dname 5 } | else { did -b $dname 6,7 } | if ($a_get(pager) == on) { did -c $dname 9 } | if ($a_get(logger) == on) { did -c $dname 10 } | if ($a_get(silent) == on) { did -c $dname 11 } | if ($a_get(multi) == on) { did -c $dname 12 } | mas_combo load areasons | mas_combo load anicks
n178=    if ($mas_combo(check,areasons,$a_get(reason))) { did -c $dname 3 $mas_combo(line,3,$a_get(reason)) | did -a $dname 4 Del } | else { did -a $dname 3 $a_get(reason) | did -c $dname 3 $did($dname,3).lines | did -a $dname 4 add } | if ($mas_combo(check,anicks,$a_get(anick))) { did -c $dname 6 $mas_combo(line,6,$a_get(anick)) | did -a $dname 7 del } | else { did -a $dname 6 $a_get(anick) | did -c $dname 6 $did($dname,6).lines | did -a $dname 7 Add }
n179=  }
n180=  if ($devent == sclick) {
n181=    if ($did == 13) { if ($away) { away } | else { if ($did($dname,5).state) { a_save anick $did($dname,6) } | away - $+ $iif($did($dname,5).state,n) $+ $iif($did($dname,9).state,p) $+ $iif($did($dname,10).state,l) $+ $iif($did($dname,11).state,s) $+ $iif($did($dname,12).state,m) $did($dname,3) } } |  if ($did == 3) || ($did == 6) { did - $+ $iif($did($dname,$did) != $null,e,b) $dname $calc($did +1) | did -ra $dname $calc($did +1) $iif($mas_combo(check,$iif($did == 3,areasons,anicks),$did($dname,$did)),Del,Add) } | if ($did == 5) { if ($did($dname,$did).state) { did -e $dname 6,7 } | else { did -b $dname 6,7 } }
n182=    if ($did == 4) || ($did == 7) { if ($did($dname,$did) == del) { a_save $iif($did == 4,areasons,anicks) $remove($a_get($iif($did == 4,areasons,anicks)),$did($dname,$calc($did -1)) $+ $chr(181)) | mas_combo load $iif($did == 4,areasons,anicks) | did -ra $dname $did Del | did -c $dname $iif($did == 4,3,6) 1 } | else { a_save $iif($did == 4,areasons,anicks) $a_get($iif($did == 4,areasons,anicks)) $+ $did($dname,$calc($did -1)) $+ $chr(181) | mas_combo load $iif($did == 4,areasons,anicks) | did -ra $dname $did Del | did -c $dname $iif($did == 4,3,6) $did($dname,$iif($did == 4,3,6)).lines } }
n183=  }
n184=  if ($devent == edit) { did - $+ $iif($did($dname,$did) != $null,e,b) $dname $calc($did +1) | did -ra $dname $calc($did +1) $iif($mas_combo(check,$iif($did == 3,areasons,anicks),$did($dname,$did)),Del,Add) }
n185=}
n186=on *:dialog:eam_dialog:*:*:{
n187=  if ($devent == init) { 
n188=    dll $mdx SetMircVersion $version
n189=    dll $mdx MarkDialog $dname $dialog($dname).hwnd
n190=    if (%unome == 1) {
n191=      dll $mdx SetDialog $dname bgcolor $rgb(0,72,170)
n192=      dll $mdx SetColor $dname 1,8,11 background $rgb(255,255,255)
n193=      dll $mdx  SetColor 2,5,9,10,90,100,11,12,13,14,15 background $rgb(0,72,170)
n194=      dll $mdx  SetColor $dname 2,5,9,10,90,100,11,12,13,14,15 textbg $rgb(0,72,170)
n195=      dll $mdx  SetColor 3,6 background $rgb(0,0,0)
n196=      dll $mdx  SetColor $dname 3,6 textbg $rgb(0,0,0)
n197=      dll $mdx  SetColor 2,3,5,6,9,10,90,100,11,12,13,14,15 text $rgb(255,255,255)
n198=      dll $mdx  SetColor $dname 4,7,16,17 background $rgb(0,72,170)
n199=    }
n200=    if (%unome == 2) {
n201=      dll $mdx SetDialog $dname bgcolor $rgb(0,0,95)
n202=      dll $mdx SetColor $dname 1,8,11 background $rgb(255,255,255)
n203=      dll $mdx  SetColor 2,5,9,10,90,100,11,12,13,14,15 background $rgb(0,0,95)
n204=      dll $mdx  SetColor $dname 2,5,9,10,90,100,11,12,13,14,15 textbg $rgb(0,0,95)
n205=      dll $mdx  SetColor 3,6 background $rgb(0,0,0)
n206=      dll $mdx  SetColor $dname 3,6 textbg $rgb(0,0,0)
n207=      dll $mdx  SetColor 2,3,5,6,9,10,90,100,11,12,13,14,15 text $rgb(255,255,255)
n208=      dll $mdx  SetColor $dname 4,7,16,17 background $rgb(0,0,95)
n209=    }
n210=  did -c $dname $iif($a_get(mtype) == amsg,9,10) | did -a $dname 3 $replace($a_get(amsg),<b>,$chr(2),<u>,$chr(31),<i>,$chr(22),<c>,$chr(3)) | did -a $dname 6 $replace($a_get(bmsg),<b>,$chr(2),<u>,$chr(31),<i>,$chr(22),<c>,$chr(3)) }
n211=  if ($devent == sclick) { if ($did == 4) || ($did == 7) { echo $color($iif($did($dname,9).state,own text,action text)) -a $iif($did($dname,9).state,< $+ $me $+ >,$chr(42) $me) $did($dname,$calc($did -1)) %scriptlogo } | if ($did == 16) { a_save amsg $replace($did($dname,3),$chr(2),<b>,$chr(31),<u>,$chr(22),<i>,$chr(3),<c>) | a_save bmsg $replace($did($dname,6),$chr(2),<b>,$chr(31),<u>,$chr(22),<i>,$chr(3),<c>) | a_save mtype $iif($did($dname,9).state,amsg,ame) } }
n212=}
n213=on *:connect:{ if ($a_get(away) == on) { if ($a_get(multi) == on) { .quote away $a_get(reason) | $iif($a_get(anstat) == on,nick $a_get(anick)) } | elseif ($a_get(multi) == $network) { .quote away $a_get(reason) | $iif($a_get(anstat) == on,nick $a_get(anick)) } } }
n214=on *:exit:{ a_save away off }
n215=on *:text:*:#:{ if ($a_get(logger) == on) && ($a_get(away) == on) { mas_logwin | if ($me isin $1-) || ($a_get(nick) isin $1-) || ($a_get(anick) isin $1-) { if ($a_get(multi) == on) { aline $color(Nick text) @away.log $timestamp < $+ $nick $+ > $1- ( $+ $chan $+ @ $+ $network $+ ) } | elseif ($a_get(multi) == $network) { aline $color(Nick text) @away.log $timestamp < $+ $nick $+ > $1- ( $+ $chan $+ ) } } } }
n216=on *:text:*:?:{ if ($a_get(logger) == on) && ($a_get(away) == on) { mas_logwin | if ($a_get(multi) == on) { aline $color(Nick text) @away.log $timestamp < $+ $nick $+ > $1- (PMSG@ $+ $network $+ ) } | elseif ($a_get(multi) == $network) { aline $color(Nick text) @away.log $timestamp < $+ $nick $+ > $1- (PMSG) } } }
n217=on *:action:*:#:{ if ($a_get(logger) == on) && ($a_get(away) == on) { mas_logwin | if ($me isin $1-) || ($a_get(nick) isin $1-) || ($a_get(anick) isin $1-) { if ($a_get(multi) == on) { aline $color(Nick text) @away.log $timestamp * $nick $1- ( $+ $chan $+ @ $+ $network $+ ) } | elseif ($a_get(multi) == $network) { aline $color(Nick text) @away.log $timestamp * $nick $1- ( $+ $chan $+ ) } } } }
n218=on *:action:*:?:{ if ($a_get(logger) == on) && ($a_get(away) == on) { mas_logwin | if ($a_get(multi) == on) { aline $color(Nick text) @away.log $timestamp * $nick $1- (PMSG@ $+ $network $+ ) } | elseif ($a_get(multi) == $network) { aline $color(Nick text) @away.log $timestamp * $nick $1- (PMSG) } } }
n219=on *:notice:*:*:{ if ($a_get(logger) == on) && ($a_get(away) == on) && ($nick !iswm *Serv) { mas_logwin | if ($a_get(multi) == on) { aline $color(Notice text) @away.log $timestamp - $+ $nick $+ - $1- ( $+ $network $+ ) } | elseif ($a_get(multi) == $network) { aline $color(Notice text) @away.log $timestamp - $+ $nick $+ - $1- } } }
n220=ctcp *:page:*:{ if ($a_get(pager) == on) && ($a_get(away) == on) { mas_logwin | if ($a_get(multi) == on) { aline $color(Ctcp text) @away.log $timestamp [ $+ $nick PAGE] $1- ( $+ $network $+ ) } | elseif ($a_get(multi) == $network) { aline $color(Ctcp text) @away.log $timestamp [ $+ $nick PAGE] $1- } } }
n221=dialog caricamento {
n222=  title "Caricamento"
n223=  size -1 -1 397 100
n224=  text "",1, 2 70 398 12
n225=  text "Caricamento Arcan]G[elo 2, Attendere...",2, 60 90 330 16  
n226=  list 3, 5 5 390 60, size 
n227=}
n228=on *:dialog:caricamento:init:0:{
n229=  if ( %cc181p == on ) { $tunder TDDialog $dialog(caricamento).hwnd > 2 }
n230=  dll dlls/mdx/mdx.dll SetMircVersion $version
n231=  dll dlls/mdx/mdx.dll MarkDialog $dname
n232=  dll dlls/mdx/mdx.dll SetDialog $dname style
n233=  dll dlls/mdx/mdx.dll SetControlMDX $dname 1 ProgressBar smooth > dlls/mdx/ctl_gen.mdx
n234=  dll dlls/mdx/mdx.dll SetFont $dname 2 -11 800 Thaoma
n235=  dll dlls/mdx/mdx.dll SetControlMDX $dname 3 listview icon single noheader flatsb > $views
n236=  dll dlls/mdx/mdx.dll SetBorderStyle $dname 3 windowedge clientedge 
n237=  if (%unome == 1) {
n238=    did -i $dname 3 1 setbkg url normal $mircdirGraphic\Sith_skin\caricamento.jpg
n239=    dll dlls/mdx/mdx.dll SetDialog $dname bgcolor $rgb(0,72,170)
n240=    dll dlls/mdx/mdx.dll SetColor $dname 2 background $rgb(0,72,170)
n241=    dll dlls/mdx/mdx.dll SetColor 2 text $rgb(255,255,255)
n242=    dll dlls/mdx/mdx.dll  SetColor $dname 2 textbg $rgb(0,72,170)
n243=  }
n244=  if (%unome == 2) {
n245=    did -i $dname 3 1 setbkg url normal $mircdirGraphic\Sith_skin\caricamento2.jpg
n246=    dll dlls/mdx/mdx.dll SetDialog $dname bgcolor $rgb(0,0,95)
n247=    dll dlls/mdx/mdx.dll SetColor $dname 2 background $rgb(0,0,95)
n248=    dll dlls/mdx/mdx.dll SetColor 2 text $rgb(255,255,255)
n249=    dll dlls/mdx/mdx.dll  SetColor $dname 2 textbg $rgb(0,0,95)
n250=  }
n251=  ;did -a $dname 1 BarColor $rgb(255,255,255)
n252=  did -a $dname 1 BGColor $rgb(255,255,255)
n253=  .timer 1 1 did -a $dname 1 33
n254=  .timer 1 2 did -a $dname 1 66
n255=  .timer 1 3 did -a $dname 1 99
n256=  .timer 1 4 dialog -x $dname
n257=  .timer 1 5 updt
n258=}
n259=menu menubar {
n260=  Arcan]G[elo tools
n261=  .» Appunti
n262=  ..» Nuovo appunto: writeini txt\agenda.ini APPUNTI $$?="data ? (dd/mm/aaaa) $crlf " $$?="appunto ?"
n263=  ..» Vedere appunti: run notepad txt\agenda.ini
n264=}
n265=dialog -l barzat {
n266=  title "Pesta Game by Super"
n267=  size -1 -1 146 100
n268=  option dbu
n269=  box "Gioco al comando !pesta start", 1, 18 6 109 24
n270=  check "", 2, 20 17 10 10, flat
n271=  text "Attiva", 20, 30 17 25 10
n272=  text "chan", 3, 50 18 50 10
n273=  edit "", 4, 65 17 40 10, autohs
n274=  button "Ok", 5, 57 75 32 12, ok
n275=  text "Il gioco parte col comando !pesta start e per indovinare si digita il comando !pesta nick e con !pesta stop lo fermate spero vi divertiate con quest'addon di Super io mi sono limitato a fargli il dialog...Buon divertimento" 6,6 35 130 40
n276=}
n277=dialog XDCC {
n278=  title "Cerca XDCC ..."
n279=  size -1 -1 335 109
n280=  option pixels
n281=  edit "", 1, 0 9 331 20, autohs
n282=  button "Vai!", 2, 49 66 65 25, ok
n283=  button "Annulla", 3, 223 64 65 25, cancel
n284=}
n285=on *:dialog:XDCC:edit:*:{
n286=  %caccapiscia = $did(1)
n287=}
n288=on *:dialog:XDCC:sclick:2:{
n289=  run http://xdcc.it/?q= $+ %caccapiscia
n290=}
n291=on *:dialog:XDCC:init:0:{
n292=  if ( %cc181p == on ) { $tunder TDDialog $dialog(xdcc).hwnd > 2 }
n293=  if (%unome == 1) {
n294=    dll dlls/mdx/mdx.dll SetMircVersion $version
n295=    dll dlls/mdx/mdx.dll MarkDialog $dname
n296=    dll dlls/mdx/mdx.dll SetColor 1 text $rgb(255,255,255)
n297=    dll dlls/mdx/mdx.dll SetDialog $dname bgcolor $rgb(0,72,170)
n298=    dll dlls/mdx/mdx.dll SetColor $dname 1 textbg $rgb(0,72,170)
n299=    dll dlls/mdx/mdx.dll SetColor $dname 1 textbg $rgb(0,0,0)
n300=    dll dlls/mdx/mdx.dll SetColor $dname 1 background $rgb(0,0,0)
n301=  }
n302=  if (%unome == 2) {
n303=    dll dlls/mdx/mdx.dll SetMircVersion $version
n304=    dll dlls/mdx/mdx.dll MarkDialog $dname 
n305=    dll dlls/mdx/mdx.dll SetDialog $dname bgcolor $rgb(0,0,95)
n306=    dll dlls/mdx/mdx.dll SetColor 1 text $rgb(255,255,255)
n307=    dll dlls/mdx/mdx.dll  SetColor $dname 1 textbg $rgb(0,0,95)
n308=    dll dlls/mdx/mdx.dll SetColor $dname 1 textbg $rgb(0,0,0)
n309=    dll dlls/mdx/mdx.dll SetColor $dname 1 background $rgb(0,0,0)
n310=  } 
n311=}
