在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
//计算 x 的 n 次方的函数 function Fun(x,n: Integer): Integer; asm //mov eax, x {因为 eax 会先获取第一个参数, 这句可以省略} mov ecx, n {ecx 是个计数寄存器, 会记录循环的次数, 每循环一次 ecx 的值就会减1} sub ecx, 1 @Lable1: add eax, eax {内部标签必须使用 @ 前缀; 也可以使用 Delphi 的标签} loop @Lable1 {循环到标签执行} end; //测试 procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(IntToStr(Fun(2,10))); {1024} end; |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论