BASIC程序高级加密法

保定市财税中专微机室 杨建明
1992-10-16

        下面介绍一种BASIC程序的高级加密法，步骤如下：
        首先进入监控状态，并键入下列机器码：
        0300- A9 7F 20 F0 FD A2 00 E8
        0308- 2C 10 C0 20 DD FB AD 00
        0310- C0 10 F8 C9 8D F0 0D 49
        0318- 7F 9D 70 03 8A 20 F0 FD
        0320- E0 4F D0 E3 86 FF E0 01
        0328- F0 34 A0 00 B1 67 85 F9
        0330- C8 B1 67 85 FA B1 F9 B5
        0338- FC 88 84 FB B1 F9 AB A2
        0340- 00 E8 E4 FF D0 02 A2 01
        0348- C8 D0 02 E6 FC BD 70 03
        0350- 51 FB 91 FB A5 FC C5 B0
        0358- D0 E7 C4 AF D0 E3 20 8E
        0360- FD A9 61 20 F0 FD 60 FF
        0360- FF FF
        返回BASIC状态，键入：
        BSAVE JM.SUB,A$300,L$69
        然后输入或从盘上把要加密的BASIC(浮点)程序送入机内，并在程序前加入一条语句：
        0 PRINT CHR $ (4);"BLOAD JM.SUB":CALL 768
        再键入： CALL 768
        这时，屏幕上出现反相的“?”并不断响铃。可键入1-79个除“”和“CTRL_RESET”以外的任意键字符组成的密钥，并以结束。(若不输密钥而直接按“”将不加/解密)。当出现反相的“!”表示加密结束。
        加密后键入：SAVE XXXX(文件名)
        至此，完成加密，并以XXXX名存盘，注意，一定要记住加密时所用的密钥。
        当运行加密的BASIC程序时，键入：
        RUN XXXX(加密程序名)
        程序会自动地把JM.SUB子程序调入内存，并呼叫它。这时，会出现加密时显示的“?”并响铃，然后键入加密时所用的密钥，如果正确，程序将继续运行，否则拒绝执行下去，此时需按复位键“CTRL+RESET”。
        本方法已在APPLE-ⅡE上通过。
 
 