ROFL damn it after all that it dosent work here is my script that i made to take keys and use them to encript and decript binary and its not working.

Code:
;#############################
;# Binary God V3.0           #
;# Made by DeathfireD 1/3/04 #
;############################
menu menubar,channel {
  .Binary keys:/bincript4
  -
}
 [color:red] dialog bincript4 {
  title "Binary God Encryption"
  size -1 -1 98 55
  option dbu
  box "Binary God Setup - mIRC Integrated", 2, 0 0 98 55
  text "Encrypt", 3, 5 10 24 8
  edit , 4, 31 10 62 10, autohs
  edit , 5, 31 20 62 10, autohs
  text "Decrypt", 6, 5 20 24 8
  button "Cancel", 31, 35 40 28 10, flat cancel
  button "OK", 30, 5 40 28 10, default flat ok
  check "Encrypt text by the defaults.", 7, 5 30 87 10, left
}
alias bincript4 { dialog -md bincript4 bincript4 }

on *:dialog:bincript4:sclick:7:{
  ;echo -a Did: $did
  if ($did == 7) { set %bincrypt 8
    set %bindecrypt 10
    set %bincrypt2 -8
    ;echo -a Encryption Defaults: Yes
  }
  else {
    set %bincrypt 8
    set %bincrypt2 -8
    set %bindecrypt 10
    ;echo -a Encryption Defaults: No
  }
}
on *:dialog:bincript4:edit:*:{
  if $did == 4 { set %bincrypt $did(4) | set %bincrypt2 - $+ $did(4) }
  if $did == 5 { set %bindecrypt $did(5) }
}
on *:dialog:bincript4:init:0:{ did -a bincript4 4 %bincrypt | did -a bincript4 5 %bindecrypt }[/color]
dialog amigos {
  title "t h a n k z .::"
  size -1 -1 143 69
  option dbu
  list 1, 1 0 44 67, size
  text "name", 2, 46 3 22 7
  text "help", 3, 46 15 27 7
  edit "", 4, 76 1 66 10, multi read autohs
  edit "", 5, 76 13 66 31, multi autovs read
  button "[ok]", 11, 123 57 18 10, ok
}

dialog autor {
  title "a u t h o r s .::"
  size -1 -1 305 220
  text "nick",3,82 12 40 14
  combo 1,125 8 100 100, drop
  text "name",4,5 45 45 14, center
  text "",7,70 45 200 14
  text "Servers",5,5 75 45 14, center
  text "",10,70 75 200 14
  text "chans",6,5 105 45 14, center
  text "",13,70 105 230 14
  text "Aim",127,5 135 45 14, center
  text "",16,70 135 200 14
  text "email",8,5 165 45 14, center
  text "",19,70 165 200 14
  button "[close]",121, 140 190 40 25, ok center
  box "", 123, 0 30 55 155
  box "", 111, 0 30 305 35
  box "", 112, 0 60 305 35
  box "", 113, 0 90 305 35
  box "", 114, 0 120 305 35
  box "", 115, 0 150 305 35
}
on *:dialog:amigos:init:0:{
  did -a amigos 1 Koga
  did -a amigos 1 mIRC
  did -a amigos 1 Kitty-Kat
  did -a amigos 1 Blowfish
  did -a amigos 1 Tidy-Trax
  did -a amigos 1 you
  did -a amigos 1 you
  did -a amigos 1 you
  did -a amigos 1 you
  did -a amigos 1 you
  did -z amigos 1
}

on *:dialog:amigos:sclick:1: {
  if ($did(1).sel == 1) { namedid | did -a amigos 4 Koga | did -a amigos 5 Tester }
  if ($did(1).sel == 2) { namedid | did -a amigos 4 mIRC MessageBoard | did -a amigos 5 Thanks for helping with scripting }
  if ($did(1).sel == 3) { namedid | did -a amigos 4 Kitty-Kat | did -a amigos 5 Tester }
  if ($did(1).sel == 4) { namedid | did -a amigos 4 Blowfish | did -a amigos 5 Thanks for dialog for keys }
  if ($did(1).sel == 5) { namedid | did -a amigos 4 Tidy-Trax | did -a amigos 5 Thanks for the help with "-" before "%val" }
  if ($did(1).sel == 6) { namedid | did -a amigos 4 you | did -a amigos 5 you can help }
  if ($did(1).sel == 7) { namedid | did -a amigos 4 you | did -a amigos 5 you can help }
  if ($did(1).sel == 8) { namedid | did -a amigos 4 you | did -a amigos 5 you can help }
  if ($did(1).sel == 9) { namedid | did -a amigos 4 you | did -a amigos 5 you can help }
  if ($did(1).sel == 10) { namedid | did -a amigos 4 you | did -a amigos 5 you can help }
}

alias namedid { did -r amigos 4 | did -r amigos 5 }
alias thankz { dialog -md amigos amigos }
alias namedidz { did -r autor 7 | did -r autor 10 | did -r autor 13 | did -r autor 16 | did -r autor 19 }
alias autor { dialog -md autor autor }
on *:dialog:autor:init:0: {
  did -a autor 1 DeathfireD
}

