OUTCH.ASM
资源名称:ertos.rar [点击查看]
上传用户:sunrenlu
上传日期:2022-06-13
资源大小:1419k
文件大小:1k
源码类别:
操作系统开发
开发平台:
DOS
- PAGE 66,132
- ;
- ;
- ;
- ;
- ;
- ;
- ;
- ;
- ; outch.asm
- ;
- ; print a character to stdio, ttymode, does n to nr
- ;
- ;
- ; Usage :
- ; outch( ch )
- ;
- ; (c) 1990 Erick Engelke
- ;
- ; version
- ;
- ; 0.1 7-Nov -1990 E. P. Engelke
- ;
- ;
- include masmdefs.hsm
- include model.hsm
- codedef OUTCH
- datadef
- cstart OUTCH
- cpublic outch
- push BP
- mov BL, 1 ; colour
- mov AL, +@AB [BP] ; character
- mov AH, 0eh
- int 10h
- pop BP
- ; mov DL, +@AB [BP]
- ; mov AH, 2
- ; int 21h
- creturn outch
- cend OUTCH
- end