XYplorer Beta Club

Code: Select all

  $ms= 200;  
  $str=1;
  $text= "This is plain sample message";
  $len= strlen ($text);
  while ($len>0){
  $newtext = substr ($text, 0,$str);
  status $newtext;
  wait ($ms);
  $str++;
  $len--;
  }

Code: Select all

setting "AutoRefresh", 0; //don't disturb my status message during this script run

  $ms= 400; 
  $str=1;
  $text= "This is plain sample message";
  $len= strlen ($text);
  while ($len>0){
    $newtext = substr ($text, 0,$str) . '  ' . substr ($text, $str, 1);
    status $newtext;

    wait ($ms);
    $str++;
    $len--;
  }
 
  wait 2000; //show it a little bit longer

Code: Select all

  $ms= 400;     // config time delay
  $text= "This is plain sample message. Can it be longer? How much? Oh - quite a bit!";

  $str=1;
  $len= strlen ($text);
  while ($str < $len){
    $newtext = substr($text,0,$str).' '.substr($text,$str,1).'  '.substr($text,$str+1,1)
        .'   '.substr($text,$str+2,1).'    '.substr($text,$str+3,1).'     '.substr($text,$str+4,1);
    status $newtext;

    wait ($ms);
    $str++;
  }

  wait 2000; //show it a little bit longer

Code: Select all

frame 1:  "                                      T"
frame 15: "                  T                   "
frame 34: "T                                     "
frame 35: "T                                    h"
frame 49: "T                h                    "
frame 68: "Th                                    "
frame 69: "Th                                    i"

Code: Select all

setting "AutoRefresh", 0;
	$text="This is a test message";
	$delay=5; // milisecs
	$step=1; // >=1
	$fall=-1; // type of "fall"
	$spcmult=1; // >=1
	$icon="";
	$color="000000";
	$done=0;
	$len=strlen($text);
	if($fall>=0){
		$miss=$fall;}
	elseif($fall==-1){
		$miss=$len*$spcmult;}
	while($done<$len){
		$left=substr($text,0,$done);
		$mid=substr($text,$done,1);
		if("$mid"!=" "){
			if($fall==-2){
				$miss=round(($len-$done)*$spcmult);}
			$count=0;
			while($count<=$miss){
				$spc=strrepeat(" ",$miss-$count);
				$string=$left.$spc.$mid;
				status $string,$color,$icon;
				$count=$count+$step;
				wait $delay;}}
		$done++;}
		status $text,$color,$icon;