如何让老式Basic程序“升级” 周泽雁 1997-01-01 　　使用Ｂａｓｉｃ编程的用户都知道，以前在第一、二代Ｂａｓｉｃ下编制的源程序，不能直接放在目前的第三代ＱＢａｓｉｃ及第四代Ｖｉｓｕａｌ　Ｂａｓｉｃ下编辑和运行。这主要是因为老式Ｂａｓｉｃ程序语法虽与目前的ＱＢａｓｉｃ兼容，但其存储代码为非文本格式，不能在ＱＢａｓｉｃ下显示，更无法编辑、运行。笔者积有很多老式Ｂａｓｉｃ程序，弃之可惜。经过实践，本人发现可以通过管道命令实现老式Ｂａｓｉｃ程序向文本格式文件的转换。其方法如下： #2　　一、在高版本ＤＯＳ下启动Ｂａｓｉｃ。 　　由于在高版本ＤＯＳ下运行Ｂａｓｉｃ，会出现“Ｉｎｃｏｒｒｅｃｔ　ＤＯＳ　Ｖｅｒｓｉｏｎ”出错信息，需用ＤＥＢＵＧ对Ｂａｓｉｃ．ｃｏｍ进行修改，使其跳过对ＤＯＳ版本号的判断，这样就可以在高版本ＤＯＳ下顺利运行Ｂａｓｉｃ了。取得ＤＯＳ版本号是通过ＤＯＳ功能调用ＩＮＴ　２１Ｈ的３０Ｈ功能来实现的，即： 　　ＭＯＶ　ＡＨ，３０ 　　ＩＮＴ　２１ 　　这两行的代码为Ｂ４　３０　ＣＤ　２１，故须作如下操作： 　　Ｃ：＼＞ＤＥＢＵＧ　ＢＡＳＩＣ．ＣＯＭ 　　－Ｓ　０，ＦＦＦＦ，Ｂ４，３０，ＣＤ，２１ 　　－２２５６：２０４Ａ　　　；找到关键代码的段地址和偏移量 　　－Ｕ　２０４Ａ　　　；对源代码进行反汇编 　　ＭＯＶ　ＡＨ，３０ 　　ＩＮＴ　２１ 　　ＣＭＰ　ＡＬ，０３　　 　　ＪＺ　×××× 　　…… 　　用ＤＥＢＵＧ的Ａ命令将ＪＺ　××××改为ＪＭＰ　××××，再用Ｗ命令存盘，Ｑ命令返回ＤＯＳ下，这样Ｂａｓｉｃ就可以启动了。 #2　　二、假设对老版本Ｂａｓｉｃ程序ａｂｃ．ｂａｓ进行文本格式转换，结果为ｘｙｚ．ｂａｓ，以此为例，则在ＤＯＳ下输入如下命令： 　　Ｃ：＼＞ＢＡＳＩＣ＞ｘｙｚ．ｂａｓ 　　出现Ｂａｓｉｃ提示符“ＯＫ”， 　　ＯＫ 　　ＬＯＡＤ　＂ａｂｃ．ｂａｓ＂ 　　ＯＫ 　　ＬＩＳＴ 　　…… 　　ＯＫ 　　ＳＹＳＴＥＭ 　　此时，在当前目录下就会发现一个名为ｘｙｚ．ｂａｓ的文本文件，再用文本编辑器ＥＤＩＴ对其编辑，主要是将程序头尾的一些转换过程中产生的原Ｂａｓｉｃ信息行删去即可。这样程序ｘｙｚ．ｂａｓ就可以在ＱＢａｓｉｃ下运行了。