//    Instruction Example :     long text.char.number.get (string)


        screen.resolution.set (512,384)

        screen.set (BACK)
          pattern.display ("avo\bubble.gif")
        screen.end ()

        $str = "Hello world..."

        text.display ("in "+chr (34)+$str+chr (34)+" The number of characters is : "+str (text.char.number.get ($str)),CENTER,CENTER)

        text.display ("Press a key to exit.",CENTER,350)

        keyboard.wait ()

        script.stop ()