标题推荐一个小应用程序
栏目软件操作与技巧
作者辽宁 张强
发布1993-04-02
本程序打印字体和字型的变化,是用AA来代表ASCII的数值,通过对AA变量ASCII码数值的控制,达到改变字体和字型的目的。在这里当AA=65时,ASCII码65是大写的“A”;当AA=97时,ASCII码的97是小写的“a”。对于ASCII码值的控制,可参考ASCII码表进行调整。也可以采用BASIC语言编程实现。
附:计算机内字体打印应用程序。
SET TALK OFF
SET DEVI TO SCRE
DD=1
DO WHILE.T.
DO CASE
CASE DD=1
AA=65
CASE DD=2
AA=97
CASE DD=3
EXIT
ENDCASE
DO WHILE .T.
SET DEVI TO PRINT
BB=CHR(AA)
M=PROW()
@ M,1 SAY CHR(27)+'I&BB'
@ M+1,0 SAY '&BB朝阳电业局计划科计算机'
AA=AA+1
M=M+1
IF AA>84.AND.DD=1. OR.AA〉116.AND.DD=2
EXIT
ENDIF
ENDDO
@ M+2,4 SAY
DD=DD+1
ENDDO
SET DEVI TO SCRE
RETU
(辽宁 张强)