on *:dialog:autor:sclick:1: {
  if ($did(1).sel == 1) { namedidz | did -a autor 7 Dan Ordway | did -a autor 10 Otaku-chat.com | did -a autor 13 @#dIRCxp @#Scripting @#Chaotic_Century @#amor @#plus | did -a autor 16 DeathfireD2 | did -a autor 19 DJOrdway@adelphia.net }
}
dialog Bingotinfo {
  title "Binary God V3.0"
  size -1 -1 146 124
  option dbu
  box "Info", 1, 1 3 145 105
  edit "Binary God was made for people that wish to talk in there chat or pm without anyone knowing what there saying. This Update, I fixed some bugs and made it so you can talk in pm with it now. I also made better dialogs and made the look a little cleaner                                          ==Next update==                                          Im planing on making some kinda of auto update that will search for an update on my site then download it. Please feel free to send me feedback or help me out. Im alwase looking for more help. Thanks", 2, 3 10 141 95, read multi
  button "Exit", 3, 4 110 63 9, flat, ok
  button "E-mail Feedback", 4, 73 110 66 9, flat
}
alias Bingotinfo { dialog -md Bingotinfo Bingotinfo }

on *:dialog:Bingotinfo:sclick:*:{
  if $did == 4 { run mailto:DJOrdway@adelphia.net?subject=Binary God v1.0 input }
}
;[binclock]
alias bc.start {
  .timerbc -m 0 100  bc.drawtime
  window -pk0od +ft @BinaryClock -1 -1 260 104
}

alias bc.drawtime {
  if ($window(@BinaryClock) == $null) {
    .timerbc off
    halt
  }
  drawrect -nf @BinaryClock 0 1 1 1 180 200

  set %bc.tfmt 243434444
  set %bc.i 1

  while (%bc.i <= $len(%bc.tfmt)) {
    set %bc.z $mid(%bc.tfmt, %bc.i, 1)
    while (%bc.z) {
      bc.bit $bc.getbit(%bc.i, %bc.z) %bc.i %bc.z
      dec %bc.z
    }
    inc %bc.i
  }

  bc.drawblobs 
  ; Update the display
  drawdot @BinaryClock

  ;drawtext @BinaryClock 4 Arial 10 10 65 $time - $gettok($calc($ticks / 1000),2,$asc(.))
  unset %bc.*
}

alias bc.bit {
  set %bc.active 2
  if ($1 == 1) set %bc.active 4
  set %bc.dist 0

  if ($2 > 2) inc %bc.dist 20
  if ($2 > 4) inc %bc.dist 20
  if ($2 > 6) inc %bc.dist 20

  inc %bc.dist $calc(($2 * 20) - 10)
  set %bc.top $calc(70 - ($3 * 15))
  drawrect -nf @BinaryClock %bc.active 1 %bc.dist %bc.top 10 10
}

alias bc.drawblobs {
  drawrect -nf @BinaryClock 2 1 52 20 5 5
  drawrect -nf @BinaryClock 2 1 52 45 5 5
  drawrect -nf @BinaryClock 2 1 112 20 5 5
  drawrect -nf @BinaryClock 2 1 112 45 5 5
  drawrect -nf @BinaryClock 2 1 172 20 5 5
  drawrect -nf @BinaryClock 2 1 172 45 5 5
}

alias bc.getbit {
  if ($1 <= 6) {
    set %bc.time $left($time,2) $+ $mid($time,4,2) $+ $right($time,2)
    set %bc.val $mid($revstr($base($mid(%bc.time,$1,1),10,2)), $2, 1)
  }
  else {
    set %bc.time $gettok($calc($ticks / 1000),2,$asc(.))
    set %bc.val $mid($revstr($base($mid(%bc.time,$calc($1 - 6),1),10,2)), $2, 1)
  }    
  if (%bc.val == $null) set %bc.val 0
  return %bc.val
}

;reverse a string. used to reverse the bits into an easier order to 'use' them
alias revstr {
  set %bc.str $len($1)
  set %bc.ret
  while (%bc.str) {
    set %bc.ret %bc.ret $+ $mid($1, %bc.str,1)
    dec %bc.str
  }
  return %bc.ret
}

menu channel,status {
  Binary  
  .Binary Clock: bc.start
}
alias bin.decode {
  var %temp = $1-

  var %output
  while (%temp) {
    var %char = $chr($base($left(%temp, [color:red]%bincrypt [/color] ),2, [color:red] %bindecrypt[/color]))

    %output = %output $+ $iif(%char == $chr(32),$chr(1),%char)
    %temp = $right(%temp, [color:red] %bincrypt2[/color])
  }

  return $replace(%output,$chr(1),$chr(32))
}

alias bin.encode {
  var %output
  var %temp = $1-

  while (%temp) {
    %output = %output $+ $base($asc($left(%temp,1)), [color:red]%bindecrypt [/color],2, [color:red]%bincrypt [/color])

    %temp = $right(%temp,-1)
  }

  return %output
}
menu channel,Query {
  -
  binary
  .Say Something in Binary:.msg # $bin.encode($$input(Enter your text.,e)) | echo -a < $+ $me $+ @binon> $!
  ..&info
  ...&thankz: thankz
  ...&author: autor
  ...&info: Bingotinfo
  ..-
  ..&unload: unload -rs bingod.mrc
}
menu Status {
  -
  Binary
  .Binary God keys:/bincript4
  ..&info
  ...&thankz: thankz
  ...&author: autor
  ...&info: Bingotinfo
  ..-
  ..&unload: unload -rs bingod.mrc

}
on *:INPUT:#:{
  if $left($1,1) isin 01 {
    .msg # $1-
    echo -a $+(<,$me,@binon>) $bin.decode($1-)
  halt  }
}
on $1^:text:/^[01 ]+$/:#:{
  echo -mbflirt # $+(<,$nick,@binon>) $bin.decode($1-)
  haltdef
}
on $*^:text:/^[01 ]+$/:?:{
  echo -mbflirt $nick $+(<,$nick,@binon>) $bin.decode($1-)
  haltdef
}
on 1:LOAD:/echo 12Binary God V2.0 Script By DeathfireD Loaded!
on 1:UNLOAD:/echo 4Binary God V2.0 Script By DeathfireD Unloaded!
}


for some reason when I set one client to say keys 12 and 5 and then i set the other to the same thing it dosent work. but when i set it to the default it works fine is there a way to fix this?