Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- CLO ; Close opened windows
- MOV AL,0 ; Initilize AL
- MOV CL,C0 ; Initilize VDU counter
- IN: ; I/O loop start label
- CMP CL,00 ; Check that VDU is not full. If full, jump to end
- JZ END ; -^- ;
- IN 00 ; Input character from keyboard, store in AL
- CMP AL,7A ; Is the character 'z'? If yes, jump to end
- JZ END ; -^- ;
- CMP AL,5A ; Is the character 'Z'? If yes, jump to end
- JZ END ; -^- ;
- MOV [CL],AL ; Move character from AL to VDU location at CL
- INC CL ; Move to next VDU location
- JMP IN ; Move to top of I/O loop
- END: ; End label
- END ; End program
Advertisement
Add Comment
Please, Sign In to add comment