循环移动显示

Author: 唐佳 Date: 1991-03-25

  注意:因为中文状态下屏幕宽度为17个汉字,因此每次显示字符串长度一定不能超过17,且应为3的倍数,字符串的总长度也一定要是3的倍数。西文状态下的屏幕为40个字符宽,每次显示的字符串长度不能超过40。
  程序说明及程序如下:
  (1)10行把要显示的内容赋给A$。
  (2)20行取出A$左边的48个字符显示。
  (3)30行是把A$左边的3个字符取出加到A$右边。
  10 HOME:A$="热烈庆祝六·一国际儿童节"+"        "
  20 VTAB 5:HTAB 1:PRINT LEFT$(A$,48)
  30 A$=RIGHT$(A$,LEN(a$)-3)+LEFT $(A$,3)
  40 IF PEEK(49152)<128 THEN 20