汇编语言实验报告提交7 13七

实验题目：HANOI班级：20144姓名：寇晓宇HANOIhanoi：NC电话号码(8个字符)两部分； XXX XXXdatareasegment db db'WhatisthenameofspindleX?'db0ah,0dh,'$' db'WhatisthenameofspindleY?'db0ah,0dh,'$' db'WhatisthenameifspindleZ?'db0ah,0dh,'$' dwconstantdw10000,1000,100,10,1datareaendsprognamsegment; ;setupstackforreturn ;setDSregistertocurrentdatasegment ;mainpartofprogramgoes call call ; ; callcrlf; callcrlf; callcrlf;call; ret;returnto; ; ;SolvestowerofHANOI callsave ;B,Ccallhanoi callrestorcallprint ;A,Bcallhanoijmp return:ret ; ;print call callcrlf ; ; ;decibinproc ;接收一个十进制数位送AX ;; ; decibinendp;binidec ;; ; ;10进制，bx存放的是余数，dl word ;;printthecontetsofDLonscreen

binidec;crlf ;printcarriagereturnandlinefeed ; ;crlf; endstartdatasgsegmenttel_tabdb50dup(28dup(';=50*28tab_lendw0endaddrdw0最后一个记录的地址+28tnamedb21,?,20dup(''),?;姓名缓冲区tphonedb9,?,8dup(''),? tempdb28 ;联系人的临时空mess1db13,10,'Inputmess2db13,10,'Inputatelephonemess3db13,10,'Doyouwanttocontinuemess4db13,10,'Thenamehasbeeninthetable!Pleaseinputagain!',13,10,'$'mess5db13,10,'Doyouwantatelephonenumber?(Y/N)',13,10,'$'mess6dbmess7db13,10,'Name mess8db13,10,'Thenameisnotintable.',13,10,'$'datasgendscodesgsegment;mainprocassume

pushds pushax ;Inputcall; call ;Thenamehasinthetable!Pleaseinputagain! callstor_name ;Inputatelephonenumber: callcrlf ;Doyouwanttocontinuetyping?(Y/N) ; call ;Doyouwantatelephonenumber?(Y/N)callcrlf callinput_namecallcrlfcall call ;Thenameisnotintable. ; callcrlf tname[bx+2],20h将maxact loopinput_name;stor_nameprocnear ] si,tname[2];si=name中首个字符地址 ;inphoneprocnear call ; si,tphone[2];si=电话号码首地址 inphone;name_sortprocnear;对tel_tab对人名进行排序cmptab_len,1;仅有一人，不需要排序jeexitnleadi,tel_tab;第一个记录的地址movsi,endaddr ;比较一遍后把最大的放在最后一 repe movsb

name_sort; movdi,bxrepecmpsbjzmovaddbx,28;查找下一个cmpbx,endaddr ;printlineprocnearnametelpushaxcallcrlf callcrlf printline;printallprocnear输出表中所有记录callcrlfcall callprintline;显示当前联系人 ;crlfprocnear movdl,0dhmovah,02hint21h;codesgend功能的程序。主要是三个部分的程序，第一个是主程序，接收输