Digital Workshop

// Automatically present initially hidden text with bullets as individual items
//
// Instructions for use:
//   1. Create your bulleted text and ensure it is initially hidden.
//   2. Add a pre show trigger and script action to your bulleted text object
//   with the following script: this.SetPosition(this.xstartpos,this.ystartpos)
//
//   3. Add a suitable trigger (eg. Left Click on the page)
//   4. Add a Show In Turn to that trigger and set it to show the text object.

function SplitUpTextObject(textobj)
{
   // Look for an Object List Object that contain this text object
   var object_list_object = null;
   var obj_list_pos = -1;
   var page = this;
   var objs = page.GetNumberChildren();
   var c;
   var p;

   for (c = 0; c < objs; c++)
   {
      var child = page.GetChild(c);
      if (child.GetType() == "ObjectList")
      {
         obj_list_pos = child.FindObjectPosition(textobj);
         if (obj_list_pos != -1)
         {
            object_list_object = child;
            break;
         }
      }
   }

   if (obj_list_pos != -1)
   {
      object_list_object.RemoveObject(textobj);
   }

   var paras = textobj.GetParagraphCount();
   
   for (p = paras - 1; p >= 0; p--)
   {
      var clone = textobj.CloneObject();

      // remove paragraphs before the one we want
      for (s = 0; s < p; s++)
      {
         clone.SelectParagraph(0);
         sel=clone.GetSelection()
         clone.SetSelection(sel.start, sel.end+1)
         clone.ReplaceSelection("");
      }

      // remove paragraphs after the one we want
      for (s = p + 1; s < paras; s++)
      {
         clone.SelectParagraph(1);
         sel=clone.GetSelection()
         clone.SetSelection(sel.start-1, sel.end)
         clone.ReplaceSelection("");
      }

      // Text editing messes up the bullets on deleting paragraphs,
      // but this sorts it out
      clone.SelectParagraph(0);
      textobj.SelectParagraph(p);
      clone.SetSelectionParagraphStyle(textobj.GetSelectionParagraphStyle());

      var parapos = textobj.GetParagraphPosition(p);
      clone.SetPositionX(textobj.GetXPosition());
      clone.SetPositionY(parapos.top + (clone.GetHeight()/2));
      
      clone.xstartpos = textobj.GetXPosition()
      clone.ystartpos = parapos.top + ((parapos.bottom-parapos.top+10)/2)
      
      clone.SetObjectSize(textobj.GetWidth(), parapos.bottom - parapos.top + 10);
      
      if (obj_list_pos != -1)
      {
         object_list_object.AddObject(clone, obj_list_pos);
      }
   }
}

function TextObjectHasBullets(textobj)
{
   var p;
   var paras = textobj.GetParagraphCount();

   for (p = 0; p < paras; p++)
   {
      textobj.SelectParagraph(p);
      if (textobj.GetSelectionParagraphStyle().bullet.type != "NoBullet")
      {
         textobj.SetSelection(0, -1);
         return true;
      }
   }
   textobj.SetSelection(0, -1);
   return false;
}


function Start()
{
   var page = this;
   var objs = page.GetNumberChildren();

   var textobjs = new Array;
   var textobjsindex = 1;
   var c;

   // Look for any initially hidden text objects with bullets
   for (c = 0; c < objs; c++)
   {
      var child = page.GetChild(c);
      if (child.GetType() == "Text")
      {
         if (!child.IsShowing())
         {
            if (TextObjectHasBullets(child))
            {
               // Add to array to avoid changing the list that we're iterating
               textobjs[textobjsindex++] = child
            }
         }
      }
   }
   var length = textobjs.length;
   for (c = 1; c < length; c++)
   {
      SplitUpTextObject(textobjs[c]);
   }
}


wait(0);
Start();