Miscellany

doe dit in je poppup Nick List 
.stuur bericht: /dialog -m test2 test2 

doe dit in remote


dialog test { 
  title "send opties"
  size -1 -1 240 100
  option dbu
  text "klik aan hoe je het wilt verzenden", 342, 5 15 55 20 
  radio "notice", 1, 5 35 25 10
  radio "private", 2, 5 45 25 10
  radio "in de chat", 3, 5 55 45 10
  button "zenden", 4, 25 70 90 25
  edit "naar wie/naar welke chan", 5, 85 5 75 10
  edit "tekst", 6, 55 35 160 10
  edit "", 8, 55 45 160 10
  edit "", 9, 55 55 160 10
  button "voeg kleur toe", 7, 125 70 100 25
}

on *:dialog:test:sclick:4:{
  set %bericht $did(6) $did(8) $did(9)
  if ($did(1).state) /notice %bericht 
  if ($did(2).state) /msg %bericht
  if ($did(3).state) /msg %bericht
  /dialog -x test
}

on *:dialog:test:sclick:7:{
  set %naam $did(5)
  set %bericht $did(6) $did(8) $did(9)
  if ($did(1).state) set %stijl /notice 
  if ($did(2).state) set %stijl /msg
  if ($did(3).state) set %stijl /msg
  /dialog -x test 
  /dialog -m porno porno
}

dialog porno {
  title "achtergrondkleur"
  size -1 -1 100 100
  option dbu
  text "selecteer hier de achtergrondkleur", 556, 5 1 100 10
  radio "zwart", 1, 5 10 35 10
  radio "donkerblauw", 2, 5 20 40 10
  radio "donkergroen", 3, 5 30 40 10
  radio "rood", 4, 5 40 35 10
  radio "bordo", 5, 5 50 35 10
  radio "paars", 6, 5 60 35 10
  radio "oranje", 7, 5 70 35 10
  radio "geel", 8, 5 80 35 10
  radio "lichtgroen", 9, 5 90 35 10
  radio "zeeblauw", 10, 45 10 35 10
  radio "lichtblauw", 11, 45 20 35 10
  radio "blauw", 12, 45 30 35 10
  radio "roze", 13, 45 40 35 10
  radio "donkergrijs", 14, 45 50 35 10
  radio "lichtgrijs", 15, 45 60 35 10
  radio "geen", 16, 45 70 35 10
  button "zenden", 17, 45 80 35 10
  button "letterkleur", 18, 45 90 35 10
}

on *:dialog:porno:sclick:17:{ 
  if ($did(1).state) %stijl %naam 0,1 $+ %bericht
  if ($did(2).state) %stijl %naam 1,2 $+ %bericht
  if ($did(3).state) %stijl %naam 1,3 $+ %bericht
  if ($did(4).state) %stijl %naam 1,4 $+ %bericht
  if ($did(5).state) %stijl %naam 1,5 $+ %bericht
  if ($did(6).state) %stijl %naam 1,6 $+ %bericht
  if ($did(7).state) %stijl %naam 1,7 $+ %bericht
  if ($did(8).state) %stijl %naam 1,8 $+ %bericht
  if ($did(9).state) %stijl %naam 1,9 $+ %bericht
  if ($did(10).state) %stijl %naam 1,10 $+ %bericht
  if ($did(11).state) %stijl %naam 1,11 $+ %bericht
  if ($did(12).state) %stijl %naam 1,12 $+ %bericht
  if ($did(13).state) %stijl %naam 1,13 $+ %bericht
  if ($did(14).state) %stijl %naam 1,14 $+ %bericht
  if ($did(15).state) %stijl %naam 1,15 $+ %bericht
  if ($did(16).state) %stijl %naam 1,0 $+ %bericht
  /dialog -x porno
}

