討論區快速選單
知識庫快速選單
網路投保旅行平安險 軟體開發過程中有哪些資安漏洞? 掌握Salesforce雲端管理秘訣
[ 回上頁 ] [ 討論區發言規則 ]
顯示(正 負數)實數的範列參考
更改我的閱讀文章字型大小
作者 : changtenchun(qq) 貼文超過200則人氣指數超過30000點
[ 貼文 376 | 人氣 36017 | 評價 1040 | 評價/貼文 2.77 | 送出評價 69 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2013/10/22 下午 11:47:48
TITLE
COMMENT | use
| file: show float
.MODEL SMALL
;--------------------------------
.CODE
.386; 因為使用到eax,ebx...etc所以必須使用
;********
 PRINT:;*
;********
  PUSH AX
  MOV AH,2
  INT 21H
  POP AX
  RET
;***********
 NEWLINE proc near uses dx ;*換新一行
;***********
  MOV DL,0DH
  CALL PRINT
  MOV DL,0AH
  CALL PRINT
  RET
 NEWLINE ENDP
;----------------------------------
;**************
 OUTPUT PROC ;*
;**************
;***IN EAX, OUT ANSWER
XOR EDX,EDX
MOV EBX,10
DIV EBX
OR EAX,EAX
JZ OUTPUT_END
PUSH DX
CALL OUTPUT
POP DX
OUTPUT_END:
ADD DL,'0'
call print
RET
;**************
 OUTPUT ENDP ;*
;**************
;*****************
 disp proc near ;*
;*****************
;design by barry b.brey
;----------------
     fstcw temp
     or temp,0c00h
     fldcw temp
;----------------
     ftst ; test num
     fstsw ax ; status ax
     and ax,4500h ; get c3 c2 and c0
     .if ax == 0100h
     mov dl,'-'
     fabs
.else
mov dl,' '
     .endif
call print
     fld st
     frndint ; get integer part
     fist whole
     fsubr
     fabs
     fstp fract ; save fraction
     mov eax,whole
     call output
;-------------------
     mov dl,'.' ; display decimal point
     call print
;-------------------
   finit
   ffree st(0) ; clean up
   ffree st(1) ; clean up
   fld fract
   fmul index
   fstp fract
   mov eax,fract
   call output
     ret
;***********
 disp endp;*
;***********
;----------------------------------
.STARTUP
 ffree st(0) ; clean up
 fld test1 ; Push test1 value to ST(0)
 call disp ;顯出數值 test1
 ;----------------
 call NEWLINE;換新一行
 ffree st(0) ; clean up
 fld test2 ; Push test2 value to ST(0)
 call disp ;顯出數值test2
;---------------------------------
.exit
.Data
test1 dq -98756321.1234567
test2 dq 98756321.1234567
index dd 10000000 ;愈顯示的數字~小數點後幾位這裡就幾個零
 temp dw ?
 whole dd ?
 fract dd ?
  .Stack 100H
END
 板主 : 徵求中
 > 組合語言 - 討論區
 - 最近熱門問答精華集
 - 全部歷史問答精華集
 - 組合語言 - 知識庫
  ■ 全站最新Post列表
  ■ 我的文章收藏
  ■ 我最愛的作者
  ■ 全站文章收藏排行榜
  ■ 全站最愛作者排行榜
  ■  月熱門主題
  ■  季熱門主題
  ■  熱門主題Top 20
  ■  本區Post排行榜
  ■  本區評價排行榜
  ■  全站專家名人榜
  ■  全站Post排行榜
  ■  全站評價排行榜
  ■  全站人氣排行榜
 請輸入關鍵字 
  開始搜尋
 
Top 10
評價排行
組合語言
1 H 2220 
2 liaoo 990 
3 青衫 970 
4 牧童哥 940 
5 史努比 920 
6 qq 480 
7 GHOST-JACKY 330 
8 ]CALL-151 310 
9 harrison 300 
10 掌握文武半邊天 280 
組合語言
  專家等級 評價  
  一代宗師 10000  
  曠世奇才 5000  
  頂尖高手 3000  
  卓越專家 1500  
  優秀好手 750  
Microsoft Internet Explorer 6.0. Screen 1024x768 pixel. High Color (16 bit).
2000-2018 程式設計俱樂部 http://www.programmer-club.com.tw/
3.198242E-02