文档章节

初学 Delphi 嵌入汇编[17] - 逻辑运算

涂孟超
 涂孟超
发布于 2014/09/26 15:37
字数 425
阅读 12
收藏 0
AND: 逻辑与指令 OR : 逻辑或指令 XOR: 逻辑异或指令 NOT: 逻辑非指令 这和 Delphi 的逻辑命令完全一致.
//逻辑非 Not: 
{
  not 1 = 0; 
  not 0 = 1;
}
var
  ByteNum: Byte;
begin
  //赋值 11111111B (255) 取反:
  asm
    mov al, 11111111B {eax 包含 ax; ax 包含 al; al 是 eax 的低八位}
    not al            {给 11111111 取反会得到 00000000}
    mov ByteNum, al   {把寄存器 al 中的值给变量 ByteNum}
  end;
  ShowMessage(IntToStr(ByteNum)); {0}


  //赋值 00000001B (1) 取反:
  asm
    mov al, 00000001B
    not al            {给 00000001 取反会得到 11111110}
    mov ByteNum, al
  end;
  ShowMessage(IntToStr(ByteNum)); {254}


  //赋值 10000000B (128) 取反:
  asm
    mov al, 00000001B
    not al            {给 10000000 取反会得到 01111111}
    mov ByteNum, al
  end;
  ShowMessage(IntToStr(ByteNum)); {127}
end;

 
 
 
 
 

 

 

  
//逻辑或 Or: { 1 or 0 = 1; 0 or 1 = 1; 1 or 1 = 1; 0 or 0 = 0; } var ByteNum: Byte; begin asm mov al, 10101010B {170} mov cl, 01010101B {85} or al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {255} end;
//逻辑与 And: { 1 and 1 = 1; 1 and 0 = 0; 0 and 1 = 0; 0 and 0 = 0; } var ByteNum: Byte; begin //例1 asm mov al, 11111111B {255} mov cl, 11111111B {255} and al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {255} //例2 asm mov al, 00000000B {0} mov cl, 00000000B {0} and al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {0} //例3 asm mov al, 11111111B {255} mov cl, 00000000B {0} and al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {0} //例4 asm mov al, 10101010B {170} mov cl, 01010101B {85} and al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {0} end;
//逻辑异或 Xor: { 1 Xor 0 = 1; 0 Xor 1 = 1; 1 Xor 1 = 0; 0 Xor 0 = 0; } var ByteNum: Byte; begin //例1 asm mov al, 11111111B {255} mov cl, 11111111B {255} xor al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {0} //例2 asm mov al, 11111111B {255} mov cl, 00000000B {0} xor al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {255} //例3 asm mov al, 10101010B {170} mov cl, 01010101B {85} xor al, cl mov ByteNum, al end; ShowMessage(IntToStr(ByteNum)); {255} end;

本文转载自:http://www.cnblogs.com/del/archive/2008/01/28/1055648.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
编写高效简洁的C语言代码,是许多软件工程师追求的目标。各位有什么高招呢?请不吝赐教。。。

以下是我个人的一些体会和经验,不对的地方请各位指教。同时希望各位拿出自己的干货分享一下经验 第1招:以空间换时间   计算机程序中最大的矛盾是空间和时间的矛盾,那么,从这个角度出发...

刘学炜
2012/04/17
739
4
HelloGCC Workshop 2012

2012年11月10日, 我们将来迎来2012年HelloGcc WorkShop,这已经是ChinaUnix社区第三次和HelloGcc工作组合作,在国内为推广GNU Gcc等相关技术交流而举办该项活动。今年我们继续选择北京中科院...

teawater
2012/10/29
0
0
C语言嵌入式系统编程修炼之性能优化

这是我13年前创作和发表在互联网上的文章,这么多年过去了,这篇文章仍然在到处传播。现在贴回Linuxer公众号。 全文目录: C语言嵌入式系统编程修炼之道——背景篇 C语言嵌入式系统编程修炼之...

jus3ve
2017/12/31
0
0
开源的系统级编程利器:D语言

在Digital Mars公司的D语言首 页上,放置着这样一段话“计算机编程语言门类众多,其来源大致可分为两种途径。一类新语言来自于极具创新精神的学术界;而一类则源于关注研发结合和互联网 的新...

小卒过河
2011/10/11
4.8K
21
SHA512编程实现与优化之一:maj函数

SHA512算法中的maj函数可以C函数简单方便地实现: 从字面上看,逻辑乘"&"有3次,异或"^"有2次,事实真的如此吗? 将此函数编译成汇编语言得到如下结果:(注释是我后加上的) 阅读汇编代码可知...

safedead
2016/05/20
49
0

没有更多内容

加载失败,请刷新页面

加载更多

CockroachDB

百度云上的CockroachDB 云数据库 帮助文档 > 产品文档 > CockroachDB 云数据库 > 产品描述 开源NewSQL – CockroachDB在百度内部的应用与实践 嘉宾演讲视频及PPT回顾:http://suo.im/5bnORh ...

miaojiangmin
24分钟前
0
0
I2C EEPROM驱动实例分析

上篇分析了Linux Kernel中的I2C驱动框架,本篇举一个具体的I2C设备驱动(eeprom)来对I2C设备驱动有个实际的认识。 s3c24xx系列集成了一个基于I2C的eeprom设备at24cxx系列。at24cxx系列芯片包...

yepanl
25分钟前
1
0
spring mvc拦截器,实现统计http请求的后台运行时间

使用两种方式,实现拦截http请求的后台运行时间。 废话不多说直接上代码 /** * Http请求时间统计 * 拦截所有请求 */public class HttpRquestTimeInterceptor extends HandlerIntercepto...

兜兜毛毛
43分钟前
2
0
设计模式之工厂模式

本篇博文主要翻译这篇文章: https://www.journaldev.com/1392/factory-design-pattern-in-java 由于翻译水平有限,自认为许多地方翻译不恰当,欢迎各位给出宝贵的建议,建议大家去阅读原文。...

firepation
58分钟前
4
0

中国龙-扬科
今天
2
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部