on *:dialog:porno:sclick:18:{ 
  if ($did(1).state) set %bericht 0,1 $+ %bericht
  if ($did(2).state) set %bericht  1,2 $+ %bericht
  if ($did(3).state) set %bericht  1,3 $+ %bericht
  if ($did(4).state) set %bericht  1,4 $+ %bericht
  if ($did(5).state) set %bericht  1,5 $+ %bericht
  if ($did(6).state) set %bericht  1,6 $+ %bericht
  if ($did(7).state) set %bericht  1,7 $+ %bericht
  if ($did(8).state) set %bericht  1,8 $+ %bericht
  if ($did(9).state) set %bericht  1,9 $+ %bericht
  if ($did(10).state) set %bericht  1,10 $+ %bericht
  if ($did(11).state) set %bericht  1,11 $+ %bericht
  if ($did(12).state) set %bericht  1,12 $+ %bericht
  if ($did(13).state) set %bericht  1,13 $+ %bericht
  if ($did(14).state) set %bericht  1,14 $+ %bericht
  if ($did(15).state) set %bericht  1,15 $+ %bericht
  if ($did(16).state) set %bericht  1,0 $+ %bericht
  /dialog -x porno
  /dialog -m geil geil
}

dialog geil {
  title "letterkleur"
  size -1 -1 100 100
  option dbu
  text "selecteer hier de letterkleur", 556, 5 1 100 10
  radio "zwart", 1, 5 10 35 10
  radio "donkerblauw", 2, 5 20 40 10
  radio "donkergroen", 3, 5 30 40 10
  radio "rood", 4, 5 40 35 10
  radio "bordo", 5, 5 50 35 10
  radio "paars", 6, 5 60 35 10
  radio "oranje", 7, 5 70 35 10
  radio "geel", 8, 5 80 35 10
  radio "lichtgroen", 9, 5 90 35 10
  radio "zeeblauw", 10, 45 10 35 10
  radio "lichtblauw", 11, 45 20 35 10
  radio "blauw", 12, 45 30 35 10
  radio "roze", 13, 45 40 35 10
  radio "donkergrijs", 14, 45 50 35 10
  radio "lichtgrijs", 15, 45 60 35 10
  radio "wit", 16, 45 70 35 10
  button "zenden", 17, 45 80 35 10
}

on *:dialog:geil:sclick:17:{ 
  set %bericht $right(%bericht,-3)
  if ($did(1).state) %stijl %naam 1, $+ %bericht
  if ($did(2).state) %stijl %naam 2, $+ %bericht
  if ($did(3).state) %stijl %naam 3, $+ %bericht
  if ($did(4).state) %stijl %naam 4, $+ %bericht
  if ($did(5).state) %stijl %naam 5, $+ %bericht
  if ($did(6).state) %stijl %naam 6, $+ %bericht
  if ($did(7).state) %stijl %naam 7, $+ %bericht
  if ($did(8).state) %stijl %naam 8, $+ %bericht
  if ($did(9).state) %stijl %naam 9, $+ %bericht
  if ($did(10).state) %stijl %naam 10, $+ %bericht
  if ($did(11).state) %stijl %naam 11, $+ %bericht
  if ($did(12).state) %stijl %naam 12, $+ %bericht
  if ($did(13).state) %stijl %naam 13, $+ %bericht
  if ($did(14).state) %stijl %naam 14, $+ %bericht
  if ($did(15).state) %stijl %naam 15, $+ %bericht
  if ($did(16).state) %stijl %naam 0, $+ %bericht
  /dialog -x geil
}

dialog test2 { 
  title "send opties"
  size -1 -1 240 100
  option dbu
  text "klik aan hoe je het wilt verzenden", 342, 5 15 55 20 
  radio "notice", 1, 5 35 25 10
  radio "private", 2, 5 45 25 10
  button "zenden", 4, 25 70 90 25
  edit "tekst", 6, 55 35 160 10
  edit "", 8, 55 45 160 10
  edit "", 9, 55 55 160 10
  button "voeg kleur toe", 7, 125 70 100 25
}

on *:dialog:test2:sclick:4:{
  set %bericht $nick $did(6) $did(8) $did(9)
  if ($did(1).state) /notice %bericht 
  if ($did(2).state) /msg %bericht
  /dialog -x test2
}

on *:dialog:test2:sclick:7:{
  set %naam $nick
  set %bericht $did(6) $did(8) $did(9)
  if ($did(1).state) set %stijl /notice 
  if ($did(2).state) set %stijl /msg
  /dialog -x test2 
  /dialog -m porno porno
}