;##########################################
;######## Autonotice by -[ L]e[G ]- #######
;##########################################


on *:load:{
  set %enternoticetext on
  echo -a * Automess noticetext caricato con successo.
}

alias autontc { /dialog -m stre.notce34 stre.notce34 }

dialog stre.notce34 {
  title "AutoNotice by L]e[G"
  size -1 -1 490 350
  box "Auto Notice", 2, 10 10 470 400
  text "Imposta parole di input e notice di output", 3, 42 30 300 20
  text "a = Abilita", 4, 410 30 90 20
  edit "", 38, 380 25 20 20
  text "1.", 5, 15 58 15 20
  edit "", 6, 42 55 50 20, autohs
  edit "", 39, 100 55 300 20, autohs
  text "2.", 7, 15 78 15 20
  edit "", 8, 42 75 50 20, autohs
  edit "", 40, 100 75 300 20, autohs
  text "3.", 9, 15 98 15 20
  edit "", 10, 42 95 50 20, autohs
  edit "", 41, 100 95 300 20, autohs
  text "4.", 11, 15 118 15 20
  edit "", 12, 42 115 50 20, autohs
  edit "", 42, 100 115 300 20, autohs  
  text "5.", 13, 15 138 20 20
  edit "", 14, 42 135 50 20, autohs
  edit "", 43, 100 135 300 20, autohs
  text "6.", 15, 15 158 15 20
  edit "", 16, 42 155 50 20, autohs
  edit "", 44, 100 155 300 20, autohs
  text "7.", 17, 15 178 15 20
  edit "", 18, 42 175 50 20, autohs
  edit "", 45, 100 175 300 20, autohs
  text "8.", 19, 15 198 15 20
  edit "", 20, 42 195 50 20, autohs
  edit "", 46, 100 195 300 20, autohs
  text "9.", 21, 15 218 15 20
  edit "", 22, 42 215 50 20, autohs
  edit "", 47, 100 215 300 20, autohs
  text "10.", 23, 15 238 15 25
  edit "", 34, 42 235 50 20, autohs
  edit "", 48, 100 235 300 20, autohs
  button "&OK", 49, 40 310 60 30, ok default
  button "&Cancella", 50, 110 310 65 30, cancel
  button "&Applica", 51, 185 310 60 30
}

on *:dialog:stre.notce34:init:0: {
  did -a stre.notce34 6 %noticetext1 
  did -a stre.notce34 8 %noticetext2
  did -a stre.notce34 10 %noticetext3
  did -a stre.notce34 12 %noticetext4
  did -a stre.notce34 14 %noticetext5
  did -a stre.notce34 16 %noticetext6
  did -a stre.notce34 18 %noticetext7
  did -a stre.notce34 20 %noticetext8
  did -a stre.notce34 22 %noticetext9
  did -a stre.notce34 34 %noticetext0 
  did -a stre.notce34 39 %noticeout1 
  did -a stre.notce34 40 %noticeout2
  did -a stre.notce34 41 %noticeout3
  did -a stre.notce34 42 %noticeout4
  did -a stre.notce34 43 %noticeout5
  did -a stre.notce34 44 %noticeout6
  did -a stre.notce34 45 %noticeout7
  did -a stre.notce34 46 %noticeout8
  did -a stre.notce34 47 %noticeout9
  did -a stre.notce34 48 %noticeout10 
  did -a stre.notce34 38 %attivo1240  

}

on *:dialog:stre.notce34:sclick:49:{
  set %noticetext1 $did(stre.notce34,6)
  set %noticetext2 $did(stre.notce34,8)
  set %noticetext3 $did(stre.notce34,10)
  set %noticetext4 $did(stre.notce34,12)
  set %noticetext5 $did(stre.notce34,14)
  set %noticetext6 $did(stre.notce34,16)
  set %noticetext7 $did(stre.notce34,18)
  set %noticetext8 $did(stre.notce34,20)
  set %noticetext9 $did(stre.notce34,22)
  set %noticetext10 $did(stre.notce34,34)
  set %noticeout1 $did(stre.notce34,39)
  set %noticeout2 $did(stre.notce34,40)
  set %noticeout3 $did(stre.notce34,41)
  set %noticeout4 $did(stre.notce34,42)
  set %noticeout5 $did(stre.notce34,43)
  set %noticeout6 $did(stre.notce34,44)
  set %noticeout7 $did(stre.notce34,45)
  set %noticeout8 $did(stre.notce34,46)
  set %noticeout9 $did(stre.notce34,47)
  set %noticeout10 $did(stre.notce34,48)
  set %attivo1240 $did(stre.notce34,38)
}

on *:dialog:stre.notce34:sclick:50:{
  set %noticetext1 $did(stre.notce34,6)
  set %noticetext2 $did(stre.notce34,8)
  set %noticetext3 $did(stre.notce34,10)
  set %noticetext4 $did(stre.notce34,12)
  set %noticetext5 $did(stre.notce34,14)
  set %noticetext6 $did(stre.notce34,16)
  set %noticetext7 $did(stre.notce34,18)
  set %noticetext8 $did(stre.notce34,20)
  set %noticetext9 $did(stre.notce34,22)
  set %noticetext10 $did(stre.notce34,34)
  set %noticeout1 $did(stre.notce34,39)
  set %noticeout2 $did(stre.notce34,40)
  set %noticeout3 $did(stre.notce34,41)
  set %noticeout4 $did(stre.notce34,42)
  set %noticeout5 $did(stre.notce34,43)
  set %noticeout6 $did(stre.notce34,44)
  set %noticeout7 $did(stre.notce34,45)
  set %noticeout8 $did(stre.notce34,46)
  set %noticeout9 $did(stre.notce34,47)
  set %noticeout10 $did(stre.notce34,48)
  set %attivo1240 $did(stre.notce34,38)
}
on *:text:%noticetext1:#:{ 
if (%noticetext1 != $null && %noticeout1 != $null && %attivo1240 == a ) notice $nick %noticeout1 }
on *:text:%noticetext2:#:{ 
if (%noticetext2 != $null && %noticeout2 != $null && %attivo1240 == a ) notice $nick %noticeout2 }
on *:text:%noticetext3:#:{ 
if (%noticetext3 != $null && %noticeout3 != $null && %attivo1240 == a ) notice $nick %noticeout3 }
on *:text:%noticetext4:#:{ 
if (%noticetext4 != $null && %noticeout4 != $null && %attivo1240 == a ) notice $nick %noticeout4 }
on *:text:%noticetext5:#:{ 
if (%noticetext5 != $null && %noticeout5 != $null && %attivo1240 == a ) notice $nick %noticeout5 }
on *:text:%noticetext6:#:{ 
if (%noticetext6 != $null && %noticeout6 != $null && %attivo1240 == a ) notice $nick %noticeout6 }
on *:text:%noticetext7:#:{ 
if (%noticetext7 != $null && %noticeout7 != $null && %attivo1240 == a ) notice $nick %noticeout7 }
on *:text:%noticetext8:#:{ 
if (%noticetext8 != $null && %noticeout8 != $null && %attivo1240 == a ) notice $nick %noticeout8 }
on *:text:%noticetext9:#:{ 
if (%noticetext9 != $null && %noticeout9 != $null && %attivo1240 == a ) notice $nick %noticeout9 }
on *:text:%noticetext10:#:{ 
if (%noticetext10 != $null && %noticeout10 != $null && %attivo1240 == a ) notice $nick %noticeout10 }
}
