MovePlayersUp:
  LDA UpHeld
  CMP #$01
  BNE .End
    LDA SpriteDirection
	CMP #$01
	BEQ .End
      LDA #$01
	  STA SpriteDirection
	  LDA $0300
	  STA TempLocationY
	JSR MoveCharacter
  .End:
  RTS

MoveCharacter:
  LDA SpriteDirection
  CMP #$01
  BEQ .MoveUp
  RTS
  .MoveUp:                        ;;SpriteDirection is #$01
    LDA TempLocationY
    SEC
    SBC #$10                      ;;If TempLocationY-16=$0300, you've made it 16 pixels!
    CMP $0300                     ;;if so, reset.  movement is done.
    BEQ .Reset
    LDA $0300                     ;;if not, move up one pixel per frame
    SEC
    SBC #$01
    STA $0300
    RTS
  .Reset:
  LDA #$00
  STA TempLocationY
  STA TempLocationX
  RTS