汇编语言动画设计robot〞

本文格式为Word版，下载可任意编辑——汇编语言动画设计“robot〞

机器人的代码,简单但可以避免你不挂科

Pushrmacrox,y,z,w

Pushx

Pushy

Pushz

Pushw

Endm

;堆栈顶数据弹出到寄放器宏定义

Poprmacrox,y,z,w

Popw

Popz

Popy

Popx

Endm

;定义堆栈段

Stackssegment

Dw256dup(?)

Stacksends

;定义数据段

Datasegment

Robotdb7;机器人由7和符号组成

Db5ch,8eh,0,0;左手，字符属性，行偏移，列偏移

Db08h,06h,0,1;胸部，字符属性，行偏移，列偏移

Db2fh,8eh,0,1;右手，字符属性，行偏移，列偏移

Db0dbh,0ah,1,-1;腹部，字符属性，行偏移，列偏移

Db13h,7h,1,0;两腿，字符属性，行偏移，列偏移

Db02h,84h,-3,0;面部，字符属性，行偏移，列偏移

Db22h,94h,-1,0;天线，字符属性，行偏移，列偏移

Countdw0;保存字符个数

Pointerdw0;保存字符首地址

Linedb0;保存行号

Columndb0;保存列号

Dataends

Codessegment

Assumecs:codes,ds:data,es:data,ss:stacks

Start:movax,data

Movds,ax

Moves,ax

;设置为8025彩色文本方式

movah,0

moval,3

int10h

;清屏幕

Callclear

Leadi,robot;数据段首地址送DI

Movdx,0808h;显示的起始行号和列号

Movbh,0

Callmoves;调用MOVES子程序

Callclear;清屏幕

Movah,4ch;主程序终止返回DOS

Int21h

Movesproc;机器人移动子程序

Pushrax,bx,cx,dx;保存寄放器内容

Pushdi

Xorch,ch

Movcl,[di];字符个数送CX

Incdi;指向第一个显示符号

Movcount,cx;保存字符个数

Movpointer,di;保存字符首地址

Movline,dh;保存行号

Movcolumn,dl;保存列号

Next:adddh,[di+2];根据偏移值计算下一个符号的行号

Adddl,[di+3];计算列号

Cmpdl,80;判断是否到屏幕最右端

Jbwrite;否，继续画

Popdi

Poprax,bx,cx,dx

Ret

Write:movah,2

Int10h;设置光标位置

Mova

l,[di];取字符

Movbl,[di+1];取字符属性

Pushcx;保存计数值

;设置写彩色字符

movah,9

movcx,1

机器人的代码,简单但可以避免你不挂科

int10h

Popcx;恢复计数值

Adddi,4;指向下一个显示字符

Loopnext;机器人没画完转next

Calldelay;延时子程序

CallErase;清除机器人子程序

Jmpshortnext

Movesendp

Eraseproc

Movcx,count;字符个数送CX

Movdi,pointer;字符首地址送DI

Movdh,line;行号送DH

Movdl,column;列号送DL

l:adddh,[di+2];根据相对偏移计算行号

movah,2;设置光标位置

adddl,[di+3]

int10h

moval,[di];取字符

movbl,0;字符属性为黑底黑字

pushcx

movah,9;写字符

movcx,1

int10h

popcx

adddi,4;指向下一个字符

loopl;未清除完转L

movcx,count;为重画机器人做准备

movdi,pointer

movdh,line

inccolumn

movdl,column

ret

eraseendp

delayproc;延时子程序

pushrax,bx,cx,dx

movdx,2000

go:movcx,50000

repeat:looprepeat

decdx

jnego

poprax,bx,cx,dx

ret

delayendp

clearproc;清屏幕子程序

pushrax,