数字统计程序，高手求救！！！

tftfttff 2008-12-31 07:35:30
汇编的课程设计：要求输入一串字符，找出其中相同的，并且最长的字符串，输出。例如，输入12223444444456，就输出为4444444，如果有相同长度的，
例如11111133444555555，则输出111111555555。我的想法是，分成3块。1.首先，将输入串放入BUF,对连续数字进行统计，放入对应位置的BUF1中，连续的数字的个数放入首个里面，例如输入1113355555，则BUF1里面为3002050000。2.然后进行排序，找出BUF1里面的最大数。3.按最大数对BUF1进行扫描，有与最大数相同的，就找到BUF里面对应位置的字符，在BUF2里面存入最大数个这个字符，扫描完毕后对BUF2进行输出。最后我自己写了一个，前面2个模块好像还行，就是第三个模块出不来结果。
（而且按Q/q退出的程序的跳转，因为跳转距离过长，编译报错，也不知道怎么办）
急啊！！！高手帮帮忙忙吧
DATA SEGMENT
BUF DB 10
DB ?
DB 10 DUP(?)
BUF1 DB 10 DUP(0)
INPUT DB 0AH,0DH,'PLEASE INPUT:',0AH,0DH
DB 'IF YOU WANT TO QUIT,PRESS Q OR q',0AH,0DH,'$'
BUF2 DB 100 DUP(0)
DATA ENDS
STACK SEGMENT USE16 STACK
DB 200 DUP(0)
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE,DS;DATA,SS:STACK
START:MOV AX,DATA
MOV DS,AX
LEA DX,INPUT
MOV AH,9C
INT 21H

mov ah,08h ;按Q/q退出
int 21h
cmp al,'Q'
je exit
cmp al,'q'
je exit
LEA DX,BUF
MOV AH,0AH
INT 21H

MOV CX,-2 ；计算BUF里面有效字符长度
LEA SI,BUF
COUNT1:INC CX
INC SI
CMP BYTE PTR [SI],0DH
JNZ COUNT1

PUSH CX

LEA SI,BUF+2 ；统计BUF里面连续字符数目，放到BUF1对应的每个位置里面
LEA DI,BUF1
MOV AX,SI
MOV BX,DI
INC BYTE PTR [DI]
LOOPA:MOV DL,[SI]
INC SI
CMP DL,[SI]
JZ A
PUSH SI
PUSH BX
SUB SI,AX
ADD BX,SI
MOV DI,BX
POP BX
POP SI
A:INC BYTE PTR [DI]
LOOP LOOPA

PUSH CX ；将BUF1里面的最大数找出，放入AL中
LEA DI,BUF1
MOV AL,[DI]
DEC CX
A1:INC DI
CMP AL,[DI]
JG A2
MOV AL,[DI]
A2:LOOP A1
POP CX


LEA BX,BUF ；将与BUF1里面最大数相同的数找到，并输出与BUF相同位置的字符，输出AL次
LEA DI,BUF1
LEA SI,BUF2
MOV AH,AL
MOV AL,0
A3:CMP AH,[DI]
JNZ D
MOV DL,AH
PUSH SI
A4:PUSH AX
MOV AH,0
ADD SI,WORD PTR AX
POP AX
MOV BH,BYTE PTR [BX]
MOV BYTE PTR [SI],BH
INC SI
DEC DL
JNZ A4
D:INC DI
INC AL
POP SI
LOOP A3
MOV BYTE PTR [SI],'$'
LEA DX,BUF2
MOV AH,9
INT 21H


EXIT:MOV AX,4C00H
INT 21H
CODE ENDS
END START
...全文
114 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
cnzdgs 2009-01-01
  • 打赏
  • 举报
 回复
你的思路比较繁琐，一次扫描就够了，给你写一段参考：
BUFFER_LENGTH EQU 80 ; 缓冲区长度



DATA SEGMENT

NewLine DB 0AH, 0DH, '$'

InputBuffer DB BUFFER_LENGTH, ?, BUFFER_LENGTH DUP(?)

OutputBuffer DB BUFFER_LENGTH DUP(?), ?

Chars DB 100H DUP(0) ; 按顺序储存哪些字符出现的次数最多

RepeatCount DW 0 ; 储存重复次数

LastChar DB 0 ; 储存前一个字符

DATA ENDS



STACK SEGMENT USE16 STACK 

DB 200 DUP(0) 

STACK ENDS 



CODE SEGMENT

ASSUME CS:CODE, DS:DATA, SS:STACK

