如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
;Win32Consol.exeincludeio32.inc.data;addyourdatahereDRAWMACROSTART_X,START_Y,END_X,END_Y,COLORLOCALDRAW_NEXT;local:避免宏重复调用时,标号的重复;功能:画填充的矩形;使用条件:START_X<END_X,START_Y<END_YPUSHAXPUSHBXPUSHCXPUSHDXMOVAH,0CH;写像素点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;未完继续画POPDXPOPCXPOPBXPOPAXENDMDRAWSQREMACROSTART_X,START_Y,END_X,END_Y,COLORLOCALROW_UP,ROW_DOWN,RANK_LEFT,RANK_RIGHT;功能:画不填充的矩形PUSHAXPUSHBXPUSHCXPUSHDXPUSHSIMOVAH,0CHMOVAL,COLORMOVBH,0MOVCX,START_XMOVDX,START_YROW_UP:;画上边INT10HINCCXCMPCX,END_XJNEROW_UPRANK_RIGHT:;画右边INT10HINCDXCMPDX,END_YJNERANK_RIGHTMOVCX,START_X;下边起始点MOVSI,END_XINCSIROW_DOWN:;画下边INT10HINCCXCMPCX,SIJNEROW_DOWNMOVDX,START_Y;右边起始点MOVCX,START_XRANK_LEFT:;画右边INT10HINCDXCMPDX,END_YJNERANK_LEFTPOPSIPOPDXPOPCXPOPBXPOPAXENDM;数据段DATASEGMENT;定义在屏幕绘制字START_COLDB?;存储起始行TEXTDB16;起始行DB2;起始列DB06H;字体颜色DB'PianoXP',0FFH,'Copyright(c)Auto-5-5th',0FFH,0FFH;显示字DB10DUP(2DUP(0DBH),2DUP(20H)),0FFH;颜色交叉矩形DB10DUP(2DUP(20H),2DUP(0DBH)),0FFHDB10DUP(2DUP(0DBH),2DUP(20H)),0FFHDB10DUP(2DUP(20H),2DUP(0DBH)),0FFHDB10DUP(2DUP(0DBH),2DUP(20H)),0FFHDB10DUP(2DUP(20H),2DUP(0DBH)),0FFHDB00;白色琴键坐标ST_LXDW50,61,72,83,94,105,116ST_MXDW127,138,149,160,171,182,193ST_HXDW204,215,226,237,248,259,270ST_YDW50ED_LXDW60,71,82,93,104,115,126ED_MXDW137,148,159,170,181,192,203ED_HXDW214,225,236,247,258,269,280ED_YDW90;黑色琴键坐标BT_XDW57,68,90,101,112DW134,145,167,178,189DW211,222,244,254,265BT_YDW50BD_XDW64,75,97,108,119DW141,152,174,185,196DW218,229,251,262,273BD_YDW70;音乐频率值LOWDDW131LOWDDDW147,165,175,196,220,247MIDDW262MIDDDW294,330,349,392,440,494HGHDW523HGHDDW587,659,797,783,879,987,1046KEYFLAGDB1;标记低(0)、中(1)、高(2)音键