	.code
	.bank 82
	.org $7798
l7798_03: STZ     <$fe
          STZ     $1000
          PHA     
          PLA     
          NOP     
          ORA     #$02
          STA     $1000
          PHA     
          PLA     
          NOP     
          LDA     $1000
          AND     #$01
          STA     <$fe
          STZ     $1000
          PHA     
          PLA     
          NOP     
          LDA     <$fe
          RTS     
