INCREASE Y
INCREASE Y
INCREASE Y
INCREASE Y
INCREASE Y
#INCREASE X
#INCREASE X
#INCREASE X
#INCREASE X
#INCREASE X
#INCREASE X
#INCREASE X
INCREASE B
INCREASE P
REPEAT Y TIMES ( REPEAT Y TIMES ( REPEAT Y TIMES ( INCREASE O ) ) )
PRINT X
REPEAT O TIMES (
  REPEAT P TIMES (
  CLEAR N CLEAR B CLEAR C CLEAR A 
  REPEAT X TIMES (
    INCREASE B
    REPEAT A TIMES ( 
      CLEAR A CLEAR B
      INCREASE N
    )
    REPEAT B TIMES (
      INCREASE A
    )
  )
  CLEAR P 
  REPEAT N TIMES (
    CLEAR P INCREASE P
  )
  )
  REPEAT P TIMES (
    CLEAR B INCREASE B
    REPEAT A TIMES (
      CLEAR B
      CLEAR Y
      INCREASE N
      REPEAT N TIMES ( INCREASE X )
      REPEAT X TIMES ( INCREASE Y )
      REPEAT X TIMES ( INCREASE Y )
      PRINT Y
      PRINT X
      CLEAR N CLEAR D CLEAR F CLEAR E 
      REPEAT X TIMES (
        INCREASE D
        REPEAT E TIMES ( 
          CLEAR E CLEAR D
          INCREASE N
        )
        REPEAT D TIMES (
          INCREASE E
        )
      )
      CLEAR D INCREASE D
      REPEAT E TIMES (
        CLEAR D
        CLEAR Y
        INCREASE N
        REPEAT N TIMES ( INCREASE X )
        REPEAT X TIMES ( INCREASE Y )
        REPEAT X TIMES ( INCREASE Y )
        PRINT Y
	PRINT X
      )
      REPEAT D TIMES ( CLEAR X 
        PRINT E
        REPEAT N TIMES ( INCREASE X )
	PRINT X
      )
    )
    REPEAT B TIMES ( CLEAR X 
      REPEAT N TIMES ( INCREASE X )
      PRINT X
    )
    #3x+1
  )
)