smith作者
2个月15天前IP:广东
951742
2楼

WIN_20260816_21_38_16_Pro.jpg

还能计算pi,计算的主要汇编程序,程序很快就跑完,速度很快

```

; ============================================================================

; compute_pi - compute pi in fixed point, scale 10^8, into r3

; pi*10^8 = 16*arctan(1/5) - 4*arctan(1/239) (Machin's formula)

; result: r3 = 314159264 (=> 3.1415926)

; uses: r1,r5,r8,r9,r13,r14 (stack: r10, r15)

; ============================================================================

compute_pi:

LDL r1, 5

LDL r13, 25

call pi_arctan ; r9 = A5 (10^8 * arctan(1/5))

MOV r8, r9 ; keep A5 in r8

LDL r1, 239

LDL r13, 57121

call pi_arctan ; r9 = A239 (10^8 * arctan(1/239))

MOV r13, r9

; pi*10^8 = 16*A5 - 4*A239 -> r3

LDL r1, 16

MUL r8, r1 ; r4 = 16*A5

MOV r14, r4

LDL r1, 4

MUL r13, r1 ; r4 = 4*A239

MOV r1, r4

SUB r14, r1 ; r4 = 16*A5 - 4*A239

MOV r3, r4

ret

```

attachment iconPI_CALC.pdf120.08KBPDF4次下载预览

评论
文号 / 951742

千古风流
名片发私信
学术分 4
总主题 198 帖总回复 2448 楼拥有证书:学者 机友 笔友
注册于 2015/01/11 13:58:18最后登录 2026/10/30 22:49:49
主体类型:个人
所属领域:无
认证方式:手机号
IP归属地:广东

个人简介

收音机爱好者

笔记
{{note.content}}
{{n.user.username}}
{{fromNow(n.toc)}} {{n.status === noteStatus.disabled ? "已屏蔽" : ""}} {{n.status === noteStatus.unknown ? "正在审核" : ""}} {{n.status === noteStatus.deleted ? '已删除' : ''}}
  • 编辑
  • 删除
  • {{n.status === 'disabled' ? "解除屏蔽" : "屏蔽" }}
我也是有底线的