资源描述:
《汇编音乐程序》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、丽横线DRAWIJNEOMACROSTART_X,START_Y,END_X,COLORLOCALPAINTPUSHAXPUSHBXPUSHCXPUSHDXMOVAH,OCHMOVAL,COLORMOVBX,0MOVCX,START_XMOVDX,START_YPAINT:INT1OHINCCXCMPCX,END_XJCPAINTPOPDXPOPCXPOPBXPOPAXENDMDRAWLINE1MACROSTART_X,START_Y,END_Y,COLORLOCALPAINTPUSHAXPUSHBXPUSHCXPUSHDXMOVAH,OCHMOVAL,COLORMOVBX
2、,0MOVCX,START_XMOVDX,START_YPAINT:INT1OHTNCDXCMPDX,END_YJCPAINTPOPDXPOPCXPOPBXPOPAXENDM画斜线向右倾斜DRAWOBILQUEMACROSTART_X,START_Y,END_X,COLORLOCALPAINT2PUSHAXPUSHBXPUSHCXPUSHDXMOVAH,OCHMOVAL,COLORMOVBX,0MOVDX,START_YMOVCX,START_XPATNT2:INT1011DECCXINCDXCMPCX,END_XJAPATNT2POPDXPOPCXPOPBXPOPAXEN
3、DM画填充矩形DRAWMACROSTART_X,START_Y,END_X,END_Y,COLORLOCALDRAW_NEXTPUSHAXPUSHBXPUSHCXPUSHDXMOVAH,OCH;写像素点MOVAL,COLOR;设置颜色MOVBH,0;选用页号0MOVCX,START_X;列起始点MOVDX,START_Y;行起始点DRAW_NEXT:INT10H;画点INCCX;画横线CMPCX,END_X;比较行是否画完JNEDRAW_NEXT;画另一行MOVCX,START_X;另一行的起始点INCDXCMPDX,END_Y;比较列是否画完JNEDRAW_NEXT;未完
4、继续画POPDXPOPCXPOPBXPOPAXENDMDATASSEGMENTWHITEDBOFFHBLACKDB0YELLOWDBOEEHGRAYDB8CHOSEDB'Chosethetone:C,F',OAH,ODH,'$'ANSWERDBOAH,ODH,*Youhavechosedthetone,Nowenjoythegame!;TABFADW441,495,556,589,661,742,833;TABFBDW495,556,624,661,742,833,935TABFCDW192,294,330,350,393,441,495;TABFDDW294,330,37
5、1,393,441,495,556;TABFEDW330,371,416,441,495,556,624TABFFDW350,393,441,467,525,589,661;TABFGDW393,441,495,525,589,661,742;ZERODW-1BUFFERDW0DTTMEDW10TONEFDW0TAB0L1NEDW240,290,340,390,440,490BLACKLDW225,275,375,425,475BLACKRDW255,305,405,455,505BBLDW180,230,330,380,430BBRDW211,261,361,411,46
6、1WLDW101,151,201,251,301,351,401WRDW150,200,250,300,350,400,451DATASENDSCODESSEGMENTASSUMECS:CODES,DS:DATASSTART:MOVAX,DATASMOVDS,AXCALLINITCALLOPEN;主界面;画白键盘,平行四边形MOVSI,190;S1=START_XMOVDI,140;DI二STARTYDRAWW:DRAWLINEOSI,DI,BP,WHITEDECSTDECBPINCDICMPDI,230JCDRAW;DRAW190,120,540,140,YELLOW;画
7、阴影DRAW100,230,450,250,GRAY;侧面阴影MOVST,140PAINTSIDE:DRAW0B1LQUE540,SI,450,GRAYINCSICMPSI,160JCPATNTSTDE;黑键阴影MOVSI,140PATNTSTDEO:DRAWOBILQUE255,SI,210,WHITEINCSICMPSI,150JCPAINTSIDEOMOVST,140PAINTSIDE1:DRAWOBILQUE305,SI,260,WHITEINCSICMPSI,150JCPATNTSTDE1MOVSI,14