//
           Title: Clear Line
            Name: ~CLR
         Version: v1.0
          Author: Bungeman (Ben Wagner)
           Email: bungeman@juno.com
         Webpage: http://members.tripod.com/~bungeman/casio
	   Model: 9850
     Description: Clears a 6 pxl block across graphical display.
      Parameters: I is the Y value
                  Z is 'bit' encoded
                    OGB
                    001 = 1 = Clear blue
                    010 = 2 = Clear green
                    011 = 3 = Clear blue and green
                    etc...
                    111 = 7 = Clear all
//

Frac(Z/2)=.5=>Text I,1,"                                " [32 spaces]
Frac(Int(Z/2)/2)=.5=>Green Text I,1,"                                " [32 spaces]
Z>3=>Orange Text I,1,"                                " [32 spaces]