汉字移动显示程序
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
汉字移动显示程序
浙江 冯惠民
1992-07-10
程序运行时逐个演示移动类型,每演示完一种类型,发出“都”声提示,并即刻进入下一类型演示。
10 A$="欢迎使用汉字移动演示程序,谢谢!”
20 A=LEN(A$):B=33:C$=CHR$(7)
30 FOR I=4 TO A STEP 4:C=B-2
40 B$=LEFT$(A$,I):VTRB 3:HTABC:PRINT B$
50 B=C:FOR J=1 TO 100:NEXT J,I:PRINT C$
60 FOR I=4 TO A STEP 4
70 B$=RIGHT$(A$,I):VTAB 5:PRINT B$
80 FOR J=1 TO 100:NEXT J,I:PRINT A$
90 FOR I=0 TO 32:VTAB 7:PRINT A$
100 A$=RIGHT$(A$,A-4)+LEFT$(A$,4)
110 FOR J=1 TO 50:NEXT J,I:PRINT C$
120 FOR I=0 TO 33:VTAB 9:PRINT A$
130 A$=RIGHT$(A$,4)+LEFT$(A$,A-4)
140 FOR J=1 TO 50:NEXT J,I:PRINT C$
改动50,80,110,140语句中的数字,可以改变移动速度;将其中的PRINT C$改成RETURN,则能作为子程序调用,使之能用于任何程序之中。
本程序用于中华学习机时,由于该机的汉字均以等长的3字节码保存在主机的内存中,故将程序中出现的数字4改成3即可运行。