Start:

	mov ax, DATA ; 初始化

	mov ds, ax

	mov es, ax

	cld



	mov ah, 0AH ; 输入字符串

	lea dx, InputBuffer

	int 21H



	lea si, InputBuffer[1] ; 取缓冲区地址

	lea di, Chars ; 取字符数组地址

	lodsb ; 取字符串长度

	inc ax ; 把最后的0DH也算在内，作为结尾

	xor ah, ah

	mov cx, ax ; 循环次数

	xor dx, dx ; 记录当前字符重复次数

Lp:

	lodsb ; 取字符

	cmp al, LastChar ; 与前一字符比较

	jz Next ; 相同则跳转

	xchg al, LastChar ; 取出并更新前一字符

	mov bx, dx ; 取出最大重复次数

	xor dx, dx ; 重新计数

	cmp bx, RepeatCount ; 比较最大重复次数

	jc Next ; 小于当前最大重复次数则跳转

	jz Equal ; 等于则跳转

	mov RepeatCount, bx ; 更新最大重复次数

	lea di, Chars ; 重置di

Equal:

	stosb

Next:

	inc dx ; 增加计数

	loop Lp



	mov ah, 9

	lea dx, NewLine

	int 21H

	lea si, Chars ; 取字符数组地址

Print:

	cmp si, di

	jz Exit

	mov cx, RepeatCount ; 取重复次数

	lodsb ; 取字符

	mov dl, al

PrintChar:

	mov ah, 2 ; 显示字符

	int 21H

	loop PrintChar

	jmp Print

Exit:

	mov ah, 4CH

	int 21H

CODE ENDS

END Start
zhanhuichong 2009-01-01
  • 打赏
  • 举报
 回复
Gerald Recktenwald 《Numerical Methods with MATLAB》(NMM1.5数值分析工具箱) http://www.matlabsky.net/thread-325-1-1.html
Dahua Lin《Statistical Learning Toolbox》(统计学习工具箱) http://www.matlabsky.net/thread-301-1-1.html
Sergiy Iglin《Graph Theory Toolbox》(图论工具箱) http://www.matlabsky.net/thread-295-1-1.html
Jouni Hartikainen《EKF/UKF Toolbox for Matlab》(扩展卡曼滤波工具箱) http://www.matlabsky.net/thread-294-1-1.html
Paolo Di Prodi《robotic toolbox》(机器人工具箱)http://www.matlabsky.net/thread-274-1-1.html
Mike Craymer《Geodetic Toolbox》(大地测量学工具箱) http://www.matlabsky.net/thread-271-1-1.html
Gabriel Peyre《Toolbox Fast Marching》(快速步进工具箱) http://www.matlabsky.net/thread-254-1-1.html
Rasmus Anthin《Multivariable Calculus Toolbox 》(多变量微积分工具箱) http://www.matlabsky.net/thread-251-1-1.html
Janos Abonyi《Fuzzy Cluster Analysis Toolbox》(模糊聚类和数据分析工具箱) http://www.matlabsky.net/thread-239-1-1.html
Eric Debreuve《Active Contour Toolbox》(主动轮廓线工具箱)http://www.matlabsky.net/thread-238-1-1.html
YALMIP高级优化工具箱http://www.matlabsky.net/thread-237-1-1.html
Maplesoft《Maple Toolbox for MATLAB》 http://www.matlabsky.net/thread-236-1-1.html
sheffield《genetic arithmetic toolbox》(遗传算法工具箱) http://www.matlabsky.net/thread-234-1-1.html
Gonzalez《DIPUM Toolbox》(数字图像处理工具箱) http://www.matlabsky.net/thread-233-1-1.html
Frederic Moisy《EzyFit toolbox 2.20》(快速拟合工具箱)http://www.matlabsky.net/thread-232-1-2.html
Moein Mehrtash《GPS Navigation Toolbox 》(GPS导航工具箱) http://www.matlabsky.net/thread-228-1-2.html
Mike Brookes《Voice box》(语音处理工具箱) http://www.matlabsky.net/thread-227-1-2.html
Koert Kuipers《Branch And Bound toolbox 2.0》(BNB20分支定界工具箱) http://www.matlabsky.net/thread-226-1-2.html
Howard Wilson《Numerical Integration Toolbox》(NIT数值积分工具箱) http://www.matlabsky.net/thread-225-1-2.html
Kevin Murphy《Kalman filter toolbox》(卡曼滤波工具箱)http://www.matlabsky.net/thread-224-1-2.html
Brian Birge《Particle Swarm Optimization Toolbox》(PSO粒子群优化工具箱) http://www.matlabsky.net/thread-223-1-2.html
《PLS toolbox》(偏最小二乘工具箱) http://www.matlabsky.net/thread-222-1-2.html
《Math modl toolbox》(数学建模工具箱) http://www.matlabsky.net/thread-221-1-2.html
Rasmus Anthin《Finite Element Toolbox 2.1》 http://www.matlabsky.net/thread-220-1-2.html
Anton Zaicenco《FEM toolbox for solid mechanics》(固体力学有限元工具箱)http://www.matlabsky.net/thread-219-1-2.html
J.Divahar 《Airfoil_Analyzer_toolbox》(翼型分析工具箱) http://www.matlabsky.net/thread-218-1-2.html
xiaopoy 2009-01-01
  • 打赏
  • 举报
 回复
