易语言计算器源码(学习)
简易计算器(源码)
简易计算器（源码）以下是一个简易计算器的Python源码，用于执行基本的加、减、乘、除运算：```python#简易计算器def add(x, y):"""相加"""return x + ydef subtract(x, y):"""相减"""return x - ydef multiply(x, y):"""相乘"""return x * ydef divide(x, y):"""相除"""if y != 0:return x / yelse:return "除数不能为零！"print("选择操作：")print("1. 相加")print("2. 相减")print("3. 相乘")print("4. 相除")choice = input("输入你的选择（1/2/3/4）: ")num1 = float(input("输入第一个操作数: "))num2 = float(input("输入第二个操作数: "))if choice == '1':print(num1, "+", num2, "=", add(num1, num2))elif choice == '2':print(num1, "-", num2, "=", subtract(num1, num2)) elif choice == '3':print(num1, "*", num2, "=", multiply(num1, num2)) elif choice == '4':print(num1, "/", num2, "=", divide(num1, num2)) else:print("无效的选择")```以上代码中，我们定义了四个函数：`add`、`subtract`、`multiply`和`divide`，分别用于执行相加、相减、相乘和相除的操作。
易语言编写计算器教学
易语⾔编写计算器教学教⼤家⽤易语⾔实现加减乘除的运算！
1、先打开易语⾔！添加4个按钮！3个编辑框！布置好
2、把标题改⼀下
3、然后开始写代码！先写加的吧！双击加的按钮！来到代码区域！代码如下！看图！⼤家照着写就可以了！
4、再到减的！看图！也是照着写就⾏了!
5、这是乘法的！照着写！那个乘号是按Shift再按U上⾯的8！易语⾔会⾃动转化成乘号的！
6、接下来是除法！如图那个除号打右斜杠就可以了！易语⾔也会⾃动转化成除号的！
7、好接下来我们试试看！按F5运⾏！先试试加法！如图⼀！12+2=14！没有错！再试试减法！图⼆!乘法图三！除法图四！看吧！都对了！
8、/8
是不是很简单啊？⼤家可以⾃⼰制作⼀个⼩计算器哦！
是不是很简单啊？⼤家可以⾃⼰制作⼀个⼩计算器哦！
总结：上⾯就是通过8个简单的步骤⽤易语⾔编写⼀款技巧器⼩软件，感谢⼤家的阅读和对的⽀持。
易语言计算器设计演示代码
说明（数值1。
数值2。
请输入需要计算的数值都是标签。
计算结果显示在“请输入需要计算的数值”那个位置。
输入计算数值的位置是两个编辑框。
其他六个是按钮，先把图形界面做好，名字按下面程序中给定的命名，代码完全复制过去，那么就能够用了）
.版本2
.程序集窗口程序集1
.子程序_结果标签_反馈事件, 整数型
.参数参数一, 整数型
.参数参数二, 整数型
.子程序_相加_被单击
结果标签.标题＝“相加结果：”＋到文本(到数值(数值1编辑框.内容) ＋到数值(数值2编辑框.内容))
.子程序_按钮2_被单击
结果标签.标题＝“相减结果：”＋到文本(到数值(数值1编辑框.内容) －到数值(数值2编辑框.内容))
.子程序_相乘_被单击
结果标签.标题＝“相乘结果：”＋到文本(到数值(数值1编辑框.内容) ×到数值(数值2编辑框.内容))
.子程序_相除_被单击
.如果(到数值(数值2编辑框.内容) ＝0)
信息框(“除数不能为0”, #错误图标, “错误！”)
.否则
.如果结束
结果标签.标题＝“相除结果：”＋到文本(到数值(数值1编辑框.内容) ÷到数值(数值2编辑框.内容))
.子程序_清零_被单击
数值1编辑框.内容＝“”
数值2编辑框.内容＝“”
结果标签.标题＝“请输入需要计算的数值”
.子程序_退出_被单击
.局部变量返回值, 整数型
.局部变量如果真, 整数型
返回值＝信息框(“确定要退出程序吗？”, #是否钮＋#信息图标, )
.如果真(返回值＝#是钮)
结束()
.如果真结束。
VB+易语言简单编写计算器语音教程
VB+易语言简单编写计算器语音教程
VB+易语言简单编写计算器语音教程
网址收藏夹
这节课要学习的是VB与易语言简单编写计算器同详细介绍VB 与易语言的一些相同之处
进阶学习--更容易掌握基础
首先打开网址收藏夹易语言同VB,我们先添加组件.
然后修改组件标题.由于是语音教程,大家看操作.
且
英文名称：and
如果
英文名称：if
到数值
英文名称：val
或
英文名称：or
信息框
英文名称：MsgBox
VB不等于
<>
简单的计算器就演示完成了
用易语言打基础然后去学习VB 易语言--VB--1.JAVA 2.VC++。
易语言计算器源码(学习)
. 版本2.程序集窗口程序集1.子程序_按钮1_被单击显示框.加入文本(“1”).子程序_按钮2_被单击显示框.加入文本(“2”).子程序_按钮3_被单击显示框.加入文本(“3”).子程序_按钮4_被单击显示框.加入文本(“4”).子程序_按钮5_被单击显示框.加入文本(“5”).子程序_按钮6_被单击显示框.加入文本(“6”).子程序_按钮7_被单击显示框.加入文本(“7”).子程序_按钮8_被单击显示框.加入文本(“8”).子程序_按钮9_被单击显示框.加入文本(“9”).子程序_按钮0_被单击显示框.加入文本(“0”).子程序_按钮点_被单击显示框.内容＝显示框.内容＋“.”.子程序_按钮加_被单击第一个数.内容＝显示框.内容符号框.内容＝“+”显示框.内容＝“”.子程序_按钮减_被单击第一个数.内容＝显示框.内容符号框.内容＝“-”显示框.内容＝“”.子程序_按钮乘_被单击第一个数.内容＝显示框.内容符号框.内容＝“*”显示框.内容＝“”.子程序_按钮除_被单击第一个数.内容＝显示框.内容符号框.内容＝“/”显示框.内容＝“”.子程序_按钮等于_被单击.如果(符号框.内容＝“+”)显示框.内容＝到文本(到数值(第一个数.内容) ＋到数值(显示框.内容)).否则.如果(符号框.内容＝“-”)显示框.内容＝到文本(到数值(第一个数.内容) －到数值(显示框.内容)) .否则.如果(符号框.内容＝“*”)显示框.内容＝到文本(到数值(第一个数.内容) ×到数值(显示框.内容)).否则.如果(显示框.内容≠“0”).如果(符号框.内容＝“/”)显示框.内容＝到文本(到数值(第一个数.内容) ÷到数值(显示框.内容)).否则.如果结束.否则信息框(“错误，被除数不能为0 ”, 0, ).如果结束.如果结束.如果结束.如果结束.子程序_按钮清空_被单击显示框.内容＝“”.子程序_按钮清空_被双击, 逻辑型.参数横向位置, 整数型.参数纵向位置, 整数型.参数功能键状态, 整数型第一个数.内容＝“”/book_3869.html。
易语言计算器源码
.程序集程序集1.子程序_启动子程序, 整数型, , 本子程序在程序启动后最先执行.局部变量数字1, 文本型.局部变量数字2, 文本型.局部变量符号, 文本型.局部变量a, 文本型标准输出(, #换行符＋“欢迎使用加减乘除计算器”).循环判断首()标准输出(, #换行符＋#换行符＋“请输入第一个数字：”)数字1 ＝标准输入()标准输出(, “请输入第二个数字：”)数字2 ＝标准输入()标准输出(, “请输入运算的符号：”)符号＝标准输入().如果(符号＝“+”)标准输出(, “两数和为：”＋到文本(到数值(数字1) ＋到数值(数字2))).否则.如果(符号＝“-”)标准输出(, “两数差为：”＋到文本(到数值(数字1) －到数值(数字2))) .否则.如果(符号＝“*”)标准输出(, “两数积为：”＋到文本(到数值(数字1) ×到数值(数字2))).否则.如果(符号＝“/”).判断循环首(数字2 ＝“0”)标准输出(, #换行符＋“除数不能为零请重新输入”)数字2 ＝标准输入().判断循环尾()标准输出(, “两数商为：”＋到文本(到数值(数字1) ÷到数值(数字2))).否则标准输出(, “符号请选择+-*/中的一个”).如果结束.如果结束.如果结束.如果结束标准输出(, #换行符＋#换行符＋“退出请按q键”)a ＝标准输入().循环判断尾(a ≠“q”且a ≠“Q”)标准输出(, #换行符＋#换行符＋#换行符＋“感谢您对本产品的支持,欢迎再次使用!”)延时(2500)返回(0) ' 可以根据您的需要返回任意数值。
易语言常用源码1000例
易语言常用源码1000例
目录
1.易语言简介
2.易语言源码的作用
3.1000 例源码的涵盖范围
4.如何学习和使用这些源码
5.总结
正文
易语言是一门以中文编程为特点的编程语言，它具有简单易学、高效实用的优势，深受广大程序员喜爱。
在易语言的学习和应用过程中，源码的作用不可忽视，它能帮助我们快速掌握编程技巧，理解程序运行原理，提高编程效率。
本文为大家整理了 1000 例易语言常用源码，这些源码涵盖了易语言的各个方面，包括基础语法、函数库、窗口与对话框、文件操作、网络编程等。
通过学习这些源码，可以让你更深入地了解易语言编程的各个细节，为你的项目开发提供有力的支持。
在学习和使用这些源码的过程中，建议采取以下方法：
1.先了解源码的原理和功能，再动手实践。
这样可以让你更好地理解源码的运行机制，为以后的开发工作打下坚实基础。
2.学会举一反三，根据源码的实现原理，尝试修改或扩展功能，以满足不同的需求。
3.多与同行交流，分享学习心得和经验，提高自己的编程水平。
第1页共1页。
简易计算器源代码
基于S3C2410 ARM9 的计算器小程序，下面是源代码。
以及7279 接口和相应的驱动程序。
#include "2410addr.h"//加载地址一些最基本的地址#include <string.h>#include "7279.h"//7279控制数码管和键盘的int counter=0,operation=0,edge=0;//counter是用来计算你输入的次数的你琽peration 用来判断是否有intkey_number1=0,key_number2=0,key_number3=0,key_number=0,math=0,out_bit[6] ,yes_key=0; int allnumber[20];void result(){int n=counter-1;int i=0;key_number1=0;key_number2=0;key_number3=0;for(i=0;i<edge-1;i++)key_number1= (key_number1*10+allnumber[i]);for(i=edge;i<=n;i++)key_number2= (key_number2*10+allnumber[i]);i=edge-1;switch(allnumber[i]){case 10: key_number3 = key_number1 + key_number2;break;case 11: key_number3 = key_number1 - key_number2;break;case 12: key_number3 = key_number1 * key_number2;break;case 13: key_number3 = key_number1 / key_number2;break;}for(i=0;i<6;i++){out_bit[i]= key_number3%0x0a;key_number3 = key_number3/0x0a;write7279(DECODE1+i,out_bit[i]);}}void __irq Keyaddnumb(void){yes_key=1;rINTMSK|=(BIT_EINT2);//key_number=read7279(CMD_READ);key_number=read7279(CMD_READ);ClearPending(BIT_EINT2); //清除中断标志rINTMSK&=~(BIT_EINT2);//yes_key=0;}void Main(){int j=0;Init7279();//EINT2 RiserGPFCON = (rGPFCON&0xff0f)|0x0060; //GPF2:Interrupt;GPF3:Out 7279CS //extern int p=0;//for(p=0;p<20;p++)allnumber[p]=0;send_byte(CMD_RESET);write7279(0x98,0xff);rEXTINT0= (rEXTINT0&0xffff00FF)|0x00000400; pISR_EINT2=(unsigned)Keyaddnumb; rINTMOD=0x0; //设置为IRQ模式rINTMSK&=~(BIT_EINT2); //打开keyboard中断do{if(yes_key==1){switch(key_number){case 0x03: key_number = 0;operation=0;break; case 0x0b: key_number = 1;operation=0;break; case 0x13: key_number = 2;operation=0;break; case 0x1b: key_number = 3;operation=0;break; case 0x04: key_number = 4;operation=0;break; case 0x0c: key_number = 5;operation=0;break; case 0x14: key_number = 6;operation=0;break; case 0x1c: key_number = 7;operation=0;break; case 0x05: key_number = 8;operation=0;break; case 0x0d: key_number = 9;operation=0;break; case 0x15: key_number = 10;operation=1;break; case 0x1d: key_number = 11;operation=2;break; case 0x06: key_number = 12;operation=3;break; case 0x0e: key_number = 13;operation=4;break; case 0x16: key_number = 14;operation=5;break;case 0x1e: key_number = 15;operation=6;break; } if(key_number==14) { result(); for(j=0;j<19;j++) allnumber[j]=0; counter=0;edge=0; } else if(key_number ==15) { // while(1){ //for(j=0;j<1000000;j++)short_delay(); send_byte(CMD_RESET); } /*Init7279();//EINT2 Rise rGPFCON = (rGPFCON&0xff0f)|0x0060;//GPF2:Interrupt;GPF3:Out 7279CS rEXTINT0= (rEXTINT0&0xffff00FF)|0x00000400; pISR_EINT2=(unsigned)Keyaddnumb; rINTMOD=0x0; //设置为IRQ模式rINTMSK&=~(BIT_EINT2); //打开keyboard中断//result(); */ //break; // } else{ allnumber[counter++]=key_number; } yes_key=0; } if(yes_key==0&&operation==0) { int j=0,p; if(edge<1&&counter>0) { //if(edge<1){ for(j=1;j<=counter;j++)write7279(DECODE1+5-j+1,allnumber[j-1]); }elseif(edge>1&&counter>0){send_byte(CMD_RESET);write7279(0x98,0xff);for(j=1;j<=counter-edge;j++)write7279(DECODE0+5+1-j,allnumber[edge+j-1]);}//else send_byte(CMD_RESET);}elseif(0<operation<5){edge=counter;operation=0;}}while(1);#include "2410addr.h"#include "7279.h"void Init7279(void){rGPEUP = rGPEUP|0x3800; //使用GPE11 GPE12 GPE13，去掉对应上拉功能rGPECON = (rGPECON&0xf03fffff)|0x05000000; // GPE11:In Data;GPE12:Out Data;GPE13:Out CLKrGPFUP = rGPFUP|0x0c;//使用GPF2 GPF3//rGPFCON = (rGPFCON&0xff0f)|0x0040; //GPF2:In Key;GPF3:Out 7279CS rGPFCON = (rGPFCON&0xff0f)|0x0060; //GPF2:In Key;GPF3:Out 7279CSrGPFDAT = rGPFDAT|0x08; //GPF3=1rGPFDAT = rGPFDAT&0xf7; //GPF3=0 选通7279rGPGUP = rGPGUP|0x0040; //使用GPG6，去掉对应上拉功能rGPGCON = (rGPGCON&0xffffcfff)|0x01000; //GPG6:Out 74H125 C1&(~C2) rGPGDAT = rGPGDAT&0xffbf; //GPG6=0}void write7279(unsigned char cmd ,unsigned char dta){send_byte(cmd);send_byte(dta);}unsigned char read7279(unsigned char command) {send_byte(command);return(receive_byte());}void send_byte(unsigned char out_byte) { unsigned char i;setcsLOW;long_delay();for(i=0;i<8;i++){if(out_byte&0x80){setdatHIGH;}else{setdatLOW;}setclkHIGH;short_delay();setclkLOW;short_delay();out_byte= out_byte*2;}setdatLOW;}unsigned char receive_byte(void){unsigned char i, in_byte;setdatZ;short_delay();for(i=0;i<8;i++){setclkHIGH;short_delay();in_byte=in_byte*2;if(dat){in_byte = in_byte|0x01; } setclkLOW;short_delay();}setdatL;return (in_byte);}void long_delay(void) {unsigned char i;for(i=0;i<0x30;i++);}void short_delay(void) {unsigned char i;for(i=0;i<0x0a;i++);}void delay10ms(unsigned char time) {unsigned char i;unsigned int j;for(i=0;i<time;i++){for(j=0;j<0x3300;j++){if(!key){//key_int();}}}}#ifndef __7279_H__#define __7279_H__void write7279(unsigned char,unsigned char); unsigned char read7279(unsigned char); void send_byte(unsigned char);unsigned char receive_byte(void);。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
. 版本2
.程序集窗口程序集1
.子程序_按钮1_被单击
显示框.加入文本(“1”)
.子程序_按钮2_被单击
显示框.加入文本(“2”)
.子程序_按钮3_被单击
显示框.加入文本(“3”)
.子程序_按钮4_被单击
显示框.加入文本(“4”)
.子程序_按钮5_被单击
显示框.加入文本(“5”)
.子程序_按钮6_被单击
显示框.加入文本(“6”)
.子程序_按钮7_被单击
显示框.加入文本(“7”)
.子程序_按钮8_被单击
显示框.加入文本(“8”)
.子程序_按钮9_被单击
显示框.加入文本(“9”)
.子程序_按钮0_被单击
显示框.加入文本(“0”)
.子程序_按钮点_被单击
显示框.内容＝显示框.内容＋“.”.子程序_按钮加_被单击
第一个数.内容＝显示框.内容
符号框.内容＝“+”
显示框.内容＝“”
.子程序_按钮减_被单击
第一个数.内容＝显示框.内容
符号框.内容＝“-”
显示框.内容＝“”
.子程序_按钮乘_被单击
第一个数.内容＝显示框.内容
符号框.内容＝“*”
显示框.内容＝“”
.子程序_按钮除_被单击
第一个数.内容＝显示框.内容
符号框.内容＝“/”
显示框.内容＝“”
.子程序_按钮等于_被单击
.如果(符号框.内容＝“+”)
显示框.内容＝到文本(到数值(第一个数.内容) ＋到数值(显示框.内容))
.否则
.如果(符号框.内容＝“-”)
显示框.内容＝到文本(到数值(第一个数.内容) －到数值(显示框.内容)) .否则
.如果(符号框.内容＝“*”)
显示框.内容＝到文本(到数值(第一个数.内容) ×到数值(显示框.内容))
.否则
.如果(显示框.内容≠“0”)
.如果(符号框.内容＝“/”)
显示框.内容＝到文本(到数值(第一个数.内容) ÷到数值(显示框.内容))
.否则
.如果结束
.否则
信息框(“错误，被除数不能为0 ”, 0, )
.如果结束
.如果结束
.如果结束
.如果结束
.子程序_按钮清空_被单击
显示框.内容＝“”
.子程序_按钮清空_被双击, 逻辑型
.参数横向位置, 整数型
.参数纵向位置, 整数型
.参数功能键状态, 整数型
第一个数.内容＝“”
/book_3869.html。