微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题打印任意一个图形的小程序
栏目软件操作与技巧
作者张强
发布1993-05-21
  本程序采用了三个控制变量,“A$”变量控制打印所组成图形形状的字符,“N”变量控制着图形打印每行第一个字符A$变量起点位置,“D”变量控制A$变量在每一行打印的个数。三个变量中,“A$”变量只需在每次打印时一次性输入,用来确定本次打印图形采用什么字符组成,“N”和“D”变量是通过程序中的READ语句读DATA语句中的数据得到。
  DATA语句中的数据输入,是由所要组成图形决定的,每两个数据为一组,两两一对,前一个数值决定打印位置,第二个数值决定连续打印字符的个数,在打印中用(0,0)控制打印机换行,最后用(-1,-1)结束全部程序的打印。
  打印米老鼠图形的DATA数据程序较长,在此略。(需要该数据程序者与作者联系)(辽宁朝阳电业局计划科张强)
  1 WIDTH"LPT1:",132
  5 CLS:INPUT"请输入一个字符!",A$
  10 READN,D
  20 IF N=-1 THEN GOTO 90
  30 IF N=0 THEN LPRINT
  40 LPRINT TAB(N);
  50 FOR J=1 TO D
  60 LPRIN TA$;
  70 NEXT J
  80 GOTO 10
  90 END
  100 DATA……