[Quote=引用 4 楼 tftfttff 的回复:]
呵呵，这么晚还有人回贴。祝大家新年快乐
[/Quote]
支持
tftfttff 2009-01-01
  • 打赏
  • 举报
 回复
呵呵，这么晚还有人回贴。祝大家新年快乐
xtdumpling 2008-12-31
  • 打赏
  • 举报
 回复
...是编译不过去，不过不是因为跳转太远了，这个可以编译了，LZ继续改吧，
DATA SEGMENT 

BUF DB 10 

    DB ? 

    DB 10 DUP(?) 

BUF1 DB 10 DUP(0) 

INPUT DB 0AH,0DH,'PLEASE INPUT:',0AH,0DH 

DB 'IF YOU WANT TO QUIT,PRESS Q OR q',0AH,0DH,'$' 

BUF2 DB 100 DUP(0) 

DATA ENDS 

STACK SEGMENT USE16 STACK 

DB 200 DUP(0) 

STACK ENDS 

CODE SEGMENT 'code'

ASSUME CS:CODE,DS:DATA,SS:STACK 

START:MOV AX,DATA 

MOV DS,AX 

LEA DX,INPUT 

MOV AH,9h

INT 21H 



mov ah,08h    ;按Q/q退出 

int 21h 

cmp al,'Q' 

je exit 

cmp al,'q' 

je exit 

LEA DX,BUF 

MOV AH,0AH 

INT 21H 



MOV CX,-2      ;计算BUF里面有效字符长度 

LEA SI,BUF 

COUNT1:INC CX 

INC SI 

CMP BYTE PTR [SI],0DH 

JNZ COUNT1 



PUSH CX 



LEA SI,BUF+2    ;统计BUF里面连续字符数目，放到BUF1对应的每个位置里面 

LEA DI,BUF1 

MOV AX,SI 

MOV BX,DI 

INC BYTE PTR [DI] 

LOOPA:MOV DL,[SI] 

INC SI 

CMP DL,[SI] 

JZ A 

PUSH SI 

PUSH BX 

SUB SI,AX 

ADD BX,SI 

MOV DI,BX 

POP BX 

POP SI 

A:INC BYTE PTR [DI] 

LOOP LOOPA 



PUSH CX                ;将BUF1里面的最大数找出，放入AL中 

LEA DI,BUF1 

MOV AL,[DI] 

DEC CX 

A1:INC DI 

CMP AL,[DI] 

JG A2 

MOV AL,[DI] 

A2:LOOP A1 

POP CX 





LEA BX,BUF              ;将与BUF1里面最大数相同的数找到，并输出与BUF相同位置的字符，输出AL次 

LEA DI,BUF1 

LEA SI,BUF2 

MOV AH,AL 

MOV AL,0 

A3:CMP AH,[DI] 

JNZ D 

MOV DL,AH 

PUSH SI 

A4:PUSH AX 

MOV AH,0 

ADD SI,WORD PTR AX 

POP AX 

MOV BH,BYTE PTR [BX] 

MOV BYTE PTR [SI],BH 

INC SI 

DEC DL 

JNZ A4 

D:INC DI 

INC AL 

POP SI 

LOOP A3 

MOV BYTE PTR [SI],'$' 

LEA DX,BUF2 

MOV AH,9 

INT 21H 





EXIT:MOV AX,4C00H 

INT 21H 

CODE ENDS 

END START
tftfttff 2008-12-31
  • 打赏
  • 举报
 回复
