* filename:  Test1.sno
       JUNK                     = ANY("ghostGHOST")
       STUFF                    = "Halloween is coming soon"
AGAIN  STUFF JUNK   =                                                  :S(AGAIN)
     C                             =  0
COUNT  STUFF LEN(1) =                                                  :F(PRINT)
     C                             =  C + 1                                        :(COUNT)
PRINT  OUTPUT 	      =   C
END