《用汇编语言实现21点游戏基本功能.doc》由会员分享，可在线阅读，更多相关《用汇编语言实现21点游戏基本功能.doc（9页珍藏版）》请在金锄头文库上搜索。
1、【实验名称】用汇编语言实现21点游戏基本功能【实验目的】熟悉汇编语言的基本用法【实验内容】准确判断任意牌型的大小，辨认玩家与庄家的输赢情况；累计玩家各牌局的输赢比和详细记录。【实验步骤】提要：a）每次发牌时随机单张产生AK b）A记1点 c) 在给游戏者发牌前，游戏者可增加奖励或扣除的积分d) 用屏幕显示当前牌点情况和操作信息，然后用键盘输入游戏者的操作流程：1.给参加游戏的人基本积分为1002.首先电脑自身产生一张底牌（显示）3.给参加游戏的人发一张牌4.询问游戏者是否要牌，若不要牌，则跳转到第9步5.重复第3个步骤6.计算牌点的和（J、Q、K记为10点，210分别记210点）7.若牌点和最
2、小值大于21点，跳转第14步骤8.重复步骤479.判断电脑自身的牌点最大是否大于游戏者，若大于，则跳转第14步骤10.电脑自身再发一张牌（显示）11.重复第6步骤12.若牌点和最小大于21点，跳转第15步骤13.重复步骤91214.提示电脑赢的信息，扣除游戏者积分10分，跳转第16步骤15.提示游戏者赢的信息，奖励游戏者积分10分16.显示电脑底牌和当前游戏者剩余积分17.询问是否继续玩下一盘，若要重复21718.结束子程序调用：流程图：【实验程序】DATA SEGMENT BUFF1 DB * DB DB Welcome you to run this game! DB DB *,$ N D
3、B ? JIFEN DB ? DIPAI DB ? PAIDIAN DB ? QH1 DB ? QH2 DB ? SH DB 10,$ JK DB PEI LV(10 OR 5)?,$ MESSAGE0 DB DOU YOU WANT TO MORE?,$ MESSAGE1 DB *YOU WIN!*,$ MESSAGE2 DB *YOU LOST!*,$ MESSAGE3 DB Go on or not?,$ MESSAGE4 DB This is dipai:,$ MESSAGE5 DB This is JIFEN:,$ MESSAGE6 DB *THE GAME IS OVER !*,$
4、 MESSAGE7 DB 0AH, 0DH,This is your PAIDIAN:,$DATA ENDSSTACK SEGMENT STACK DW 256 DUP(?)STACK ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACKSTART: PUSH DS MOV AX,0 PUSH AX MOV AX,DATA MOV DS,AX MOV AX,STACK MOV SS,AXBEGIN: CALL XX0A1: MOV JIFEN,50 A2: CALL RAND MOV DIPAI,BL CALL CHULI MOV QH1,BL JB
5、1: CALL XX MOV AH,0 INT 16H CMP AL,59H JE JI CALL XX21 MOV N,5 JMP A3 JI: MOV N,10 CALL XX20A3: CALL RAND CALL XX19 MOV PAIDIAN,BL CALL DISP0 CALL CHULI MOV QH2,BL CALL XX4 A4: MOV AH,0 INT 16H CMP AL,4EH JE HC CMP AL,59H JNE A4 A5: CALL RAND CALL XX19 MOV PAIDIAN,BL CALL DISP0 CALL CHULI A6: ADC QH
6、2,BL A7: CMP QH2,21 JA A14 CALL XX4 A8: JMP A4 ZZ: CALL XX0 JMP A2 HC: CALL RETURN A9: MOV AL,QH2 CMP QH1,AL JA A14A10: CALL RAND MOV PAIDIAN,BL CALL DISP0 CALL CHULI A11: ADC QH1,BL A12: CMP QH1,21 JA A15A13: JMP A9 A14: CALL XX14 CALL JIAN CMP JIFEN,10 JB A18 JMP A16A15: CALL XX15 CALL JIA A16: CA
7、LL XX16 MOV AL,DIPAI MOV PAIDIAN,AL CALL DISP0 CALL DISP1 A17: CALL XX17 AG: MOV AH,0 INT 16H CMP AL,59h JE ZZ CMP AL,4EH JE A18 JNE AG A18: CALL XX18 MOV AH,4CH INT 21H RAND PROC PUSH CX PUSH DX PUSH AX STI MOV CX,0FFFFHYS: DEC CX JNE YS MOV AH,0 INT 1AH MOV AX,DX AND AH,3 MOV DL,13 DIV DL MOV BL,AH ADC BL,1 POP AX POP DX POP CX RETRAND ENDPDISP0 PROC CALL SPACE CALL SPACE CALL SPACE MOV AL,PAIDIAN CMP AL,9 JA OTHER CMP AL,1 JE A ADD AL,30HT: MOV DL,AL MOV AH,2 INT 21H RETOTHER: CMP AL,10 JE SHI CMP AL,11 JE J CMP AL,12 JE Q MOV AL,4BH JMP T J: MOV AL,4AH JMP TQ: MOV AL,51H JM
