设为首页收藏本站
切换到窄版

鱼C论坛

 找回密码
 立即注册
鱼C论坛»论坛 › 技术交流 › 汇编语言交流 › 分享一个电话本程序
返回列表 发新帖
查看: 921|回复: 0

[技术交流] 分享一个电话本程序

[复制链接]
cnkizy
发表于 2022-9-17 16:48:38 | 显示全部楼层 |阅读模式

马上注册，结交更多好友，享用更多功能^_^

您需要 登录 才可以下载或查看，没有账号？立即注册

x
ReadAsm编写
  1. .386
  2. .model flat,stdcall
  3. option casemap:none

  5. include masm32rt.inc


  8. .data
  9.         ; ========= 结构体 =========
  10.         ;电话本-成员
  11.         PHONE struct
  12.             m_name byte 8 dup(0)   ;姓名
  13.             m_phone byte 8 dup(0)  ;电话
  14.         PHONE ends

  16.         ; ========= 常量 =========
  17.         ;输入格式:名称 电话号码
  18.         g_szScanFormat  BYTE   '%s %s',0h
  19.         ;输入格式:名称
  20.         g_szScanNameFormat BYTE   '%s',0h
  21.         ;打印格式:名称\t\t电话号
  22.         g_szPrintItemFormat BYTE   '姓名:%s',09h,09h,'电话:%s',0ah,0dh,0h
  23.         ;输入指令
  24.         g_szGetCmdFormat BYTE   '%d',0h

  26.         ;菜单
  27.         g_szMenu db "电话本",0ah,0dh,
  28.         "1=查询",0ah,0dh,
  29.         "2=增加",0ah,0dh,
  30.         "3=删除",0ah,0dh,
  31.         "4=修改",0ah,0dh,
  32.         "5=查看所有",0ah,0dh,
  33.         "当前储存了 %d / %d 条信息",0ah,0dh,
  34.         ">>",0h

  36.         g_szClr    BYTE   'cls',0h
  37.         g_szPause   BYTE   'pause',0h
  38.         g_szCmdIn   BYTE '%d',0h
  39.         g_szNameIn   BYTE   '输入姓名:',0h
  40.         g_szNewNameIn   BYTE   '输入新的姓名:',0h
  41.         g_szPhoneNumberIn BYTE   '请输入电话号码:',0h
  42.         g_szNewPhoneNumberIn BYTE   '请输入新的电话号码:',0h
  43.         g_szTab  BYTE    0dh,0ah,0h ;换行回车\r\n
  44.         g_szTipsDel  BYTE   '<已删除这条信息>',0dh,0ah,0h
  45.         g_szTipsAdd   BYTE   '<插入成功>',0dh,0ah,0h
  46.         g_szTipsUpdate   BYTE   '<修改成功>',0dh,0ah,0h
  47.         g_szTipsNoMore   BYTE   '<没有更多信息>',0dh,0ah,0h
  48.         g_szErrNotFind   BYTE   '<没有这条信息>',0dh,0ah,0h
  49.         g_szErrMax   BYTE   '<电话本储存满了>',0dh,0ah,0h
  50.         g_szErrUnknowCmd BYTE '<未知指令>',0dh,0ah,0h

  52.         ; ========= 全局变量 =========
  53.         ;电话本
  54.         g_book PHONE 20 dup(<'0'>)
  55.         ;最大容量 最多保存20条记录
  56.         g_max dword 1 dup(20)
  57.         ;当前容量
  58.         g_nCount dword 1 dup(0)
  59.         ;单个电话本临时变量
  60.         g_tmpPhone PHONE <'0','0'>
  61.         ;当前用户选择的功能 1=查询 2=增加 3=删除 4=修改 5=看所有
  62.         g_nCmd byte 1 dup(0)
  63.         ;索引查找数
  64.         g_nI dword 1 dup(0)
  65.         ;临时指针
  66.         g_nTmp dword 1 dup(0)
  67.         ;找到了的索引
  68.         g_nFindIndex dword 1 dup(-1)
  69.         ;找到了的地址
  70.         g_nFindPoint dword 1 dup(0)
  71.        

  73. .code

  75. ; 打印菜单并接收用户指令到eax
  76. ; 功能 1=查询 2=增加 3=删除 4=修改
  77. SelectMenu proc
  78.         ; 清屏
  79.         push offset g_szClr
  80.         call crt_system
  81.         add esp,4
  82.         ; 打印菜单
  83.         push g_max
  84.         push g_nCount
  85.         push offset g_szMenu
  86.         call crt_printf
  87.         add esp,12
  88.         ; 用户输入指令,放入g_nCmd
  89.         push offset g_nCmd
  90.         push offset g_szCmdIn
  91.         call crt_scanf
  92.         add esp,8
  93.         ret

  95. SelectMenu endp

  97. ; 查找用户
  98. PhoneFind proc
  99.         ; 提示输入姓名
  100.         push offset g_szNameIn
  101.         call crt_printf
  102.         add esp,4
  103.         ; 用户输入姓名
  104.         lea eax,[g_tmpPhone + PHONE.m_name]
  105.         push eax
  106.         push offset g_szScanNameFormat
  107.         call crt_scanf
  108.         add esp,8
  109.         ; 重置i
  110.         mov g_nI,0 ; i = 0
  111. find_loop:
  112.         mov eax,g_nI
  113.         mov ebx,g_max ; max
  114.         cmp eax,ebx
  115.         ja find_empty ;i > g_max ,goto proc_end
  116.         ; 计算地址
  117.         imul eax,g_nI,sizeof(PHONE) ; i*单个元素大小 = 偏移地址给edi
  118.         lea edi,[g_book + eax] ; 电话本首地址 + 偏移地址 = 第i个元素的地址
  119.         lea edx,[edi] ; 保存第i个元素地址
  120.         mov g_nTmp, edx
  121.         ; 判断这个元素的姓名和输入的姓名是否匹配
  122.         lea esi,[g_tmpPhone + PHONE.m_name]
  123.         cmpsd dword ptr[edi + PHONE.m_name],dword ptr[esi]
  124.         jnz not_find
  125.         ; 找到了就输出信息
  126.         lea eax, [edx + PHONE.m_phone]
  127.         push eax
  128.         lea eax, [edx + PHONE.m_name]
  129.         push eax
  130.         push offset g_szPrintItemFormat
  131.         call crt_printf
  132.         add esp,12
  133.        
  134.         ; 记录索引
  135.         mov edx,g_nI
  136.         mov g_nFindIndex,edx
  137.         ; 记录地址
  138.         mov edx,g_nTmp
  139.         mov g_nFindPoint,edx
  140.        
  141.         ret
  142. not_find:
  143.         ; 没找到则继续找
  144.         inc g_nI ; i++
  145.         jmp find_loop
  146. find_empty:
  147.         ; 提示没有找到这条信息
  148.         push offset g_szErrNotFind
  149.         call crt_printf
  150.         add esp,4
  151.        
  152.         mov g_nFindIndex,-1 ; 没找到 索引为-1
  153.         mov g_nFindPoint,0 ; 没找到 地址为0
  154.         ret

  156. PhoneFind endp

  158. ; 增加用户
  159. PhoneAdd proc
  160.         ;判断容量是否满了
  161.         mov eax,g_nCount
  162.         mov ebx,g_max
  163.         cmp eax,ebx
  164.         jb phone_insert
  165.         ; 如果容量满了输出提示
  166.         push offset g_szErrMax
  167.         call crt_printf
  168.         add esp,4
  169.         ret
  170. phone_insert:
  171.         ; 计算地址
  172.         mov ecx,g_nCount  ; 当前容量
  173.         imul eax,ecx,sizeof(PHONE) ; i*单个元素大小 = 偏移地址给edi
  174.         lea edi,[g_book + eax] ; 电话本首地址 + 偏移地址 = 第i个元素的地址
  175.        
  176.         ; 提示输入姓名
  177.         push offset g_szNameIn
  178.         call crt_printf
  179.         add esp,4
  180.         ; 用户输入姓名
  181.         lea eax,[edi + PHONE.m_name]
  182.         push eax
  183.         push offset g_szScanNameFormat
  184.         call crt_scanf
  185.         add esp,8
  186.        
  187.         ; 提示输入电话
  188.         push offset g_szPhoneNumberIn
  189.         call crt_printf
  190.         add esp,4
  191.         ; 用户输入电话
  192.         lea eax,[edi + PHONE.m_phone]
  193.         push eax
  194.         push offset g_szScanNameFormat
  195.         call crt_scanf
  196.         add esp,8
  197.         ; 当前容量+1
  198.         inc g_nCount
  199.         ; 插入成功
  200.         push offset g_szTipsAdd
  201.         call crt_printf
  202.         add esp,4
  203.         ret

  205. PhoneAdd endp

  207. ; 删除用户
  208. PhoneDel proc
  209.         ; 寻找用户
  210.         call PhoneFind
  211.         cmp g_nFindIndex, -1
  212.         je find_empty; 没有此用户
  213.         ; 找到了用户后,第i个后面依次往前移动
  214.        
  215.         ; 循环次数 = 总容量 - 找到的索引
  216.         ; 若找到的索引i=3 ,总容量max = 5, 5-3=2次,索引从0开始,即 3覆盖2,  4覆盖3
  217.         mov ecx, g_max         ;总容量
  218.         mov eax, g_nFindIndex  ;找到的数据,索引从0开始
  219.         sub ecx, eax           ;循环次数
  220.        
  221. copy_loop:
  222.         ; copy到当前容量后还没到Max需要提前结束循环
  223.         ; 即 g_nFindIndex >= g_nCount 退出
  224.         mov eax,g_nFindIndex
  225.         mov ebx,g_nCount
  226.         cmp eax, ebx
  227.         jnb copy_over ; 提前结束

  229.         mov eax, g_nFindIndex  ;找到的数据,索引从0开始
  230.         ; 计算i元素地址 = 电话本首地址 + 找到的索引 * 一个元素大小
  231.         imul esi, eax, sizeof(PHONE)
  232.         lea edi, [g_book + esi]        ; i元素地址
  233.         ;lea esi, [edi + sizeof(PHONE)] ; i下一个元素地址
  234.         mov g_nTmp, edi

  236.         ; PHONE类型刚好为16字节 也就是4次movsd就能实现拷贝了
  237.         ; 保存外层 ecx
  238.         push ecx
  239.         ; 循环4次
  240.         mov ecx,4
  241. copy_item:
  242.         mov edi,g_nTmp
  243.         mov esi,edi
  244.         imul eax, ecx, 4
  245.         lea edi,[edi + eax - 4]
  246.         lea esi,[eax + esi + sizeof(PHONE) -4]
  247.         movsd dword ptr[edi], dword ptr[esi]
  248.         loop copy_item
  249.         ; 内层循环完毕,还原ecx
  250.         pop ecx
  251.         ; 复制一次,寻找索引+1
  252.         inc g_nFindIndex
  253.         loop copy_loop ; 循环ecx次
  254. copy_over:
  255.         ; 当前容量 - 1
  256.         dec g_nCount
  257.         ; 删除成功
  258.         push offset g_szTipsDel
  259.         call crt_printf
  260.         add esp,4
  261. find_empty:
  262.         ret

  264. PhoneDel endp

  266. ; 修改用户
  267. PhoneUpdate proc
  268.         ; 寻找用户
  269.         call PhoneFind
  270.         cmp g_nFindIndex, -1
  271.         je find_empty; 没有此用户

  273.         ; 找到了 这个用户 进行数据更新
  274.         ; 提示输入姓名
  275.         push offset g_szNewNameIn
  276.         call crt_printf
  277.         add esp,4
  278.         ; 用户输入新的姓名
  279.         mov edx,g_nFindPoint
  280.         lea eax,[edx + PHONE.m_name]
  281.         push eax
  282.         push offset g_szScanNameFormat
  283.         call crt_scanf
  284.         add esp,8
  285.         ; 提示输入电话
  286.         push offset g_szNewPhoneNumberIn
  287.         call crt_printf
  288.         add esp,4
  289.         ; 用户输入新的电话
  290.         mov edx,g_nFindPoint
  291.         lea eax,[edx + PHONE.m_phone]
  292.         push eax
  293.         push offset g_szScanNameFormat
  294.         call crt_scanf
  295.         add esp,8
  296.        
  297.         ; 输出提示 修改成功
  298.         push offset g_szTipsUpdate
  299.         call crt_printf
  300.         add esp,4
  301.        
  302. find_empty:
  303.         ret

  305. PhoneUpdate endp

  307. ; 打印所有用户
  308. PhoneShowAll proc
  309.         mov g_nI,0
  310. print_loop:
  311.         mov eax,g_nI
  312.         cmp eax,g_nCount
  313.         ; i<g_nCount 则打印
  314.         jb print
  315.         push offset g_szTipsNoMore
  316.         call crt_printf
  317.         add esp,4
  318.         ret
  319. print:
  320.         ; 计算地址
  321.         imul eax,g_nI,sizeof(PHONE) ; i*单个元素大小 = 偏移地址给edi
  322.         lea edi,[g_book + eax] ; 电话本首地址 + 偏移地址 = 第i个元素的地址
  323.        
  324.         ; 打印信息
  325.         lea eax, [edi + PHONE.m_phone]
  326.         push eax
  327.         lea eax, [edi + PHONE.m_name]
  328.         push eax
  329.         push offset g_szPrintItemFormat
  330.         call crt_printf
  331.         add esp,12       
  332.         inc g_nI
  333.         jmp print_loop


  336. PhoneShowAll endp


  339. main:
  340.         ; 打印菜单获取用户指令
  341.         call SelectMenu
  342.         cmp g_nCmd, 1
  343.         jne menu_add; 输入的是1(查询)继续执行,否则跳到下一个判断
  344.         call PhoneFind
  345.         jmp menu_end
  346. menu_add:
  347.         cmp g_nCmd, 2
  348.         jne menu_del ; 输入的是2(增加)继续执行,否则跳到下一个判断
  349.         call PhoneAdd
  350.         jmp menu_end
  351. menu_del:       
  352.         cmp g_nCmd, 3
  353.         jne menu_update ; 输入的是3(删除)继续执行,否则跳到下一个判断
  354.         call PhoneDel
  355.         jmp menu_end
  356. menu_update:       
  357.         cmp g_nCmd, 4
  358.         jne menu_showall ; 输入的是4(修改)继续执行,否则跳到下一个判断
  359.         call PhoneUpdate
  360.         jmp menu_end
  361. menu_showall:
  362.         cmp g_nCmd, 5
  363.         jne menu_unknow ; 输入的是5(查看所有)继续执行,否则跳到下一个判断
  364.         call PhoneShowAll
  365.         jmp menu_end
  366. menu_unknow: ; 输入的未知指令
  367.         push offset g_szErrUnknowCmd
  368.         call crt_printf
  369.         add esp,4
  370. menu_end: ; 执行完毕返回菜单
  371.         push offset g_szPause
  372.         call crt_system
  373.         add esp,4
  374.         jmp main
  375. quit: ; 退出
  376.         ret

  378. end main

  380. end
复制代码



                               
登录/注册后可看大图

想知道小甲鱼最近在做啥？请访问 -> ilovefishc.com
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-4-28 17:38

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表