Anonymous user
Data Encryption Standard: Difference between revisions
→{{header|Symsyn}}
Walterpachl (talk | contribs) m (→{{header|REXX}}: typo) |
|||
Line 1,505:
call Wds2Data
return
</lang>
A trivial solution using the des encryption instruction:
<lang>
key : x'0e329232ea6d0d73'
data : x'8787878787878787'
edes key data | encrypt data with key
data $s | move data to string
unpackhex $s $s | unpack
$s [] | output result - 0000000000000000
</lang>
| |||