source:
FOIAVistA/tag/r/KERNEL-XU-A4A7-USC-XG-XLF-XNOA-XPD-XQ-XVIR-ZI-ZOSF-ZOSV-ZT-ZU-%Z-XIP--XQAB--XUC--XUR--ZIN--ZTED/XUSHSH.m@
628
Last change on this file since 628 was 628, checked in by , 14 years ago | |
---|---|
File size: 246 bytes |
Rev | Line | |
---|---|---|
[628] | 1 | XUSHSH ;SF-ISC/STAFF - PASSWORD ENCRYPTION ;3/23/89 15:09 ; |
2 | ;;8.0;KERNEL;;Jul 10, 1995 | |
3 | ;; This is the public domain version of the VA Kernel. | |
4 | ;; Use this routine for your own encryption algorithm | |
5 | ;; Input in X | |
6 | ;; Output in X | |
7 | A Q | |
8 | EN(X) Q X |
Note:
See TracBrowser
for help on using the repository browser.