汇编俄罗斯方块点阵-豆柴文库

您所在位置：网站首页 / 汇编俄罗斯方块点阵.docx / 文档详情

免费试读已结束，剩余 20 页请下载文档后查看

20 金币

下载文档

/ 25

下载提示

如果您无法下载资料，请参考说明：

1、部分资料下载需要金币，请确保您的账户上有足够的金币

2、已购买过的文档，再次下载不重复扣费

3、资料包下载后请先用软件解压，在使用对应软件打开

文本预览

纯为个人思路,无特殊,惊人语句….初学完的;
程序功能：最原始简单版俄罗斯方块
;硬件连接：接双色点阵
;晶振型号：12M
;单片机：STC89C52
;编写时间：
;编程人：
HANG	BIT		P2.0	;点阵行输入
HW		BIT		P2.1	
HZ		BIT		P2.2	
LIE		BIT		P2.3	;点阵列输入
LW		BIT		P2.4
LZ		BIT		P2.5
WEI		BIT		P2.6
DUAN	BIT		P2.7
XIAN	EQU		P1
BiaoX	BIT		20H.0	
Biao_z	BIT		20H.1		;按键是否按下标志
Biao_y	BIT		20H.2
Biao_x	BIT		20H.3	
Dou_z	BIT		20H.4	;按键相应标志位
Ying_z	BIT		20H.5
Dou_y	BIT		20H.6
Ying_y	BIT		20H.7
Dou_x	BIT		21H.0
Ying_x	BIT		21H.1
Biao_ZY	BIT		21H.2
Biao_zt	BIT		21H.3		;开始、暂停标志
KEY_z	BIT		P0.0		;左、右、旋转按键
KEY_y	BIT		P0.1
KEY_x	BIT		P0.2
	ORG		0000H
	AJMP	Start
	ORG		0003H
	AJMP	Int0_ser
	ORG		000BH														
	AJMP	T0_ser
	ORG		0030H
;*************************
Start:
	MOV		R0,#08H
	MOV		R1,#51H
	MOV		R3,#03H
	MOV		R4,#08H
//	MOV		46H,#99
	MOV		40H,#03H
	MOV		30H,#0FEH
	MOV		33H,#0FEH
	MOV		37H,#80H
	MOV		TMOD,#01H
	MOV		TH0,#(65536-10000)/256
	MOV		TL0,#(65536-10000)MOD256
	SETB	EA
	SETB	EX0
	SETB	ET0
	SETB	IT0
	SETB	TR0
;*****************************
Main:
	CALL	Zhanting		;暂停响应
	CALL	Xianshi			;点阵显示
	CALL	CMkey_z			;左移按键
	CALL	CMkey_y			;右移按键
	CALL	CMkey_x			;旋转按键
	CALL	Panduan_z		;判断是否可以左移
	CALL	Panduan_y		;判断是否可以右移
	CALL	Panduan_x		;判断是否可以旋转
	CALL	Panduan_xia		;判断是否可以下移
	CALL	Panduan_xh		;判断消行
	CALL	Saomiao_xh		;扫描消行
	CALL	Jifen			;计算分值
	CALL	JifenXianshi	;分值显示
	ORL		PCON,#01H
	AJMP	Main
;*****************************
Zhanting:
	JB		Biao_zt,Out_zt	;判断是否暂停
Zhanti:
	MOV		A,37H			;显示START
	RLC		A					
	MOV		37H,A
	MOV		LIE,C
	CLR		LW
	SETB	LW
	DJNZ	R0,Zhanti
	MOV		R0,#08H
	CLR		LZ
	SETB	LZ
	MOV		A,37H
	RLC		A
	RR		A
	MOV		37H,A

Zhan:
	SETB	HANG
	CLR		HW
	SETB	HW
	DJNZ	R0,Zhan
	MOV		R0,#08H

	MOV		A,38H
	INC		38H
	MOV		DPTR,#TABZ
	MOVC	A,@A+DPTR
	MOV		39H,A
Zhant:
	MOV		A,39H
	RLC		A
	MOV		39H,A
	MOV		HANG,C
	CLR		HW
	SETB	HW
	DJNZ	R0,Zhant
	MOV		R0,#08H
	CLR		HZ
	SETB	HZ
	CALL	Delay
	CALL	Delay
Qing:
	SETB	HANG
	CLR		HW
	SETB	HW
	DJNZ	R0,Qing
	MOV		R0,#08H
Qing1:
	SETB	HANG
	CLR		HW
	SETB	HW
	DJNZ	R0,Qing1
	MOV		R0,#08H
	CLR		HZ
	SETB	HZ
		
	DJNZ	R4,Zhanti
	MOV		R4,