addpresystem

on *:load:{ dialog -m addpredc addpredc }
Menu Channel {
  ADDPRE SETUP:/dialog -m addpredc addpredc
}
dialog addpredc {
  title "ADDPRE SYSTEM V1.0"
  size -1 -1 194 138
  option dbu
  box "ADDPRE", 1, 1 3 126 64
  edit "Rls.name.xvid-iND", 2, 4 19 94 10
  button "ADD IT!", 3, 70 32 37 12
  text "RELEASE NAME", 4, 4 11 56 8
  text "FiLES:", 5, 3 35 20 8
  edit "1", 6, 24 34 28 10
  edit "15", 7, 24 44 28 10
  text "SiZE", 8, 3 44 19 8
  box "NUKE/UNNUKE", 9, 1 69 126 68
  edit "Section", 10, 65 9 32 10
  text "Section", 11, 99 11 25 8
  edit "Rls.name.xvid-iND", 12, 3 87 90 10
  text "RELEASE NAME:", 13, 4 78 53 8
  edit "Reason", 14, 3 97 113 10
  button "NUKE", 15, 4 108 37 12
  box "SETTiNGS", 16, 128 3 62 133
  edit "#ch.addpre", 17, 134 22 50 10
  text "REASON:", 18, 94 87 25 8
  text "ADDPRE CHAN", 19, 134 11 46 8, center
  text ".: HELP :.", 20, 145 50 23 9, center
  text "Set addpre channel to echo to.                     You MUST! set size/files of rls.                                                   You Need to push button´s to enable changes                                                    Dont SPAM!!!!", 21, 132 61 54 73
  text "ScriPT oF Dec0de", 22, 69 126 44 8
  text "V1.0 @ 03/03-2008", 23, 10 126 50 8
  text "MB", 24, 53 45 8 8
  button "Enable", 25, 137 34 37 12
  button "UNNUKE", 26, 46 108 37 12
  edit "METAL", 27, 24 54 38 10
  text "GENRE", 28, 3 55 19 8
  check "You Pre MP3?", 30, 67 45 50 10
}
On *:dialog:addpredc:sclick:25:{ 
  set %apch $did(17) 
}
On *:dialog:addpredc:sclick:3:{
  set %aprlsname $did(2) 
  set %aprlssec $did(10) 
  set %aprlsfiles $did(6) 
  set %aprlssize $did(7) 
  set %apmp3 $did(27) {
  }
  On *:dialog:addpredc:sclick:3:{
    if ($did(30).state == 1) { set %mp3ap ON }
    if ($did(30).state == 0) { set %mp3ap OFF }
    if (%mp3ap = ON) { /msg %apch !addpre %aprlsname %aprlssec | msg %apch !info %aprlsname %aprlsfiles %aprlssize | msg %apch !gn %aprlsname %apmp3 }
    if (%mp3ap = Off) { /msg %apch !addpre %aprlsname %aprlssec | msg %apch !info %aprlsname %aprlsfiles %aprlssize 
    }
    unset %aprlsname 
    unset %aprlssec
    unset %aprlsfiles
    unset %aprlssize { 
    }
  }
}
On *:dialog:addpredc:sclick:15:{
  set %nurlsname $did(12)
  set %nureason $did(14) {
  /msg %apch !nuke %nurlsname %nureason }
}
unset %nurlsname
unset %nureason {
}
On *:dialog:addpredc:sclick:26:{
  set %unnurlsname $did(12)
  set %unnureason $did(14) {
  }
/msg %apch !unnuke %unnurlsname %unnureason }
unset %unnurlsname
unset %unnureason {
}