【BA4988】_7226函数

反汇编：

_7226()
{
	_PA |= 0xC0
	_PA |= 0xC0
	void // nop
	void // nop
	_PA &= 0xFF
	_71D3(0x11)
	_PA &= 0x7F
	void // nop
	void // nop
	_PA |= 0x80
	_7BB0()
	_7BB0()
	_7BB0()
	_PA |= 0xC0
	void // nop
	void // nop
	_PA &= 0x7F
	_71D3(0x50)
	_71D3(0x01)
	_71D3(0x26)
	_71D3(0x37)
	_71D3(0x84)
	_71D3(0x97)
	_71D3(0xE0)
	_71D3(0x57)
	_7BB0()
	_7BB0()
	_7BB0()
	_PA &= 0x7F
	void // nop
	void // nop
	_PA |= 0x80
}

汇编：

7226 [AD 18 02]: LDA $0218 = #$FF @ 送累加器
7229 [09 C0 8D]: ORA #$C0 @ 逻辑或
722B [8D 18 02]: STA $0218 = #$FF @ 存累加器
722E [AD 18 02]: LDA $0218 = #$FF @ 送累加器
7231 [09 C0 8D]: ORA #$C0 @ 逻辑或
7233 [8D 18 02]: STA $0218 = #$FF @ 存累加器
7236 [EA EA AD]: NOP @ 空操作
7237 [EA AD 18]: NOP @ 空操作
7238 [AD 18 02]: LDA $0218 = #$FF @ 送累加器
723B [29 7F 8D]: AND #$7F @ 逻辑与
723D [8D 18 02]: STA $0218 = #$7F @ 存累加器
7240 [A9 11 20]: LDA #$11 @ 送累加器
7242 [20 D3 71]: JSR $71D3 @ 转子
7245 [AD 18 02]: LDA $0218 = #$FF @ 送累加器
7248 [29 7F 8D]: AND #$7F @ 逻辑与
724A [8D 18 02]: STA $0218 = #$7F @ 存累加器
724D [EA EA AD]: NOP @ 空操作
724E [EA AD 18]: NOP @ 空操作
724F [AD 18 02]: LDA $0218 = #$7F @ 送累加器
7252 [09 80 8D]: ORA #$80 @ 逻辑或
7254 [8D 18 02]: STA $0218 = #$FF @ 存累加器
7257 [20 B0 7B]: JSR $7BB0 @ 转子
725A [20 B0 7B]: JSR $7BB0 @ 转子
725D [20 B0 7B]: JSR $7BB0 @ 转子
7260 [AD 18 02]: LDA $0218 = #$FF @ 送累加器
7263 [09 C0 8D]: ORA #$C0 @ 逻辑或
7265 [8D 18 02]: STA $0218 = #$FF @ 存累加器
7268 [EA EA AD]: NOP @ 空操作
7269 [EA AD 18]: NOP @ 空操作
726A [AD 18 02]: LDA $0218 = #$FF @ 送累加器
726D [29 7F 8D]: AND #$7F @ 逻辑与
726F [8D 18 02]: STA $0218 = #$7F @ 存累加器
7272 [A9 50 20]: LDA #$50 @ 送累加器
7274 [20 D3 71]: JSR $71D3 @ 转子
7277 [A9 01 20]: LDA #$01 @ 送累加器
7279 [20 D3 71]: JSR $71D3 @ 转子
727C [A9 26 20]: LDA #$26 @ 送累加器
727E [20 D3 71]: JSR $71D3 @ 转子
7281 [A9 37 20]: LDA #$37 @ 送累加器
7283 [20 D3 71]: JSR $71D3 @ 转子
7286 [A9 84 20]: LDA #$84 @ 送累加器
7288 [20 D3 71]: JSR $71D3 @ 转子
728B [A9 97 20]: LDA #$97 @ 送累加器
728D [20 D3 71]: JSR $71D3 @ 转子
7290 [A9 E0 20]: LDA #$E0 @ 送累加器
7292 [20 D3 71]: JSR $71D3 @ 转子
7295 [A9 57 20]: LDA #$57 @ 送累加器
7297 [20 D3 71]: JSR $71D3 @ 转子
729A [20 B0 7B]: JSR $7BB0 @ 转子
729D [20 B0 7B]: JSR $7BB0 @ 转子
72A0 [20 B0 7B]: JSR $7BB0 @ 转子
72A3 [AD 18 02]: LDA $0218 = #$FF @ 送累加器
72A6 [29 7F 8D]: AND #$7F @ 逻辑与
72A8 [8D 18 02]: STA $0218 = #$7F @ 存累加器
72AB [EA EA AD]: NOP @ 空操作
72AC [EA AD 18]: NOP @ 空操作
72AD [AD 18 02]: LDA $0218 = #$7F @ 送累加器
72B0 [09 80 8D]: ORA #$80 @ 逻辑或
72B2 [8D 18 02]: STA $0218 = #$FF @ 存累加器
72B5 [60 A9 00]: RTS @ 子程序返回