Unnamed

on 1:DIALOG:nsap:sclick:15: { if ($did(nsap,3).sel == 1) { write -c $mircdirsystem/nsstyle.txt Style 1 }
  if ($did(nsap,3).sel == 2) { write -c $mircdirsystem/nsstyle.txt Style 2 }
  if ($did(nsap,3).sel == 3) { write -c $mircdirsystem/nsstyle.txt Style 3 }
  if ($did(nsap,3).sel == 4) { write -c $mircdirsystem/nsstyle.txt Style 4 }
  if ($did(nsap,3).sel == 5) { write -c $mircdirsystem/nsstyle.txt Style 5 } 
  if ($did(nsap,17).state == 1) { .enable #netsplit | write -c $mircdirsystem/nsstatus.txt on }
  if ($did(nsap,17).state == 0) { .disable #netsplit | write -c $mircdirsystem/nsstatus.txt off }
}


on 1:DIALOG:nsap:sclick:3: { if ($did(nsap,3).sel == 1) { did -ra nsap 12 Netsplit Dectected Between Servers server1 <-> server2 | echo -a 9N14etspli9t D14etecte9d B14etwee9n S14erver9s14 server1 9<14-9>14 server2 }
  if ($did(nsap,3).sel == 2) { did -ra nsap 12 NeTsPlIt DeCtEd BeTwEeN SeRvErs server1 <-=-> server2 | echo -a 9NeTsPlIt 14DeTeCtEd 9BeTwEeN 14SeRvErs9 server1 14<-9=14->9 server2 }
  if ($did(nsap,3).sel == 3) { did -ra nsap 12 <Netsplit> <Detected> <Between> <Servers> <server1> && <server2> | echo -a 9<14Netsplit9> <14Detected9> <14Between9> <14Servers9> <14server19> 14&& 9<14server29> }
  if ($did(nsap,3).sel == 4) { did -ra nsap 12 server1 & server2 Have Split Apart | echo -a 9server1 14& 9server2 14Have Split Apart }
if ($did(nsap,3).sel == 5) { did -ra nsap 12 Hold On Tight! server1 & server2 Just Split Apart! | echo -a 9Hold On Tight!14 server1 9& server2 9Just Split Apart! } }

on 1:DIALOG:nsap:init:*: { 
  did -i nsap 3 1 Style 1 
  did -i nsap 3 2 Style 2 
  did -i nsap 3 3 Style 3
  did -i nsap 3 4 Style 4 
  did -i nsap 3 5 Style 5  
  if ($read($mircdirsystem\nsstyle.txt) == Style 1) { did -c nsap 3 1 | did -ra nsap 12 Netsplit Detected Between Servers server1 <-> server2 } 
  if ($read($mircdirsystem\nsstyle.txt) == Style 2) { did -c nsap 3 2 | did -ra nsap 12 NeTsPlIt DeTeCtEd BeTwEeN SeRvErs server1 <-=-> server2 } 
  if ($read($mircdirsystem\nsstyle.txt) == Style 3) { did -c nsap 3 3 | did -ra nsap 12 <Netsplit> <Detected> <Between> <Servers> <server1> && <server2> } 
  if ($read($mircdirsystem\nsstyle.txt) == Style 4) { did -c nsap 3 4 | did -ra nsap 12 server1 & server2 Have Split Apart } 
  if ($read($mircdirsystem\nsstyle.txt) == Style 5) { did -c nsap 3 5 | did -ra nsap 12 Hold On Tight! server1 & server2 Just Split Apart! } 
  if (amsg iswm $read($mircdirsystem/nsmsg.txt)) { did -c nsap 8 } 
  if (amsg !iswm $read($mircdirsystem/nsmsg.txt)) { did -c nsap 9 } 
  if (on iswm $read($mircdirsystem/nsstatus.txt)) { did -c nsap 17 }
  if (off iswm $read($mircdirsystem/nsstatus.txt)) { did -u nsap 17 }
} 

on 1:DIALOG:nsap:sclick:8: { write $mircdirsystem/nsmsg.txt amsg }
on 1:DIALOG:nsap:sclick:9: { write $mircdirsystem/nsmsg.txt msg }


#netsplit on
on *:QUIT: { if (. isin $1) && (. isin $2) && ($3 == $null) { if ($1 == %split.1) && ($2  == %split.2) goto end
    if ((Style 1 iswm $read($mircdirsystem/nsstyle.txt)) && (amsg iswm $read($mircdirsystem/nsstyle.txt))) goto amsgstyle1
    if ((Style 1 iswm $read($mircdirsystem/nsstyle.txt)) && (msg iswm $read($mircdirsystem/nsstyle.txt))) goto msgstyle1
    if ((Style 2 iswm $read($mircdirsystem/nsstyle.txt)) && (amsg iswm $read($mircdirsystem/nsstyle.txt))) goto amsgstyle2
    if ((Style 2 iswm $read($mircdirsystem/nsstyle.txt)) && (msg iswm $read($mircdirsystem/nsstyle.txt))) goto msgstyle2
    if ((Style 3 iswm $read($mircdirsystem/nsstyle.txt)) && (amsg iswm $read($mircdirsystem/nsstyle.txt))) goto amsgstyle3
    if ((Style 3 iswm $read($mircdirsystem/nsstyle.txt)) && (msg iswm $read($mircdirsystem/nsstyle.txt))) goto msgstyle3
    if ((Style 4 iswm $read($mircdirsystem/nsstyle.txt)) && (amsg iswm $read($mircdirsystem/nsstyle.txt))) goto amsgstyle4
    if ((Style 4 iswm $read($mircdirsystem/nsstyle.txt)) && (msg iswm $read($mircdirsystem/nsstyle.txt))) goto msgstyle4
    if ((Style 5 iswm $read($mircdirsystem/nsstyle.txt)) && (amsg iswm $read($mircdirsystem/nsstyle.txt))) goto amsgstyle5
    if ((Style 5 iswm $read($mircdirsystem/nsstyle.txt)) && (msg iswm $read($mircdirsystem/nsstyle.txt))) goto msgstyle5

    :amsgstyle1
    amsg 9N14etspli9t D14etecte9d B14etwee9n S14erver9s14 $1 9<14-9>14 $2  | goto next
    :msgstyle1
    msg $active 9N14etspli9t D14etecte9d B14etwee9n S14erver9s14 $1 9<14-9>14 $2  |  goto next

    :amsgstyle2
    amsg 9NeTsPlIt 14DeTeCtEd 9BeTwEeN 14SeRvErs9 $1 14<-9=14->9 $2 $+  | goto next
    :msgstyle2
    msg $active 9NeTsPlIt 14DeTeCtEd 9BeTwEeN 14SeRvErs9 $1 14<-9=14->9 $2 $+  | goto next

    :amsgstyle3
    amsg 9<14Netsplit9> <14Detected9> <14Between9> <14Servers9> <14 $+ $1 $+ 9> 14&& 9<14 $+ $2 $+ 9> |  goto next
    :msgstyle3
    msg $active 9<14Netsplit9> <14Detected9> <14Between9> <14Servers9> <14 $+ $1 $+ 9> 14&& 9<14 $+ $2 $+ 9> | goto next

    :amsgstyle4
    amsg 9 $+ $1 14& 9 $+ $2 14Have Split Apart | goto next
    :msgstyle4
    msg $active 9 $+ $1 14& 9 $+ $2 14Have Split Apart | goto next

    :amsgstyle5
    amsg 9Hold On Tight!14 $1 9& $2 9Just Split Apart! | goto next
    :msgstyle5
    msg $active 9Hold On Tight!14 $1 9& $2 9Just Split Apart! | goto next

    :next
    set %split.1 $1
    set %split.2 $2

    :end
  }
}
#netsplit end