资源描述:
《电梯模拟(elevator simulation)》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、电梯模拟(Elevatorsimulation);-----------------------------------------------------------清屏之宏CLSS宏;MOVBH,7;卷入行属性,黑底白字,正常显示。MOVAX,0600h;啊=6=0整个窗口空白铝屏幕初始化或上卷。INT10H;CH=左上角行号,CL=左下角列号。endm;DH=右上角行号,DL=右下角列号。;-----------------------------------------------------------GB移光标之宏宏;MOVB
2、H,00h;BH=页号DH,DL=行号,列号。MOV啊,02h;啊=2置光标位置。INT10Hendm;------------------------------------------------恒宏X1,Y1,颜色,写横的宏X2;当地定义标号BH1型;MOVCX,X1;起始点横作标-->CXmovdx,Y1;起始点纵作标-->DXBH1:MOV啊,0ch;写象素MOVAL,颜色;设定颜色参数-->铝INT10H公司CXCMPCX,写至终点横作标为止X2;锦州BH1endm;------------------------------
3、------------------曙宏1,CY1、CY2;写竖的宏颜色,当地定义标号BH2;MOVCX,1movdx,CY1BH2:MOV啊,0chMOVAL,颜色;Al=(00——16种颜色共0FH)。INT10H公司的DXCMP的DX,CY2锦州BH2endm;--------------------------------------微距的N,小方块上升的宏DX1;当地的uPA,UPB;定义标号MOVAL,N;小方块从N-1层上升至N层MOVCH,30;小方块上升一层,并且将下一层的小方块清除多通道movdx,430斧,斧MOV[
4、打],DX添加DX,20MOVDX1,DX乌帕河:横170、【DZ],05h,190;画小方块公司[打]MOVAX,DX1CMP[DZ],斧锦州uPA添加DX,11MOV[打],DX添加DX,20MOVDX1,DXUPb:横170、【DZ],00H,190;画小方块公司[打]MOVAX,DX1CMP[DZ],斧锦州UPBendm;---------------------------------------------下宏观、DX1;小方块下降的宏当地的DNA,DNB;定义标号MOVAL,N;小方块从n+1层下降至N层MOVCH,30sq
5、uares;dropalayer,andalayerofsmallclearanceMULCHMOVDX,430SUB,DX,AXMOV,[DZ],DXADDDX,20MOV,DX1,DXDNa:HENG170,[DZ],05H,190;paintingboxINC[DZ]MOV,AX,DX1CMP,[DZ],AXJNZDNaSUBDX,49MOV,[DZ],DXADDDX,20MOV,DX1,DXDNb:HENG170,[DZ],00H,190;paintingboxINC[DZ]MOV,AX,DX1CMP,[DZ],AXJNZDNbE
6、NDM---------------------------------------------;INITMACRON,DX1;initialpaintingwhileAcerLOCALBEG;definitionlabelMOVAL,N;smallinitialstopatlevelN,saidtheelevatorstoppedonthefirstNlayerMOVCH,30MULCHMOVDX,430SUB,DX,AXMOV,[DZ],DXADDDX,20MOV,DX1,DXBEG:HENG170,[DZ],05H,190;pain
7、tingboxINC[DZ]MOV,AX,DX1CMP,[DZ],AXJNZBEGENDM-------------------------------------------;CLOSEMACRO;drawthemacrooftheelevator'sclosedstateLOCALCC;definitionlabelMOV[DZ],220CC:,HENG210,[DZ],09H,370;elevatorclosedINC[DZ]CMP[DZ],420JNZCCSHU,291220,02H,420;elevatordoorgapSHU2
8、90220,02H,420SHU289220,02H,420ENDM---------------------------------------------;HALFMACRO;drawth