/ScriptServ

on *:start:.splay $mircdirsounds\waves\mnstr.wav | devil
on *:connect:set %server $server | if (%autojoin.1 == $null) echo -s -8,4HINT4,1 To set autojoin channels, right click on the Status screen  | if (%autojoin.1 != $null) { join %autojoin.1 | if (%autojoin.2 != $null) join %autojoin.2 | if (%autojoin.3 != $null) join %autojoin.3 | if (%autojoin.4 != $null) join %autojoin.4 } | splay $mircdirsounds\waves\spookywelcome.wav


alias devil {
  if (%devil == yes) { .splay $mircdirsounds\midi\DIdance.mid | echo -s -8,4HINT4,1 To stop playing music on startup, right click on the Status screen }
  }

  alias ascii {
    window -c @Ascii
    window -d @Ascii -1 -1 250 550
    set %asciiv 0 | set %ii  $+ $chr(48)
    :ascii
    set %i $len(%asciiv) | %i = 4 - %i | set %i $str(%ii,%i) $+ %asciiv
    aline @Ascii Ascii Code %asciiv is: $chr(%asciiv)  or alt- $+ %i
    if ( %asciiv == 255 ) halt
    else inc %asciiv 
    goto ascii
  }