骰子模拟程序设计

骰子模拟程序设计一、设计目标模拟实现骰子游戏。二、设计要求通过按某键模拟投掷骰子。模拟显示骰子的旋转，经过一段时间后骰子静止，根据静止时的数字大小确定输赢。通过按某键可停止骰子旋转。模拟投掷骰子的力度，通过按某键的时间长短或两次按键之间的时间间隔，控制骰子的旋转时间和转速。通过按某键可正常退出模拟程序。三、设计提示本课题可用1~8分别代替骰子的八面数字，当按下某键的时候，数字开始滚动显示，当按下结束键时停止，屏幕上显示的就是当前数字。其中，按键检测、数字显示、时间长短均可以通过DOS、BIOS功能调用完成。STACK SEGMENTDW64DUP(?)STACK ENDSDATA SEGMENTMESSAGE DB'NOTE:ENTER"1,2,3"TOCHOOSESPEED,"S"TOSTOP,"E"TOEXIT','$'RESULT DB'YOURNUMBERIS,''$'GO DB'GOING!','$'STOP DB'STOP!','$'TIME DB?DATA ENDSCODE SEGMENTASSUMEDS:DATA,CS:CODEPOINTMACROOP1,OP2;置光标位置PUSHAXPUSHBXPUSHDXMOVAH,02HMOVBH,0MOVDH,OP1MOVDL,OP2INT10HPOPDXPOPBXPOPAXENDMPRINTMACROM;输出字符PUSHAXPUSHDXMOVDL,MMOVAH,02HINT21HPOPDXPOPAXENDMSTART:MOVAX,DATAMOVDS,AXLEASI,TIMEMOVAH,01HMOVCX,3000HINT10HMOVAX,0600HMOVBH,0CHXORCX,CXMOVDX,1850HINT10HPOINT7,18LEADX,MESSAGEMOVAH,09HINT21HMOVAX,0600HMOVBH,0FCHMOVCX,0B26HMOVDX,0D2AHINT10HPOINT12,20LEADX,RESULTMOVAH,09HINT21HRESET:MOVAH,08INT21HCMPAL,'1'JZA0CMPAL,'2'JZA0CMPAL,'3'JZA0CMPAL,'E'JZEXITJMPRESETA0:ANDAH,00HMOVCL,0FFHMULCLMOVCX,AXPUSHCXPOINT9,38LEADX,GOMOVAH,09HINT21HPOPCXA1:PUSHCXCALLRANDPOPCXADDBL,31HPOINT12,40PRINTBLMOVAH,01HINT16HCMPAL,'S'JZCONTINUELOOPA1CONTINUE:POINT9,38LEADX,STOPMOVAH,09HINT21HMOVAH,01HINT16HCMPAL,'1'JZA1CMPAL,'2'JZA1CMPAL,'3'JZA1CMPAL,'E'JZEXITJMPRESETRANDPROCPUSHCXPUSHDXPUSHAXCALLDELAYCALLDELAYMOVAH,00HINT1AHMOVAX,DXANDAH,00HMOVDL,6DIVDLMOVBL,AHPOPAXPOPDXPOPCXRETRANDENDPDELAYPROCPUSHCXPUSHDXMOVDX,DECDXJNZD11D11: MOVCX,0FFFFHD12: LOOPD12POPDXpopCXR