Code cracker

[anmlhckr]

alias code { if (!$dialog(code)) { dialog -m code code } }
dialog code {
title "Code Cracker"
size -1 -1 381 103
option dbu
edit "", 1, 2 12 285 10, multi, autohs
edit "", 2, 2 25 285 10, multi, autohs
edit "", 3, 2 38 285 10, read autohs
button "Encode", 4, 290 12 37 12
button "Decode", 5, 290 25 37 12
button "Clear", 6, 290 38 37 12, default
box "Coder", 7, 0 1 329 102
box "NOTE", 8, 0 50 329 56
text "Only the code in the () (brackets) of $encode/$decode(coded text,m) is need in the encode/decode edit bars. ie:hi this is just a test to see if the code gets encoded or aGkgdGhpcyBpcyBqdXN0IGEgdGVzdCB0byBzZWUgaWYgdGhlIG NvZGUgZ2V0cyBlbmNvZGVkLg==.If anything other then plain text or coded text is put ,ie:$encode(encode this txt,m),then it will not function properly.So ONLY! plain text or coded text can be put in the edit bar.Also you must encode/decode text/code before saying or echoing", 9, 3 57 322 44
box "action buttons", 10, 328 1 53 102
button "Say Encode", 11, 330 12 49 12
button "Echo Encode", 12, 330 25 49 12
button "Say Decode ", 13, 330 38 49 12
button "Echo Decode", 14, 330 51 49 12
button "Close Code Cracker", 17, 330 64 49 37, flat multi ok cancel
}
on *:dialog:*:*:*:{
if ($dname == code) {
if ($devent == init) {
did -ra code 1 %encode
did -ra code 2 %decode
echo -a 8***4-=[7 Code Cracker Opened 4]=-8***
}
if ($devent == sclick) {
if ($did == 4) {
set %encoded $encode(%encode,m)
did -ra code 3 %encoded
}
if ($did == 5) {
set %decoded $decode(%decode,m)
did -ra code 3 %decoded
}
if ($did == 6) {
unset %encode
unset %decode
unset %encoded
unset %decoded
did -r code 1
did -r code 2
did -r code 3
}
if ($did == 11) {
if (%encoded != $null) {
if ($status == connected) {
msg $active %encoded
}
else {
echo -a 8***4-=[7 Your not connected to a server 4]=-8***
}
}
}
if ($did == 12) {
if (%encoded != $null) {
echo -a %encoded
}
}
if ($did == 13) {
if (%decode != $null) {
if ($status == connected) {
msg $active $iif(%decoded == $null,halt,%decoded)
}
else {
echo -a 8***4-=[7 Your not connected to a server 4]=-8***
}
}
}
if ($did == 14) {
if (%decoded != $null) {
echo -a %decoded
}
}
if ($did == 17) {
dialog -x code code
echo -a 8***4-=[7 Code Cracker Closed 4]=-8***
}
}
if ($devent == edit) {
if $did(1) {
set %encode $did(1)
}
if $did(2) {
set %decode $did(2)
}
}
}
}

[Veland]

You should have given heed for the script to check if the text boxes are NULL or not before displaying the results.