好急啊，高手来帮忙啊。
自己顶一下
【CPO三维路径规划】豪猪算法CPO多无人机协同集群避障路径规划（目标函数：最低成本：路径、高度、威胁、转角）研究（Matlab代码实现）
内容概要：本文系统研究了基于豪猪优化算法（CPO）的多无人机协同集群在三维空间中的避障路径规划问题，聚焦于实现以最低成本为目标的航迹优化，综合考虑路径长度、飞行高度、威胁规避及转弯角度等多个关键因素。通过构建精细化的三维环境模型与多无人机协同机制，采用Matlab平台实现CPO算法的仿真与验证，充分展示了该算法在复杂动态障碍环境下的高效搜索能力与全局优化性能。研究不仅涵盖了路径规划的数学建模与目标函数设计，还深入探讨了算法的收敛特性与鲁棒性，为智能群体系统在实际场景中的应用提供了理论依据与技术支撑。; 适合人群：具备一定编程基础和优化算法背景，从事无人机系统控制、智能路径规划、群体协同、人工智能与自动化等相关领域的科研人员、高校研究生及工程技术人员。; 使用场景及目标：①应用于多无人机协同执行侦察、灾害监测、应急救援、区域巡检等复杂任务中的自主路径规划；②为智能优化算法在三维动态环境下的路径决策问题提供可复现的技术范例；③支持研究人员对CPO算法与其他主流群智能算法（如PSO、GWO、WOA等）进行性能对比与改进研究，推动路径规划技术的发展。; 阅读建议：建议结合提供的Matlab代码进行实践操作，重点理解目标函数的多维度建模方式与CPO算法的迭代优化流程，可通过调整环境参数与约束条件进行仿真实验，对比不同算法在相同场景下的路径质量与收敛速度，从而深入掌握其优势与适用边界。
电动汽车参与运行备用的能力评估及其仿真分析（Matlab代码实现）
内容概要：本文围绕电动汽车参与电力系统运行备用的能力评估展开深入研究，利用Matlab代码实现对电动汽车集群提供运行备用服务的建模与仿真分析。研究重点在于量化电动汽车作为分布式灵活资源参与电网辅助服务的潜力，通过构建精细化的数学模型，分析其可调功率容量、响应速度、时空分布特性及聚合能力，并采用多面体聚合、内近似模型与闵可夫斯基和等先进方法精确刻画其可调度能力边界。研究进一步结合大规模电动汽车接入场景，探讨其在多时间尺度调度框架下参与调峰、调频等辅助服务的优化策略，评估其对提升高比例可再生能源电网灵活性与稳定性的贡献，最终通过仿真验证所提模型与方法的有效性与实用性。; 适合人群：具备电力系统分析、智能电网、新能源汽车或优化调度等相关专业背景，熟悉Matlab/Simulink仿真工具，从事科研、工程应用的高校研究生、科研人员及电力行业工程师。; 使用场景及目标：①精确评估大规模电动汽车集群在不同约束条件下可提供的运行备用容量；②研究电动汽车在日前、日内及实时调度中的动态响应能力与优化调度策略；③为高渗透率新能源电力系统提供基于移动储能的灵活性资源解决方案，支撑电网安全经济运行。; 阅读建议：建议结合Matlab代码与技术文档同步学习，重点关注多面体聚合建模、能力边界计算及优化调度算法的设计与实现，可进一步拓展至V2G（车辆到电网）、需求响应等互动场景进行二次开发与应用验证。
中国城市房地产政策汇总数据（1957-2024.7）
房地产政策是政府为了引导和调控房地产市场，确保其健康稳定发展而制定的一系列法律法规和行政措施。包括政策类型、政策内容、限价、限购、土地供应、人才政策等，旨在平衡供需、稳定房价、保护消费者权益、促进资源合理配置及维护市场秩序 本次分享的房地产政策汇总数据，包括1957年以来各个城市出台的房地产政策，希望对房地产相关的研究有所帮助 一、数据介绍 数据名称：中国城市房地产政策汇总数据 数据范围：全国及各城市 数据年份：1957-2024.7 数据说明：不同年份的资料有所差别 二、主要指标 政策类型 政策标题 发文机构 政策所属地区 颁布时间 发文字号 实施日期 效力级别 成文日期 网址 城市名称 时间 标题 政策内容 分类 文件 主要内容 限购 限价 限售 限贷 土地供应 人才政策
汇编语言

21,500

社区成员

41,617

社区内容

发帖
与我相关
我的任务
社区描述
汇编语言（Assembly Language）是任何一种用于电子计算机、微处理器、微控制器或其他可编程器件的低级语言，亦称为符号语言。
社区管理员
  • 汇编语言
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章