程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> 匯編語言 >> 匯編源碼系列之getspace

匯編源碼系列之getspace

編輯:匯編語言

這個都是過去DOS時代的匯編源碼,雖然已經過去了,但是對於學習匯編還是有幫助的,匯編語言只是程序員一門基礎語言,大多人掌握即可,不一定要深入研究.......

CSEG  SEGMENT
PUBLIC  GETSPACE
GETSPACE  PROC FAR
  ASSUME  CS:CSEG
  PUSH   BP
  MOV  BP,SP
  MOV   BX,[BP]+6
  MOV  DI,[BX]+2
  MOV  CX,8
  MOV  AL,' '
  CLD
  REP  STOSB
  MOV  BX,[BP]+8
  MOV  SI,[BX]+2
  MOV  AX,[SI]
  AND  AL,0DFH
  CMP  AL,41H
  JGE  CKVER
  JMP  EXITSPC
CKVER:
  PUSH  AX
  MOV  AH,30H
  INT  21H
  XCHG  AL,AH
SPACE20:
  POP  DX
  XOR  DL,40H
  MOV  AH,36H
    INT  21H
  CMP   AX,0FFFFH
  JE  EXITSPC
  XOR  DX,DX
  MUL  CX
  XCHG  BX,CX
  MUL  CX
  PUSH  AX
  PUSH  DX
ENDSPC:
  MOV  BX,[BP]+6
  MOV  DI,[BX]+2
  ADD  DI,7
  POP  DX
  POP  AX
  
HEXTODEC:
  MOV  SI,10
  PUSH  AX
  MOV  AX,DX
  XOR  DX,DX
  DIV  SI
  POP  CX
  PUSH  AX
  MOV  AX,CX
  DIV  SI
  POP  SI
  OR  DL,30H
  MOV  BYTE PTR [DI],DL
  DEC  DI
  XCHG  DX,SI
  OR  AX,AX
  JNZ  HEXTODEC
EXITSPC:
  POP  BP
  RET  4
  RET
GETSPACE  ENDP
CSEG    ENDS
  END


  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved