casetest.asm

来自「袖珍型的pascal编译器」· 汇编 代码 · 共 145 行

ASM
145
字号
; number code beginning		ENTER 2, 0		LOD -2 		OUTP		LOD -2 		COPY		LODI 1		EQU		FJP ET2		COPY		LODI 2		EQU		FJP ET2		COPY		LODI 3		EQU		FJP ET2		UJP ET3ET2:		LODI 1		OUTP		LODI  		OUTP		LODI o		OUTP		LODI r		OUTP		LODI  		OUTP		LODI 2		OUTP		UJP ET1ET3:		COPY		LODI 3		EQU		FJP ET4		UJP ET5ET4:		LODI 3		OUTP		UJP ET1ET5:		COPY		LODI 4		EQU		FJP ET6		UJP ET7ET6:		LODI f		OUTP		LODI o		OUTP		LODI u		OUTP		LODI r		OUTP		UJP ET1ET7:		COPY		LODI 5		EQU		FJP ET8		COPY		LODI 6		EQU		FJP ET8		COPY		LODI 7		EQU		FJP ET8		UJP ET9ET8:		LODI 5		OUTP		LODI  		OUTP		LODI o		OUTP		LODI r		OUTP		LODI  		OUTP		LODI 6		OUTP		LODI  		OUTP		LODI o		OUTP		LODI r		OUTP		LODI  		OUTP		LODI 7		OUTP		UJP ET1ET9:		LODI I		OUTP		LODI  		OUTP		LODI d		OUTP		LODI o		OUTP		LODI n		OUTP		LODI '		OUTP		LODI t		OUTP		LODI  		OUTP		LODI k		OUTP		LODI n		OUTP		LODI o		OUTP		LODI w		OUTPET1:		RED 1 		LEAVE		RET; casetest code beginning		ENTER 1, 2		LODI X		OUTP		LODI =		OUTP		LODA 2 		INP 2 		STO; Calling: number		LOD 2 		CALL number		RED 1 		LODA 3 		INP 1 		STO		LEAVE		RET		STOP

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?