微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题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上通过。