demo.csl

来自「这是一个软件水平资格考试中使用的CASL汇编语言的编译器,实现文件中包括一个编译」· CSL 代码 · 共 33 行

START

INBUFFER DS 10  ;定义的输入缓冲区
INLENGTH DS 1   ;输入数据的长度
DECVAL   DC 1   ;常量,用于方便运算

IN INBUFFER, INLENGTH   ;获得用户输入的数据



LEA GR1, 0    ;初始化记数器

NEXTCHAR
    LD GR2, INLENGTH    ;获得用户输入的数据长度

LD GR2, INBUFFER, GR1   ;从当前位置装入一个元素

LEA GR2, 1, GR2     ;将该元素值加1

ST GR2, INBUFER, GR1  ;将该元素放回相应输入缓冲区

LEA GR1, 1, GR1     ;增加记数器

SUB GR2, DECVAL   ;判断是否已经遍历完毕输入缓冲区?

JNZ NEXTCHAR

OUT INBUFFER, INLENGTH   ;输出处理过的数据



EXIT
END