| 
 
注册时间2007-6-27最后登录1970-1-1 
 | 
 
 发表于 2007-6-28 19:19:18
|
显示全部楼层 
| .ORG $4000 .DB $AA,$A5,$5A
 .DW $2000,$2000
 JMP START
 .DW $03E8,$0310,$FFFF
 START
 INT $C006
 CMP #$63  ;'C'屏幕亮度+1
 BEQ screenbrightC
 CMP #$78  ;'X'屏幕亮度-1
 BEQ screenbrightX
 CMP #$1B
 BEQ quit
 JMP START
 quit
 INT $0312
 RTS
 screenbrightC
 LDA $03E8
 CMP #$0F
 BNE screenbrightCloop
 JMP START
 screenbrightCloop
 TAX
 INX
 TXA
 STA $03E8
 INT $C004
 JMP START
 screenbrightX
 LDA $03E8
 CMP #$00
 BNE screenbrightXloop
 JMP START
 screenbrightXloop
 TAX
 DEX
 TXA
 STA $03E8
 INT $C004
 JMP START
 调屏幕亮度,程序不一定对,只是提供思路.
 | 
 |