double lang, index, done, offset_value, marker_count;
  double Flow[3];
  double x[219],y[219];
  double metric;
  object Obj[38];
  double HideObj[38];
  selection current_selection;
  point current_point;
  object current_object;
  object Mrk[38];
  double temp;
  double do_counter, do_max, do_logic;
  double Var[63];
  double Table[22];


initDefs()
  {
  ;
  }

initCode()
  {
  ;
  }

main()
  {
  double read;
  initDefs();
  initCode();
  init_xarc_array();
  lang = get_language();
  metric  = unit_mode();
  if ( (lang != 0) && ( (lang != 1) && ( (lang != 2) && ( (lang != 3) && ( (lang != 4) && ( (lang != 5) && ( (lang != 6))))))))
    {
    lang=0;
    }
  check_reg(0,"Ginani Patterns","Ladies Bodice","This macro needs to be properly installed before running.");
  metric = unit_mode();
  Flow[0] = 0;
  while (!done)
    {
    if (index == 0)
      {
      Popup0();
      }
    if (index == 1)
      {
      Popup1();
      }
    if (index == 2)
      {
      Popup2();
      }
    }

  if (measure_table("GINANI FEMALE")==1)
    {
    read = 1;
    }
  else
    {
    read = 0;
    }

  if (read==0)
    {
    ;
    Var[0] = CheckToMetric(36);
    Var[1] = CheckToMetric(7.5);
    Var[2] = CheckToMetric(3.125);
    Var[3] = CheckToMetric(10.625);
    Var[4] = CheckToMetric(17);
    Var[5] = CheckToMetric(14);
    Var[6] = CheckToMetric(14.5);
    Var[7] = CheckToMetric(15.5);
    Var[8] = CheckToMetric(14.875);
    Var[9] = CheckToMetric(15.875);
    Var[12] = CheckToMetric(23.5);
    Var[13] = CheckToMetric(24);
    Var[18] = CheckToMetric(28);
    Var[19] = CheckToMetric(40);
  if (lang == 0)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust", Var[0], "chest");
      add_picture_input("Bust Span", Var[1], "xchest");
      add_picture_input("Bust Radius", Var[2], "Bust radius");
      add_picture_input("Bust Point", Var[3], "Bustpoint");
      add_picture_input("Full Front Length", Var[4], "fullfrontlength");
      add_picture_input("Across Chest", Var[5], "acrosschest");
      add_picture_input("Across Back", Var[6], "xback");
      add_picture_input("Nape to Waist", Var[7], "Back length");
      add_picture_input("Front Shoulder", Var[8], "FrontShoulder");
      add_picture_input("Back Shoulder", Var[9], "Backshoulder");
      add_picture_input("Full Sleeve length", Var[12], "Sleeve");
      add_picture_input("Side waist to knee", Var[13], "sidewaisttoknee");
      add_picture_input("Waist", Var[18], "WAIST");
      add_picture_input("Hip", Var[19], "Hip");
      run_picture_input();
    }
  if (lang == 1)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust", Var[0], "chest");
      add_picture_input("Bust Span", Var[1], "xchest");
      add_picture_input("Bust Radius", Var[2], "Bust radius");
      add_picture_input("Bust Point", Var[3], "Bustpoint");
      add_picture_input("Full Front Length", Var[4], "fullfrontlength");
      add_picture_input("Across Chest", Var[5], "acrosschest");
      add_picture_input("Across Back", Var[6], "xback");
      add_picture_input("Nape to Waist", Var[7], "Back length");
      add_picture_input("Front Shoulder", Var[8], "FrontShoulder");
      add_picture_input("Back Shoulder", Var[9], "Backshoulder");
      add_picture_input("Full Sleeve length", Var[12], "Sleeve");
      add_picture_input("Side waist to knee", Var[13], "sidewaisttoknee");
      add_picture_input("Waist", Var[18], "WAIST");
      add_picture_input("Hip", Var[19], "Hip");
      run_picture_input();
    }
  if (lang == 2)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust", Var[0], "chest");
      add_picture_input("Bust Span", Var[1], "xchest");
      add_picture_input("Bust Radius", Var[2], "Bust radius");
      add_picture_input("Bust Point", Var[3], "Bustpoint");
      add_picture_input("Full Front Length", Var[4], "fullfrontlength");
      add_picture_input("Across Chest", Var[5], "acrosschest");
      add_picture_input("Across Back", Var[6], "xback");
      add_picture_input("Nape to Waist", Var[7], "Back length");
      add_picture_input("Front Shoulder", Var[8], "FrontShoulder");
      add_picture_input("Back Shoulder", Var[9], "Backshoulder");
      add_picture_input("Full Sleeve length", Var[12], "Sleeve");
      add_picture_input("Side waist to knee", Var[13], "sidewaisttoknee");
      add_picture_input("Waist", Var[18], "WAIST");
      add_picture_input("Hip", Var[19], "Hip");
      run_picture_input();
    }
  if (lang == 3)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust", Var[0], "chest");
      add_picture_input("Bust Span", Var[1], "xchest");
      add_picture_input("Bust Radius", Var[2], "Bust radius");
      add_picture_input("Bust Point", Var[3], "Bustpoint");
      add_picture_input("Full Front Length", Var[4], "fullfrontlength");
      add_picture_input("Across Chest", Var[5], "acrosschest");
      add_picture_input("Across Back", Var[6], "xback");
      add_picture_input("Nape to Waist", Var[7], "Back length");
      add_picture_input("Front Shoulder", Var[8], "FrontShoulder");
      add_picture_input("Back Shoulder", Var[9], "Backshoulder");
      add_picture_input("Full Sleeve length", Var[12], "Sleeve");
      add_picture_input("Side waist to knee", Var[13], "sidewaisttoknee");
      add_picture_input("Waist", Var[18], "WAIST");
      add_picture_input("Hip", Var[19], "Hip");
      run_picture_input();
    }
  if (lang == 4)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust", Var[0], "chest");
      add_picture_input("Bust Span", Var[1], "xchest");
      add_picture_input("Bust Radius", Var[2], "Bust radius");
      add_picture_input("Bust Point", Var[3], "Bustpoint");
      add_picture_input("Full Front Length", Var[4], "fullfrontlength");
      add_picture_input("Across Chest", Var[5], "acrosschest");
      add_picture_input("Across Back", Var[6], "xback");
      add_picture_input("Nape to Waist", Var[7], "Back length");
      add_picture_input("Front Shoulder", Var[8], "FrontShoulder");
      add_picture_input("Back Shoulder", Var[9], "Backshoulder");
      add_picture_input("Full Sleeve length", Var[12], "Sleeve");
      add_picture_input("Side waist to knee", Var[13], "sidewaisttoknee");
      add_picture_input("Waist", Var[18], "WAIST");
      add_picture_input("Hip", Var[19], "Hip");
      run_picture_input();
    }
  if (lang == 5)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust", Var[0], "chest");
      add_picture_input("Bust Span", Var[1], "xchest");
      add_picture_input("Bust Radius", Var[2], "Bust radius");
      add_picture_input("Bust Point", Var[3], "Bustpoint");
      add_picture_input("Full Front Length", Var[4], "fullfrontlength");
      add_picture_input("Across Chest", Var[5], "acrosschest");
      add_picture_input("Across Back", Var[6], "xback");
      add_picture_input("Nape to Waist", Var[7], "Back length");
      add_picture_input("Front Shoulder", Var[8], "FrontShoulder");
      add_picture_input("Back Shoulder", Var[9], "Backshoulder");
      add_picture_input("Full Sleeve length", Var[12], "Sleeve");
      add_picture_input("Side waist to knee", Var[13], "sidewaisttoknee");
      add_picture_input("Waist", Var[18], "WAIST");
      add_picture_input("Hip", Var[19], "Hip");
      run_picture_input();
    }
  if (lang == 6)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust", Var[0], "chest");
      add_picture_input("Bust Span", Var[1], "xchest");
      add_picture_input("Bust Radius", Var[2], "Bust radius");
      add_picture_input("Bust Point", Var[3], "Bustpoint");
      add_picture_input("Full Front Length", Var[4], "fullfrontlength");
      add_picture_input("Across Chest", Var[5], "acrosschest");
      add_picture_input("Across Back", Var[6], "xback");
      add_picture_input("Nape to Waist", Var[7], "Back length");
      add_picture_input("Front Shoulder", Var[8], "FrontShoulder");
      add_picture_input("Back Shoulder", Var[9], "Backshoulder");
      add_picture_input("Full Sleeve length", Var[12], "Sleeve");
      add_picture_input("Side waist to knee", Var[13], "sidewaisttoknee");
      add_picture_input("Waist", Var[18], "WAIST");
      add_picture_input("Hip", Var[19], "Hip");
      run_picture_input();
    }
    Var[0]= CheckFromMetric(Var[0]);
    Var[1]= CheckFromMetric(Var[1]);
    Var[2]= CheckFromMetric(Var[2]);
    Var[3]= CheckFromMetric(Var[3]);
    Var[4]= CheckFromMetric(Var[4]);
    Var[5]= CheckFromMetric(Var[5]);
    Var[6]= CheckFromMetric(Var[6]);
    Var[7]= CheckFromMetric(Var[7]);
    Var[8]= CheckFromMetric(Var[8]);
    Var[9]= CheckFromMetric(Var[9]);
    Var[12]= CheckFromMetric(Var[12]);
    Var[13]= CheckFromMetric(Var[13]);
    Var[18]= CheckFromMetric(Var[18]);
    Var[19]= CheckFromMetric(Var[19]);
    }
  else
    {
    ;
    if (metric==1)
      {
       Var[0] = Table[0]/2.54;
       Var[1] = Table[1]/2.54;
       Var[2] = Table[2]/2.54;
       Var[3] = Table[3]/2.54;
       Var[4] = Table[4]/2.54;
       Var[5] = Table[5]/2.54;
       Var[6] = Table[6]/2.54;
       Var[7] = Table[7]/2.54;
       Var[8] = Table[8]/2.54;
       Var[9] = Table[9]/2.54;
       Var[10] = Table[10]/2.54;
       Var[11] = Table[11]/2.54;
       Var[12] = Table[12]/2.54;
       Var[13] = Table[13]/2.54;
       Var[14] = Table[14]/2.54;
       Var[15] = Table[15]/2.54;
       Var[16] = Table[16]/2.54;
       Var[17] = Table[17]/2.54;
       Var[18] = Table[18]/2.54;
       Var[19] = Table[19]/2.54;
       Var[53] = Table[20]/2.54;
       Var[54] = Table[21]/2.54;
      }
     else
      {
      Var[0] = Table[0];
      Var[1] = Table[1];
      Var[2] = Table[2];
      Var[3] = Table[3];
      Var[4] = Table[4];
      Var[5] = Table[5];
      Var[6] = Table[6];
      Var[7] = Table[7];
      Var[8] = Table[8];
      Var[9] = Table[9];
      Var[10] = Table[10];
      Var[11] = Table[11];
      Var[12] = Table[12];
      Var[13] = Table[13];
      Var[14] = Table[14];
      Var[15] = Table[15];
      Var[16] = Table[16];
      Var[17] = Table[17];
      Var[18] = Table[18];
      Var[19] = Table[19];
      Var[53] = Table[20];
      Var[54] = Table[21];
      }
    }

    Var[20] = CheckToMetric(3);
    Var[21] = CheckToMetric(2);
    Var[22] = CheckToMetric(2);
    Var[50] = CheckToMetric(0.5);
  if (lang == 0)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust ease", Var[20], "");
      add_picture_input("Waist ease", Var[21], "");
      add_picture_input("Hip ease", Var[22], "");
      add_picture_input("Seam Allowance", Var[50], "");
      run_picture_input();
    }
  if (lang == 1)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust ease", Var[20], "");
      add_picture_input("Waist ease", Var[21], "");
      add_picture_input("Hip ease", Var[22], "");
      add_picture_input("Seam Allowance", Var[50], "");
      run_picture_input();
    }
  if (lang == 2)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust ease", Var[20], "");
      add_picture_input("Waist ease", Var[21], "");
      add_picture_input("Hip ease", Var[22], "");
      add_picture_input("Seam Allowance", Var[50], "");
      run_picture_input();
    }
  if (lang == 3)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust ease", Var[20], "");
      add_picture_input("Waist ease", Var[21], "");
      add_picture_input("Hip ease", Var[22], "");
      add_picture_input("Seam Allowance", Var[50], "");
      run_picture_input();
    }
  if (lang == 4)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust ease", Var[20], "");
      add_picture_input("Waist ease", Var[21], "");
      add_picture_input("Hip ease", Var[22], "");
      add_picture_input("Seam Allowance", Var[50], "");
      run_picture_input();
    }
  if (lang == 5)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust ease", Var[20], "");
      add_picture_input("Waist ease", Var[21], "");
      add_picture_input("Hip ease", Var[22], "");
      add_picture_input("Seam Allowance", Var[50], "");
      run_picture_input();
    }
  if (lang == 6)
    {
      start_picture_input("Ladies Bodice");
      add_picture_input("Bust ease", Var[20], "");
      add_picture_input("Waist ease", Var[21], "");
      add_picture_input("Hip ease", Var[22], "");
      add_picture_input("Seam Allowance", Var[50], "");
      run_picture_input();
    }
    Var[20]= CheckFromMetric(Var[20]);
    Var[21]= CheckFromMetric(Var[21]);
    Var[22]= CheckFromMetric(Var[22]);
    Var[50]= CheckFromMetric(Var[50]);
  if (Flow[0] == 0)
    {
    Flow0View0();
    }
    if (Flow[1] == 0)
    {
    Flow1View0();
    }
    if (Flow[1] == 1)
    {
    Flow1View1();
    }
    if (Flow[1] == 2)
    {
    Flow1View2();
    }
    if (Flow[1] == 3)
    {
    Flow1View3();
    }
    if (Flow[1] == 4)
    {
    Flow1View4();
    }
    if (Flow[1] == 5)
    {
    Flow1View5();
    }
    if (Flow[1] == 6)
    {
    Flow1View6();
    }
    if (Flow[2] == 0)
    {
    Flow2View0();
    }
    if (Flow[2] == 1)
    {
    Flow2View1();
    }
    if (Flow[2] == 2)
    {
    Flow2View2();
    }
    if (Flow[2] == 3)
    {
    Flow2View3();
    }
    if (Flow[2] == 4)
    {
    Flow2View4();
    }
    if (Flow[2] == 5)
    {
    Flow2View5();
    }
    if (Flow[0] == 0)
    {
    Flow0View0Objects();
    }
    if (Flow[1] == 0)
    {
    Flow1View0Objects();
    }
    if (Flow[1] == 1)
    {
    Flow1View1Objects();
    }
    if (Flow[1] == 2)
    {
    Flow1View2Objects();
    }
    if (Flow[1] == 3)
    {
    Flow1View3Objects();
    }
    if (Flow[1] == 4)
    {
    Flow1View4Objects();
    }
    if (Flow[1] == 5)
    {
    Flow1View5Objects();
    }
    if (Flow[1] == 6)
    {
    Flow1View6Objects();
    }
    if (Flow[2] == 0)
    {
    Flow2View0Objects();
    }
    if (Flow[2] == 1)
    {
    Flow2View1Objects();
    }
    if (Flow[2] == 2)
    {
    Flow2View2Objects();
    }
    if (Flow[2] == 3)
    {
    Flow2View3Objects();
    }
    if (Flow[2] == 4)
    {
    Flow2View4Objects();
    }
    if (Flow[2] == 5)
    {
    Flow2View5Objects();
    }
  
  current_object=0;

  current_selection=newselection("OBJECT");
  if (Obj[32] != 0)  { current_object = Obj[32]; select(current_selection, current_object); } 
  if (Obj[27] != 0)  { current_object = Obj[27]; select(current_selection, current_object); } 
  if (Obj[21] != 0)  { current_object = Obj[21]; select(current_selection, current_object); } 
  if (Obj[11] != 0)  { current_object = Obj[11]; select(current_selection, current_object); } 
  if (Obj[9] != 0)  { current_object = Obj[9]; select(current_selection, current_object); } 
  if (Obj[8] != 0)  { current_object = Obj[8]; select(current_selection, current_object); } 
  if (Obj[7] != 0)  { current_object = Obj[7]; select(current_selection, current_object); } 
  if (Obj[3] != 0)  { current_object = Obj[3]; select(current_selection, current_object); } 
  if (Obj[2] != 0)  { current_object = Obj[2]; select(current_selection, current_object); } 
  group(current_selection);
  deselect(current_selection);
  if (current_object != 0)
    {
    if (lang == 0) { name_group(current_object,"Grback"); }
    if (lang == 1) { name_group(current_object,"Grback"); }
    if (lang == 2) { name_group(current_object,"Grback"); }
    if (lang == 3) { name_group(current_object,"Grback"); }
    if (lang == 4) { name_group(current_object,"Grback"); }
    if (lang == 5) { name_group(current_object,"Grback"); }
    if (lang == 6) { name_group(current_object,"Grback"); }
    }

  current_object=0;

  current_selection=newselection("OBJECT");
  if (Obj[29] != 0)  { current_object = Obj[29]; select(current_selection, current_object); } 
  if (Obj[26] != 0)  { current_object = Obj[26]; select(current_selection, current_object); } 
  if (Obj[18] != 0)  { current_object = Obj[18]; select(current_selection, current_object); } 
  if (Obj[10] != 0)  { current_object = Obj[10]; select(current_selection, current_object); } 
  if (Obj[6] != 0)  { current_object = Obj[6]; select(current_selection, current_object); } 
  if (Obj[5] != 0)  { current_object = Obj[5]; select(current_selection, current_object); } 
  if (Obj[4] != 0)  { current_object = Obj[4]; select(current_selection, current_object); } 
  if (Obj[1] != 0)  { current_object = Obj[1]; select(current_selection, current_object); } 
  if (Obj[0] != 0)  { current_object = Obj[0]; select(current_selection, current_object); } 
  group(current_selection);
  deselect(current_selection);
  if (current_object != 0)
    {
    if (lang == 0) { name_group(current_object,"GrFront"); }
    if (lang == 1) { name_group(current_object,"GrFront"); }
    if (lang == 2) { name_group(current_object,"GrFront"); }
    if (lang == 3) { name_group(current_object,"GrFront"); }
    if (lang == 4) { name_group(current_object,"GrFront"); }
    if (lang == 5) { name_group(current_object,"GrFront"); }
    if (lang == 6) { name_group(current_object,"GrFront"); }
    }

  current_object=0;

  current_selection=newselection("OBJECT");
  if (Obj[31] != 0)  { current_object = Obj[31]; select(current_selection, current_object); } 
  if (Obj[24] != 0)  { current_object = Obj[24]; select(current_selection, current_object); } 
  if (Obj[23] != 0)  { current_object = Obj[23]; select(current_selection, current_object); } 
  if (Obj[22] != 0)  { current_object = Obj[22]; select(current_selection, current_object); } 
  if (Obj[17] != 0)  { current_object = Obj[17]; select(current_selection, current_object); } 
  if (Obj[14] != 0)  { current_object = Obj[14]; select(current_selection, current_object); } 
  if (Obj[13] != 0)  { current_object = Obj[13]; select(current_selection, current_object); } 
  group(current_selection);
  deselect(current_selection);
  if (current_object != 0)
    {
    if (lang == 0) { name_group(current_object,"grsideback"); }
    if (lang == 1) { name_group(current_object,"grsideback"); }
    if (lang == 2) { name_group(current_object,"grsideback"); }
    if (lang == 3) { name_group(current_object,"grsideback"); }
    if (lang == 4) { name_group(current_object,"grsideback"); }
    if (lang == 5) { name_group(current_object,"grsideback"); }
    if (lang == 6) { name_group(current_object,"grsideback"); }
    }

  current_object=0;

  current_selection=newselection("OBJECT");
  if (Obj[30] != 0)  { current_object = Obj[30]; select(current_selection, current_object); } 
  if (Obj[25] != 0)  { current_object = Obj[25]; select(current_selection, current_object); } 
  if (Obj[20] != 0)  { current_object = Obj[20]; select(current_selection, current_object); } 
  if (Obj[19] != 0)  { current_object = Obj[19]; select(current_selection, current_object); } 
  if (Obj[16] != 0)  { current_object = Obj[16]; select(current_selection, current_object); } 
  if (Obj[15] != 0)  { current_object = Obj[15]; select(current_selection, current_object); } 
  if (Obj[12] != 0)  { current_object = Obj[12]; select(current_selection, current_object); } 
  group(current_selection);
  deselect(current_selection);
  if (current_object != 0)
    {
    if (lang == 0) { name_group(current_object,"grsidefront"); }
    if (lang == 1) { name_group(current_object,"grsidefront"); }
    if (lang == 2) { name_group(current_object,"grsidefront"); }
    if (lang == 3) { name_group(current_object,"grsidefront"); }
    if (lang == 4) { name_group(current_object,"grsidefront"); }
    if (lang == 5) { name_group(current_object,"grsidefront"); }
    if (lang == 6) { name_group(current_object,"grsidefront"); }
    }

  current_object=0;

  current_selection=newselection("OBJECT");
  if (Obj[37] != 0)  { current_object = Obj[37]; select(current_selection, current_object); } 
  if (Obj[36] != 0)  { current_object = Obj[36]; select(current_selection, current_object); } 
  if (Obj[35] != 0)  { current_object = Obj[35]; select(current_selection, current_object); } 
  if (Obj[34] != 0)  { current_object = Obj[34]; select(current_selection, current_object); } 
  if (Obj[33] != 0)  { current_object = Obj[33]; select(current_selection, current_object); } 
  group(current_selection);
  deselect(current_selection);
  if (current_object != 0)
    {
    if (lang == 0) { name_group(current_object,"GrSleeve"); }
    if (lang == 1) { name_group(current_object,"GrSleeve"); }
    if (lang == 2) { name_group(current_object,"GrSleeve"); }
    if (lang == 3) { name_group(current_object,"GrSleeve"); }
    if (lang == 4) { name_group(current_object,"GrSleeve"); }
    if (lang == 5) { name_group(current_object,"GrSleeve"); }
    if (lang == 6) { name_group(current_object,"GrSleeve"); }
    }

  current_selection=newselection("OBJECT");
  for (temp=0; temp < 38; temp=temp+1)
    {
    if (Mrk[temp] != 0)
      {
       select(current_selection, Mrk[temp]);
      }
    }
  check_overlap(current_selection);
  deselect(current_selection);

  run_command("ZOOMALL");
  }

Popup0()
{
  if (lang == 0)
    {
    start_pict_dialog("Front and Back");
    add_pict_item("Underarm Bust Dart","underarm-dart.jpg");
    add_pict_item("Shoulder Dart","shoulder-dart.jpg");
    add_pict_item("French Dart","frence-dart.jpg");
    add_pict_item("Princess Lines","princesslines.jpg");
    run_pict("Next");
    Flow[1] = get_pict_result();
    Forward();
    }
  if (lang == 1)
    {
    start_pict_dialog("Front and Back");
    add_pict_item("Underarm Bust Dart","underarm-dart.jpg");
    add_pict_item("Shoulder Dart","shoulder-dart.jpg");
    add_pict_item("French Dart","frence-dart.jpg");
    add_pict_item("Princess Lines","princesslines.jpg");
    run_pict("Next");
    Flow[1] = get_pict_result();
    Forward();
    }
  if (lang == 2)
    {
    start_pict_dialog("Front and Back");
    add_pict_item("Underarm Bust Dart","underarm-dart.jpg");
    add_pict_item("Shoulder Dart","shoulder-dart.jpg");
    add_pict_item("French Dart","frence-dart.jpg");
    add_pict_item("Princess Lines","princesslines.jpg");
    run_pict("Next");
    Flow[1] = get_pict_result();
    Forward();
    }
  if (lang == 3)
    {
    start_pict_dialog("Front and Back");
    add_pict_item("Underarm Bust Dart","underarm-dart.jpg");
    add_pict_item("Shoulder Dart","shoulder-dart.jpg");
    add_pict_item("French Dart","frence-dart.jpg");
    add_pict_item("Princess Lines","princesslines.jpg");
    run_pict("Next");
    Flow[1] = get_pict_result();
    Forward();
    }
  if (lang == 4)
    {
    start_pict_dialog("Front and Back");
    add_pict_item("Underarm Bust Dart","underarm-dart.jpg");
    add_pict_item("Shoulder Dart","shoulder-dart.jpg");
    add_pict_item("French Dart","frence-dart.jpg");
    add_pict_item("Princess Lines","princesslines.jpg");
    run_pict("Next");
    Flow[1] = get_pict_result();
    Forward();
    }
  if (lang == 5)
    {
    start_pict_dialog("Front and Back");
    add_pict_item("Underarm Bust Dart","underarm-dart.jpg");
    add_pict_item("Shoulder Dart","shoulder-dart.jpg");
    add_pict_item("French Dart","frence-dart.jpg");
    add_pict_item("Princess Lines","princesslines.jpg");
    run_pict("Next");
    Flow[1] = get_pict_result();
    Forward();
    }
  if (lang == 6)
    {
    start_pict_dialog("Front and Back");
    add_pict_item("Underarm Bust Dart","underarm-dart.jpg");
    add_pict_item("Shoulder Dart","shoulder-dart.jpg");
    add_pict_item("French Dart","frence-dart.jpg");
    add_pict_item("Princess Lines","princesslines.jpg");
    run_pict("Next");
    Flow[1] = get_pict_result();
    Forward();
    }
}

Popup1()
{
  if (lang == 0)
    {
    start_pict_dialog("Princess Lines");
    add_pict_item("Shoulder Princess Line","shoulder-princess-line.jpg");
    add_pict_item("Armhole Princess Line","armhole-princess-line.jpg");
	  if (run_pict("Back", "Next"))
	    {
      Flow[1] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 1)
    {
    start_pict_dialog("Princess Lines");
    add_pict_item("Shoulder Princess Line","shoulder-princess-line.jpg");
    add_pict_item("Armhole Princess Line","armhole-princess-line.jpg");
	  if (run_pict("Back", "Next"))
	    {
      Flow[1] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 2)
    {
    start_pict_dialog("Princess Lines");
    add_pict_item("Shoulder Princess Line","shoulder-princess-line.jpg");
    add_pict_item("Armhole Princess Line","armhole-princess-line.jpg");
	  if (run_pict("Back", "Next"))
	    {
      Flow[1] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 3)
    {
    start_pict_dialog("Princess Lines");
    add_pict_item("Shoulder Princess Line","shoulder-princess-line.jpg");
    add_pict_item("Armhole Princess Line","armhole-princess-line.jpg");
	  if (run_pict("Back", "Next"))
	    {
      Flow[1] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 4)
    {
    start_pict_dialog("Princess Lines");
    add_pict_item("Shoulder Princess Line","shoulder-princess-line.jpg");
    add_pict_item("Armhole Princess Line","armhole-princess-line.jpg");
	  if (run_pict("Back", "Next"))
	    {
      Flow[1] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 5)
    {
    start_pict_dialog("Princess Lines");
    add_pict_item("Shoulder Princess Line","shoulder-princess-line.jpg");
    add_pict_item("Armhole Princess Line","armhole-princess-line.jpg");
	  if (run_pict("Back", "Next"))
	    {
      Flow[1] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 6)
    {
    start_pict_dialog("Princess Lines");
    add_pict_item("Shoulder Princess Line","shoulder-princess-line.jpg");
    add_pict_item("Armhole Princess Line","armhole-princess-line.jpg");
	  if (run_pict("Back", "Next"))
	    {
      Flow[1] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
}

Popup2()
{
  if (lang == 0)
    {
    start_pict_dialog("Sleeve");
    add_pict_item("Short","short.jpg");
    add_pict_item("Elbow","elbow.jpg");
    add_pict_item("Three Quarter","three-qiarter.jpg");
    add_pict_item("Long","long.jpg");
    add_pict_item("None","");
	  if (run_pict("Back", "Next"))
	    {
      Flow[2] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 1)
    {
    start_pict_dialog("Sleeve");
    add_pict_item("Short","short.jpg");
    add_pict_item("Elbow","elbow.jpg");
    add_pict_item("Three Quarter","three-qiarter.jpg");
    add_pict_item("Long","long.jpg");
    add_pict_item("None","");
	  if (run_pict("Back", "Next"))
	    {
      Flow[2] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 2)
    {
    start_pict_dialog("Sleeve");
    add_pict_item("Short","short.jpg");
    add_pict_item("Elbow","elbow.jpg");
    add_pict_item("Three Quarter","three-qiarter.jpg");
    add_pict_item("Long","long.jpg");
    add_pict_item("None","");
	  if (run_pict("Back", "Next"))
	    {
      Flow[2] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 3)
    {
    start_pict_dialog("Sleeve");
    add_pict_item("Short","short.jpg");
    add_pict_item("Elbow","elbow.jpg");
    add_pict_item("Three Quarter","three-qiarter.jpg");
    add_pict_item("Long","long.jpg");
    add_pict_item("None","");
	  if (run_pict("Back", "Next"))
	    {
      Flow[2] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 4)
    {
    start_pict_dialog("Sleeve");
    add_pict_item("Short","short.jpg");
    add_pict_item("Elbow","elbow.jpg");
    add_pict_item("Three Quarter","three-qiarter.jpg");
    add_pict_item("Long","long.jpg");
    add_pict_item("None","");
	  if (run_pict("Back", "Next"))
	    {
      Flow[2] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 5)
    {
    start_pict_dialog("Sleeve");
    add_pict_item("Short","short.jpg");
    add_pict_item("Elbow","elbow.jpg");
    add_pict_item("Three Quarter","three-qiarter.jpg");
    add_pict_item("Long","long.jpg");
    add_pict_item("None","");
	  if (run_pict("Back", "Next"))
	    {
      Flow[2] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
  if (lang == 6)
    {
    start_pict_dialog("Sleeve");
    add_pict_item("Short","short.jpg");
    add_pict_item("Elbow","elbow.jpg");
    add_pict_item("Three Quarter","three-qiarter.jpg");
    add_pict_item("Long","long.jpg");
    add_pict_item("None","");
	  if (run_pict("Back", "Next"))
	    {
      Flow[2] = get_pict_result();
      Forward();
	    }
	  else
	    {
      Backward();
	    }
    }
}

Forward()
  {
  if (index == 2)
    {
    if (Flow[2] == 4)
      {
      Flow[2]=5;
      done = 1;
      }
    if (Flow[2] == 3)
      {
      Flow[2]=4;
      done = 1;
      }
    if (Flow[2] == 2)
      {
      Flow[2]=3;
      done = 1;
      }
    if (Flow[2] == 1)
      {
      Flow[2]=2;
      done = 1;
      }
    if (Flow[2] == 0)
      {
      Flow[2]=1;
      done = 1;
      }
    }
  if (index == 1)
    {
    if (Flow[1] == 1)
      {
      Flow[1]=6;
      index = 2;
      }
    if (Flow[1] == 0)
      {
      Flow[1]=5;
      index = 2;
      }
    }
  if (index == 0)
    {
    if (Flow[1] == 3)
      {
      Flow[1]=4;
      index = 1;
      }
    if (Flow[1] == 2)
      {
      Flow[1]=3;
      index = 2;
      }
    if (Flow[1] == 1)
      {
      Flow[1]=2;
      index = 2;
      }
    if (Flow[1] == 0)
      {
      Flow[1]=1;
      index = 2;
      }
    }
  }

Backward()
  {
  if (index == 1)
    {
    if (Flow[1] == 4) { index = 0; } 
    }
  if (index == 2)
    {
    if (Flow[1] == 1) { index = 0; } 
    if (Flow[1] == 2) { index = 0; } 
    if (Flow[1] == 3) { index = 0; } 
    if (Flow[1] == 5) { index = 1; } 
    if (Flow[1] == 6) { index = 1; } 
    }
  }

Flow0View0()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow0View0");
    }
  //Bust
  //Measurements neck width
  Var[27]=  
 Var[0]/8 +   
1;
  //Measurements front bust arc
  Var[33]=Var[20]/4 +   
 Var[0]/4 +   
0;
  //Bust Span
  //Bust Radius
  //Bust Point
  //Full Front Length
  //Measurements Bust dart
  Var[25]=Var[7]/-1 +   
 Var[4]/1 +   
0;
  //Across Chest
  //Across Back
  //Nape to Waist
  //Measurements Bust dart
  Var[25]=Var[7]/-1 +   
 Var[4]/1 +   
0;
  //Front Shoulder
  //Back Shoulder
  //Bicep
  //Knee Circ
  //Full Sleeve length
  //Side waist to knee
  //Measurements Waist to hip
  Var[31]=  
 Var[13]/3 +   
0;
  //Side waist to floor
  //Center front waist to floor
  //Center Back to floor
  //Bodyrise
  //Waist
  //Hip
  //Bust ease
  //Measurements front bust arc
  Var[33]=Var[20]/4 +   
 Var[0]/4 +   
0;
  //Waist ease
  //Hip ease
  //Short sleeve length
  //Dress length from waist
  //Bust dart
  //Measurements Bust dart
  Var[25]=Var[7]/-1 +   
 Var[4]/1 +   
0;
  //neck width
  //Measurements neck width
  Var[27]=  
 Var[0]/8 +   
1;
  //Waist to hip
  //Measurements Waist to hip
  Var[31]=  
 Var[13]/3 +   
0;
  //front bust arc
  //Measurements front bust arc
  Var[33]=Var[20]/4 +   
 Var[0]/4 +   
0;
  //Back shoulder dart
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //back arm hole total
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //total armhole
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //Seam Allowance
  //Lower abdomen
  //Under Bust
  Flow0View0Points();
  }

Flow0View0Points()
{
  //Start
  x[0]=0;
y[0]=0;

  }

Flow0View0Objects()
{
  }

Flow1View0()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow1View0");
    }
  Flow1View0Points();
  }

Flow1View0Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //if Back shoulder line < Front shoulder line
  //If Point here
  if( Var[36] < Var[35] )
    {
  //Measurements Back shoulder dart
  Var[37]=  
  
0;
    }
  //if Full Front Length < Nape to Waist
  //If Point here
  if( Var[4] < Var[7] )
    {
  //Measurements Bust dart
  Var[25]=  
  
0;
    }
  //1
  x[3]=x[0];
y[3]=y[0];
  //1a
  x[4]=x[3]+Var[19]/4+3;
y[4]=y[3];
  //1b
  x[5]=x[4];
y[5]=y[4]+Var[4]/-1;
  //1c
  x[6]=x[5];
y[6]=y[5]+Var[13]/-3;
  //1d
  x[7]=x[6]+Var[19]/-4;
y[7]=y[6];
  //1e
  x[8]=x[5]+Var[18]/-4+-0.5;
y[8]=y[5];
  //1f
  x[9]=x[5];
y[9]=y[5]+Var[7]/2;
  //1g
  x[10]=x[9];
y[10]=y[9]+Var[20]/-4;
  //1h
  x[11]=x[10]+Var[33]/-1+-0.5;
y[11]=y[10];
  //1i
  x[12]=x[11];
y[12]=y[11]+Var[25];
  //1k
  x[13] = x[4];
y[13] = y[12];

  //Measurements armheight
  Var[26]=distance(x[13], y[13], x[4], y[4]);
  //1l
  x[14]=x[13];
y[14]=y[13]+Var[26]/4;
  //1n
  x[15]=x[4]+Var[27]/-2;
y[15]=y[4];
  //1o
  x[16]=x[4];
y[16]=y[4]+Var[27]/-2+-0.5;
  //1p
  x[17] = x[15];
y[17] = y[16];

  //Measurements Front neckline
  Var[47]=arclength(15, 17, 16);
  //1q
  x[18]=x[4]+Var[8]/-2;
y[18]=y[4];
  //1r
  x[19]=x[18];
y[19]=y[18]+-1.5;
  //Measurements Front shoulder line
  Var[35]=distance(x[19], y[19], x[15], y[15]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //1s
  x[20]=x[14]+Var[5]/-2;
y[20]=y[14];
  //1t
  x[21]= (x[20]+x[19])/2;
y[21]=(y[20]+y[19])/2;

  //1u
  x[22]=x[21]+0.375;
y[22]=y[21];
  //1v
  x[23]= (x[22]+x[20])/2;
y[23]=(y[22]+y[20])/2;

  //1y
  x[24] = x[22];
y[24] = y[23];

  //1z
  x[25] = x[24];
y[25] = y[12];

  //2
  x[26]= (x[25]+x[12])/2;
y[26]=(y[25]+y[12])/2;

  //2a
  x[27]= (x[26]+x[25])/2;
y[27]=(y[26]+y[25])/2;

  //2d
  x[28]=x[27];
y[28]=y[27]+Var[26]/-4;
  //Measurements front armhole c
  Var[42]=arclength(20, 28, 12);
  //2e
  x[29]=x[8]+Var[21]/-4;
y[29]=y[8];
  //2f
  x[30]=x[7]+Var[22]/-4;
y[30]=y[7];
  //2g
  x[31]=x[4]+Var[1]/-2;
y[31]=y[4]+Var[3]/-1;
  //2h
  cont(30, 12, 32, +-2);

  //2i
    intersect(x[32],y[32],x[30],y[30],x[29],y[29],x[5],y[5], 0);
  x[33]=getresultx();
  y[33]=getresulty();

  //Measurements Front wr
  Var[28]=distance(x[33], y[33], x[29], y[29]);
  //2j
  x[34]=x[33]+Var[28]/3;
y[34]=y[33];
  //2k
  cont(34, 32, 35, Var[25]/-1+0);

  //Measurements Rotate Points Angle
  Var[29]=normalizeangle(angle(x[31], y[31], x[35], y[35]) - angle(x[31], y[31], x[32], y[32]))*180/3.14159;
  //2l
  x[36]= (x[30]+x[33])/2;
y[36]=(y[30]+y[33])/2;

  //2h1
  Dart(37, 32,  31,  Var[25] /-1 + 0, 0);

  //2m
  x[38] = x[31];
y[38] = y[6];

  //2n
  x[39] = x[31];
y[39] = y[5];

  //2o
  x[40]=x[39]+Var[28]/-3;
y[40]=y[39];
  //2p
  x[41]=x[39]+Var[28]/3;
y[41]=y[39];
  //2q
  x[42]=x[31];
y[42]=y[31]+Var[2]/-1;
  //2r
  x[43] = x[10];
y[43] = y[31];

  //2s
  x[44] = x[43];
y[44] = y[42];

  //Measurements Underbust level from waist
  Var[34]=distance(x[5], y[5], x[44], y[44]);
  //2x
  x[45]=x[31];
y[45]=y[31]+-1;
  //2y
  x[46]=x[31];
y[46]=y[31]+1;
  //2z
  x[47]=x[24]+-1;
y[47]=y[24];
  //3
  x[48] = x[31];
y[48] = y[47];

  //2h(2)
    Rotate(49, 31, 32, Var[29]+0);
  //2g(2)
    Rotate(50, 31, 31, Var[29]+0);
  //1i(2)
    Rotate(51, 31, 12, Var[29]+0);
  //Measurements Rotate Points Angle(2)
  Var[30]=normalizeangle(angle(x[50], y[50], x[12], y[12]) - angle(x[50], y[50], x[51], y[51]))*180/3.14159;
  //3a
    intersect(x[51],y[51],x[34],y[34],x[31],y[31],x[49],y[49], 0);
  x[52]=getresultx();
  y[52]=getresulty();

  //3a(2)
    Rotate(53, 50, 52, Var[30]+0);
  //Measurements Rotate Points Angle(6)
  Var[52]=normalizeangle(angle(x[31], y[31], x[53], y[53]) - angle(x[31], y[31], x[37], y[37]))*180/3.14159;
  //Measurements Rotate Points Angle(7)
  Var[55]=normalizeangle(angle(x[31], y[31], x[52], y[52]) - angle(x[31], y[31], x[53], y[53]))*180/3.14159;
  //2g(3)
    Rotate(54, 50, 50, Var[30]+0);
  //Measurements Rotate Points Angle(5)
  Var[51]=normalizeangle(angle(x[54], y[54], x[52], y[52]) - angle(x[54], y[54], x[53], y[53]))*180/3.14159;
  //3b
  x[55]=x[38];
y[55]=y[38]+Var[31]/4;
  //3c
  x[56]=x[3]+Var[19]/-4;
y[56]=y[3]+Var[25]/-1;
  //3d
  x[57]=x[56];
y[57]=y[56]+Var[7]/-1;
  //3e
  x[58]=x[57];
y[58]=y[57]+Var[31]/-1;
  //3f
  x[59]=x[58]+Var[19]/4;
y[59]=y[58];
  //3g
  x[60]=x[57]+Var[18]/4+-0.5;
y[60]=y[57];
  //3h
  x[61]= (x[56]+x[57])/2;
y[61]=(y[56]+y[57])/2;

  //3i
  x[62]=x[61];
y[62]=y[61]+Var[20]/-4;
  //3j
  x[63]=x[62]+Var[0]/4+-0.5;
y[63]=y[62];
  //3k
  x[64]=x[56]+Var[27]/2;
y[64]=y[56];
  //3l
  x[65]=x[64];
y[65]=y[64]+0.75;
  //Measurements Back neckline
  Var[48]=arclength(56, 64, 65);
  //3m
  x[66]=x[56]+Var[9]/2;
y[66]=y[56];
  //3n
  x[67]=x[66];
y[67]=y[66]+-1.25;
  //Measurements Back shoulder line
  Var[36]=distance(x[65], y[65], x[67], y[67]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //3o
  x[68]= (x[56]+x[62])/2;
y[68]=(y[56]+y[62])/2;

  //3p
  x[69]=x[68]+Var[6]/2;
y[69]=y[68];
  //3q
  x[70] = x[69];
y[70] = y[63];

  //3r
  x[71]= (x[67]+x[69])/2;
y[71]=(y[67]+y[69])/2;

  //3s
  x[72] = x[69];
y[72] = y[71];

  //Measurements Back armhole a
  Var[43]=arclength(67, 72, 69);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3t
  x[73]=x[63]+Var[20]/4;
y[73]=y[63];
  //3u
  x[74]=x[60]+Var[21]/4;
y[74]=y[60];
  //3v
  x[75]=x[59]+Var[22]/4;
y[75]=y[59];
  //3w
    intersect(x[75],y[75],x[73],y[73],x[57],y[57],x[74],y[74], 0);
  x[76]=getresultx();
  y[76]=getresulty();

  //Measurements Back Waist reduction
  Var[32]=distance(x[76], y[76], x[74], y[74]);
  //3x
  x[77]= (x[76]+x[75])/2;
y[77]=(y[76]+y[75])/2;

  //3y
  x[78]=x[76]+Var[32]/-3;
y[78]=y[76];
  //33z
  x[79]= (x[68]+x[69])/2;
y[79]=(y[68]+y[69])/2;

  //4
  x[80] = x[79];
y[80] = y[62];

  //4a
  x[81] = x[80];
y[81] = y[57];

  //4b
  x[82] = x[81];
y[82] = y[58];

  //4c
  x[83]=x[81]+Var[32]/-3;
y[83]=y[81];
  //4d
  x[84]=x[81]+Var[32]/3;
y[84]=y[81];
  //4e
  cont(73, 78, 85, Var[34]/-1+0);

  //4f
  cont(52, 34, 86, Var[34]/-1+0);

  //4g
  cont(85, 73, 87, Var[26]/-4+0);

  //4h
  x[88]= (x[65]+x[67])/2;
y[88]=(y[65]+y[67])/2;

  //4i
  right_ang(89, 88, 65,  + -3, 0);

  //4j
  right_ang(90, 69, 67,  + -4, 0);

  //4k
    intersect(x[88],y[88],x[89],y[89],x[69],y[69],x[90],y[90], 0);
  x[91]=getresultx();
  y[91]=getresulty();

  //4l
  cont(65, 88, 92, Var[37]/-2+0);

  //4m
  cont(67, 88, 93, Var[37]/-2+0);

  //Measurements Rotate Points Angle(3)
  Var[38]=normalizeangle(angle(x[91], y[91], x[92], y[92]) - angle(x[91], y[91], x[93], y[93]))*180/3.14159;
  //4k(2)
    Rotate(94, 91, 91, Var[38]+0);
  //3p(2)
    Rotate(95, 91, 69, Var[38]+0);
  //Measurements Rotate Points Angle(4)
  Var[39]=normalizeangle(angle(x[91], y[91], x[69], y[69]) - angle(x[91], y[91], x[95], y[95]))*180/3.14159;
  //Measurements Back armhole b
  Var[44]=arclength(69, 95, 73);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3n(2)
    Rotate(96, 91, 67, Var[38]+0);
  //4n
    intersect(x[96],y[96],x[65],y[65],x[94],y[94],x[92],y[92], 0);
  x[97]=getresultx();
  y[97]=getresulty();

  //4n(2)
    Rotate(98, 91, 97, Var[39]+0);
  //4o
  x[99]= (x[19]+x[15])/2;
y[99]=(y[19]+y[15])/2;

  //4p
  cont(99, 31, 100, Var[2]/-1+0);

  //Measurements 4p2y
  Var[56]=distance(x[100], y[100], x[46], y[46]);
  //Measurements 4o4p
  Var[57]=distance(x[99], y[99], x[100], y[100]);
  //MoveStart(3)
  x[101]=x[0]+-3.01526402640264;
y[101]=y[0]+-10.6848184818482;
  //MoveEnd(3)
  x[102]=x[0]+-2.96988448844885;
y[102]=y[0]+-9.5049504950495;
  //3q(2)
  x[103] = x[70] + x[102] - x[101] ;
y[103] = y[70] + y[102] - y[101] ;

  //MoveStart(4)
  x[104]=x[0]+6.28754125412541;
y[104]=y[0]+-8.73349834983498;
  //MoveEnd(4)
  x[105]=x[0]+5.60684818481848;
y[105]=y[0]+-9.95874587458746;
  //1z(2)
  x[106] = x[25] + x[105] - x[104] ;
y[106] = y[25] + y[105] - y[104] ;

  //MoveStart(5)
  x[107]=x[0]+6.4236798679868;
y[107]=y[0]+-4.10478547854785;
  //MoveEnd(5)
  x[108]=x[0]+6.60519801980198;
y[108]=y[0]+-4.05940594059406;
  //1u(2)
  x[109] = x[22] + x[108] - x[107] ;
y[109] = y[22] + y[108] - y[107] ;

  //Measurements Front armhole a
  Var[40]=arclength(19, 109, 20);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(6)
  x[110]=x[0]+5.69760726072607;
y[110]=y[0]+-9.5503300330033;
  //MoveEnd(6)
  x[111]=x[0]+5.4707095709571;
y[111]=y[0]+-9.27805280528053;
  //1z(3)
  x[112] = x[106] + x[111] - x[110] ;
y[112] = y[106] + y[111] - y[110] ;

  //Measurements Front armhole b
  Var[41]=arclength(20, 112, 12);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(7)
  x[113]=x[0]+-7.04460778037259;
y[113]=y[0]+-1.91956874158687;
  //MoveEnd(7)
  x[114]=x[0]+-7.72550732581121;
y[114]=y[0]+-2.05574865067459;
  //3k(2)
  x[115] = x[64] + x[114] - x[113] ;
y[115] = y[64] + y[114] - y[113] ;

  //3a3
  x[116]= (x[53]+x[52])/2;
y[116]=(y[53]+y[52])/2;

  //3a4
    intersect(x[116],y[116],x[31],y[31],x[12],y[12],x[53],y[53], 0);
  x[117]=getresultx();
  y[117]=getresulty();

  //3a5
  cont(117, 31, 118, +-1);

  //761
  x[119]=x[31]+0.04;
y[119]=y[31];
  //76a
  x[120]=x[31];
y[120]=y[31]+-0.04;
  //76b
  x[121]=x[120]+-0.04;
y[121]=y[120];
  //76c
  x[122]=x[31]+-0.04;
y[122]=y[31];
  //76d
  x[123]=x[31];
y[123]=y[31]+0.04;
  //4q
  x[124] = x[31];
y[124] = y[20];

  //4r
  x[125]=x[25];
y[125]=y[25]+-10;
  //4s
  x[126]=x[70];
y[126]=y[70]+-10;
  //2y(2)
    Rotate(127, 31, 46, Var[55]+0);
  //2g(4)
    Rotate(128, 31, 31, Var[55]+0);
  //3a(3)
    Rotate(129, 31, 53, Var[55]+0);
  //1i(3)
    Rotate(130, 31, 12, Var[55]+0);
  //1z(5)
    Rotate(131, 31, 112, Var[55]+0);
  //1s(2)
    Rotate(132, 31, 20, Var[55]+0);
  //1u(4)
    Rotate(133, 31, 109, Var[55]+0);
  //1r(3)
    Rotate(134, 31, 19, Var[55]+0);
  //4o(3)
    Rotate(135, 31, 99, Var[55]+0);
  //4y
  x[136] = x[82];
y[136] = y[55];

  //4y1
  x[137]= (x[89]+x[80])/2;
y[137]=(y[89]+y[80])/2;

  //4y2
  cont(135, 46, 138, Var[2]/-1+0);

  //4y3
  x[139] = x[122];
y[139] = y[123];

  //4y4
  x[140] = x[119];
y[140] = y[139];

  //4y5
  x[141] = x[140];
y[141] = y[120];

  //4y6
  x[142] = x[80];
y[142] = y[137];

  //3d1
  x[143]= (x[142]+x[79])/2;
y[143]=(y[142]+y[79])/2;

  }

Flow1View0Objects()
{

  //Object Front
  if (HideObj[0] == 0)
    {

  Obj[0] = newobject("poly");
  current_point=addpoint(x[30],y[30],"LINE");
  current_point=addpoint(x[6],y[6],"LINE");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[10],y[10],"LINE");
  current_point=addpoint(x[14],y[14],"LINE");
  current_point=addpoint(x[16],y[16],"XARC_START");
  current_point=addpoint(x[17],y[17],"XARC_CORNER");
  current_point=addpoint(x[15],y[15],"LINE");
  current_point=addpoint(x[99],y[99],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[19],y[19],"XARC_START");
  current_point=addpoint(x[109],y[109],"XARC_CORNER");
  current_point=addpoint(x[20],y[20],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[112],y[112],"XARC_CORNER");
  current_point=addpoint(x[12],y[12],"LINE");
  current_point=addpoint(x[53],y[53],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[117],y[117],"LINE");
  current_point=addpoint(x[52],y[52],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[86],y[86],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[34],y[34],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[0],"Front"); }
    if (lang == 1) { name_object(Obj[0],"Front"); }
    if (lang == 2) { name_object(Obj[0],"Front"); }
    if (lang == 3) { name_object(Obj[0],"Front"); }
    if (lang == 4) { name_object(Obj[0],"Front"); }
    if (lang == 5) { name_object(Obj[0],"Front"); }
    if (lang == 6) { name_object(Obj[0],"Front"); }
    }

  //Object Front Waist dart
  if (HideObj[1] == 0)
    {

  Obj[1] = newobject("poly");
  current_point=addpoint(x[40],y[40],"LINE");
  current_point=addpoint(x[55],y[55],"LINE");
  current_point=addpoint(x[41],y[41],"LINE");
  current_point=addpoint(x[45],y[45],"LINE");
    if (lang == 0) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 1) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 2) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 3) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 4) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 5) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 6) { name_object(Obj[1],"Front Waist dart"); }
    }

  //Object BACK
  if (HideObj[2] == 0)
    {

  Obj[2] = newobject("poly");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[58],y[58],"LINE");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[62],y[62],"LINE");
  current_point=addpoint(x[68],y[68],"LINE");
  current_point=addpoint(x[56],y[56],"XARC_START");
  current_point=addpoint(x[115],y[115],"XARC_CORNER");
  current_point=addpoint(x[65],y[65],"LINE");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[85],y[85],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[2],"BACK"); }
    if (lang == 1) { name_object(Obj[2],"BACK"); }
    if (lang == 2) { name_object(Obj[2],"BACK"); }
    if (lang == 3) { name_object(Obj[2],"BACK"); }
    if (lang == 4) { name_object(Obj[2],"BACK"); }
    if (lang == 5) { name_object(Obj[2],"BACK"); }
    if (lang == 6) { name_object(Obj[2],"BACK"); }
    }

  //Object Back waist dart
  if (HideObj[3] == 0)
    {

  Obj[3] = newobject("poly");
  current_point=addpoint(x[80],y[80],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  current_point=addpoint(x[136],y[136],"LINE");
  current_point=addpoint(x[83],y[83],"LINE");
    if (lang == 0) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 1) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 2) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 3) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 4) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 5) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 6) { name_object(Obj[3],"Back waist dart"); }
    }

  //Object 60a
  if (HideObj[4] == 0)
    {
  if (lang == 0)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[44],y[44],"LINE");
    if (lang == 0) { name_object(Obj[4],"60a"); }
    if (lang == 1) { name_object(Obj[4],"60a"); }
    if (lang == 2) { name_object(Obj[4],"60a"); }
    if (lang == 3) { name_object(Obj[4],"60a"); }
    if (lang == 4) { name_object(Obj[4],"60a"); }
    if (lang == 5) { name_object(Obj[4],"60a"); }
    if (lang == 6) { name_object(Obj[4],"60a"); }
    }

  //Object 60b
  if (HideObj[5] == 0)
    {
  if (lang == 0)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint(x[124],y[124],"LINE");
    if (lang == 0) { name_object(Obj[5],"60b"); }
    if (lang == 1) { name_object(Obj[5],"60b"); }
    if (lang == 2) { name_object(Obj[5],"60b"); }
    if (lang == 3) { name_object(Obj[5],"60b"); }
    if (lang == 4) { name_object(Obj[5],"60b"); }
    if (lang == 5) { name_object(Obj[5],"60b"); }
    if (lang == 6) { name_object(Obj[5],"60b"); }
    }

  //Object 60c
  if (HideObj[6] == 0)
    {
  if (lang == 0)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[55]+0.5),(y[55]+-1),"LINE");
    if (lang == 0) { name_object(Obj[6],"60c"); }
    if (lang == 1) { name_object(Obj[6],"60c"); }
    if (lang == 2) { name_object(Obj[6],"60c"); }
    if (lang == 3) { name_object(Obj[6],"60c"); }
    if (lang == 4) { name_object(Obj[6],"60c"); }
    if (lang == 5) { name_object(Obj[6],"60c"); }
    if (lang == 6) { name_object(Obj[6],"60c"); }
    }

  //Object 60d
  if (HideObj[7] == 0)
    {
  if (lang == 0)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+1),"LINE");
    if (lang == 0) { name_object(Obj[7],"60d"); }
    if (lang == 1) { name_object(Obj[7],"60d"); }
    if (lang == 2) { name_object(Obj[7],"60d"); }
    if (lang == 3) { name_object(Obj[7],"60d"); }
    if (lang == 4) { name_object(Obj[7],"60d"); }
    if (lang == 5) { name_object(Obj[7],"60d"); }
    if (lang == 6) { name_object(Obj[7],"60d"); }
    }

  //Object 60e
  if (HideObj[8] == 0)
    {
  if (lang == 0)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[68],y[68],"LINE");
    if (lang == 0) { name_object(Obj[8],"60e"); }
    if (lang == 1) { name_object(Obj[8],"60e"); }
    if (lang == 2) { name_object(Obj[8],"60e"); }
    if (lang == 3) { name_object(Obj[8],"60e"); }
    if (lang == 4) { name_object(Obj[8],"60e"); }
    if (lang == 5) { name_object(Obj[8],"60e"); }
    if (lang == 6) { name_object(Obj[8],"60e"); }
    }

  //Object 60f
  if (HideObj[9] == 0)
    {
  if (lang == 0)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[58]+1),(y[58]+1),"LINE");
    if (lang == 0) { name_object(Obj[9],"60f"); }
    if (lang == 1) { name_object(Obj[9],"60f"); }
    if (lang == 2) { name_object(Obj[9],"60f"); }
    if (lang == 3) { name_object(Obj[9],"60f"); }
    if (lang == 4) { name_object(Obj[9],"60f"); }
    if (lang == 5) { name_object(Obj[9],"60f"); }
    if (lang == 6) { name_object(Obj[9],"60f"); }
    }

  //Object Front Bust Dart
  if (HideObj[10] == 0)
    {

  Obj[10] = newobject("poly");
  current_point=addpoint(x[53],y[53],"LINE");
  current_point=addpoint(x[118],y[118],"LINE");
  current_point=addpoint(x[52],y[52],"OPEN");
    if (lang == 0) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 1) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 2) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 3) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 4) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 5) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 6) { name_object(Obj[10],"Front Bust Dart"); }
    }

  //Object Back Shoulder Dart
  if (HideObj[11] == 0)
    {

  Obj[11] = newobject("poly");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[89],y[89],"LINE");
  current_point=addpoint(x[98],y[98],"OPEN");
    if (lang == 0) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 1) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 2) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 3) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 4) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 5) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 6) { name_object(Obj[11],"Back Shoulder Dart"); }
    }

  //Object Side front
  if (HideObj[12] == 0)
    {

  Obj[12] = newobject("poly");
  current_point=addpoint(x[46],y[46],"LINE");
  current_point=addpoint(x[31],y[31],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[45],y[45],"LINE");
  current_point=addpoint(x[40],y[40],"XARC_START");
  current_point=addpoint(x[55],y[55],"XARC_CORNER");
  current_point=addpoint(x[38],y[38],"LINE");
  current_point=addpoint(x[30],y[30],"XARC_START");
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
  current_point=addpoint(x[34],y[34],"LINE");
  current_point=addpoint(x[86],y[86],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[130],y[130],"XARC_START");
  current_point=addpoint(x[131],y[131],"XARC_CORNER");
  current_point=addpoint(x[132],y[132],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[133],y[133],"XARC_CORNER");
  current_point=addpoint(x[134],y[134],"LINE");
  current_point=addpoint(x[135],y[135],"LINE");
    if (lang == 0) { name_object(Obj[12],"Side front"); }
    if (lang == 1) { name_object(Obj[12],"Side front"); }
    if (lang == 2) { name_object(Obj[12],"Side front"); }
    if (lang == 3) { name_object(Obj[12],"Side front"); }
    if (lang == 4) { name_object(Obj[12],"Side front"); }
    if (lang == 5) { name_object(Obj[12],"Side front"); }
    if (lang == 6) { name_object(Obj[12],"Side front"); }
    }

  //Object side back
  if (HideObj[13] == 0)
    {

  Obj[13] = newobject("poly");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",1);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  current_point=addpoint(x[85],y[85],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[80],y[80],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",1);
  current_point=addpoint(x[79],y[79],"XARC_CORNER");
  current_point=addpoint(x[89],y[89],"LINE");
  notch_type(current_point,"NOTCH",1);
    if (lang == 0) { name_object(Obj[13],"side back"); }
    if (lang == 1) { name_object(Obj[13],"side back"); }
    if (lang == 2) { name_object(Obj[13],"side back"); }
    if (lang == 3) { name_object(Obj[13],"side back"); }
    if (lang == 4) { name_object(Obj[13],"side back"); }
    if (lang == 5) { name_object(Obj[13],"side back"); }
    if (lang == 6) { name_object(Obj[13],"side back"); }
    }

  //Object sbgrainline
  if (HideObj[14] == 0)
    {

  Obj[14] = newobject("poly");
  current_point=addpoint(x[70],y[70],"LINE");
  current_point=addpoint(x[126],y[126],"OPEN");
    if (lang == 0) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 1) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 2) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 3) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 4) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 5) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 6) { name_object(Obj[14],"sbgrainline"); }
    }

  //Object sfgrainline
  if (HideObj[15] == 0)
    {

  Obj[15] = newobject("poly");
  current_point=addpoint(x[25],y[25],"LINE");
  current_point=addpoint(x[125],y[125],"OPEN");
    if (lang == 0) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 1) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 2) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 3) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 4) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 5) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 6) { name_object(Obj[15],"sfgrainline"); }
    }

  //Object sfgrainlineTxt
  if (HideObj[16] == 0)
    {
  if (lang == 0)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[125],(y[125]+1),"LINE");
    if (lang == 0) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[16],"sfgrainlineTxt"); }
    }

  //Object sbgrainlineTxt
  if (HideObj[17] == 0)
    {
  if (lang == 0)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[126],(y[126]+1),"LINE");
    if (lang == 0) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[17],"sbgrainlineTxt"); }
    }

  //Object txt1
  if (HideObj[18] == 0)
    {
  if (lang == 0)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint(x[124],(y[124]+1),"LINE");
    if (lang == 0) { name_object(Obj[18],"txt1"); }
    if (lang == 1) { name_object(Obj[18],"txt1"); }
    if (lang == 2) { name_object(Obj[18],"txt1"); }
    if (lang == 3) { name_object(Obj[18],"txt1"); }
    if (lang == 4) { name_object(Obj[18],"txt1"); }
    if (lang == 5) { name_object(Obj[18],"txt1"); }
    if (lang == 6) { name_object(Obj[18],"txt1"); }
    }

  //Object TXT2
  if (HideObj[19] == 0)
    {
  if (lang == 0)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+0.5),"LINE");
    if (lang == 0) { name_object(Obj[19],"TXT2"); }
    if (lang == 1) { name_object(Obj[19],"TXT2"); }
    if (lang == 2) { name_object(Obj[19],"TXT2"); }
    if (lang == 3) { name_object(Obj[19],"TXT2"); }
    if (lang == 4) { name_object(Obj[19],"TXT2"); }
    if (lang == 5) { name_object(Obj[19],"TXT2"); }
    if (lang == 6) { name_object(Obj[19],"TXT2"); }
    }

  //Object txt3
  if (HideObj[20] == 0)
    {
  if (lang == 0)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+-0.5),"LINE");
    if (lang == 0) { name_object(Obj[20],"txt3"); }
    if (lang == 1) { name_object(Obj[20],"txt3"); }
    if (lang == 2) { name_object(Obj[20],"txt3"); }
    if (lang == 3) { name_object(Obj[20],"txt3"); }
    if (lang == 4) { name_object(Obj[20],"txt3"); }
    if (lang == 5) { name_object(Obj[20],"txt3"); }
    if (lang == 6) { name_object(Obj[20],"txt3"); }
    }

  //Object txt4
  if (HideObj[21] == 0)
    {
  if (lang == 0)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+2),"LINE");
    if (lang == 0) { name_object(Obj[21],"txt4"); }
    if (lang == 1) { name_object(Obj[21],"txt4"); }
    if (lang == 2) { name_object(Obj[21],"txt4"); }
    if (lang == 3) { name_object(Obj[21],"txt4"); }
    if (lang == 4) { name_object(Obj[21],"txt4"); }
    if (lang == 5) { name_object(Obj[21],"txt4"); }
    if (lang == 6) { name_object(Obj[21],"txt4"); }
    }

  //Object txt5
  if (HideObj[22] == 0)
    {
  if (lang == 0)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),(y[80]+1),"LINE");
    if (lang == 0) { name_object(Obj[22],"txt5"); }
    if (lang == 1) { name_object(Obj[22],"txt5"); }
    if (lang == 2) { name_object(Obj[22],"txt5"); }
    if (lang == 3) { name_object(Obj[22],"txt5"); }
    if (lang == 4) { name_object(Obj[22],"txt5"); }
    if (lang == 5) { name_object(Obj[22],"txt5"); }
    if (lang == 6) { name_object(Obj[22],"txt5"); }
    }

  //Object txt6
  if (HideObj[23] == 0)
    {
  if (lang == 0)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),y[80],"LINE");
    if (lang == 0) { name_object(Obj[23],"txt6"); }
    if (lang == 1) { name_object(Obj[23],"txt6"); }
    if (lang == 2) { name_object(Obj[23],"txt6"); }
    if (lang == 3) { name_object(Obj[23],"txt6"); }
    if (lang == 4) { name_object(Obj[23],"txt6"); }
    if (lang == 5) { name_object(Obj[23],"txt6"); }
    if (lang == 6) { name_object(Obj[23],"txt6"); }
    }

  //Object txt7
  if (HideObj[24] == 0)
    {
  if (lang == 0)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[82]+1.5),(y[82]+1),"LINE");
    if (lang == 0) { name_object(Obj[24],"txt7"); }
    if (lang == 1) { name_object(Obj[24],"txt7"); }
    if (lang == 2) { name_object(Obj[24],"txt7"); }
    if (lang == 3) { name_object(Obj[24],"txt7"); }
    if (lang == 4) { name_object(Obj[24],"txt7"); }
    if (lang == 5) { name_object(Obj[24],"txt7"); }
    if (lang == 6) { name_object(Obj[24],"txt7"); }
    }

  //Object txt8
  if (HideObj[25] == 0)
    {
  if (lang == 0)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[7]+1.5),(y[7]+1),"LINE");
    if (lang == 0) { name_object(Obj[25],"txt8"); }
    if (lang == 1) { name_object(Obj[25],"txt8"); }
    if (lang == 2) { name_object(Obj[25],"txt8"); }
    if (lang == 3) { name_object(Obj[25],"txt8"); }
    if (lang == 4) { name_object(Obj[25],"txt8"); }
    if (lang == 5) { name_object(Obj[25],"txt8"); }
    if (lang == 6) { name_object(Obj[25],"txt8"); }
    }

  //Object front waistline
  if (HideObj[26] == 0)
    {

  Obj[26] = newobject("poly");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[26],"front waistline"); }
    if (lang == 1) { name_object(Obj[26],"front waistline"); }
    if (lang == 2) { name_object(Obj[26],"front waistline"); }
    if (lang == 3) { name_object(Obj[26],"front waistline"); }
    if (lang == 4) { name_object(Obj[26],"front waistline"); }
    if (lang == 5) { name_object(Obj[26],"front waistline"); }
    if (lang == 6) { name_object(Obj[26],"front waistline"); }
    }

  //Object Back waistline
  if (HideObj[27] == 0)
    {

  Obj[27] = newobject("poly");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[78],y[78],"OPEN");
    if (lang == 0) { name_object(Obj[27],"Back waistline"); }
    if (lang == 1) { name_object(Obj[27],"Back waistline"); }
    if (lang == 2) { name_object(Obj[27],"Back waistline"); }
    if (lang == 3) { name_object(Obj[27],"Back waistline"); }
    if (lang == 4) { name_object(Obj[27],"Back waistline"); }
    if (lang == 5) { name_object(Obj[27],"Back waistline"); }
    if (lang == 6) { name_object(Obj[27],"Back waistline"); }
    }

  //Object bust point
  if (HideObj[28] == 0)
    {

  Obj[28] = newobject("poly");
  current_point=addpoint(x[139],y[139],"LINE");
  current_point=addpoint(x[123],y[123],"XARC_START");
  current_point=addpoint(x[140],y[140],"XARC_CORNER");
  current_point=addpoint(x[119],y[119],"XARC_START");
  current_point=addpoint(x[141],y[141],"XARC_CORNER");
  current_point=addpoint(x[120],y[120],"XARC_START");
  current_point=addpoint(x[121],y[121],"XARC_CORNER");
  current_point=addpoint(x[122],y[122],"LINE");
    if (lang == 0) { name_object(Obj[28],"bust point"); }
    if (lang == 1) { name_object(Obj[28],"bust point"); }
    if (lang == 2) { name_object(Obj[28],"bust point"); }
    if (lang == 3) { name_object(Obj[28],"bust point"); }
    if (lang == 4) { name_object(Obj[28],"bust point"); }
    if (lang == 5) { name_object(Obj[28],"bust point"); }
    if (lang == 6) { name_object(Obj[28],"bust point"); }
    }
  offset_mark(0, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(2, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(12, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(13, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow1View1()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow1View1");
    }
  Flow1View1Points();
  }

Flow1View1Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //if Back shoulder line < Front shoulder line
  //If Point here
  if( Var[36] < Var[35] )
    {
  //Measurements Back shoulder dart
  Var[37]=  
  
0;
    }
  //if Full Front Length < Nape to Waist
  //If Point here
  if( Var[4] < Var[7] )
    {
  //Measurements Bust dart
  Var[25]=  
  
0;
    }
  //1
  x[3]=x[0];
y[3]=y[0];
  //1a
  x[4]=x[3]+Var[19]/4+3;
y[4]=y[3];
  //1b
  x[5]=x[4];
y[5]=y[4]+Var[4]/-1;
  //1c
  x[6]=x[5];
y[6]=y[5]+Var[13]/-3;
  //1d
  x[7]=x[6]+Var[19]/-4;
y[7]=y[6];
  //1e
  x[8]=x[5]+Var[18]/-4+-0.5;
y[8]=y[5];
  //1f
  x[9]=x[5];
y[9]=y[5]+Var[7]/2;
  //1g
  x[10]=x[9];
y[10]=y[9]+Var[20]/-4;
  //1h
  x[11]=x[10]+Var[33]/-1+-0.5;
y[11]=y[10];
  //1i
  x[12]=x[11];
y[12]=y[11]+Var[25];
  //1k
  x[13] = x[4];
y[13] = y[12];

  //Measurements armheight
  Var[26]=distance(x[13], y[13], x[4], y[4]);
  //1l
  x[14]=x[13];
y[14]=y[13]+Var[26]/4;
  //1n
  x[15]=x[4]+Var[27]/-2;
y[15]=y[4];
  //1o
  x[16]=x[4];
y[16]=y[4]+Var[27]/-2+-0.5;
  //1p
  x[17] = x[15];
y[17] = y[16];

  //Measurements Front neckline
  Var[47]=arclength(15, 17, 16);
  //1q
  x[18]=x[4]+Var[8]/-2;
y[18]=y[4];
  //1r
  x[19]=x[18];
y[19]=y[18]+-1.5;
  //Measurements Front shoulder line
  Var[35]=distance(x[19], y[19], x[15], y[15]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //1s
  x[20]=x[14]+Var[5]/-2;
y[20]=y[14];
  //1t
  x[21]= (x[20]+x[19])/2;
y[21]=(y[20]+y[19])/2;

  //1u
  x[22]=x[21]+0.375;
y[22]=y[21];
  //1v
  x[23]= (x[22]+x[20])/2;
y[23]=(y[22]+y[20])/2;

  //1y
  x[24] = x[22];
y[24] = y[23];

  //1z
  x[25] = x[24];
y[25] = y[12];

  //2
  x[26]= (x[25]+x[12])/2;
y[26]=(y[25]+y[12])/2;

  //2a
  x[27]= (x[26]+x[25])/2;
y[27]=(y[26]+y[25])/2;

  //2d
  x[28]=x[27];
y[28]=y[27]+Var[26]/-4;
  //Measurements front armhole c
  Var[42]=arclength(20, 28, 12);
  //2e
  x[29]=x[8]+Var[21]/-4;
y[29]=y[8];
  //2f
  x[30]=x[7]+Var[22]/-4;
y[30]=y[7];
  //2g
  x[31]=x[4]+Var[1]/-2;
y[31]=y[4]+Var[3]/-1;
  //2h
  cont(30, 12, 32, +-2);

  //2i
    intersect(x[32],y[32],x[30],y[30],x[29],y[29],x[5],y[5], 0);
  x[33]=getresultx();
  y[33]=getresulty();

  //Measurements Front wr
  Var[28]=distance(x[33], y[33], x[29], y[29]);
  //2j
  x[34]=x[33]+Var[28]/3;
y[34]=y[33];
  //2k
  cont(34, 32, 35, Var[25]/-1+0);

  //Measurements Rotate Points Angle
  Var[29]=normalizeangle(angle(x[31], y[31], x[35], y[35]) - angle(x[31], y[31], x[32], y[32]))*180/3.14159;
  //2l
  x[36]= (x[30]+x[33])/2;
y[36]=(y[30]+y[33])/2;

  //2h1
  Dart(37, 32,  31,  Var[25] /-1 + 0, 0);

  //2m
  x[38] = x[31];
y[38] = y[6];

  //2n
  x[39] = x[31];
y[39] = y[5];

  //2o
  x[40]=x[39]+Var[28]/-3;
y[40]=y[39];
  //2p
  x[41]=x[39]+Var[28]/3;
y[41]=y[39];
  //2q
  x[42]=x[31];
y[42]=y[31]+Var[2]/-1;
  //2r
  x[43] = x[10];
y[43] = y[31];

  //2s
  x[44] = x[43];
y[44] = y[42];

  //Measurements Underbust level from waist
  Var[34]=distance(x[5], y[5], x[44], y[44]);
  //2x
  x[45]=x[31];
y[45]=y[31]+-1;
  //2y
  x[46]=x[31];
y[46]=y[31]+1;
  //2z
  x[47]=x[24]+-1;
y[47]=y[24];
  //3
  x[48] = x[31];
y[48] = y[47];

  //2h(2)
    Rotate(49, 31, 32, Var[29]+0);
  //2g(2)
    Rotate(50, 31, 31, Var[29]+0);
  //1i(2)
    Rotate(51, 31, 12, Var[29]+0);
  //Measurements Rotate Points Angle(2)
  Var[30]=normalizeangle(angle(x[50], y[50], x[12], y[12]) - angle(x[50], y[50], x[51], y[51]))*180/3.14159;
  //3a
    intersect(x[51],y[51],x[34],y[34],x[31],y[31],x[49],y[49], 0);
  x[52]=getresultx();
  y[52]=getresulty();

  //3a(2)
    Rotate(53, 50, 52, Var[30]+0);
  //Measurements Rotate Points Angle(6)
  Var[52]=normalizeangle(angle(x[31], y[31], x[53], y[53]) - angle(x[31], y[31], x[37], y[37]))*180/3.14159;
  //Measurements Rotate Points Angle(7)
  Var[55]=normalizeangle(angle(x[31], y[31], x[52], y[52]) - angle(x[31], y[31], x[53], y[53]))*180/3.14159;
  //2g(3)
    Rotate(54, 50, 50, Var[30]+0);
  //Measurements Rotate Points Angle(5)
  Var[51]=normalizeangle(angle(x[54], y[54], x[52], y[52]) - angle(x[54], y[54], x[53], y[53]))*180/3.14159;
  //3b
  x[55]=x[38];
y[55]=y[38]+Var[31]/4;
  //3c
  x[56]=x[3]+Var[19]/-4;
y[56]=y[3]+Var[25]/-1;
  //3d
  x[57]=x[56];
y[57]=y[56]+Var[7]/-1;
  //3e
  x[58]=x[57];
y[58]=y[57]+Var[31]/-1;
  //3f
  x[59]=x[58]+Var[19]/4;
y[59]=y[58];
  //3g
  x[60]=x[57]+Var[18]/4+-0.5;
y[60]=y[57];
  //3h
  x[61]= (x[56]+x[57])/2;
y[61]=(y[56]+y[57])/2;

  //3i
  x[62]=x[61];
y[62]=y[61]+Var[20]/-4;
  //3j
  x[63]=x[62]+Var[0]/4+-0.5;
y[63]=y[62];
  //3k
  x[64]=x[56]+Var[27]/2;
y[64]=y[56];
  //3l
  x[65]=x[64];
y[65]=y[64]+0.75;
  //Measurements Back neckline
  Var[48]=arclength(56, 64, 65);
  //3m
  x[66]=x[56]+Var[9]/2;
y[66]=y[56];
  //3n
  x[67]=x[66];
y[67]=y[66]+-1.25;
  //Measurements Back shoulder line
  Var[36]=distance(x[65], y[65], x[67], y[67]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //3o
  x[68]= (x[56]+x[62])/2;
y[68]=(y[56]+y[62])/2;

  //3p
  x[69]=x[68]+Var[6]/2;
y[69]=y[68];
  //3q
  x[70] = x[69];
y[70] = y[63];

  //3r
  x[71]= (x[67]+x[69])/2;
y[71]=(y[67]+y[69])/2;

  //3s
  x[72] = x[69];
y[72] = y[71];

  //Measurements Back armhole a
  Var[43]=arclength(67, 72, 69);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3t
  x[73]=x[63]+Var[20]/4;
y[73]=y[63];
  //3u
  x[74]=x[60]+Var[21]/4;
y[74]=y[60];
  //3v
  x[75]=x[59]+Var[22]/4;
y[75]=y[59];
  //3w
    intersect(x[75],y[75],x[73],y[73],x[57],y[57],x[74],y[74], 0);
  x[76]=getresultx();
  y[76]=getresulty();

  //Measurements Back Waist reduction
  Var[32]=distance(x[76], y[76], x[74], y[74]);
  //3x
  x[77]= (x[76]+x[75])/2;
y[77]=(y[76]+y[75])/2;

  //3y
  x[78]=x[76]+Var[32]/-3;
y[78]=y[76];
  //33z
  x[79]= (x[68]+x[69])/2;
y[79]=(y[68]+y[69])/2;

  //4
  x[80] = x[79];
y[80] = y[62];

  //4a
  x[81] = x[80];
y[81] = y[57];

  //4b
  x[82] = x[81];
y[82] = y[58];

  //4c
  x[83]=x[81]+Var[32]/-3;
y[83]=y[81];
  //4d
  x[84]=x[81]+Var[32]/3;
y[84]=y[81];
  //4e
  cont(73, 78, 85, Var[34]/-1+0);

  //4f
  cont(52, 34, 86, Var[34]/-1+0);

  //4g
  cont(85, 73, 87, Var[26]/-4+0);

  //4h
  x[88]= (x[65]+x[67])/2;
y[88]=(y[65]+y[67])/2;

  //4i
  right_ang(89, 88, 65,  + -3, 0);

  //4j
  right_ang(90, 69, 67,  + -4, 0);

  //4k
    intersect(x[88],y[88],x[89],y[89],x[69],y[69],x[90],y[90], 0);
  x[91]=getresultx();
  y[91]=getresulty();

  //4l
  cont(65, 88, 92, Var[37]/-2+0);

  //4m
  cont(67, 88, 93, Var[37]/-2+0);

  //Measurements Rotate Points Angle(3)
  Var[38]=normalizeangle(angle(x[91], y[91], x[92], y[92]) - angle(x[91], y[91], x[93], y[93]))*180/3.14159;
  //4k(2)
    Rotate(94, 91, 91, Var[38]+0);
  //3p(2)
    Rotate(95, 91, 69, Var[38]+0);
  //Measurements Rotate Points Angle(4)
  Var[39]=normalizeangle(angle(x[91], y[91], x[69], y[69]) - angle(x[91], y[91], x[95], y[95]))*180/3.14159;
  //Measurements Back armhole b
  Var[44]=arclength(69, 95, 73);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3n(2)
    Rotate(96, 91, 67, Var[38]+0);
  //4n
    intersect(x[96],y[96],x[65],y[65],x[94],y[94],x[92],y[92], 0);
  x[97]=getresultx();
  y[97]=getresulty();

  //4n(2)
    Rotate(98, 91, 97, Var[39]+0);
  //4o
  x[99]= (x[19]+x[15])/2;
y[99]=(y[19]+y[15])/2;

  //4p
  cont(99, 31, 100, Var[2]/-1+0);

  //Measurements 4p2y
  Var[56]=distance(x[100], y[100], x[46], y[46]);
  //Measurements 4o4p
  Var[57]=distance(x[99], y[99], x[100], y[100]);
  //MoveStart(3)
  x[101]=x[0]+-3.01526402640264;
y[101]=y[0]+-10.6848184818482;
  //MoveEnd(3)
  x[102]=x[0]+-2.96988448844885;
y[102]=y[0]+-9.5049504950495;
  //3q(2)
  x[103] = x[70] + x[102] - x[101] ;
y[103] = y[70] + y[102] - y[101] ;

  //MoveStart(4)
  x[104]=x[0]+6.28754125412541;
y[104]=y[0]+-8.73349834983498;
  //MoveEnd(4)
  x[105]=x[0]+5.60684818481848;
y[105]=y[0]+-9.95874587458746;
  //1z(2)
  x[106] = x[25] + x[105] - x[104] ;
y[106] = y[25] + y[105] - y[104] ;

  //MoveStart(5)
  x[107]=x[0]+6.4236798679868;
y[107]=y[0]+-4.10478547854785;
  //MoveEnd(5)
  x[108]=x[0]+6.60519801980198;
y[108]=y[0]+-4.05940594059406;
  //1u(2)
  x[109] = x[22] + x[108] - x[107] ;
y[109] = y[22] + y[108] - y[107] ;

  //Measurements Front armhole a
  Var[40]=arclength(19, 109, 20);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(6)
  x[110]=x[0]+5.69760726072607;
y[110]=y[0]+-9.5503300330033;
  //MoveEnd(6)
  x[111]=x[0]+5.4707095709571;
y[111]=y[0]+-9.27805280528053;
  //1z(3)
  x[112] = x[106] + x[111] - x[110] ;
y[112] = y[106] + y[111] - y[110] ;

  //Measurements Front armhole b
  Var[41]=arclength(20, 112, 12);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(7)
  x[113]=x[0]+-7.04460778037259;
y[113]=y[0]+-1.91956874158687;
  //MoveEnd(7)
  x[114]=x[0]+-7.72550732581121;
y[114]=y[0]+-2.05574865067459;
  //3k(2)
  x[115] = x[64] + x[114] - x[113] ;
y[115] = y[64] + y[114] - y[113] ;

  //3a3
  x[116]= (x[53]+x[52])/2;
y[116]=(y[53]+y[52])/2;

  //3a4
    intersect(x[116],y[116],x[31],y[31],x[12],y[12],x[53],y[53], 0);
  x[117]=getresultx();
  y[117]=getresulty();

  //3a5
  cont(117, 31, 118, +-1);

  //761
  x[119]=x[31]+0.04;
y[119]=y[31];
  //76a
  x[120]=x[31];
y[120]=y[31]+-0.04;
  //76b
  x[121]=x[120]+-0.04;
y[121]=y[120];
  //76c
  x[122]=x[31]+-0.04;
y[122]=y[31];
  //76d
  x[123]=x[31];
y[123]=y[31]+0.04;
  //4q
  x[124] = x[31];
y[124] = y[20];

  //4r
  x[125]=x[25];
y[125]=y[25]+-10;
  //4s
  x[126]=x[70];
y[126]=y[70]+-10;
  //2y(2)
    Rotate(127, 31, 46, Var[55]+0);
  //2g(4)
    Rotate(128, 31, 31, Var[55]+0);
  //3a(3)
    Rotate(129, 31, 53, Var[55]+0);
  //1i(3)
    Rotate(130, 31, 12, Var[55]+0);
  //1z(5)
    Rotate(131, 31, 112, Var[55]+0);
  //1s(2)
    Rotate(132, 31, 20, Var[55]+0);
  //1u(4)
    Rotate(133, 31, 109, Var[55]+0);
  //1r(3)
    Rotate(134, 31, 19, Var[55]+0);
  //4o(3)
    Rotate(135, 31, 99, Var[55]+0);
  //4y
  x[136] = x[82];
y[136] = y[55];

  //4y1
  x[137]= (x[89]+x[80])/2;
y[137]=(y[89]+y[80])/2;

  //4y2
  cont(135, 46, 138, Var[2]/-1+0);

  //4y3
  x[139] = x[122];
y[139] = y[123];

  //4y4
  x[140] = x[119];
y[140] = y[139];

  //4y5
  x[141] = x[140];
y[141] = y[120];

  //4y6
  x[142] = x[80];
y[142] = y[137];

  //3d1
  x[143]= (x[142]+x[79])/2;
y[143]=(y[142]+y[79])/2;

  }

Flow1View1Objects()
{

  //Object Front
  if (HideObj[0] == 0)
    {

  Obj[0] = newobject("poly");
  current_point=addpoint(x[30],y[30],"LINE");
  current_point=addpoint(x[6],y[6],"LINE");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[10],y[10],"LINE");
  current_point=addpoint(x[14],y[14],"LINE");
  current_point=addpoint(x[16],y[16],"XARC_START");
  current_point=addpoint(x[17],y[17],"XARC_CORNER");
  current_point=addpoint(x[15],y[15],"LINE");
  current_point=addpoint(x[99],y[99],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[19],y[19],"XARC_START");
  current_point=addpoint(x[109],y[109],"XARC_CORNER");
  current_point=addpoint(x[20],y[20],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[112],y[112],"XARC_CORNER");
  current_point=addpoint(x[12],y[12],"LINE");
  current_point=addpoint(x[53],y[53],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[117],y[117],"LINE");
  current_point=addpoint(x[52],y[52],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[86],y[86],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[34],y[34],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[0],"Front"); }
    if (lang == 1) { name_object(Obj[0],"Front"); }
    if (lang == 2) { name_object(Obj[0],"Front"); }
    if (lang == 3) { name_object(Obj[0],"Front"); }
    if (lang == 4) { name_object(Obj[0],"Front"); }
    if (lang == 5) { name_object(Obj[0],"Front"); }
    if (lang == 6) { name_object(Obj[0],"Front"); }
    }

  //Object Front Waist dart
  if (HideObj[1] == 0)
    {

  Obj[1] = newobject("poly");
  current_point=addpoint(x[40],y[40],"LINE");
  current_point=addpoint(x[55],y[55],"LINE");
  current_point=addpoint(x[41],y[41],"LINE");
  current_point=addpoint(x[45],y[45],"LINE");
    if (lang == 0) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 1) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 2) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 3) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 4) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 5) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 6) { name_object(Obj[1],"Front Waist dart"); }
    }

  //Object BACK
  if (HideObj[2] == 0)
    {

  Obj[2] = newobject("poly");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[58],y[58],"LINE");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[62],y[62],"LINE");
  current_point=addpoint(x[68],y[68],"LINE");
  current_point=addpoint(x[56],y[56],"XARC_START");
  current_point=addpoint(x[115],y[115],"XARC_CORNER");
  current_point=addpoint(x[65],y[65],"LINE");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[85],y[85],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[2],"BACK"); }
    if (lang == 1) { name_object(Obj[2],"BACK"); }
    if (lang == 2) { name_object(Obj[2],"BACK"); }
    if (lang == 3) { name_object(Obj[2],"BACK"); }
    if (lang == 4) { name_object(Obj[2],"BACK"); }
    if (lang == 5) { name_object(Obj[2],"BACK"); }
    if (lang == 6) { name_object(Obj[2],"BACK"); }
    }

  //Object Back waist dart
  if (HideObj[3] == 0)
    {

  Obj[3] = newobject("poly");
  current_point=addpoint(x[80],y[80],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  current_point=addpoint(x[136],y[136],"LINE");
  current_point=addpoint(x[83],y[83],"LINE");
    if (lang == 0) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 1) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 2) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 3) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 4) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 5) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 6) { name_object(Obj[3],"Back waist dart"); }
    }

  //Object 60a
  if (HideObj[4] == 0)
    {
  if (lang == 0)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[44],y[44],"LINE");
    if (lang == 0) { name_object(Obj[4],"60a"); }
    if (lang == 1) { name_object(Obj[4],"60a"); }
    if (lang == 2) { name_object(Obj[4],"60a"); }
    if (lang == 3) { name_object(Obj[4],"60a"); }
    if (lang == 4) { name_object(Obj[4],"60a"); }
    if (lang == 5) { name_object(Obj[4],"60a"); }
    if (lang == 6) { name_object(Obj[4],"60a"); }
    }

  //Object 60b
  if (HideObj[5] == 0)
    {
  if (lang == 0)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint(x[124],y[124],"LINE");
    if (lang == 0) { name_object(Obj[5],"60b"); }
    if (lang == 1) { name_object(Obj[5],"60b"); }
    if (lang == 2) { name_object(Obj[5],"60b"); }
    if (lang == 3) { name_object(Obj[5],"60b"); }
    if (lang == 4) { name_object(Obj[5],"60b"); }
    if (lang == 5) { name_object(Obj[5],"60b"); }
    if (lang == 6) { name_object(Obj[5],"60b"); }
    }

  //Object 60c
  if (HideObj[6] == 0)
    {
  if (lang == 0)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[55]+0.5),(y[55]+-1),"LINE");
    if (lang == 0) { name_object(Obj[6],"60c"); }
    if (lang == 1) { name_object(Obj[6],"60c"); }
    if (lang == 2) { name_object(Obj[6],"60c"); }
    if (lang == 3) { name_object(Obj[6],"60c"); }
    if (lang == 4) { name_object(Obj[6],"60c"); }
    if (lang == 5) { name_object(Obj[6],"60c"); }
    if (lang == 6) { name_object(Obj[6],"60c"); }
    }

  //Object 60d
  if (HideObj[7] == 0)
    {
  if (lang == 0)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+1),"LINE");
    if (lang == 0) { name_object(Obj[7],"60d"); }
    if (lang == 1) { name_object(Obj[7],"60d"); }
    if (lang == 2) { name_object(Obj[7],"60d"); }
    if (lang == 3) { name_object(Obj[7],"60d"); }
    if (lang == 4) { name_object(Obj[7],"60d"); }
    if (lang == 5) { name_object(Obj[7],"60d"); }
    if (lang == 6) { name_object(Obj[7],"60d"); }
    }

  //Object 60e
  if (HideObj[8] == 0)
    {
  if (lang == 0)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[68],y[68],"LINE");
    if (lang == 0) { name_object(Obj[8],"60e"); }
    if (lang == 1) { name_object(Obj[8],"60e"); }
    if (lang == 2) { name_object(Obj[8],"60e"); }
    if (lang == 3) { name_object(Obj[8],"60e"); }
    if (lang == 4) { name_object(Obj[8],"60e"); }
    if (lang == 5) { name_object(Obj[8],"60e"); }
    if (lang == 6) { name_object(Obj[8],"60e"); }
    }

  //Object 60f
  if (HideObj[9] == 0)
    {
  if (lang == 0)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[58]+1),(y[58]+1),"LINE");
    if (lang == 0) { name_object(Obj[9],"60f"); }
    if (lang == 1) { name_object(Obj[9],"60f"); }
    if (lang == 2) { name_object(Obj[9],"60f"); }
    if (lang == 3) { name_object(Obj[9],"60f"); }
    if (lang == 4) { name_object(Obj[9],"60f"); }
    if (lang == 5) { name_object(Obj[9],"60f"); }
    if (lang == 6) { name_object(Obj[9],"60f"); }
    }

  //Object Front Bust Dart
  if (HideObj[10] == 0)
    {

  Obj[10] = newobject("poly");
  current_point=addpoint(x[53],y[53],"LINE");
  current_point=addpoint(x[118],y[118],"LINE");
  current_point=addpoint(x[52],y[52],"OPEN");
    if (lang == 0) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 1) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 2) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 3) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 4) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 5) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 6) { name_object(Obj[10],"Front Bust Dart"); }
    }

  //Object Back Shoulder Dart
  if (HideObj[11] == 0)
    {

  Obj[11] = newobject("poly");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[89],y[89],"LINE");
  current_point=addpoint(x[98],y[98],"OPEN");
    if (lang == 0) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 1) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 2) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 3) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 4) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 5) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 6) { name_object(Obj[11],"Back Shoulder Dart"); }
    }

  //Object txt1
  if (HideObj[18] == 0)
    {
  if (lang == 0)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint(x[124],(y[124]+1),"LINE");
    if (lang == 0) { name_object(Obj[18],"txt1"); }
    if (lang == 1) { name_object(Obj[18],"txt1"); }
    if (lang == 2) { name_object(Obj[18],"txt1"); }
    if (lang == 3) { name_object(Obj[18],"txt1"); }
    if (lang == 4) { name_object(Obj[18],"txt1"); }
    if (lang == 5) { name_object(Obj[18],"txt1"); }
    if (lang == 6) { name_object(Obj[18],"txt1"); }
    }

  //Object txt4
  if (HideObj[21] == 0)
    {
  if (lang == 0)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+2),"LINE");
    if (lang == 0) { name_object(Obj[21],"txt4"); }
    if (lang == 1) { name_object(Obj[21],"txt4"); }
    if (lang == 2) { name_object(Obj[21],"txt4"); }
    if (lang == 3) { name_object(Obj[21],"txt4"); }
    if (lang == 4) { name_object(Obj[21],"txt4"); }
    if (lang == 5) { name_object(Obj[21],"txt4"); }
    if (lang == 6) { name_object(Obj[21],"txt4"); }
    }

  //Object front waistline
  if (HideObj[26] == 0)
    {

  Obj[26] = newobject("poly");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[26],"front waistline"); }
    if (lang == 1) { name_object(Obj[26],"front waistline"); }
    if (lang == 2) { name_object(Obj[26],"front waistline"); }
    if (lang == 3) { name_object(Obj[26],"front waistline"); }
    if (lang == 4) { name_object(Obj[26],"front waistline"); }
    if (lang == 5) { name_object(Obj[26],"front waistline"); }
    if (lang == 6) { name_object(Obj[26],"front waistline"); }
    }

  //Object Back waistline
  if (HideObj[27] == 0)
    {

  Obj[27] = newobject("poly");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[78],y[78],"OPEN");
    if (lang == 0) { name_object(Obj[27],"Back waistline"); }
    if (lang == 1) { name_object(Obj[27],"Back waistline"); }
    if (lang == 2) { name_object(Obj[27],"Back waistline"); }
    if (lang == 3) { name_object(Obj[27],"Back waistline"); }
    if (lang == 4) { name_object(Obj[27],"Back waistline"); }
    if (lang == 5) { name_object(Obj[27],"Back waistline"); }
    if (lang == 6) { name_object(Obj[27],"Back waistline"); }
    }

  //Object bust point
  if (HideObj[28] == 0)
    {

  Obj[28] = newobject("poly");
  current_point=addpoint(x[139],y[139],"LINE");
  current_point=addpoint(x[123],y[123],"XARC_START");
  current_point=addpoint(x[140],y[140],"XARC_CORNER");
  current_point=addpoint(x[119],y[119],"XARC_START");
  current_point=addpoint(x[141],y[141],"XARC_CORNER");
  current_point=addpoint(x[120],y[120],"XARC_START");
  current_point=addpoint(x[121],y[121],"XARC_CORNER");
  current_point=addpoint(x[122],y[122],"LINE");
    if (lang == 0) { name_object(Obj[28],"bust point"); }
    if (lang == 1) { name_object(Obj[28],"bust point"); }
    if (lang == 2) { name_object(Obj[28],"bust point"); }
    if (lang == 3) { name_object(Obj[28],"bust point"); }
    if (lang == 4) { name_object(Obj[28],"bust point"); }
    if (lang == 5) { name_object(Obj[28],"bust point"); }
    if (lang == 6) { name_object(Obj[28],"bust point"); }
    }
  offset_mark(0, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(2, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow1View2()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow1View2");
    }
  Flow1View2Points();
  }

Flow1View2Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //if Back shoulder line < Front shoulder line
  //If Point here
  if( Var[36] < Var[35] )
    {
  //Measurements Back shoulder dart
  Var[37]=  
  
0;
    }
  //if Full Front Length < Nape to Waist
  //If Point here
  if( Var[4] < Var[7] )
    {
  //Measurements Bust dart
  Var[25]=  
  
0;
    }
  //1
  x[3]=x[0];
y[3]=y[0];
  //1a
  x[4]=x[3]+Var[19]/4+3;
y[4]=y[3];
  //1b
  x[5]=x[4];
y[5]=y[4]+Var[4]/-1;
  //1c
  x[6]=x[5];
y[6]=y[5]+Var[13]/-3;
  //1d
  x[7]=x[6]+Var[19]/-4;
y[7]=y[6];
  //1e
  x[8]=x[5]+Var[18]/-4+-0.5;
y[8]=y[5];
  //1f
  x[9]=x[5];
y[9]=y[5]+Var[7]/2;
  //1g
  x[10]=x[9];
y[10]=y[9]+Var[20]/-4;
  //1h
  x[11]=x[10]+Var[33]/-1+-0.5;
y[11]=y[10];
  //1i
  x[12]=x[11];
y[12]=y[11]+Var[25];
  //1k
  x[13] = x[4];
y[13] = y[12];

  //Measurements armheight
  Var[26]=distance(x[13], y[13], x[4], y[4]);
  //1l
  x[14]=x[13];
y[14]=y[13]+Var[26]/4;
  //1n
  x[15]=x[4]+Var[27]/-2;
y[15]=y[4];
  //1o
  x[16]=x[4];
y[16]=y[4]+Var[27]/-2+-0.5;
  //1p
  x[17] = x[15];
y[17] = y[16];

  //Measurements Front neckline
  Var[47]=arclength(15, 17, 16);
  //1q
  x[18]=x[4]+Var[8]/-2;
y[18]=y[4];
  //1r
  x[19]=x[18];
y[19]=y[18]+-1.5;
  //Measurements Front shoulder line
  Var[35]=distance(x[19], y[19], x[15], y[15]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //1s
  x[20]=x[14]+Var[5]/-2;
y[20]=y[14];
  //1t
  x[21]= (x[20]+x[19])/2;
y[21]=(y[20]+y[19])/2;

  //1u
  x[22]=x[21]+0.375;
y[22]=y[21];
  //1v
  x[23]= (x[22]+x[20])/2;
y[23]=(y[22]+y[20])/2;

  //1y
  x[24] = x[22];
y[24] = y[23];

  //1z
  x[25] = x[24];
y[25] = y[12];

  //2
  x[26]= (x[25]+x[12])/2;
y[26]=(y[25]+y[12])/2;

  //2a
  x[27]= (x[26]+x[25])/2;
y[27]=(y[26]+y[25])/2;

  //2d
  x[28]=x[27];
y[28]=y[27]+Var[26]/-4;
  //Measurements front armhole c
  Var[42]=arclength(20, 28, 12);
  //2e
  x[29]=x[8]+Var[21]/-4;
y[29]=y[8];
  //2f
  x[30]=x[7]+Var[22]/-4;
y[30]=y[7];
  //2g
  x[31]=x[4]+Var[1]/-2;
y[31]=y[4]+Var[3]/-1;
  //2h
  cont(30, 12, 32, +-2);

  //2i
    intersect(x[32],y[32],x[30],y[30],x[29],y[29],x[5],y[5], 0);
  x[33]=getresultx();
  y[33]=getresulty();

  //Measurements Front wr
  Var[28]=distance(x[33], y[33], x[29], y[29]);
  //2j
  x[34]=x[33]+Var[28]/3;
y[34]=y[33];
  //2k
  cont(34, 32, 35, Var[25]/-1+0);

  //Measurements Rotate Points Angle
  Var[29]=normalizeangle(angle(x[31], y[31], x[35], y[35]) - angle(x[31], y[31], x[32], y[32]))*180/3.14159;
  //2l
  x[36]= (x[30]+x[33])/2;
y[36]=(y[30]+y[33])/2;

  //2h1
  Dart(37, 32,  31,  Var[25] /-1 + 0, 0);

  //2m
  x[38] = x[31];
y[38] = y[6];

  //2n
  x[39] = x[31];
y[39] = y[5];

  //2o
  x[40]=x[39]+Var[28]/-3;
y[40]=y[39];
  //2p
  x[41]=x[39]+Var[28]/3;
y[41]=y[39];
  //2q
  x[42]=x[31];
y[42]=y[31]+Var[2]/-1;
  //2r
  x[43] = x[10];
y[43] = y[31];

  //2s
  x[44] = x[43];
y[44] = y[42];

  //Measurements Underbust level from waist
  Var[34]=distance(x[5], y[5], x[44], y[44]);
  //2x
  x[45]=x[31];
y[45]=y[31]+-1;
  //2y
  x[46]=x[31];
y[46]=y[31]+1;
  //2z
  x[47]=x[24]+-1;
y[47]=y[24];
  //3
  x[48] = x[31];
y[48] = y[47];

  //2h(2)
    Rotate(49, 31, 32, Var[29]+0);
  //2g(2)
    Rotate(50, 31, 31, Var[29]+0);
  //1i(2)
    Rotate(51, 31, 12, Var[29]+0);
  //Measurements Rotate Points Angle(2)
  Var[30]=normalizeangle(angle(x[50], y[50], x[12], y[12]) - angle(x[50], y[50], x[51], y[51]))*180/3.14159;
  //3a
    intersect(x[51],y[51],x[34],y[34],x[31],y[31],x[49],y[49], 0);
  x[52]=getresultx();
  y[52]=getresulty();

  //3a(2)
    Rotate(53, 50, 52, Var[30]+0);
  //Measurements Rotate Points Angle(6)
  Var[52]=normalizeangle(angle(x[31], y[31], x[53], y[53]) - angle(x[31], y[31], x[37], y[37]))*180/3.14159;
  //Measurements Rotate Points Angle(7)
  Var[55]=normalizeangle(angle(x[31], y[31], x[52], y[52]) - angle(x[31], y[31], x[53], y[53]))*180/3.14159;
  //2g(3)
    Rotate(54, 50, 50, Var[30]+0);
  //Measurements Rotate Points Angle(5)
  Var[51]=normalizeangle(angle(x[54], y[54], x[52], y[52]) - angle(x[54], y[54], x[53], y[53]))*180/3.14159;
  //3b
  x[55]=x[38];
y[55]=y[38]+Var[31]/4;
  //3c
  x[56]=x[3]+Var[19]/-4;
y[56]=y[3]+Var[25]/-1;
  //3d
  x[57]=x[56];
y[57]=y[56]+Var[7]/-1;
  //3e
  x[58]=x[57];
y[58]=y[57]+Var[31]/-1;
  //3f
  x[59]=x[58]+Var[19]/4;
y[59]=y[58];
  //3g
  x[60]=x[57]+Var[18]/4+-0.5;
y[60]=y[57];
  //3h
  x[61]= (x[56]+x[57])/2;
y[61]=(y[56]+y[57])/2;

  //3i
  x[62]=x[61];
y[62]=y[61]+Var[20]/-4;
  //3j
  x[63]=x[62]+Var[0]/4+-0.5;
y[63]=y[62];
  //3k
  x[64]=x[56]+Var[27]/2;
y[64]=y[56];
  //3l
  x[65]=x[64];
y[65]=y[64]+0.75;
  //Measurements Back neckline
  Var[48]=arclength(56, 64, 65);
  //3m
  x[66]=x[56]+Var[9]/2;
y[66]=y[56];
  //3n
  x[67]=x[66];
y[67]=y[66]+-1.25;
  //Measurements Back shoulder line
  Var[36]=distance(x[65], y[65], x[67], y[67]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //3o
  x[68]= (x[56]+x[62])/2;
y[68]=(y[56]+y[62])/2;

  //3p
  x[69]=x[68]+Var[6]/2;
y[69]=y[68];
  //3q
  x[70] = x[69];
y[70] = y[63];

  //3r
  x[71]= (x[67]+x[69])/2;
y[71]=(y[67]+y[69])/2;

  //3s
  x[72] = x[69];
y[72] = y[71];

  //Measurements Back armhole a
  Var[43]=arclength(67, 72, 69);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3t
  x[73]=x[63]+Var[20]/4;
y[73]=y[63];
  //3u
  x[74]=x[60]+Var[21]/4;
y[74]=y[60];
  //3v
  x[75]=x[59]+Var[22]/4;
y[75]=y[59];
  //3w
    intersect(x[75],y[75],x[73],y[73],x[57],y[57],x[74],y[74], 0);
  x[76]=getresultx();
  y[76]=getresulty();

  //Measurements Back Waist reduction
  Var[32]=distance(x[76], y[76], x[74], y[74]);
  //3x
  x[77]= (x[76]+x[75])/2;
y[77]=(y[76]+y[75])/2;

  //3y
  x[78]=x[76]+Var[32]/-3;
y[78]=y[76];
  //33z
  x[79]= (x[68]+x[69])/2;
y[79]=(y[68]+y[69])/2;

  //4
  x[80] = x[79];
y[80] = y[62];

  //4a
  x[81] = x[80];
y[81] = y[57];

  //4b
  x[82] = x[81];
y[82] = y[58];

  //4c
  x[83]=x[81]+Var[32]/-3;
y[83]=y[81];
  //4d
  x[84]=x[81]+Var[32]/3;
y[84]=y[81];
  //4e
  cont(73, 78, 85, Var[34]/-1+0);

  //4f
  cont(52, 34, 86, Var[34]/-1+0);

  //4g
  cont(85, 73, 87, Var[26]/-4+0);

  //4h
  x[88]= (x[65]+x[67])/2;
y[88]=(y[65]+y[67])/2;

  //4i
  right_ang(89, 88, 65,  + -3, 0);

  //4j
  right_ang(90, 69, 67,  + -4, 0);

  //4k
    intersect(x[88],y[88],x[89],y[89],x[69],y[69],x[90],y[90], 0);
  x[91]=getresultx();
  y[91]=getresulty();

  //4l
  cont(65, 88, 92, Var[37]/-2+0);

  //4m
  cont(67, 88, 93, Var[37]/-2+0);

  //Measurements Rotate Points Angle(3)
  Var[38]=normalizeangle(angle(x[91], y[91], x[92], y[92]) - angle(x[91], y[91], x[93], y[93]))*180/3.14159;
  //4k(2)
    Rotate(94, 91, 91, Var[38]+0);
  //3p(2)
    Rotate(95, 91, 69, Var[38]+0);
  //Measurements Rotate Points Angle(4)
  Var[39]=normalizeangle(angle(x[91], y[91], x[69], y[69]) - angle(x[91], y[91], x[95], y[95]))*180/3.14159;
  //Measurements Back armhole b
  Var[44]=arclength(69, 95, 73);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3n(2)
    Rotate(96, 91, 67, Var[38]+0);
  //4n
    intersect(x[96],y[96],x[65],y[65],x[94],y[94],x[92],y[92], 0);
  x[97]=getresultx();
  y[97]=getresulty();

  //4n(2)
    Rotate(98, 91, 97, Var[39]+0);
  //4o
  x[99]= (x[19]+x[15])/2;
y[99]=(y[19]+y[15])/2;

  //4p
  cont(99, 31, 100, Var[2]/-1+0);

  //Measurements 4p2y
  Var[56]=distance(x[100], y[100], x[46], y[46]);
  //Measurements 4o4p
  Var[57]=distance(x[99], y[99], x[100], y[100]);
  //MoveStart(3)
  x[101]=x[0]+-3.01526402640264;
y[101]=y[0]+-10.6848184818482;
  //MoveEnd(3)
  x[102]=x[0]+-2.96988448844885;
y[102]=y[0]+-9.5049504950495;
  //3q(2)
  x[103] = x[70] + x[102] - x[101] ;
y[103] = y[70] + y[102] - y[101] ;

  //MoveStart(4)
  x[104]=x[0]+6.28754125412541;
y[104]=y[0]+-8.73349834983498;
  //MoveEnd(4)
  x[105]=x[0]+5.60684818481848;
y[105]=y[0]+-9.95874587458746;
  //1z(2)
  x[106] = x[25] + x[105] - x[104] ;
y[106] = y[25] + y[105] - y[104] ;

  //MoveStart(5)
  x[107]=x[0]+6.4236798679868;
y[107]=y[0]+-4.10478547854785;
  //MoveEnd(5)
  x[108]=x[0]+6.60519801980198;
y[108]=y[0]+-4.05940594059406;
  //1u(2)
  x[109] = x[22] + x[108] - x[107] ;
y[109] = y[22] + y[108] - y[107] ;

  //Measurements Front armhole a
  Var[40]=arclength(19, 109, 20);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(6)
  x[110]=x[0]+5.69760726072607;
y[110]=y[0]+-9.5503300330033;
  //MoveEnd(6)
  x[111]=x[0]+5.4707095709571;
y[111]=y[0]+-9.27805280528053;
  //1z(3)
  x[112] = x[106] + x[111] - x[110] ;
y[112] = y[106] + y[111] - y[110] ;

  //Measurements Front armhole b
  Var[41]=arclength(20, 112, 12);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(7)
  x[113]=x[0]+-7.04460778037259;
y[113]=y[0]+-1.91956874158687;
  //MoveEnd(7)
  x[114]=x[0]+-7.72550732581121;
y[114]=y[0]+-2.05574865067459;
  //3k(2)
  x[115] = x[64] + x[114] - x[113] ;
y[115] = y[64] + y[114] - y[113] ;

  //3a3
  x[116]= (x[53]+x[52])/2;
y[116]=(y[53]+y[52])/2;

  //3a4
    intersect(x[116],y[116],x[31],y[31],x[12],y[12],x[53],y[53], 0);
  x[117]=getresultx();
  y[117]=getresulty();

  //3a5
  cont(117, 31, 118, +-1);

  //4o(2)
    Rotate(144, 54, 99, Var[51]+0);
  //1r(2)
    Rotate(145, 54, 19, Var[51]+0);
  //1u(3)
    Rotate(146, 54, 109, Var[51]+0);
  //1s(4)
    Rotate(147, 54, 20, Var[51]+0);
  //1z(4)
    Rotate(148, 54, 112, Var[51]+0);
  //1i(4)
    Rotate(149, 54, 12, Var[51]+0);
  //761
  x[119]=x[31]+0.04;
y[119]=y[31];
  //76a
  x[120]=x[31];
y[120]=y[31]+-0.04;
  //76b
  x[121]=x[120]+-0.04;
y[121]=y[120];
  //76c
  x[122]=x[31]+-0.04;
y[122]=y[31];
  //76d
  x[123]=x[31];
y[123]=y[31]+0.04;
  //4q
  x[124] = x[31];
y[124] = y[20];

  //4r
  x[125]=x[25];
y[125]=y[25]+-10;
  //4s
  x[126]=x[70];
y[126]=y[70]+-10;
  //2y(2)
    Rotate(127, 31, 46, Var[55]+0);
  //2g(4)
    Rotate(128, 31, 31, Var[55]+0);
  //3a(3)
    Rotate(129, 31, 53, Var[55]+0);
  //1i(3)
    Rotate(130, 31, 12, Var[55]+0);
  //1z(5)
    Rotate(131, 31, 112, Var[55]+0);
  //1s(2)
    Rotate(132, 31, 20, Var[55]+0);
  //1u(4)
    Rotate(133, 31, 109, Var[55]+0);
  //1r(3)
    Rotate(134, 31, 19, Var[55]+0);
  //4o(3)
    Rotate(135, 31, 99, Var[55]+0);
  //4y
  x[136] = x[82];
y[136] = y[55];

  //4y1
  x[137]= (x[89]+x[80])/2;
y[137]=(y[89]+y[80])/2;

  //4y2
  cont(135, 46, 138, Var[2]/-1+0);

  //4y3
  x[139] = x[122];
y[139] = y[123];

  //4y4
  x[140] = x[119];
y[140] = y[139];

  //4y5
  x[141] = x[140];
y[141] = y[120];

  //4y6
  x[142] = x[80];
y[142] = y[137];

  //4y7
  x[150]= (x[99]+x[135])/2;
y[150]=(y[99]+y[135])/2;

  //Measurements half shoulder dart front
  Var[58]=distance(x[150], y[150], x[99], y[99]);
  //1y1
  cont(15, 99, 151, Var[58]/-1+0);

  //Measurements dart uptake length
  Var[59]=distance(x[151], y[151], x[46], y[46]);
  //1y2
  cont(150, 46, 152, Var[59]/-1+0);

  //3d1
  x[143]= (x[142]+x[79])/2;
y[143]=(y[142]+y[79])/2;

  }

Flow1View2Objects()
{

  //Object Front
  if (HideObj[0] == 0)
    {

  Obj[0] = newobject("poly");
  current_point=addpoint(x[30],y[30],"LINE");
  current_point=addpoint(x[6],y[6],"LINE");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[10],y[10],"LINE");
  current_point=addpoint(x[14],y[14],"LINE");
  current_point=addpoint(x[16],y[16],"XARC_START");
  current_point=addpoint(x[17],y[17],"XARC_CORNER");
  current_point=addpoint(x[15],y[15],"LINE");
  current_point=addpoint(x[99],y[99],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[152],y[152],"LINE");
  current_point=addpoint(x[144],y[144],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[145],y[145],"XARC_START");
  current_point=addpoint(x[146],y[146],"XARC_CORNER");
  current_point=addpoint(x[147],y[147],"XARC_START");
  current_point=addpoint(x[148],y[148],"XARC_CORNER");
  current_point=addpoint(x[149],y[149],"LINE");
  current_point=addpoint(x[52],y[52],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[86],y[86],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[34],y[34],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[0],"Front"); }
    if (lang == 1) { name_object(Obj[0],"Front"); }
    if (lang == 2) { name_object(Obj[0],"Front"); }
    if (lang == 3) { name_object(Obj[0],"Front"); }
    if (lang == 4) { name_object(Obj[0],"Front"); }
    if (lang == 5) { name_object(Obj[0],"Front"); }
    if (lang == 6) { name_object(Obj[0],"Front"); }
    }

  //Object Front Waist dart
  if (HideObj[1] == 0)
    {

  Obj[1] = newobject("poly");
  current_point=addpoint(x[40],y[40],"LINE");
  current_point=addpoint(x[55],y[55],"LINE");
  current_point=addpoint(x[41],y[41],"LINE");
  current_point=addpoint(x[45],y[45],"LINE");
    if (lang == 0) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 1) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 2) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 3) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 4) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 5) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 6) { name_object(Obj[1],"Front Waist dart"); }
    }

  //Object BACK
  if (HideObj[2] == 0)
    {

  Obj[2] = newobject("poly");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[58],y[58],"LINE");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[62],y[62],"LINE");
  current_point=addpoint(x[68],y[68],"LINE");
  current_point=addpoint(x[56],y[56],"XARC_START");
  current_point=addpoint(x[115],y[115],"XARC_CORNER");
  current_point=addpoint(x[65],y[65],"LINE");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[85],y[85],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[2],"BACK"); }
    if (lang == 1) { name_object(Obj[2],"BACK"); }
    if (lang == 2) { name_object(Obj[2],"BACK"); }
    if (lang == 3) { name_object(Obj[2],"BACK"); }
    if (lang == 4) { name_object(Obj[2],"BACK"); }
    if (lang == 5) { name_object(Obj[2],"BACK"); }
    if (lang == 6) { name_object(Obj[2],"BACK"); }
    }

  //Object Back waist dart
  if (HideObj[3] == 0)
    {

  Obj[3] = newobject("poly");
  current_point=addpoint(x[80],y[80],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  current_point=addpoint(x[136],y[136],"LINE");
  current_point=addpoint(x[83],y[83],"LINE");
    if (lang == 0) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 1) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 2) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 3) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 4) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 5) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 6) { name_object(Obj[3],"Back waist dart"); }
    }

  //Object 60a
  if (HideObj[4] == 0)
    {
  if (lang == 0)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[44],y[44],"LINE");
    if (lang == 0) { name_object(Obj[4],"60a"); }
    if (lang == 1) { name_object(Obj[4],"60a"); }
    if (lang == 2) { name_object(Obj[4],"60a"); }
    if (lang == 3) { name_object(Obj[4],"60a"); }
    if (lang == 4) { name_object(Obj[4],"60a"); }
    if (lang == 5) { name_object(Obj[4],"60a"); }
    if (lang == 6) { name_object(Obj[4],"60a"); }
    }

  //Object 60b
  if (HideObj[5] == 0)
    {
  if (lang == 0)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint(x[124],y[124],"LINE");
    if (lang == 0) { name_object(Obj[5],"60b"); }
    if (lang == 1) { name_object(Obj[5],"60b"); }
    if (lang == 2) { name_object(Obj[5],"60b"); }
    if (lang == 3) { name_object(Obj[5],"60b"); }
    if (lang == 4) { name_object(Obj[5],"60b"); }
    if (lang == 5) { name_object(Obj[5],"60b"); }
    if (lang == 6) { name_object(Obj[5],"60b"); }
    }

  //Object 60c
  if (HideObj[6] == 0)
    {
  if (lang == 0)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[55]+0.5),(y[55]+-1),"LINE");
    if (lang == 0) { name_object(Obj[6],"60c"); }
    if (lang == 1) { name_object(Obj[6],"60c"); }
    if (lang == 2) { name_object(Obj[6],"60c"); }
    if (lang == 3) { name_object(Obj[6],"60c"); }
    if (lang == 4) { name_object(Obj[6],"60c"); }
    if (lang == 5) { name_object(Obj[6],"60c"); }
    if (lang == 6) { name_object(Obj[6],"60c"); }
    }

  //Object 60d
  if (HideObj[7] == 0)
    {
  if (lang == 0)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+1),"LINE");
    if (lang == 0) { name_object(Obj[7],"60d"); }
    if (lang == 1) { name_object(Obj[7],"60d"); }
    if (lang == 2) { name_object(Obj[7],"60d"); }
    if (lang == 3) { name_object(Obj[7],"60d"); }
    if (lang == 4) { name_object(Obj[7],"60d"); }
    if (lang == 5) { name_object(Obj[7],"60d"); }
    if (lang == 6) { name_object(Obj[7],"60d"); }
    }

  //Object 60e
  if (HideObj[8] == 0)
    {
  if (lang == 0)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[68],y[68],"LINE");
    if (lang == 0) { name_object(Obj[8],"60e"); }
    if (lang == 1) { name_object(Obj[8],"60e"); }
    if (lang == 2) { name_object(Obj[8],"60e"); }
    if (lang == 3) { name_object(Obj[8],"60e"); }
    if (lang == 4) { name_object(Obj[8],"60e"); }
    if (lang == 5) { name_object(Obj[8],"60e"); }
    if (lang == 6) { name_object(Obj[8],"60e"); }
    }

  //Object 60f
  if (HideObj[9] == 0)
    {
  if (lang == 0)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[58]+1),(y[58]+1),"LINE");
    if (lang == 0) { name_object(Obj[9],"60f"); }
    if (lang == 1) { name_object(Obj[9],"60f"); }
    if (lang == 2) { name_object(Obj[9],"60f"); }
    if (lang == 3) { name_object(Obj[9],"60f"); }
    if (lang == 4) { name_object(Obj[9],"60f"); }
    if (lang == 5) { name_object(Obj[9],"60f"); }
    if (lang == 6) { name_object(Obj[9],"60f"); }
    }

  //Object Back Shoulder Dart
  if (HideObj[11] == 0)
    {

  Obj[11] = newobject("poly");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[89],y[89],"LINE");
  current_point=addpoint(x[98],y[98],"OPEN");
    if (lang == 0) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 1) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 2) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 3) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 4) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 5) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 6) { name_object(Obj[11],"Back Shoulder Dart"); }
    }

  //Object txt1
  if (HideObj[18] == 0)
    {
  if (lang == 0)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint(x[124],(y[124]+1),"LINE");
    if (lang == 0) { name_object(Obj[18],"txt1"); }
    if (lang == 1) { name_object(Obj[18],"txt1"); }
    if (lang == 2) { name_object(Obj[18],"txt1"); }
    if (lang == 3) { name_object(Obj[18],"txt1"); }
    if (lang == 4) { name_object(Obj[18],"txt1"); }
    if (lang == 5) { name_object(Obj[18],"txt1"); }
    if (lang == 6) { name_object(Obj[18],"txt1"); }
    }

  //Object txt4
  if (HideObj[21] == 0)
    {
  if (lang == 0)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+2),"LINE");
    if (lang == 0) { name_object(Obj[21],"txt4"); }
    if (lang == 1) { name_object(Obj[21],"txt4"); }
    if (lang == 2) { name_object(Obj[21],"txt4"); }
    if (lang == 3) { name_object(Obj[21],"txt4"); }
    if (lang == 4) { name_object(Obj[21],"txt4"); }
    if (lang == 5) { name_object(Obj[21],"txt4"); }
    if (lang == 6) { name_object(Obj[21],"txt4"); }
    }

  //Object front waistline
  if (HideObj[26] == 0)
    {

  Obj[26] = newobject("poly");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[26],"front waistline"); }
    if (lang == 1) { name_object(Obj[26],"front waistline"); }
    if (lang == 2) { name_object(Obj[26],"front waistline"); }
    if (lang == 3) { name_object(Obj[26],"front waistline"); }
    if (lang == 4) { name_object(Obj[26],"front waistline"); }
    if (lang == 5) { name_object(Obj[26],"front waistline"); }
    if (lang == 6) { name_object(Obj[26],"front waistline"); }
    }

  //Object Back waistline
  if (HideObj[27] == 0)
    {

  Obj[27] = newobject("poly");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[78],y[78],"OPEN");
    if (lang == 0) { name_object(Obj[27],"Back waistline"); }
    if (lang == 1) { name_object(Obj[27],"Back waistline"); }
    if (lang == 2) { name_object(Obj[27],"Back waistline"); }
    if (lang == 3) { name_object(Obj[27],"Back waistline"); }
    if (lang == 4) { name_object(Obj[27],"Back waistline"); }
    if (lang == 5) { name_object(Obj[27],"Back waistline"); }
    if (lang == 6) { name_object(Obj[27],"Back waistline"); }
    }

  //Object bust point
  if (HideObj[28] == 0)
    {

  Obj[28] = newobject("poly");
  current_point=addpoint(x[139],y[139],"LINE");
  current_point=addpoint(x[123],y[123],"XARC_START");
  current_point=addpoint(x[140],y[140],"XARC_CORNER");
  current_point=addpoint(x[119],y[119],"XARC_START");
  current_point=addpoint(x[141],y[141],"XARC_CORNER");
  current_point=addpoint(x[120],y[120],"XARC_START");
  current_point=addpoint(x[121],y[121],"XARC_CORNER");
  current_point=addpoint(x[122],y[122],"LINE");
    if (lang == 0) { name_object(Obj[28],"bust point"); }
    if (lang == 1) { name_object(Obj[28],"bust point"); }
    if (lang == 2) { name_object(Obj[28],"bust point"); }
    if (lang == 3) { name_object(Obj[28],"bust point"); }
    if (lang == 4) { name_object(Obj[28],"bust point"); }
    if (lang == 5) { name_object(Obj[28],"bust point"); }
    if (lang == 6) { name_object(Obj[28],"bust point"); }
    }

  //Object dart fill shoulder
  if (HideObj[29] == 0)
    {

  Obj[29] = newobject("poly");
  current_point=addpoint(x[135],y[135],"LINE");
  current_point=addpoint(x[46],y[46],"LINE");
  current_point=addpoint(x[99],y[99],"OPEN");
    if (lang == 0) { name_object(Obj[29],"dart fill shoulder"); }
    if (lang == 1) { name_object(Obj[29],"dart fill shoulder"); }
    if (lang == 2) { name_object(Obj[29],"dart fill shoulder"); }
    if (lang == 3) { name_object(Obj[29],"dart fill shoulder"); }
    if (lang == 4) { name_object(Obj[29],"dart fill shoulder"); }
    if (lang == 5) { name_object(Obj[29],"dart fill shoulder"); }
    if (lang == 6) { name_object(Obj[29],"dart fill shoulder"); }
    }
  offset_mark(0, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(2, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow1View3()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow1View3");
    }
  Flow1View3Points();
  }

Flow1View3Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //if Back shoulder line < Front shoulder line
  //If Point here
  if( Var[36] < Var[35] )
    {
  //Measurements Back shoulder dart
  Var[37]=  
  
0;
    }
  //if Full Front Length < Nape to Waist
  //If Point here
  if( Var[4] < Var[7] )
    {
  //Measurements Bust dart
  Var[25]=  
  
0;
    }
  //1
  x[3]=x[0];
y[3]=y[0];
  //1a
  x[4]=x[3]+Var[19]/4+3;
y[4]=y[3];
  //1b
  x[5]=x[4];
y[5]=y[4]+Var[4]/-1;
  //1c
  x[6]=x[5];
y[6]=y[5]+Var[13]/-3;
  //1d
  x[7]=x[6]+Var[19]/-4;
y[7]=y[6];
  //1e
  x[8]=x[5]+Var[18]/-4+-0.5;
y[8]=y[5];
  //1f
  x[9]=x[5];
y[9]=y[5]+Var[7]/2;
  //1g
  x[10]=x[9];
y[10]=y[9]+Var[20]/-4;
  //1h
  x[11]=x[10]+Var[33]/-1+-0.5;
y[11]=y[10];
  //1i
  x[12]=x[11];
y[12]=y[11]+Var[25];
  //1k
  x[13] = x[4];
y[13] = y[12];

  //Measurements armheight
  Var[26]=distance(x[13], y[13], x[4], y[4]);
  //1l
  x[14]=x[13];
y[14]=y[13]+Var[26]/4;
  //1n
  x[15]=x[4]+Var[27]/-2;
y[15]=y[4];
  //1o
  x[16]=x[4];
y[16]=y[4]+Var[27]/-2+-0.5;
  //1p
  x[17] = x[15];
y[17] = y[16];

  //Measurements Front neckline
  Var[47]=arclength(15, 17, 16);
  //1q
  x[18]=x[4]+Var[8]/-2;
y[18]=y[4];
  //1r
  x[19]=x[18];
y[19]=y[18]+-1.5;
  //Measurements Front shoulder line
  Var[35]=distance(x[19], y[19], x[15], y[15]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //1s
  x[20]=x[14]+Var[5]/-2;
y[20]=y[14];
  //1t
  x[21]= (x[20]+x[19])/2;
y[21]=(y[20]+y[19])/2;

  //1u
  x[22]=x[21]+0.375;
y[22]=y[21];
  //1v
  x[23]= (x[22]+x[20])/2;
y[23]=(y[22]+y[20])/2;

  //1y
  x[24] = x[22];
y[24] = y[23];

  //1z
  x[25] = x[24];
y[25] = y[12];

  //2
  x[26]= (x[25]+x[12])/2;
y[26]=(y[25]+y[12])/2;

  //2a
  x[27]= (x[26]+x[25])/2;
y[27]=(y[26]+y[25])/2;

  //2d
  x[28]=x[27];
y[28]=y[27]+Var[26]/-4;
  //Measurements front armhole c
  Var[42]=arclength(20, 28, 12);
  //2e
  x[29]=x[8]+Var[21]/-4;
y[29]=y[8];
  //2f
  x[30]=x[7]+Var[22]/-4;
y[30]=y[7];
  //2g
  x[31]=x[4]+Var[1]/-2;
y[31]=y[4]+Var[3]/-1;
  //2h
  cont(30, 12, 32, +-2);

  //2i
    intersect(x[32],y[32],x[30],y[30],x[29],y[29],x[5],y[5], 0);
  x[33]=getresultx();
  y[33]=getresulty();

  //Measurements Front wr
  Var[28]=distance(x[33], y[33], x[29], y[29]);
  //2j
  x[34]=x[33]+Var[28]/3;
y[34]=y[33];
  //2k
  cont(34, 32, 35, Var[25]/-1+0);

  //Measurements Rotate Points Angle
  Var[29]=normalizeangle(angle(x[31], y[31], x[35], y[35]) - angle(x[31], y[31], x[32], y[32]))*180/3.14159;
  //2l
  x[36]= (x[30]+x[33])/2;
y[36]=(y[30]+y[33])/2;

  //2h1
  Dart(37, 32,  31,  Var[25] /-1 + 0, 0);

  //2m
  x[38] = x[31];
y[38] = y[6];

  //2n
  x[39] = x[31];
y[39] = y[5];

  //2o
  x[40]=x[39]+Var[28]/-3;
y[40]=y[39];
  //2p
  x[41]=x[39]+Var[28]/3;
y[41]=y[39];
  //2q
  x[42]=x[31];
y[42]=y[31]+Var[2]/-1;
  //2r
  x[43] = x[10];
y[43] = y[31];

  //2s
  x[44] = x[43];
y[44] = y[42];

  //Measurements Underbust level from waist
  Var[34]=distance(x[5], y[5], x[44], y[44]);
  //2x
  x[45]=x[31];
y[45]=y[31]+-1;
  //2y
  x[46]=x[31];
y[46]=y[31]+1;
  //Measurements dart uptake length
  Var[59]=distance(x[151], y[151], x[46], y[46]);
  //2z
  x[47]=x[24]+-1;
y[47]=y[24];
  //3
  x[48] = x[31];
y[48] = y[47];

  //2h(2)
    Rotate(49, 31, 32, Var[29]+0);
  //2g(2)
    Rotate(50, 31, 31, Var[29]+0);
  //1i(2)
    Rotate(51, 31, 12, Var[29]+0);
  //Measurements Rotate Points Angle(2)
  Var[30]=normalizeangle(angle(x[50], y[50], x[12], y[12]) - angle(x[50], y[50], x[51], y[51]))*180/3.14159;
  //3a
    intersect(x[51],y[51],x[34],y[34],x[31],y[31],x[49],y[49], 0);
  x[52]=getresultx();
  y[52]=getresulty();

  //3a(2)
    Rotate(53, 50, 52, Var[30]+0);
  //Measurements Rotate Points Angle(6)
  Var[52]=normalizeangle(angle(x[31], y[31], x[53], y[53]) - angle(x[31], y[31], x[37], y[37]))*180/3.14159;
  //Measurements Rotate Points Angle(7)
  Var[55]=normalizeangle(angle(x[31], y[31], x[52], y[52]) - angle(x[31], y[31], x[53], y[53]))*180/3.14159;
  //2g(3)
    Rotate(54, 50, 50, Var[30]+0);
  //Measurements Rotate Points Angle(5)
  Var[51]=normalizeangle(angle(x[54], y[54], x[52], y[52]) - angle(x[54], y[54], x[53], y[53]))*180/3.14159;
  //3b
  x[55]=x[38];
y[55]=y[38]+Var[31]/4;
  //3c
  x[56]=x[3]+Var[19]/-4;
y[56]=y[3]+Var[25]/-1;
  //3d
  x[57]=x[56];
y[57]=y[56]+Var[7]/-1;
  //3e
  x[58]=x[57];
y[58]=y[57]+Var[31]/-1;
  //3f
  x[59]=x[58]+Var[19]/4;
y[59]=y[58];
  //3g
  x[60]=x[57]+Var[18]/4+-0.5;
y[60]=y[57];
  //3h
  x[61]= (x[56]+x[57])/2;
y[61]=(y[56]+y[57])/2;

  //3i
  x[62]=x[61];
y[62]=y[61]+Var[20]/-4;
  //3j
  x[63]=x[62]+Var[0]/4+-0.5;
y[63]=y[62];
  //3k
  x[64]=x[56]+Var[27]/2;
y[64]=y[56];
  //3l
  x[65]=x[64];
y[65]=y[64]+0.75;
  //Measurements Back neckline
  Var[48]=arclength(56, 64, 65);
  //3m
  x[66]=x[56]+Var[9]/2;
y[66]=y[56];
  //3n
  x[67]=x[66];
y[67]=y[66]+-1.25;
  //Measurements Back shoulder line
  Var[36]=distance(x[65], y[65], x[67], y[67]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //3o
  x[68]= (x[56]+x[62])/2;
y[68]=(y[56]+y[62])/2;

  //3p
  x[69]=x[68]+Var[6]/2;
y[69]=y[68];
  //3q
  x[70] = x[69];
y[70] = y[63];

  //3r
  x[71]= (x[67]+x[69])/2;
y[71]=(y[67]+y[69])/2;

  //3s
  x[72] = x[69];
y[72] = y[71];

  //Measurements Back armhole a
  Var[43]=arclength(67, 72, 69);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3t
  x[73]=x[63]+Var[20]/4;
y[73]=y[63];
  //3u
  x[74]=x[60]+Var[21]/4;
y[74]=y[60];
  //3v
  x[75]=x[59]+Var[22]/4;
y[75]=y[59];
  //3w
    intersect(x[75],y[75],x[73],y[73],x[57],y[57],x[74],y[74], 0);
  x[76]=getresultx();
  y[76]=getresulty();

  //Measurements Back Waist reduction
  Var[32]=distance(x[76], y[76], x[74], y[74]);
  //3x
  x[77]= (x[76]+x[75])/2;
y[77]=(y[76]+y[75])/2;

  //3y
  x[78]=x[76]+Var[32]/-3;
y[78]=y[76];
  //33z
  x[79]= (x[68]+x[69])/2;
y[79]=(y[68]+y[69])/2;

  //4
  x[80] = x[79];
y[80] = y[62];

  //4a
  x[81] = x[80];
y[81] = y[57];

  //4b
  x[82] = x[81];
y[82] = y[58];

  //4c
  x[83]=x[81]+Var[32]/-3;
y[83]=y[81];
  //4d
  x[84]=x[81]+Var[32]/3;
y[84]=y[81];
  //4e
  cont(73, 78, 85, Var[34]/-1+0);

  //4f
  cont(52, 34, 86, Var[34]/-1+0);

  //4g
  cont(85, 73, 87, Var[26]/-4+0);

  //4h
  x[88]= (x[65]+x[67])/2;
y[88]=(y[65]+y[67])/2;

  //4i
  right_ang(89, 88, 65,  + -3, 0);

  //4j
  right_ang(90, 69, 67,  + -4, 0);

  //4k
    intersect(x[88],y[88],x[89],y[89],x[69],y[69],x[90],y[90], 0);
  x[91]=getresultx();
  y[91]=getresulty();

  //4l
  cont(65, 88, 92, Var[37]/-2+0);

  //4m
  cont(67, 88, 93, Var[37]/-2+0);

  //Measurements Rotate Points Angle(3)
  Var[38]=normalizeangle(angle(x[91], y[91], x[92], y[92]) - angle(x[91], y[91], x[93], y[93]))*180/3.14159;
  //4k(2)
    Rotate(94, 91, 91, Var[38]+0);
  //3p(2)
    Rotate(95, 91, 69, Var[38]+0);
  //Measurements Rotate Points Angle(4)
  Var[39]=normalizeangle(angle(x[91], y[91], x[69], y[69]) - angle(x[91], y[91], x[95], y[95]))*180/3.14159;
  //Measurements Back armhole b
  Var[44]=arclength(69, 95, 73);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3n(2)
    Rotate(96, 91, 67, Var[38]+0);
  //4n
    intersect(x[96],y[96],x[65],y[65],x[94],y[94],x[92],y[92], 0);
  x[97]=getresultx();
  y[97]=getresulty();

  //4n(2)
    Rotate(98, 91, 97, Var[39]+0);
  //4o
  x[99]= (x[19]+x[15])/2;
y[99]=(y[19]+y[15])/2;

  //Measurements half shoulder dart front
  Var[58]=distance(x[150], y[150], x[99], y[99]);
  //4p
  cont(99, 31, 100, Var[2]/-1+0);

  //Measurements 4p2y
  Var[56]=distance(x[100], y[100], x[46], y[46]);
  //Measurements 4o4p
  Var[57]=distance(x[99], y[99], x[100], y[100]);
  //MoveStart(3)
  x[101]=x[0]+-3.01526402640264;
y[101]=y[0]+-10.6848184818482;
  //MoveEnd(3)
  x[102]=x[0]+-2.96988448844885;
y[102]=y[0]+-9.5049504950495;
  //3q(2)
  x[103] = x[70] + x[102] - x[101] ;
y[103] = y[70] + y[102] - y[101] ;

  //MoveStart(4)
  x[104]=x[0]+6.28754125412541;
y[104]=y[0]+-8.73349834983498;
  //MoveEnd(4)
  x[105]=x[0]+5.60684818481848;
y[105]=y[0]+-9.95874587458746;
  //1z(2)
  x[106] = x[25] + x[105] - x[104] ;
y[106] = y[25] + y[105] - y[104] ;

  //MoveStart(5)
  x[107]=x[0]+6.4236798679868;
y[107]=y[0]+-4.10478547854785;
  //MoveEnd(5)
  x[108]=x[0]+6.60519801980198;
y[108]=y[0]+-4.05940594059406;
  //1u(2)
  x[109] = x[22] + x[108] - x[107] ;
y[109] = y[22] + y[108] - y[107] ;

  //Measurements Front armhole a
  Var[40]=arclength(19, 109, 20);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(6)
  x[110]=x[0]+5.69760726072607;
y[110]=y[0]+-9.5503300330033;
  //MoveEnd(6)
  x[111]=x[0]+5.4707095709571;
y[111]=y[0]+-9.27805280528053;
  //1z(3)
  x[112] = x[106] + x[111] - x[110] ;
y[112] = y[106] + y[111] - y[110] ;

  //Measurements Front armhole b
  Var[41]=arclength(20, 112, 12);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(7)
  x[113]=x[0]+-7.04460778037259;
y[113]=y[0]+-1.91956874158687;
  //MoveEnd(7)
  x[114]=x[0]+-7.72550732581121;
y[114]=y[0]+-2.05574865067459;
  //3k(2)
  x[115] = x[64] + x[114] - x[113] ;
y[115] = y[64] + y[114] - y[113] ;

  //3a3
  x[116]= (x[53]+x[52])/2;
y[116]=(y[53]+y[52])/2;

  //3a4
    intersect(x[116],y[116],x[31],y[31],x[12],y[12],x[53],y[53], 0);
  x[117]=getresultx();
  y[117]=getresulty();

  //3a5
  cont(117, 31, 118, +-1);

  //2j(2)
    Rotate(153, 31, 34, Var[52]+0);
  //2j1a
  x[154]= (x[153]+x[34])/2;
y[154]=(y[153]+y[34])/2;

  //Measurements half french dart
  Var[60]=distance(x[34], y[34], x[154], y[154]);
  //2j2c
  cont(154, 31, 155, +-1);

  //761
  x[119]=x[31]+0.04;
y[119]=y[31];
  //76a
  x[120]=x[31];
y[120]=y[31]+-0.04;
  //76b
  x[121]=x[120]+-0.04;
y[121]=y[120];
  //76c
  x[122]=x[31]+-0.04;
y[122]=y[31];
  //76d
  x[123]=x[31];
y[123]=y[31]+0.04;
  //4q
  x[124] = x[31];
y[124] = y[20];

  //4r
  x[125]=x[25];
y[125]=y[25]+-10;
  //4s
  x[126]=x[70];
y[126]=y[70]+-10;
  //2y(2)
    Rotate(127, 31, 46, Var[55]+0);
  //2g(4)
    Rotate(128, 31, 31, Var[55]+0);
  //3a(3)
    Rotate(129, 31, 53, Var[55]+0);
  //1i(3)
    Rotate(130, 31, 12, Var[55]+0);
  //1z(5)
    Rotate(131, 31, 112, Var[55]+0);
  //1s(2)
    Rotate(132, 31, 20, Var[55]+0);
  //1u(4)
    Rotate(133, 31, 109, Var[55]+0);
  //1r(3)
    Rotate(134, 31, 19, Var[55]+0);
  //4o(3)
    Rotate(135, 31, 99, Var[55]+0);
  //4y
  x[136] = x[82];
y[136] = y[55];

  //4y1
  x[137]= (x[89]+x[80])/2;
y[137]=(y[89]+y[80])/2;

  //4y2
  cont(135, 46, 138, Var[2]/-1+0);

  //4y3
  x[139] = x[122];
y[139] = y[123];

  //4y4
  x[140] = x[119];
y[140] = y[139];

  //4y5
  x[141] = x[140];
y[141] = y[120];

  //4y6
  x[142] = x[80];
y[142] = y[137];

  //2q1
  cont(12, 153, 156, Var[60]/-1+0);

  //Measurements inner french dart leg
  Var[61]=distance(x[118], y[118], x[156], y[156]);
  //2q2
  cont(154, 118, 157, Var[61]/-1+0);

  //3d1
  x[143]= (x[142]+x[79])/2;
y[143]=(y[142]+y[79])/2;

  }

Flow1View3Objects()
{

  //Object Front
  if (HideObj[0] == 0)
    {

  Obj[0] = newobject("poly");
  current_point=addpoint(x[30],y[30],"LINE");
  current_point=addpoint(x[6],y[6],"LINE");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[10],y[10],"LINE");
  current_point=addpoint(x[14],y[14],"LINE");
  current_point=addpoint(x[16],y[16],"XARC_START");
  current_point=addpoint(x[17],y[17],"XARC_CORNER");
  current_point=addpoint(x[15],y[15],"LINE");
  current_point=addpoint(x[99],y[99],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[19],y[19],"XARC_START");
  current_point=addpoint(x[109],y[109],"XARC_CORNER");
  current_point=addpoint(x[20],y[20],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[112],y[112],"XARC_CORNER");
  current_point=addpoint(x[12],y[12],"LINE");
  current_point=addpoint(x[53],y[53],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[153],y[153],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[157],y[157],"LINE");
  current_point=addpoint(x[34],y[34],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[0],"Front"); }
    if (lang == 1) { name_object(Obj[0],"Front"); }
    if (lang == 2) { name_object(Obj[0],"Front"); }
    if (lang == 3) { name_object(Obj[0],"Front"); }
    if (lang == 4) { name_object(Obj[0],"Front"); }
    if (lang == 5) { name_object(Obj[0],"Front"); }
    if (lang == 6) { name_object(Obj[0],"Front"); }
    }

  //Object Front Waist dart
  if (HideObj[1] == 0)
    {

  Obj[1] = newobject("poly");
  current_point=addpoint(x[40],y[40],"LINE");
  current_point=addpoint(x[55],y[55],"LINE");
  current_point=addpoint(x[41],y[41],"LINE");
  current_point=addpoint(x[45],y[45],"LINE");
    if (lang == 0) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 1) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 2) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 3) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 4) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 5) { name_object(Obj[1],"Front Waist dart"); }
    if (lang == 6) { name_object(Obj[1],"Front Waist dart"); }
    }

  //Object BACK
  if (HideObj[2] == 0)
    {

  Obj[2] = newobject("poly");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[58],y[58],"LINE");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[62],y[62],"LINE");
  current_point=addpoint(x[68],y[68],"LINE");
  current_point=addpoint(x[56],y[56],"XARC_START");
  current_point=addpoint(x[115],y[115],"XARC_CORNER");
  current_point=addpoint(x[65],y[65],"LINE");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[85],y[85],"LINE");
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[2],"BACK"); }
    if (lang == 1) { name_object(Obj[2],"BACK"); }
    if (lang == 2) { name_object(Obj[2],"BACK"); }
    if (lang == 3) { name_object(Obj[2],"BACK"); }
    if (lang == 4) { name_object(Obj[2],"BACK"); }
    if (lang == 5) { name_object(Obj[2],"BACK"); }
    if (lang == 6) { name_object(Obj[2],"BACK"); }
    }

  //Object Back waist dart
  if (HideObj[3] == 0)
    {

  Obj[3] = newobject("poly");
  current_point=addpoint(x[80],y[80],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  current_point=addpoint(x[136],y[136],"LINE");
  current_point=addpoint(x[83],y[83],"LINE");
    if (lang == 0) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 1) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 2) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 3) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 4) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 5) { name_object(Obj[3],"Back waist dart"); }
    if (lang == 6) { name_object(Obj[3],"Back waist dart"); }
    }

  //Object 60a
  if (HideObj[4] == 0)
    {
  if (lang == 0)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[44],y[44],"LINE");
    if (lang == 0) { name_object(Obj[4],"60a"); }
    if (lang == 1) { name_object(Obj[4],"60a"); }
    if (lang == 2) { name_object(Obj[4],"60a"); }
    if (lang == 3) { name_object(Obj[4],"60a"); }
    if (lang == 4) { name_object(Obj[4],"60a"); }
    if (lang == 5) { name_object(Obj[4],"60a"); }
    if (lang == 6) { name_object(Obj[4],"60a"); }
    }

  //Object 60b
  if (HideObj[5] == 0)
    {
  if (lang == 0)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[5] = newobject("Text","FRONT",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint(x[124],y[124],"LINE");
    if (lang == 0) { name_object(Obj[5],"60b"); }
    if (lang == 1) { name_object(Obj[5],"60b"); }
    if (lang == 2) { name_object(Obj[5],"60b"); }
    if (lang == 3) { name_object(Obj[5],"60b"); }
    if (lang == 4) { name_object(Obj[5],"60b"); }
    if (lang == 5) { name_object(Obj[5],"60b"); }
    if (lang == 6) { name_object(Obj[5],"60b"); }
    }

  //Object 60c
  if (HideObj[6] == 0)
    {
  if (lang == 0)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[55]+0.5),(y[55]+-1),"LINE");
    if (lang == 0) { name_object(Obj[6],"60c"); }
    if (lang == 1) { name_object(Obj[6],"60c"); }
    if (lang == 2) { name_object(Obj[6],"60c"); }
    if (lang == 3) { name_object(Obj[6],"60c"); }
    if (lang == 4) { name_object(Obj[6],"60c"); }
    if (lang == 5) { name_object(Obj[6],"60c"); }
    if (lang == 6) { name_object(Obj[6],"60c"); }
    }

  //Object 60d
  if (HideObj[7] == 0)
    {
  if (lang == 0)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[7] = newobject("Text","BACK",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+1),"LINE");
    if (lang == 0) { name_object(Obj[7],"60d"); }
    if (lang == 1) { name_object(Obj[7],"60d"); }
    if (lang == 2) { name_object(Obj[7],"60d"); }
    if (lang == 3) { name_object(Obj[7],"60d"); }
    if (lang == 4) { name_object(Obj[7],"60d"); }
    if (lang == 5) { name_object(Obj[7],"60d"); }
    if (lang == 6) { name_object(Obj[7],"60d"); }
    }

  //Object 60e
  if (HideObj[8] == 0)
    {
  if (lang == 0)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[68],y[68],"LINE");
    if (lang == 0) { name_object(Obj[8],"60e"); }
    if (lang == 1) { name_object(Obj[8],"60e"); }
    if (lang == 2) { name_object(Obj[8],"60e"); }
    if (lang == 3) { name_object(Obj[8],"60e"); }
    if (lang == 4) { name_object(Obj[8],"60e"); }
    if (lang == 5) { name_object(Obj[8],"60e"); }
    if (lang == 6) { name_object(Obj[8],"60e"); }
    }

  //Object 60f
  if (HideObj[9] == 0)
    {
  if (lang == 0)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[58]+1),(y[58]+1),"LINE");
    if (lang == 0) { name_object(Obj[9],"60f"); }
    if (lang == 1) { name_object(Obj[9],"60f"); }
    if (lang == 2) { name_object(Obj[9],"60f"); }
    if (lang == 3) { name_object(Obj[9],"60f"); }
    if (lang == 4) { name_object(Obj[9],"60f"); }
    if (lang == 5) { name_object(Obj[9],"60f"); }
    if (lang == 6) { name_object(Obj[9],"60f"); }
    }

  //Object Front Bust Dart
  if (HideObj[10] == 0)
    {

  Obj[10] = newobject("poly");
  current_point=addpoint(x[156],y[156],"LINE");
  current_point=addpoint(x[118],y[118],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 1) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 2) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 3) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 4) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 5) { name_object(Obj[10],"Front Bust Dart"); }
    if (lang == 6) { name_object(Obj[10],"Front Bust Dart"); }
    }

  //Object Back Shoulder Dart
  if (HideObj[11] == 0)
    {

  Obj[11] = newobject("poly");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[89],y[89],"LINE");
  current_point=addpoint(x[98],y[98],"OPEN");
    if (lang == 0) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 1) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 2) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 3) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 4) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 5) { name_object(Obj[11],"Back Shoulder Dart"); }
    if (lang == 6) { name_object(Obj[11],"Back Shoulder Dart"); }
    }

  //Object txt1
  if (HideObj[18] == 0)
    {
  if (lang == 0)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint(x[124],(y[124]+1),"LINE");
    if (lang == 0) { name_object(Obj[18],"txt1"); }
    if (lang == 1) { name_object(Obj[18],"txt1"); }
    if (lang == 2) { name_object(Obj[18],"txt1"); }
    if (lang == 3) { name_object(Obj[18],"txt1"); }
    if (lang == 4) { name_object(Obj[18],"txt1"); }
    if (lang == 5) { name_object(Obj[18],"txt1"); }
    if (lang == 6) { name_object(Obj[18],"txt1"); }
    }

  //Object txt4
  if (HideObj[21] == 0)
    {
  if (lang == 0)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+2),"LINE");
    if (lang == 0) { name_object(Obj[21],"txt4"); }
    if (lang == 1) { name_object(Obj[21],"txt4"); }
    if (lang == 2) { name_object(Obj[21],"txt4"); }
    if (lang == 3) { name_object(Obj[21],"txt4"); }
    if (lang == 4) { name_object(Obj[21],"txt4"); }
    if (lang == 5) { name_object(Obj[21],"txt4"); }
    if (lang == 6) { name_object(Obj[21],"txt4"); }
    }

  //Object front waistline
  if (HideObj[26] == 0)
    {

  Obj[26] = newobject("poly");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[26],"front waistline"); }
    if (lang == 1) { name_object(Obj[26],"front waistline"); }
    if (lang == 2) { name_object(Obj[26],"front waistline"); }
    if (lang == 3) { name_object(Obj[26],"front waistline"); }
    if (lang == 4) { name_object(Obj[26],"front waistline"); }
    if (lang == 5) { name_object(Obj[26],"front waistline"); }
    if (lang == 6) { name_object(Obj[26],"front waistline"); }
    }

  //Object Back waistline
  if (HideObj[27] == 0)
    {

  Obj[27] = newobject("poly");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[78],y[78],"OPEN");
    if (lang == 0) { name_object(Obj[27],"Back waistline"); }
    if (lang == 1) { name_object(Obj[27],"Back waistline"); }
    if (lang == 2) { name_object(Obj[27],"Back waistline"); }
    if (lang == 3) { name_object(Obj[27],"Back waistline"); }
    if (lang == 4) { name_object(Obj[27],"Back waistline"); }
    if (lang == 5) { name_object(Obj[27],"Back waistline"); }
    if (lang == 6) { name_object(Obj[27],"Back waistline"); }
    }

  //Object bust point
  if (HideObj[28] == 0)
    {

  Obj[28] = newobject("poly");
  current_point=addpoint(x[139],y[139],"LINE");
  current_point=addpoint(x[123],y[123],"XARC_START");
  current_point=addpoint(x[140],y[140],"XARC_CORNER");
  current_point=addpoint(x[119],y[119],"XARC_START");
  current_point=addpoint(x[141],y[141],"XARC_CORNER");
  current_point=addpoint(x[120],y[120],"XARC_START");
  current_point=addpoint(x[121],y[121],"XARC_CORNER");
  current_point=addpoint(x[122],y[122],"LINE");
    if (lang == 0) { name_object(Obj[28],"bust point"); }
    if (lang == 1) { name_object(Obj[28],"bust point"); }
    if (lang == 2) { name_object(Obj[28],"bust point"); }
    if (lang == 3) { name_object(Obj[28],"bust point"); }
    if (lang == 4) { name_object(Obj[28],"bust point"); }
    if (lang == 5) { name_object(Obj[28],"bust point"); }
    if (lang == 6) { name_object(Obj[28],"bust point"); }
    }
  offset_mark(0, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(2, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow1View4()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow1View4");
    }
  Flow1View4Points();
  }

Flow1View4Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //if Back shoulder line < Front shoulder line
  //If Point here
  if( Var[36] < Var[35] )
    {
  //Measurements Back shoulder dart
  Var[37]=  
  
0;
    }
  //if Full Front Length < Nape to Waist
  //If Point here
  if( Var[4] < Var[7] )
    {
  //Measurements Bust dart
  Var[25]=  
  
0;
    }
  //1
  x[3]=x[0];
y[3]=y[0];
  //1a
  x[4]=x[3]+Var[19]/4+3;
y[4]=y[3];
  //1b
  x[5]=x[4];
y[5]=y[4]+Var[4]/-1;
  //1c
  x[6]=x[5];
y[6]=y[5]+Var[13]/-3;
  //1d
  x[7]=x[6]+Var[19]/-4;
y[7]=y[6];
  //1e
  x[8]=x[5]+Var[18]/-4+-0.5;
y[8]=y[5];
  //1f
  x[9]=x[5];
y[9]=y[5]+Var[7]/2;
  //1g
  x[10]=x[9];
y[10]=y[9]+Var[20]/-4;
  //1h
  x[11]=x[10]+Var[33]/-1+-0.5;
y[11]=y[10];
  //1i
  x[12]=x[11];
y[12]=y[11]+Var[25];
  //1k
  x[13] = x[4];
y[13] = y[12];

  //Measurements armheight
  Var[26]=distance(x[13], y[13], x[4], y[4]);
  //1l
  x[14]=x[13];
y[14]=y[13]+Var[26]/4;
  //1n
  x[15]=x[4]+Var[27]/-2;
y[15]=y[4];
  //1o
  x[16]=x[4];
y[16]=y[4]+Var[27]/-2+-0.5;
  //1p
  x[17] = x[15];
y[17] = y[16];

  //Measurements Front neckline
  Var[47]=arclength(15, 17, 16);
  //1q
  x[18]=x[4]+Var[8]/-2;
y[18]=y[4];
  //1r
  x[19]=x[18];
y[19]=y[18]+-1.5;
  //Measurements Front shoulder line
  Var[35]=distance(x[19], y[19], x[15], y[15]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //1s
  x[20]=x[14]+Var[5]/-2;
y[20]=y[14];
  //1t
  x[21]= (x[20]+x[19])/2;
y[21]=(y[20]+y[19])/2;

  //1u
  x[22]=x[21]+0.375;
y[22]=y[21];
  //1v
  x[23]= (x[22]+x[20])/2;
y[23]=(y[22]+y[20])/2;

  //1y
  x[24] = x[22];
y[24] = y[23];

  //1z
  x[25] = x[24];
y[25] = y[12];

  //2
  x[26]= (x[25]+x[12])/2;
y[26]=(y[25]+y[12])/2;

  //2a
  x[27]= (x[26]+x[25])/2;
y[27]=(y[26]+y[25])/2;

  //2d
  x[28]=x[27];
y[28]=y[27]+Var[26]/-4;
  //Measurements front armhole c
  Var[42]=arclength(20, 28, 12);
  //2e
  x[29]=x[8]+Var[21]/-4;
y[29]=y[8];
  //2f
  x[30]=x[7]+Var[22]/-4;
y[30]=y[7];
  //2g
  x[31]=x[4]+Var[1]/-2;
y[31]=y[4]+Var[3]/-1;
  //2h
  cont(30, 12, 32, +-2);

  //2i
    intersect(x[32],y[32],x[30],y[30],x[29],y[29],x[5],y[5], 0);
  x[33]=getresultx();
  y[33]=getresulty();

  //Measurements Front wr
  Var[28]=distance(x[33], y[33], x[29], y[29]);
  //2j
  x[34]=x[33]+Var[28]/3;
y[34]=y[33];
  //Measurements half french dart
  Var[60]=distance(x[34], y[34], x[154], y[154]);
  //2k
  cont(34, 32, 35, Var[25]/-1+0);

  //Measurements Rotate Points Angle
  Var[29]=normalizeangle(angle(x[31], y[31], x[35], y[35]) - angle(x[31], y[31], x[32], y[32]))*180/3.14159;
  //2l
  x[36]= (x[30]+x[33])/2;
y[36]=(y[30]+y[33])/2;

  //2h1
  Dart(37, 32,  31,  Var[25] /-1 + 0, 0);

  //2m
  x[38] = x[31];
y[38] = y[6];

  //2n
  x[39] = x[31];
y[39] = y[5];

  //2o
  x[40]=x[39]+Var[28]/-3;
y[40]=y[39];
  //2p
  x[41]=x[39]+Var[28]/3;
y[41]=y[39];
  //2q
  x[42]=x[31];
y[42]=y[31]+Var[2]/-1;
  //2r
  x[43] = x[10];
y[43] = y[31];

  //2s
  x[44] = x[43];
y[44] = y[42];

  //Measurements Underbust level from waist
  Var[34]=distance(x[5], y[5], x[44], y[44]);
  //2x
  x[45]=x[31];
y[45]=y[31]+Var[2]/-2;
  //2y
  x[46]=x[31];
y[46]=y[31]+1;
  //Measurements dart uptake length
  Var[59]=distance(x[151], y[151], x[46], y[46]);
  //2z
  x[47]=x[24]+-1;
y[47]=y[24];
  //3
  x[48] = x[31];
y[48] = y[47];

  //2h(2)
    Rotate(49, 31, 32, Var[29]+0);
  //2g(2)
    Rotate(50, 31, 31, Var[29]+0);
  //1i(2)
    Rotate(51, 31, 12, Var[29]+0);
  //Measurements Rotate Points Angle(2)
  Var[30]=normalizeangle(angle(x[50], y[50], x[12], y[12]) - angle(x[50], y[50], x[51], y[51]))*180/3.14159;
  //3a
    intersect(x[51],y[51],x[34],y[34],x[31],y[31],x[49],y[49], 0);
  x[52]=getresultx();
  y[52]=getresulty();

  //3a(2)
    Rotate(53, 50, 52, Var[30]+0);
  //Measurements Rotate Points Angle(6)
  Var[52]=normalizeangle(angle(x[31], y[31], x[53], y[53]) - angle(x[31], y[31], x[37], y[37]))*180/3.14159;
  //Measurements Rotate Points Angle(7)
  Var[55]=normalizeangle(angle(x[31], y[31], x[52], y[52]) - angle(x[31], y[31], x[53], y[53]))*180/3.14159;
  //2g(3)
    Rotate(54, 50, 50, Var[30]+0);
  //Measurements Rotate Points Angle(5)
  Var[51]=normalizeangle(angle(x[54], y[54], x[52], y[52]) - angle(x[54], y[54], x[53], y[53]))*180/3.14159;
  //3b
  x[55]=x[38];
y[55]=y[38]+Var[31]/4;
  //3c
  x[56]=x[3]+Var[19]/-4;
y[56]=y[3]+Var[25]/-1;
  //3d
  x[57]=x[56];
y[57]=y[56]+Var[7]/-1;
  //3e
  x[58]=x[57];
y[58]=y[57]+Var[31]/-1;
  //3f
  x[59]=x[58]+Var[19]/4;
y[59]=y[58];
  //3g
  x[60]=x[57]+Var[18]/4+-0.5;
y[60]=y[57];
  //3h
  x[61]= (x[56]+x[57])/2;
y[61]=(y[56]+y[57])/2;

  //3i
  x[62]=x[61];
y[62]=y[61]+Var[20]/-4;
  //3j
  x[63]=x[62]+Var[0]/4+-0.5;
y[63]=y[62];
  //3k
  x[64]=x[56]+Var[27]/2;
y[64]=y[56];
  //3l
  x[65]=x[64];
y[65]=y[64]+0.75;
  //Measurements Back neckline
  Var[48]=arclength(56, 64, 65);
  //3m
  x[66]=x[56]+Var[9]/2;
y[66]=y[56];
  //3n
  x[67]=x[66];
y[67]=y[66]+-1.25;
  //Measurements Back shoulder line
  Var[36]=distance(x[65], y[65], x[67], y[67]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //3o
  x[68]= (x[56]+x[62])/2;
y[68]=(y[56]+y[62])/2;

  //3p
  x[69]=x[68]+Var[6]/2;
y[69]=y[68];
  //3q
  x[70] = x[69];
y[70] = y[63];

  //3r
  x[71]= (x[67]+x[69])/2;
y[71]=(y[67]+y[69])/2;

  //3s
  x[72] = x[69];
y[72] = y[71];

  //Measurements Back armhole a
  Var[43]=arclength(67, 72, 69);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3t
  x[73]=x[63]+Var[20]/4;
y[73]=y[63];
  //3u
  x[74]=x[60]+Var[21]/4;
y[74]=y[60];
  //3v
  x[75]=x[59]+Var[22]/4;
y[75]=y[59];
  //3w
    intersect(x[75],y[75],x[73],y[73],x[57],y[57],x[74],y[74], 0);
  x[76]=getresultx();
  y[76]=getresulty();

  //Measurements Back Waist reduction
  Var[32]=distance(x[76], y[76], x[74], y[74]);
  //3x
  x[77]= (x[76]+x[75])/2;
y[77]=(y[76]+y[75])/2;

  //3y
  x[78]=x[76]+Var[32]/-3;
y[78]=y[76];
  //33z
  x[79]= (x[68]+x[69])/2;
y[79]=(y[68]+y[69])/2;

  //4
  x[80] = x[79];
y[80] = y[62];

  //4a
  x[81] = x[80];
y[81] = y[57];

  //4b
  x[82] = x[81];
y[82] = y[58];

  //4c
  x[83]=x[81]+Var[32]/-3;
y[83]=y[81];
  //4d
  x[84]=x[81]+Var[32]/3;
y[84]=y[81];
  //4e
  cont(73, 78, 85, Var[34]/-1+0);

  //4f
  cont(52, 34, 86, Var[34]/-1+0);

  //4g
  cont(85, 73, 87, Var[26]/-4+0);

  //4h
  x[88]= (x[65]+x[67])/2;
y[88]=(y[65]+y[67])/2;

  //4i
  right_ang(89, 88, 65,  + -3, 0);

  //4j
  right_ang(90, 69, 67,  + -4, 0);

  //4k
    intersect(x[88],y[88],x[89],y[89],x[69],y[69],x[90],y[90], 0);
  x[91]=getresultx();
  y[91]=getresulty();

  //4l
  cont(65, 88, 92, Var[37]/-2+0);

  //4m
  cont(67, 88, 93, Var[37]/-2+0);

  //Measurements Rotate Points Angle(3)
  Var[38]=normalizeangle(angle(x[91], y[91], x[92], y[92]) - angle(x[91], y[91], x[93], y[93]))*180/3.14159;
  //4k(2)
    Rotate(94, 91, 91, Var[38]+0);
  //3p(2)
    Rotate(95, 91, 69, Var[38]+0);
  //Measurements Rotate Points Angle(4)
  Var[39]=normalizeangle(angle(x[91], y[91], x[69], y[69]) - angle(x[91], y[91], x[95], y[95]))*180/3.14159;
  //Measurements Back armhole b
  Var[44]=arclength(69, 95, 73);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3n(2)
    Rotate(96, 91, 67, Var[38]+0);
  //4n
    intersect(x[96],y[96],x[65],y[65],x[94],y[94],x[92],y[92], 0);
  x[97]=getresultx();
  y[97]=getresulty();

  //4n(2)
    Rotate(98, 91, 97, Var[39]+0);
  //4o
  x[99]= (x[19]+x[15])/2;
y[99]=(y[19]+y[15])/2;

  //Measurements half shoulder dart front
  Var[58]=distance(x[150], y[150], x[99], y[99]);
  //4p
  cont(99, 31, 100, Var[2]/-1+0);

  //Measurements 4p2y
  Var[56]=distance(x[100], y[100], x[46], y[46]);
  //Measurements 4o4p
  Var[57]=distance(x[99], y[99], x[100], y[100]);
  //MoveStart(3)
  x[101]=x[0]+-3.01526402640264;
y[101]=y[0]+-10.6848184818482;
  //MoveEnd(3)
  x[102]=x[0]+-2.96988448844885;
y[102]=y[0]+-9.5049504950495;
  //3q(2)
  x[103] = x[70] + x[102] - x[101] ;
y[103] = y[70] + y[102] - y[101] ;

  //MoveStart(4)
  x[104]=x[0]+6.28754125412541;
y[104]=y[0]+-8.73349834983498;
  //MoveEnd(4)
  x[105]=x[0]+5.60684818481848;
y[105]=y[0]+-9.95874587458746;
  //1z(2)
  x[106] = x[25] + x[105] - x[104] ;
y[106] = y[25] + y[105] - y[104] ;

  //MoveStart(5)
  x[107]=x[0]+6.4236798679868;
y[107]=y[0]+-4.10478547854785;
  //MoveEnd(5)
  x[108]=x[0]+6.60519801980198;
y[108]=y[0]+-4.05940594059406;
  //1u(2)
  x[109] = x[22] + x[108] - x[107] ;
y[109] = y[22] + y[108] - y[107] ;

  //Measurements Front armhole a
  Var[40]=arclength(19, 109, 20);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(6)
  x[110]=x[0]+5.69760726072607;
y[110]=y[0]+-9.5503300330033;
  //MoveEnd(6)
  x[111]=x[0]+5.4707095709571;
y[111]=y[0]+-9.27805280528053;
  //1z(3)
  x[112] = x[106] + x[111] - x[110] ;
y[112] = y[106] + y[111] - y[110] ;

  //Measurements Front armhole b
  Var[41]=arclength(20, 112, 12);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(7)
  x[113]=x[0]+-7.04460778037259;
y[113]=y[0]+-1.91956874158687;
  //MoveEnd(7)
  x[114]=x[0]+-7.72550732581121;
y[114]=y[0]+-2.05574865067459;
  //3k(2)
  x[115] = x[64] + x[114] - x[113] ;
y[115] = y[64] + y[114] - y[113] ;

  //3a3
  x[116]= (x[53]+x[52])/2;
y[116]=(y[53]+y[52])/2;

  //3a4
    intersect(x[116],y[116],x[31],y[31],x[12],y[12],x[53],y[53], 0);
  x[117]=getresultx();
  y[117]=getresulty();

  //3a5
  cont(117, 31, 118, +-1);

  //Measurements inner french dart leg
  Var[61]=distance(x[118], y[118], x[156], y[156]);
  //761
  x[119]=x[31]+0.04;
y[119]=y[31];
  //76a
  x[120]=x[31];
y[120]=y[31]+-0.04;
  //76b
  x[121]=x[120]+-0.04;
y[121]=y[120];
  //76c
  x[122]=x[31]+-0.04;
y[122]=y[31];
  //76d
  x[123]=x[31];
y[123]=y[31]+0.04;
  //4q
  x[124] = x[31];
y[124] = y[20];

  //4r
  x[125]=x[25];
y[125]=y[25]+-10;
  //4s
  x[126]=x[70];
y[126]=y[70]+-10;
  //2y(2)
    Rotate(127, 31, 46, Var[55]+0);
  //2g(4)
    Rotate(128, 31, 31, Var[55]+0);
  //3a(3)
    Rotate(129, 31, 53, Var[55]+0);
  //1i(3)
    Rotate(130, 31, 12, Var[55]+0);
  //1z(5)
    Rotate(131, 31, 112, Var[55]+0);
  //1s(2)
    Rotate(132, 31, 20, Var[55]+0);
  //1u(4)
    Rotate(133, 31, 109, Var[55]+0);
  //1r(3)
    Rotate(134, 31, 19, Var[55]+0);
  //4o(3)
    Rotate(135, 31, 99, Var[55]+0);
  //4u
  x[158]= (x[80]+x[89])/2;
y[158]=(y[80]+y[89])/2;

  //4v
  x[159] = x[80];
y[159] = y[158];

  //4w
  cont(46, 135, 160, Var[57]/-1+0);

  //4x
    intersect(x[45],y[45],x[40],y[40],x[86],y[86],x[42],y[42], 0);
  x[161]=getresultx();
  y[161]=getresulty();

  //4y
  x[136] = x[82];
y[136] = y[55];

  //4z
    intersect(x[86],y[86],x[42],y[42],x[31],y[31],x[41],y[41], 0);
  x[162]=getresultx();
  y[162]=getresulty();

  //5a
  x[163]=x[80]+0.13;
y[163]=y[80];
  //5b
  x[164]=x[89]+0.25;
y[164]=y[89];
  //5c
  x[165]= (x[130]+x[86])/2;
y[165]=(y[130]+y[86])/2;

  //5d
  x[166]= (x[86]+x[34])/2;
y[166]=(y[86]+y[34])/2;

  //5e
  x[167] = x[130];
y[167] = y[165];

  //5f
  x[168] = x[34];
y[168] = y[166];

  //5g
  x[169] = x[78];
y[169] = y[87];

  //5h
    intersect(x[169],y[169],x[78],y[78],x[85],y[85],x[86],y[86], 0);
  x[170]=getresultx();
  y[170]=getresulty();

  //5i
  x[171]= (x[98]+x[89])/2;
y[171]=(y[98]+y[89])/2;

  //5j
  x[172] = x[89];
y[172] = y[164];

  //5k
  x[173]=x[161]+-0.625;
y[173]=y[161];
  //5l
  x[174]=x[162]+0.625;
y[174]=y[162];
  //4y1
  x[137]= (x[89]+x[80])/2;
y[137]=(y[89]+y[80])/2;

  //4y2
  cont(135, 46, 138, Var[2]/-1+0);

  //4y3
  x[139] = x[122];
y[139] = y[123];

  //4y4
  x[140] = x[119];
y[140] = y[139];

  //4y5
  x[141] = x[140];
y[141] = y[120];

  //4y6
  x[142] = x[80];
y[142] = y[137];

  //5k1
  x[175]= (x[173]+x[161])/2;
y[175]=(y[173]+y[161])/2;

  //4z1
  x[176]= (x[162]+x[174])/2;
y[176]=(y[162]+y[174])/2;

  //3d1
  x[143]= (x[142]+x[79])/2;
y[143]=(y[142]+y[79])/2;

  }

Flow1View4Objects()
{

  //Object Front
  if (HideObj[0] == 0)
    {

  Obj[0] = newobject("poly");
  current_point=addpoint(x[6],y[6],"LINE");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[10],y[10],"LINE");
  current_point=addpoint(x[14],y[14],"LINE");
  current_point=addpoint(x[16],y[16],"XARC_START");
  current_point=addpoint(x[17],y[17],"XARC_CORNER");
  current_point=addpoint(x[15],y[15],"LINE");
  current_point=addpoint(x[99],y[99],"LINE");
  current_point=addpoint(x[100],y[100],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[128],y[128],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[45],y[45],"XARC_CORNER");
  current_point=addpoint(x[176],y[176],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[41],y[41],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[55],y[55],"XARC_CORNER");
  current_point=addpoint(x[38],y[38],"LINE");
    if (lang == 0) { name_object(Obj[0],"Front"); }
    if (lang == 1) { name_object(Obj[0],"Front"); }
    if (lang == 2) { name_object(Obj[0],"Front"); }
    if (lang == 3) { name_object(Obj[0],"Front"); }
    if (lang == 4) { name_object(Obj[0],"Front"); }
    if (lang == 5) { name_object(Obj[0],"Front"); }
    if (lang == 6) { name_object(Obj[0],"Front"); }
    }

  //Object BACK
  if (HideObj[2] == 0)
    {

  Obj[2] = newobject("poly");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[58],y[58],"LINE");
  current_point=addpoint(x[57],y[57],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[62],y[62],"LINE");
  current_point=addpoint(x[68],y[68],"LINE");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[56],y[56],"XARC_START");
  current_point=addpoint(x[115],y[115],"XARC_CORNER");
  current_point=addpoint(x[65],y[65],"LINE");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[164],y[164],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[158],y[158],"XARC_CORNER");
  current_point=addpoint(x[80],y[80],"LINE");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[83],y[83],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[136],y[136],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[2],"BACK"); }
    if (lang == 1) { name_object(Obj[2],"BACK"); }
    if (lang == 2) { name_object(Obj[2],"BACK"); }
    if (lang == 3) { name_object(Obj[2],"BACK"); }
    if (lang == 4) { name_object(Obj[2],"BACK"); }
    if (lang == 5) { name_object(Obj[2],"BACK"); }
    if (lang == 6) { name_object(Obj[2],"BACK"); }
    }

  //Object 60a
  if (HideObj[4] == 0)
    {
  if (lang == 0)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[44],y[44],"LINE");
    if (lang == 0) { name_object(Obj[4],"60a"); }
    if (lang == 1) { name_object(Obj[4],"60a"); }
    if (lang == 2) { name_object(Obj[4],"60a"); }
    if (lang == 3) { name_object(Obj[4],"60a"); }
    if (lang == 4) { name_object(Obj[4],"60a"); }
    if (lang == 5) { name_object(Obj[4],"60a"); }
    if (lang == 6) { name_object(Obj[4],"60a"); }
    }

  //Object 60b
  if (HideObj[5] == 0)
    {
  if (lang == 0)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint(x[124],y[124],"LINE");
    if (lang == 0) { name_object(Obj[5],"60b"); }
    if (lang == 1) { name_object(Obj[5],"60b"); }
    if (lang == 2) { name_object(Obj[5],"60b"); }
    if (lang == 3) { name_object(Obj[5],"60b"); }
    if (lang == 4) { name_object(Obj[5],"60b"); }
    if (lang == 5) { name_object(Obj[5],"60b"); }
    if (lang == 6) { name_object(Obj[5],"60b"); }
    }

  //Object 60c
  if (HideObj[6] == 0)
    {
  if (lang == 0)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[55]+0.5),(y[55]+-1),"LINE");
    if (lang == 0) { name_object(Obj[6],"60c"); }
    if (lang == 1) { name_object(Obj[6],"60c"); }
    if (lang == 2) { name_object(Obj[6],"60c"); }
    if (lang == 3) { name_object(Obj[6],"60c"); }
    if (lang == 4) { name_object(Obj[6],"60c"); }
    if (lang == 5) { name_object(Obj[6],"60c"); }
    if (lang == 6) { name_object(Obj[6],"60c"); }
    }

  //Object 60d
  if (HideObj[7] == 0)
    {
  if (lang == 0)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+1),"LINE");
    if (lang == 0) { name_object(Obj[7],"60d"); }
    if (lang == 1) { name_object(Obj[7],"60d"); }
    if (lang == 2) { name_object(Obj[7],"60d"); }
    if (lang == 3) { name_object(Obj[7],"60d"); }
    if (lang == 4) { name_object(Obj[7],"60d"); }
    if (lang == 5) { name_object(Obj[7],"60d"); }
    if (lang == 6) { name_object(Obj[7],"60d"); }
    }

  //Object 60e
  if (HideObj[8] == 0)
    {
  if (lang == 0)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[68],y[68],"LINE");
    if (lang == 0) { name_object(Obj[8],"60e"); }
    if (lang == 1) { name_object(Obj[8],"60e"); }
    if (lang == 2) { name_object(Obj[8],"60e"); }
    if (lang == 3) { name_object(Obj[8],"60e"); }
    if (lang == 4) { name_object(Obj[8],"60e"); }
    if (lang == 5) { name_object(Obj[8],"60e"); }
    if (lang == 6) { name_object(Obj[8],"60e"); }
    }

  //Object 60f
  if (HideObj[9] == 0)
    {
  if (lang == 0)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[58]+1),(y[58]+1),"LINE");
    if (lang == 0) { name_object(Obj[9],"60f"); }
    if (lang == 1) { name_object(Obj[9],"60f"); }
    if (lang == 2) { name_object(Obj[9],"60f"); }
    if (lang == 3) { name_object(Obj[9],"60f"); }
    if (lang == 4) { name_object(Obj[9],"60f"); }
    if (lang == 5) { name_object(Obj[9],"60f"); }
    if (lang == 6) { name_object(Obj[9],"60f"); }
    }

  //Object Side front
  if (HideObj[12] == 0)
    {

  Obj[12] = newobject("poly");
  current_point=addpoint(x[31],y[31],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[45],y[45],"XARC_CORNER");
  current_point=addpoint(x[175],y[175],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[40],y[40],"XARC_START");
  current_point=addpoint(x[55],y[55],"XARC_CORNER");
  current_point=addpoint(x[38],y[38],"LINE");
  current_point=addpoint(x[30],y[30],"XARC_START");
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
  current_point=addpoint(x[34],y[34],"XARC_START");
  current_point=addpoint(x[168],y[168],"XARC_CORNER");
  current_point=addpoint(x[86],y[86],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[167],y[167],"XARC_CORNER");
  current_point=addpoint(x[130],y[130],"XARC_START");
  current_point=addpoint(x[131],y[131],"XARC_CORNER");
  current_point=addpoint(x[132],y[132],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[133],y[133],"XARC_CORNER");
  current_point=addpoint(x[134],y[134],"LINE");
  current_point=addpoint(x[135],y[135],"LINE");
  current_point=addpoint(x[160],y[160],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[46],y[46],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[12],"Side front"); }
    if (lang == 1) { name_object(Obj[12],"Side front"); }
    if (lang == 2) { name_object(Obj[12],"Side front"); }
    if (lang == 3) { name_object(Obj[12],"Side front"); }
    if (lang == 4) { name_object(Obj[12],"Side front"); }
    if (lang == 5) { name_object(Obj[12],"Side front"); }
    if (lang == 6) { name_object(Obj[12],"Side front"); }
    }

  //Object side back
  if (HideObj[13] == 0)
    {

  Obj[13] = newobject("poly");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  current_point=addpoint(x[85],y[85],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[163],y[163],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[142],y[142],"XARC_CORNER");
  current_point=addpoint(x[164],y[164],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[171],y[171],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[13],"side back"); }
    if (lang == 1) { name_object(Obj[13],"side back"); }
    if (lang == 2) { name_object(Obj[13],"side back"); }
    if (lang == 3) { name_object(Obj[13],"side back"); }
    if (lang == 4) { name_object(Obj[13],"side back"); }
    if (lang == 5) { name_object(Obj[13],"side back"); }
    if (lang == 6) { name_object(Obj[13],"side back"); }
    }

  //Object sbgrainline
  if (HideObj[14] == 0)
    {

  Obj[14] = newobject("poly");
  current_point=addpoint(x[70],y[70],"LINE");
  current_point=addpoint(x[126],y[126],"OPEN");
    if (lang == 0) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 1) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 2) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 3) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 4) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 5) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 6) { name_object(Obj[14],"sbgrainline"); }
    }

  //Object sfgrainline
  if (HideObj[15] == 0)
    {

  Obj[15] = newobject("poly");
  current_point=addpoint(x[25],y[25],"LINE");
  current_point=addpoint(x[125],y[125],"OPEN");
    if (lang == 0) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 1) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 2) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 3) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 4) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 5) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 6) { name_object(Obj[15],"sfgrainline"); }
    }

  //Object sfgrainlineTxt
  if (HideObj[16] == 0)
    {
  if (lang == 0)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[125],(y[125]+1),"LINE");
    if (lang == 0) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[16],"sfgrainlineTxt"); }
    }

  //Object sbgrainlineTxt
  if (HideObj[17] == 0)
    {
  if (lang == 0)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[126],(y[126]+1),"LINE");
    if (lang == 0) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[17],"sbgrainlineTxt"); }
    }

  //Object txt1
  if (HideObj[18] == 0)
    {
  if (lang == 0)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint(x[124],(y[124]+1),"LINE");
    if (lang == 0) { name_object(Obj[18],"txt1"); }
    if (lang == 1) { name_object(Obj[18],"txt1"); }
    if (lang == 2) { name_object(Obj[18],"txt1"); }
    if (lang == 3) { name_object(Obj[18],"txt1"); }
    if (lang == 4) { name_object(Obj[18],"txt1"); }
    if (lang == 5) { name_object(Obj[18],"txt1"); }
    if (lang == 6) { name_object(Obj[18],"txt1"); }
    }

  //Object TXT2
  if (HideObj[19] == 0)
    {
  if (lang == 0)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+0.5),"LINE");
    if (lang == 0) { name_object(Obj[19],"TXT2"); }
    if (lang == 1) { name_object(Obj[19],"TXT2"); }
    if (lang == 2) { name_object(Obj[19],"TXT2"); }
    if (lang == 3) { name_object(Obj[19],"TXT2"); }
    if (lang == 4) { name_object(Obj[19],"TXT2"); }
    if (lang == 5) { name_object(Obj[19],"TXT2"); }
    if (lang == 6) { name_object(Obj[19],"TXT2"); }
    }

  //Object txt3
  if (HideObj[20] == 0)
    {
  if (lang == 0)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+-0.5),"LINE");
    if (lang == 0) { name_object(Obj[20],"txt3"); }
    if (lang == 1) { name_object(Obj[20],"txt3"); }
    if (lang == 2) { name_object(Obj[20],"txt3"); }
    if (lang == 3) { name_object(Obj[20],"txt3"); }
    if (lang == 4) { name_object(Obj[20],"txt3"); }
    if (lang == 5) { name_object(Obj[20],"txt3"); }
    if (lang == 6) { name_object(Obj[20],"txt3"); }
    }

  //Object txt4
  if (HideObj[21] == 0)
    {
  if (lang == 0)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+2),"LINE");
    if (lang == 0) { name_object(Obj[21],"txt4"); }
    if (lang == 1) { name_object(Obj[21],"txt4"); }
    if (lang == 2) { name_object(Obj[21],"txt4"); }
    if (lang == 3) { name_object(Obj[21],"txt4"); }
    if (lang == 4) { name_object(Obj[21],"txt4"); }
    if (lang == 5) { name_object(Obj[21],"txt4"); }
    if (lang == 6) { name_object(Obj[21],"txt4"); }
    }

  //Object txt5
  if (HideObj[22] == 0)
    {
  if (lang == 0)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),(y[80]+1),"LINE");
    if (lang == 0) { name_object(Obj[22],"txt5"); }
    if (lang == 1) { name_object(Obj[22],"txt5"); }
    if (lang == 2) { name_object(Obj[22],"txt5"); }
    if (lang == 3) { name_object(Obj[22],"txt5"); }
    if (lang == 4) { name_object(Obj[22],"txt5"); }
    if (lang == 5) { name_object(Obj[22],"txt5"); }
    if (lang == 6) { name_object(Obj[22],"txt5"); }
    }

  //Object txt6
  if (HideObj[23] == 0)
    {
  if (lang == 0)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),y[80],"LINE");
    if (lang == 0) { name_object(Obj[23],"txt6"); }
    if (lang == 1) { name_object(Obj[23],"txt6"); }
    if (lang == 2) { name_object(Obj[23],"txt6"); }
    if (lang == 3) { name_object(Obj[23],"txt6"); }
    if (lang == 4) { name_object(Obj[23],"txt6"); }
    if (lang == 5) { name_object(Obj[23],"txt6"); }
    if (lang == 6) { name_object(Obj[23],"txt6"); }
    }

  //Object txt7
  if (HideObj[24] == 0)
    {
  if (lang == 0)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[82]+1.5),(y[82]+1),"LINE");
    if (lang == 0) { name_object(Obj[24],"txt7"); }
    if (lang == 1) { name_object(Obj[24],"txt7"); }
    if (lang == 2) { name_object(Obj[24],"txt7"); }
    if (lang == 3) { name_object(Obj[24],"txt7"); }
    if (lang == 4) { name_object(Obj[24],"txt7"); }
    if (lang == 5) { name_object(Obj[24],"txt7"); }
    if (lang == 6) { name_object(Obj[24],"txt7"); }
    }

  //Object txt8
  if (HideObj[25] == 0)
    {
  if (lang == 0)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[7]+1.5),(y[7]+1),"LINE");
    if (lang == 0) { name_object(Obj[25],"txt8"); }
    if (lang == 1) { name_object(Obj[25],"txt8"); }
    if (lang == 2) { name_object(Obj[25],"txt8"); }
    if (lang == 3) { name_object(Obj[25],"txt8"); }
    if (lang == 4) { name_object(Obj[25],"txt8"); }
    if (lang == 5) { name_object(Obj[25],"txt8"); }
    if (lang == 6) { name_object(Obj[25],"txt8"); }
    }

  //Object front waistline
  if (HideObj[26] == 0)
    {

  Obj[26] = newobject("poly");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[41],y[41],"OPEN");
    if (lang == 0) { name_object(Obj[26],"front waistline"); }
    if (lang == 1) { name_object(Obj[26],"front waistline"); }
    if (lang == 2) { name_object(Obj[26],"front waistline"); }
    if (lang == 3) { name_object(Obj[26],"front waistline"); }
    if (lang == 4) { name_object(Obj[26],"front waistline"); }
    if (lang == 5) { name_object(Obj[26],"front waistline"); }
    if (lang == 6) { name_object(Obj[26],"front waistline"); }
    }

  //Object Back waistline
  if (HideObj[27] == 0)
    {

  Obj[27] = newobject("poly");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[83],y[83],"OPEN");
    if (lang == 0) { name_object(Obj[27],"Back waistline"); }
    if (lang == 1) { name_object(Obj[27],"Back waistline"); }
    if (lang == 2) { name_object(Obj[27],"Back waistline"); }
    if (lang == 3) { name_object(Obj[27],"Back waistline"); }
    if (lang == 4) { name_object(Obj[27],"Back waistline"); }
    if (lang == 5) { name_object(Obj[27],"Back waistline"); }
    if (lang == 6) { name_object(Obj[27],"Back waistline"); }
    }

  //Object sf waistline
  if (HideObj[30] == 0)
    {

  Obj[30] = newobject("poly");
  current_point=addpoint(x[40],y[40],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[30],"sf waistline"); }
    if (lang == 1) { name_object(Obj[30],"sf waistline"); }
    if (lang == 2) { name_object(Obj[30],"sf waistline"); }
    if (lang == 3) { name_object(Obj[30],"sf waistline"); }
    if (lang == 4) { name_object(Obj[30],"sf waistline"); }
    if (lang == 5) { name_object(Obj[30],"sf waistline"); }
    if (lang == 6) { name_object(Obj[30],"sf waistline"); }
    }

  //Object sb waistline
  if (HideObj[31] == 0)
    {

  Obj[31] = newobject("poly");
  current_point=addpoint(x[78],y[78],"LINE");
  current_point=addpoint(x[84],y[84],"OPEN");
    if (lang == 0) { name_object(Obj[31],"sb waistline"); }
    if (lang == 1) { name_object(Obj[31],"sb waistline"); }
    if (lang == 2) { name_object(Obj[31],"sb waistline"); }
    if (lang == 3) { name_object(Obj[31],"sb waistline"); }
    if (lang == 4) { name_object(Obj[31],"sb waistline"); }
    if (lang == 5) { name_object(Obj[31],"sb waistline"); }
    if (lang == 6) { name_object(Obj[31],"sb waistline"); }
    }
  offset_mark(0, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(2, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(12, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(13, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow1View5()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow1View5");
    }
  Flow1View5Points();
  }

Flow1View5Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //if Back shoulder line < Front shoulder line
  //If Point here
  if( Var[36] < Var[35] )
    {
  //Measurements Back shoulder dart
  Var[37]=  
  
0;
    }
  //if Full Front Length < Nape to Waist
  //If Point here
  if( Var[4] < Var[7] )
    {
  //Measurements Bust dart
  Var[25]=  
  
0;
    }
  //1
  x[3]=x[0];
y[3]=y[0];
  //1a
  x[4]=x[3]+Var[19]/4+3;
y[4]=y[3];
  //1b
  x[5]=x[4];
y[5]=y[4]+Var[4]/-1;
  //1c
  x[6]=x[5];
y[6]=y[5]+Var[13]/-3;
  //1d
  x[7]=x[6]+Var[19]/-4;
y[7]=y[6];
  //1e
  x[8]=x[5]+Var[18]/-4+-0.5;
y[8]=y[5];
  //1f
  x[9]=x[5];
y[9]=y[5]+Var[7]/2;
  //1g
  x[10]=x[9];
y[10]=y[9]+Var[20]/-4;
  //1h
  x[11]=x[10]+Var[33]/-1+-0.5;
y[11]=y[10];
  //1i
  x[12]=x[11];
y[12]=y[11]+Var[25];
  //1k
  x[13] = x[4];
y[13] = y[12];

  //Measurements armheight
  Var[26]=distance(x[13], y[13], x[4], y[4]);
  //1l
  x[14]=x[13];
y[14]=y[13]+Var[26]/4;
  //1n
  x[15]=x[4]+Var[27]/-2;
y[15]=y[4];
  //1o
  x[16]=x[4];
y[16]=y[4]+Var[27]/-2+-0.5;
  //1p
  x[17] = x[15];
y[17] = y[16];

  //Measurements Front neckline
  Var[47]=arclength(15, 17, 16);
  //1q
  x[18]=x[4]+Var[8]/-2;
y[18]=y[4];
  //1r
  x[19]=x[18];
y[19]=y[18]+-1.5;
  //Measurements Front shoulder line
  Var[35]=distance(x[19], y[19], x[15], y[15]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //1s
  x[20]=x[14]+Var[5]/-2;
y[20]=y[14];
  //1t
  x[21]= (x[20]+x[19])/2;
y[21]=(y[20]+y[19])/2;

  //1u
  x[22]=x[21]+0.375;
y[22]=y[21];
  //1v
  x[23]= (x[22]+x[20])/2;
y[23]=(y[22]+y[20])/2;

  //1y
  x[24] = x[22];
y[24] = y[23];

  //1z
  x[25] = x[24];
y[25] = y[12];

  //2
  x[26]= (x[25]+x[12])/2;
y[26]=(y[25]+y[12])/2;

  //2a
  x[27]= (x[26]+x[25])/2;
y[27]=(y[26]+y[25])/2;

  //2d
  x[28]=x[27];
y[28]=y[27]+Var[26]/-4;
  //Measurements front armhole c
  Var[42]=arclength(20, 28, 12);
  //2e
  x[29]=x[8]+Var[21]/-4;
y[29]=y[8];
  //2f
  x[30]=x[7]+Var[22]/-4;
y[30]=y[7];
  //2g
  x[31]=x[4]+Var[1]/-2;
y[31]=y[4]+Var[3]/-1;
  //2h
  cont(30, 12, 32, +-2);

  //2i
    intersect(x[32],y[32],x[30],y[30],x[29],y[29],x[5],y[5], 0);
  x[33]=getresultx();
  y[33]=getresulty();

  //Measurements Front wr
  Var[28]=distance(x[33], y[33], x[29], y[29]);
  //2j
  x[34]=x[33]+Var[28]/3;
y[34]=y[33];
  //Measurements half french dart
  Var[60]=distance(x[34], y[34], x[154], y[154]);
  //2k
  cont(34, 32, 35, Var[25]/-1+0);

  //Measurements Rotate Points Angle
  Var[29]=normalizeangle(angle(x[31], y[31], x[35], y[35]) - angle(x[31], y[31], x[32], y[32]))*180/3.14159;
  //2l
  x[36]= (x[30]+x[33])/2;
y[36]=(y[30]+y[33])/2;

  //2h1
  Dart(37, 32,  31,  Var[25] /-1 + 0, 0);

  //2m
  x[38] = x[31];
y[38] = y[6];

  //2n
  x[39] = x[31];
y[39] = y[5];

  //2o
  x[40]=x[39]+Var[28]/-3;
y[40]=y[39];
  //2p
  x[41]=x[39]+Var[28]/3;
y[41]=y[39];
  //2q
  x[42]=x[31];
y[42]=y[31]+Var[2]/-1;
  //2r
  x[43] = x[10];
y[43] = y[31];

  //2s
  x[44] = x[43];
y[44] = y[42];

  //Measurements Underbust level from waist
  Var[34]=distance(x[5], y[5], x[44], y[44]);
  //2x
  x[45]=x[31];
y[45]=y[31]+Var[2]/-2;
  //2y
  x[46]=x[31];
y[46]=y[31]+1;
  //Measurements dart uptake length
  Var[59]=distance(x[151], y[151], x[46], y[46]);
  //2z
  x[47]=x[24]+-1;
y[47]=y[24];
  //3
  x[48] = x[31];
y[48] = y[47];

  //2h(2)
    Rotate(49, 31, 32, Var[29]+0);
  //2g(2)
    Rotate(50, 31, 31, Var[29]+0);
  //1i(2)
    Rotate(51, 31, 12, Var[29]+0);
  //Measurements Rotate Points Angle(2)
  Var[30]=normalizeangle(angle(x[50], y[50], x[12], y[12]) - angle(x[50], y[50], x[51], y[51]))*180/3.14159;
  //3a
    intersect(x[51],y[51],x[34],y[34],x[31],y[31],x[49],y[49], 0);
  x[52]=getresultx();
  y[52]=getresulty();

  //3a(2)
    Rotate(53, 50, 52, Var[30]+0);
  //Measurements Rotate Points Angle(6)
  Var[52]=normalizeangle(angle(x[31], y[31], x[53], y[53]) - angle(x[31], y[31], x[37], y[37]))*180/3.14159;
  //Measurements Rotate Points Angle(7)
  Var[55]=normalizeangle(angle(x[31], y[31], x[52], y[52]) - angle(x[31], y[31], x[53], y[53]))*180/3.14159;
  //2g(3)
    Rotate(54, 50, 50, Var[30]+0);
  //Measurements Rotate Points Angle(5)
  Var[51]=normalizeangle(angle(x[54], y[54], x[52], y[52]) - angle(x[54], y[54], x[53], y[53]))*180/3.14159;
  //3b
  x[55]=x[38];
y[55]=y[38]+Var[31]/4;
  //3c
  x[56]=x[3]+Var[19]/-4;
y[56]=y[3]+Var[25]/-1;
  //3d
  x[57]=x[56];
y[57]=y[56]+Var[7]/-1;
  //3e
  x[58]=x[57];
y[58]=y[57]+Var[31]/-1;
  //3f
  x[59]=x[58]+Var[19]/4;
y[59]=y[58];
  //3g
  x[60]=x[57]+Var[18]/4+-0.5;
y[60]=y[57];
  //3h
  x[61]= (x[56]+x[57])/2;
y[61]=(y[56]+y[57])/2;

  //3i
  x[62]=x[61];
y[62]=y[61]+Var[20]/-4;
  //3j
  x[63]=x[62]+Var[0]/4+-0.5;
y[63]=y[62];
  //3k
  x[64]=x[56]+Var[27]/2;
y[64]=y[56];
  //3l
  x[65]=x[64];
y[65]=y[64]+0.75;
  //Measurements Back neckline
  Var[48]=arclength(56, 64, 65);
  //3m
  x[66]=x[56]+Var[9]/2;
y[66]=y[56];
  //3n
  x[67]=x[66];
y[67]=y[66]+-1.25;
  //Measurements Back shoulder line
  Var[36]=distance(x[65], y[65], x[67], y[67]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //3o
  x[68]= (x[56]+x[62])/2;
y[68]=(y[56]+y[62])/2;

  //3p
  x[69]=x[68]+Var[6]/2;
y[69]=y[68];
  //3q
  x[70] = x[69];
y[70] = y[63];

  //3r
  x[71]= (x[67]+x[69])/2;
y[71]=(y[67]+y[69])/2;

  //3s
  x[72] = x[69];
y[72] = y[71];

  //Measurements Back armhole a
  Var[43]=arclength(67, 72, 69);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3t
  x[73]=x[63]+Var[20]/4;
y[73]=y[63];
  //3u
  x[74]=x[60]+Var[21]/4;
y[74]=y[60];
  //3v
  x[75]=x[59]+Var[22]/4;
y[75]=y[59];
  //3w
    intersect(x[75],y[75],x[73],y[73],x[57],y[57],x[74],y[74], 0);
  x[76]=getresultx();
  y[76]=getresulty();

  //Measurements Back Waist reduction
  Var[32]=distance(x[76], y[76], x[74], y[74]);
  //3x
  x[77]= (x[76]+x[75])/2;
y[77]=(y[76]+y[75])/2;

  //3y
  x[78]=x[76]+Var[32]/-3;
y[78]=y[76];
  //33z
  x[79]= (x[68]+x[69])/2;
y[79]=(y[68]+y[69])/2;

  //4
  x[80] = x[79];
y[80] = y[62];

  //4a
  x[81] = x[80];
y[81] = y[57];

  //4b
  x[82] = x[81];
y[82] = y[58];

  //4c
  x[83]=x[81]+Var[32]/-3;
y[83]=y[81];
  //4d
  x[84]=x[81]+Var[32]/3;
y[84]=y[81];
  //4e
  cont(73, 78, 85, Var[34]/-1+0);

  //4f
  cont(52, 34, 86, Var[34]/-1+0);

  //4g
  cont(85, 73, 87, Var[26]/-4+0);

  //4h
  x[88]= (x[65]+x[67])/2;
y[88]=(y[65]+y[67])/2;

  //4i
  right_ang(89, 88, 65,  + -3, 0);

  //4j
  right_ang(90, 69, 67,  + -4, 0);

  //4k
    intersect(x[88],y[88],x[89],y[89],x[69],y[69],x[90],y[90], 0);
  x[91]=getresultx();
  y[91]=getresulty();

  //4l
  cont(65, 88, 92, Var[37]/-2+0);

  //4m
  cont(67, 88, 93, Var[37]/-2+0);

  //Measurements Rotate Points Angle(3)
  Var[38]=normalizeangle(angle(x[91], y[91], x[92], y[92]) - angle(x[91], y[91], x[93], y[93]))*180/3.14159;
  //4k(2)
    Rotate(94, 91, 91, Var[38]+0);
  //3p(2)
    Rotate(95, 91, 69, Var[38]+0);
  //Measurements Rotate Points Angle(4)
  Var[39]=normalizeangle(angle(x[91], y[91], x[69], y[69]) - angle(x[91], y[91], x[95], y[95]))*180/3.14159;
  //Measurements Back armhole b
  Var[44]=arclength(69, 95, 73);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3n(2)
    Rotate(96, 91, 67, Var[38]+0);
  //4n
    intersect(x[96],y[96],x[65],y[65],x[94],y[94],x[92],y[92], 0);
  x[97]=getresultx();
  y[97]=getresulty();

  //4n(2)
    Rotate(98, 91, 97, Var[39]+0);
  //4o
  x[99]= (x[19]+x[15])/2;
y[99]=(y[19]+y[15])/2;

  //Measurements half shoulder dart front
  Var[58]=distance(x[150], y[150], x[99], y[99]);
  //4p
  cont(99, 31, 100, Var[2]/-1+0);

  //Measurements 4p2y
  Var[56]=distance(x[100], y[100], x[46], y[46]);
  //Measurements 4o4p
  Var[57]=distance(x[99], y[99], x[100], y[100]);
  //MoveStart(3)
  x[101]=x[0]+-3.01526402640264;
y[101]=y[0]+-10.6848184818482;
  //MoveEnd(3)
  x[102]=x[0]+-2.96988448844885;
y[102]=y[0]+-9.5049504950495;
  //3q(2)
  x[103] = x[70] + x[102] - x[101] ;
y[103] = y[70] + y[102] - y[101] ;

  //MoveStart(4)
  x[104]=x[0]+6.28754125412541;
y[104]=y[0]+-8.73349834983498;
  //MoveEnd(4)
  x[105]=x[0]+5.60684818481848;
y[105]=y[0]+-9.95874587458746;
  //1z(2)
  x[106] = x[25] + x[105] - x[104] ;
y[106] = y[25] + y[105] - y[104] ;

  //MoveStart(5)
  x[107]=x[0]+6.4236798679868;
y[107]=y[0]+-4.10478547854785;
  //MoveEnd(5)
  x[108]=x[0]+6.60519801980198;
y[108]=y[0]+-4.05940594059406;
  //1u(2)
  x[109] = x[22] + x[108] - x[107] ;
y[109] = y[22] + y[108] - y[107] ;

  //Measurements Front armhole a
  Var[40]=arclength(19, 109, 20);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(6)
  x[110]=x[0]+5.69760726072607;
y[110]=y[0]+-9.5503300330033;
  //MoveEnd(6)
  x[111]=x[0]+5.4707095709571;
y[111]=y[0]+-9.27805280528053;
  //1z(3)
  x[112] = x[106] + x[111] - x[110] ;
y[112] = y[106] + y[111] - y[110] ;

  //Measurements Front armhole b
  Var[41]=arclength(20, 112, 12);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(7)
  x[113]=x[0]+-7.04460778037259;
y[113]=y[0]+-1.91956874158687;
  //MoveEnd(7)
  x[114]=x[0]+-7.72550732581121;
y[114]=y[0]+-2.05574865067459;
  //3k(2)
  x[115] = x[64] + x[114] - x[113] ;
y[115] = y[64] + y[114] - y[113] ;

  //3a3
  x[116]= (x[53]+x[52])/2;
y[116]=(y[53]+y[52])/2;

  //3a4
    intersect(x[116],y[116],x[31],y[31],x[12],y[12],x[53],y[53], 0);
  x[117]=getresultx();
  y[117]=getresulty();

  //3a5
  cont(117, 31, 118, +-1);

  //Measurements inner french dart leg
  Var[61]=distance(x[118], y[118], x[156], y[156]);
  //761
  x[119]=x[31]+0.04;
y[119]=y[31];
  //76a
  x[120]=x[31];
y[120]=y[31]+-0.04;
  //76b
  x[121]=x[120]+-0.04;
y[121]=y[120];
  //76c
  x[122]=x[31]+-0.04;
y[122]=y[31];
  //76d
  x[123]=x[31];
y[123]=y[31]+0.04;
  //4q
  x[124] = x[31];
y[124] = y[20];

  //4r
  x[125]=x[25];
y[125]=y[25]+-10;
  //4s
  x[126]=x[70];
y[126]=y[70]+-10;
  //2y(2)
    Rotate(127, 31, 46, Var[55]+0);
  //2g(4)
    Rotate(128, 31, 31, Var[55]+0);
  //3a(3)
    Rotate(129, 31, 53, Var[55]+0);
  //1i(3)
    Rotate(130, 31, 12, Var[55]+0);
  //1z(5)
    Rotate(131, 31, 112, Var[55]+0);
  //1s(2)
    Rotate(132, 31, 20, Var[55]+0);
  //1u(4)
    Rotate(133, 31, 109, Var[55]+0);
  //1r(3)
    Rotate(134, 31, 19, Var[55]+0);
  //4o(3)
    Rotate(135, 31, 99, Var[55]+0);
  //4u
  x[158]= (x[80]+x[89])/2;
y[158]=(y[80]+y[89])/2;

  //4v
  x[159] = x[80];
y[159] = y[158];

  //4w
  cont(46, 135, 160, Var[57]/-1+0);

  //4x
    intersect(x[45],y[45],x[40],y[40],x[86],y[86],x[42],y[42], 0);
  x[161]=getresultx();
  y[161]=getresulty();

  //4y
  x[136] = x[82];
y[136] = y[55];

  //4z
    intersect(x[86],y[86],x[42],y[42],x[31],y[31],x[41],y[41], 0);
  x[162]=getresultx();
  y[162]=getresulty();

  //5a
  x[163]=x[80]+0.13;
y[163]=y[80];
  //5b
  x[164]=x[89]+0.25;
y[164]=y[89];
  //5c
  x[165]= (x[130]+x[86])/2;
y[165]=(y[130]+y[86])/2;

  //5d
  x[166]= (x[86]+x[34])/2;
y[166]=(y[86]+y[34])/2;

  //5e
  x[167] = x[130];
y[167] = y[165];

  //5f
  x[168] = x[34];
y[168] = y[166];

  //5g
  x[169] = x[78];
y[169] = y[87];

  //5h
    intersect(x[169],y[169],x[78],y[78],x[85],y[85],x[86],y[86], 0);
  x[170]=getresultx();
  y[170]=getresulty();

  //5i
  x[171]= (x[98]+x[89])/2;
y[171]=(y[98]+y[89])/2;

  //5j
  x[172] = x[89];
y[172] = y[164];

  //5k
  x[173]=x[161]+-0.625;
y[173]=y[161];
  //5l
  x[174]=x[162]+0.625;
y[174]=y[162];
  //4y1
  x[137]= (x[89]+x[80])/2;
y[137]=(y[89]+y[80])/2;

  //4y2
  cont(135, 46, 138, Var[2]/-1+0);

  //4y3
  x[139] = x[122];
y[139] = y[123];

  //4y4
  x[140] = x[119];
y[140] = y[139];

  //4y5
  x[141] = x[140];
y[141] = y[120];

  //4y6
  x[142] = x[80];
y[142] = y[137];

  //5k1
  x[175]= (x[173]+x[161])/2;
y[175]=(y[173]+y[161])/2;

  //4z1
  x[176]= (x[162]+x[174])/2;
y[176]=(y[162]+y[174])/2;

  //3d1
  x[143]= (x[142]+x[79])/2;
y[143]=(y[142]+y[79])/2;

  }

Flow1View5Objects()
{

  //Object Front
  if (HideObj[0] == 0)
    {

  Obj[0] = newobject("poly");
  current_point=addpoint(x[6],y[6],"LINE");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[10],y[10],"LINE");
  current_point=addpoint(x[14],y[14],"LINE");
  current_point=addpoint(x[16],y[16],"XARC_START");
  current_point=addpoint(x[17],y[17],"XARC_CORNER");
  current_point=addpoint(x[15],y[15],"LINE");
  current_point=addpoint(x[99],y[99],"LINE");
  current_point=addpoint(x[100],y[100],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[128],y[128],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[45],y[45],"XARC_CORNER");
  current_point=addpoint(x[176],y[176],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[41],y[41],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[55],y[55],"XARC_CORNER");
  current_point=addpoint(x[38],y[38],"LINE");
    if (lang == 0) { name_object(Obj[0],"Front"); }
    if (lang == 1) { name_object(Obj[0],"Front"); }
    if (lang == 2) { name_object(Obj[0],"Front"); }
    if (lang == 3) { name_object(Obj[0],"Front"); }
    if (lang == 4) { name_object(Obj[0],"Front"); }
    if (lang == 5) { name_object(Obj[0],"Front"); }
    if (lang == 6) { name_object(Obj[0],"Front"); }
    }

  //Object BACK
  if (HideObj[2] == 0)
    {

  Obj[2] = newobject("poly");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[58],y[58],"LINE");
  current_point=addpoint(x[57],y[57],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[62],y[62],"LINE");
  current_point=addpoint(x[68],y[68],"LINE");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[56],y[56],"XARC_START");
  current_point=addpoint(x[115],y[115],"XARC_CORNER");
  current_point=addpoint(x[65],y[65],"LINE");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[164],y[164],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[158],y[158],"XARC_CORNER");
  current_point=addpoint(x[80],y[80],"LINE");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[83],y[83],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[136],y[136],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[2],"BACK"); }
    if (lang == 1) { name_object(Obj[2],"BACK"); }
    if (lang == 2) { name_object(Obj[2],"BACK"); }
    if (lang == 3) { name_object(Obj[2],"BACK"); }
    if (lang == 4) { name_object(Obj[2],"BACK"); }
    if (lang == 5) { name_object(Obj[2],"BACK"); }
    if (lang == 6) { name_object(Obj[2],"BACK"); }
    }

  //Object 60a
  if (HideObj[4] == 0)
    {
  if (lang == 0)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[44],y[44],"LINE");
    if (lang == 0) { name_object(Obj[4],"60a"); }
    if (lang == 1) { name_object(Obj[4],"60a"); }
    if (lang == 2) { name_object(Obj[4],"60a"); }
    if (lang == 3) { name_object(Obj[4],"60a"); }
    if (lang == 4) { name_object(Obj[4],"60a"); }
    if (lang == 5) { name_object(Obj[4],"60a"); }
    if (lang == 6) { name_object(Obj[4],"60a"); }
    }

  //Object 60b
  if (HideObj[5] == 0)
    {
  if (lang == 0)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint(x[124],y[124],"LINE");
    if (lang == 0) { name_object(Obj[5],"60b"); }
    if (lang == 1) { name_object(Obj[5],"60b"); }
    if (lang == 2) { name_object(Obj[5],"60b"); }
    if (lang == 3) { name_object(Obj[5],"60b"); }
    if (lang == 4) { name_object(Obj[5],"60b"); }
    if (lang == 5) { name_object(Obj[5],"60b"); }
    if (lang == 6) { name_object(Obj[5],"60b"); }
    }

  //Object 60c
  if (HideObj[6] == 0)
    {
  if (lang == 0)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[55]+0.5),(y[55]+-1),"LINE");
    if (lang == 0) { name_object(Obj[6],"60c"); }
    if (lang == 1) { name_object(Obj[6],"60c"); }
    if (lang == 2) { name_object(Obj[6],"60c"); }
    if (lang == 3) { name_object(Obj[6],"60c"); }
    if (lang == 4) { name_object(Obj[6],"60c"); }
    if (lang == 5) { name_object(Obj[6],"60c"); }
    if (lang == 6) { name_object(Obj[6],"60c"); }
    }

  //Object 60d
  if (HideObj[7] == 0)
    {
  if (lang == 0)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+1),"LINE");
    if (lang == 0) { name_object(Obj[7],"60d"); }
    if (lang == 1) { name_object(Obj[7],"60d"); }
    if (lang == 2) { name_object(Obj[7],"60d"); }
    if (lang == 3) { name_object(Obj[7],"60d"); }
    if (lang == 4) { name_object(Obj[7],"60d"); }
    if (lang == 5) { name_object(Obj[7],"60d"); }
    if (lang == 6) { name_object(Obj[7],"60d"); }
    }

  //Object 60e
  if (HideObj[8] == 0)
    {
  if (lang == 0)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[68],y[68],"LINE");
    if (lang == 0) { name_object(Obj[8],"60e"); }
    if (lang == 1) { name_object(Obj[8],"60e"); }
    if (lang == 2) { name_object(Obj[8],"60e"); }
    if (lang == 3) { name_object(Obj[8],"60e"); }
    if (lang == 4) { name_object(Obj[8],"60e"); }
    if (lang == 5) { name_object(Obj[8],"60e"); }
    if (lang == 6) { name_object(Obj[8],"60e"); }
    }

  //Object 60f
  if (HideObj[9] == 0)
    {
  if (lang == 0)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[58]+1),(y[58]+1),"LINE");
    if (lang == 0) { name_object(Obj[9],"60f"); }
    if (lang == 1) { name_object(Obj[9],"60f"); }
    if (lang == 2) { name_object(Obj[9],"60f"); }
    if (lang == 3) { name_object(Obj[9],"60f"); }
    if (lang == 4) { name_object(Obj[9],"60f"); }
    if (lang == 5) { name_object(Obj[9],"60f"); }
    if (lang == 6) { name_object(Obj[9],"60f"); }
    }

  //Object Side front
  if (HideObj[12] == 0)
    {

  Obj[12] = newobject("poly");
  current_point=addpoint(x[31],y[31],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[45],y[45],"XARC_CORNER");
  current_point=addpoint(x[175],y[175],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[40],y[40],"XARC_START");
  current_point=addpoint(x[55],y[55],"XARC_CORNER");
  current_point=addpoint(x[38],y[38],"LINE");
  current_point=addpoint(x[30],y[30],"XARC_START");
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
  current_point=addpoint(x[34],y[34],"XARC_START");
  current_point=addpoint(x[168],y[168],"XARC_CORNER");
  current_point=addpoint(x[86],y[86],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[167],y[167],"XARC_CORNER");
  current_point=addpoint(x[130],y[130],"XARC_START");
  current_point=addpoint(x[131],y[131],"XARC_CORNER");
  current_point=addpoint(x[132],y[132],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[133],y[133],"XARC_CORNER");
  current_point=addpoint(x[134],y[134],"LINE");
  current_point=addpoint(x[135],y[135],"LINE");
  current_point=addpoint(x[160],y[160],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[46],y[46],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[12],"Side front"); }
    if (lang == 1) { name_object(Obj[12],"Side front"); }
    if (lang == 2) { name_object(Obj[12],"Side front"); }
    if (lang == 3) { name_object(Obj[12],"Side front"); }
    if (lang == 4) { name_object(Obj[12],"Side front"); }
    if (lang == 5) { name_object(Obj[12],"Side front"); }
    if (lang == 6) { name_object(Obj[12],"Side front"); }
    }

  //Object side back
  if (HideObj[13] == 0)
    {

  Obj[13] = newobject("poly");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  current_point=addpoint(x[85],y[85],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[163],y[163],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[142],y[142],"XARC_CORNER");
  current_point=addpoint(x[164],y[164],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[171],y[171],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[13],"side back"); }
    if (lang == 1) { name_object(Obj[13],"side back"); }
    if (lang == 2) { name_object(Obj[13],"side back"); }
    if (lang == 3) { name_object(Obj[13],"side back"); }
    if (lang == 4) { name_object(Obj[13],"side back"); }
    if (lang == 5) { name_object(Obj[13],"side back"); }
    if (lang == 6) { name_object(Obj[13],"side back"); }
    }

  //Object sbgrainline
  if (HideObj[14] == 0)
    {

  Obj[14] = newobject("poly");
  current_point=addpoint(x[70],y[70],"LINE");
  current_point=addpoint(x[126],y[126],"OPEN");
    if (lang == 0) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 1) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 2) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 3) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 4) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 5) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 6) { name_object(Obj[14],"sbgrainline"); }
    }

  //Object sfgrainline
  if (HideObj[15] == 0)
    {

  Obj[15] = newobject("poly");
  current_point=addpoint(x[25],y[25],"LINE");
  current_point=addpoint(x[125],y[125],"OPEN");
    if (lang == 0) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 1) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 2) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 3) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 4) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 5) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 6) { name_object(Obj[15],"sfgrainline"); }
    }

  //Object sfgrainlineTxt
  if (HideObj[16] == 0)
    {
  if (lang == 0)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[125],(y[125]+1),"LINE");
    if (lang == 0) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[16],"sfgrainlineTxt"); }
    }

  //Object sbgrainlineTxt
  if (HideObj[17] == 0)
    {
  if (lang == 0)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[126],(y[126]+1),"LINE");
    if (lang == 0) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[17],"sbgrainlineTxt"); }
    }

  //Object txt1
  if (HideObj[18] == 0)
    {
  if (lang == 0)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint(x[124],(y[124]+1),"LINE");
    if (lang == 0) { name_object(Obj[18],"txt1"); }
    if (lang == 1) { name_object(Obj[18],"txt1"); }
    if (lang == 2) { name_object(Obj[18],"txt1"); }
    if (lang == 3) { name_object(Obj[18],"txt1"); }
    if (lang == 4) { name_object(Obj[18],"txt1"); }
    if (lang == 5) { name_object(Obj[18],"txt1"); }
    if (lang == 6) { name_object(Obj[18],"txt1"); }
    }

  //Object TXT2
  if (HideObj[19] == 0)
    {
  if (lang == 0)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+0.5),"LINE");
    if (lang == 0) { name_object(Obj[19],"TXT2"); }
    if (lang == 1) { name_object(Obj[19],"TXT2"); }
    if (lang == 2) { name_object(Obj[19],"TXT2"); }
    if (lang == 3) { name_object(Obj[19],"TXT2"); }
    if (lang == 4) { name_object(Obj[19],"TXT2"); }
    if (lang == 5) { name_object(Obj[19],"TXT2"); }
    if (lang == 6) { name_object(Obj[19],"TXT2"); }
    }

  //Object txt3
  if (HideObj[20] == 0)
    {
  if (lang == 0)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+-0.5),"LINE");
    if (lang == 0) { name_object(Obj[20],"txt3"); }
    if (lang == 1) { name_object(Obj[20],"txt3"); }
    if (lang == 2) { name_object(Obj[20],"txt3"); }
    if (lang == 3) { name_object(Obj[20],"txt3"); }
    if (lang == 4) { name_object(Obj[20],"txt3"); }
    if (lang == 5) { name_object(Obj[20],"txt3"); }
    if (lang == 6) { name_object(Obj[20],"txt3"); }
    }

  //Object txt4
  if (HideObj[21] == 0)
    {
  if (lang == 0)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+2),"LINE");
    if (lang == 0) { name_object(Obj[21],"txt4"); }
    if (lang == 1) { name_object(Obj[21],"txt4"); }
    if (lang == 2) { name_object(Obj[21],"txt4"); }
    if (lang == 3) { name_object(Obj[21],"txt4"); }
    if (lang == 4) { name_object(Obj[21],"txt4"); }
    if (lang == 5) { name_object(Obj[21],"txt4"); }
    if (lang == 6) { name_object(Obj[21],"txt4"); }
    }

  //Object txt5
  if (HideObj[22] == 0)
    {
  if (lang == 0)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),(y[80]+1),"LINE");
    if (lang == 0) { name_object(Obj[22],"txt5"); }
    if (lang == 1) { name_object(Obj[22],"txt5"); }
    if (lang == 2) { name_object(Obj[22],"txt5"); }
    if (lang == 3) { name_object(Obj[22],"txt5"); }
    if (lang == 4) { name_object(Obj[22],"txt5"); }
    if (lang == 5) { name_object(Obj[22],"txt5"); }
    if (lang == 6) { name_object(Obj[22],"txt5"); }
    }

  //Object txt6
  if (HideObj[23] == 0)
    {
  if (lang == 0)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),y[80],"LINE");
    if (lang == 0) { name_object(Obj[23],"txt6"); }
    if (lang == 1) { name_object(Obj[23],"txt6"); }
    if (lang == 2) { name_object(Obj[23],"txt6"); }
    if (lang == 3) { name_object(Obj[23],"txt6"); }
    if (lang == 4) { name_object(Obj[23],"txt6"); }
    if (lang == 5) { name_object(Obj[23],"txt6"); }
    if (lang == 6) { name_object(Obj[23],"txt6"); }
    }

  //Object txt7
  if (HideObj[24] == 0)
    {
  if (lang == 0)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[82]+1.5),(y[82]+1),"LINE");
    if (lang == 0) { name_object(Obj[24],"txt7"); }
    if (lang == 1) { name_object(Obj[24],"txt7"); }
    if (lang == 2) { name_object(Obj[24],"txt7"); }
    if (lang == 3) { name_object(Obj[24],"txt7"); }
    if (lang == 4) { name_object(Obj[24],"txt7"); }
    if (lang == 5) { name_object(Obj[24],"txt7"); }
    if (lang == 6) { name_object(Obj[24],"txt7"); }
    }

  //Object txt8
  if (HideObj[25] == 0)
    {
  if (lang == 0)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[7]+1.5),(y[7]+1),"LINE");
    if (lang == 0) { name_object(Obj[25],"txt8"); }
    if (lang == 1) { name_object(Obj[25],"txt8"); }
    if (lang == 2) { name_object(Obj[25],"txt8"); }
    if (lang == 3) { name_object(Obj[25],"txt8"); }
    if (lang == 4) { name_object(Obj[25],"txt8"); }
    if (lang == 5) { name_object(Obj[25],"txt8"); }
    if (lang == 6) { name_object(Obj[25],"txt8"); }
    }

  //Object front waistline
  if (HideObj[26] == 0)
    {

  Obj[26] = newobject("poly");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[41],y[41],"OPEN");
    if (lang == 0) { name_object(Obj[26],"front waistline"); }
    if (lang == 1) { name_object(Obj[26],"front waistline"); }
    if (lang == 2) { name_object(Obj[26],"front waistline"); }
    if (lang == 3) { name_object(Obj[26],"front waistline"); }
    if (lang == 4) { name_object(Obj[26],"front waistline"); }
    if (lang == 5) { name_object(Obj[26],"front waistline"); }
    if (lang == 6) { name_object(Obj[26],"front waistline"); }
    }

  //Object Back waistline
  if (HideObj[27] == 0)
    {

  Obj[27] = newobject("poly");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[83],y[83],"OPEN");
    if (lang == 0) { name_object(Obj[27],"Back waistline"); }
    if (lang == 1) { name_object(Obj[27],"Back waistline"); }
    if (lang == 2) { name_object(Obj[27],"Back waistline"); }
    if (lang == 3) { name_object(Obj[27],"Back waistline"); }
    if (lang == 4) { name_object(Obj[27],"Back waistline"); }
    if (lang == 5) { name_object(Obj[27],"Back waistline"); }
    if (lang == 6) { name_object(Obj[27],"Back waistline"); }
    }

  //Object sf waistline
  if (HideObj[30] == 0)
    {

  Obj[30] = newobject("poly");
  current_point=addpoint(x[40],y[40],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[30],"sf waistline"); }
    if (lang == 1) { name_object(Obj[30],"sf waistline"); }
    if (lang == 2) { name_object(Obj[30],"sf waistline"); }
    if (lang == 3) { name_object(Obj[30],"sf waistline"); }
    if (lang == 4) { name_object(Obj[30],"sf waistline"); }
    if (lang == 5) { name_object(Obj[30],"sf waistline"); }
    if (lang == 6) { name_object(Obj[30],"sf waistline"); }
    }

  //Object sb waistline
  if (HideObj[31] == 0)
    {

  Obj[31] = newobject("poly");
  current_point=addpoint(x[78],y[78],"LINE");
  current_point=addpoint(x[84],y[84],"OPEN");
    if (lang == 0) { name_object(Obj[31],"sb waistline"); }
    if (lang == 1) { name_object(Obj[31],"sb waistline"); }
    if (lang == 2) { name_object(Obj[31],"sb waistline"); }
    if (lang == 3) { name_object(Obj[31],"sb waistline"); }
    if (lang == 4) { name_object(Obj[31],"sb waistline"); }
    if (lang == 5) { name_object(Obj[31],"sb waistline"); }
    if (lang == 6) { name_object(Obj[31],"sb waistline"); }
    }
  offset_mark(0, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(2, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(12, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(13, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow1View6()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow1View6");
    }
  Flow1View6Points();
  }

Flow1View6Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //if Back shoulder line < Front shoulder line
  //If Point here
  if( Var[36] < Var[35] )
    {
  //Measurements Back shoulder dart
  Var[37]=  
  
0;
    }
  //if Full Front Length < Nape to Waist
  //If Point here
  if( Var[4] < Var[7] )
    {
  //Measurements Bust dart
  Var[25]=  
  
0;
    }
  //1
  x[3]=x[0];
y[3]=y[0];
  //1a
  x[4]=x[3]+Var[19]/4+3;
y[4]=y[3];
  //1b
  x[5]=x[4];
y[5]=y[4]+Var[4]/-1;
  //1c
  x[6]=x[5];
y[6]=y[5]+Var[13]/-3;
  //1d
  x[7]=x[6]+Var[19]/-4;
y[7]=y[6];
  //1e
  x[8]=x[5]+Var[18]/-4+-0.5;
y[8]=y[5];
  //1f
  x[9]=x[5];
y[9]=y[5]+Var[7]/2;
  //1g
  x[10]=x[9];
y[10]=y[9]+Var[20]/-4;
  //1h
  x[11]=x[10]+Var[33]/-1+-0.5;
y[11]=y[10];
  //1i
  x[12]=x[11];
y[12]=y[11]+Var[25];
  //1k
  x[13] = x[4];
y[13] = y[12];

  //Measurements armheight
  Var[26]=distance(x[13], y[13], x[4], y[4]);
  //1l
  x[14]=x[13];
y[14]=y[13]+Var[26]/4;
  //1n
  x[15]=x[4]+Var[27]/-2;
y[15]=y[4];
  //1o
  x[16]=x[4];
y[16]=y[4]+Var[27]/-2+-0.5;
  //1p
  x[17] = x[15];
y[17] = y[16];

  //Measurements Front neckline
  Var[47]=arclength(15, 17, 16);
  //1q
  x[18]=x[4]+Var[8]/-2;
y[18]=y[4];
  //1r
  x[19]=x[18];
y[19]=y[18]+-1.5;
  //Measurements Front shoulder line
  Var[35]=distance(x[19], y[19], x[15], y[15]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //1s
  x[20]=x[14]+Var[5]/-2;
y[20]=y[14];
  //1t
  x[21]= (x[20]+x[19])/2;
y[21]=(y[20]+y[19])/2;

  //1u
  x[22]=x[21]+0.375;
y[22]=y[21];
  //1v
  x[23]= (x[22]+x[20])/2;
y[23]=(y[22]+y[20])/2;

  //1y
  x[24] = x[22];
y[24] = y[23];

  //1z
  x[25] = x[24];
y[25] = y[12];

  //2
  x[26]= (x[25]+x[12])/2;
y[26]=(y[25]+y[12])/2;

  //2a
  x[27]= (x[26]+x[25])/2;
y[27]=(y[26]+y[25])/2;

  //2d
  x[28]=x[27];
y[28]=y[27]+Var[26]/-4;
  //Measurements front armhole c
  Var[42]=arclength(20, 28, 12);
  //2e
  x[29]=x[8]+Var[21]/-4;
y[29]=y[8];
  //2f
  x[30]=x[7]+Var[22]/-4;
y[30]=y[7];
  //2g
  x[31]=x[4]+Var[1]/-2;
y[31]=y[4]+Var[3]/-1;
  //2h
  cont(30, 12, 32, +-2);

  //2i
    intersect(x[32],y[32],x[30],y[30],x[29],y[29],x[5],y[5], 0);
  x[33]=getresultx();
  y[33]=getresulty();

  //Measurements Front wr
  Var[28]=distance(x[33], y[33], x[29], y[29]);
  //2j
  x[34]=x[33]+Var[28]/3;
y[34]=y[33];
  //Measurements half french dart
  Var[60]=distance(x[34], y[34], x[154], y[154]);
  //2k
  cont(34, 32, 35, Var[25]/-1+0);

  //Measurements Rotate Points Angle
  Var[29]=normalizeangle(angle(x[31], y[31], x[35], y[35]) - angle(x[31], y[31], x[32], y[32]))*180/3.14159;
  //2l
  x[36]= (x[30]+x[33])/2;
y[36]=(y[30]+y[33])/2;

  //2h1
  Dart(37, 32,  31,  Var[25] /-1 + 0, 0);

  //2m
  x[38] = x[31];
y[38] = y[6];

  //2n
  x[39] = x[31];
y[39] = y[5];

  //2o
  x[40]=x[39]+Var[28]/-3;
y[40]=y[39];
  //2p
  x[41]=x[39]+Var[28]/3;
y[41]=y[39];
  //2q
  x[42]=x[31];
y[42]=y[31]+Var[2]/-1;
  //2r
  x[43] = x[10];
y[43] = y[31];

  //2s
  x[44] = x[43];
y[44] = y[42];

  //Measurements Underbust level from waist
  Var[34]=distance(x[5], y[5], x[44], y[44]);
  //2x
  x[45]=x[31];
y[45]=y[31]+Var[2]/-2;
  //2y
  x[46]=x[31];
y[46]=y[31]+1;
  //Measurements dart uptake length
  Var[59]=distance(x[151], y[151], x[46], y[46]);
  //2z
  x[47]=x[24]+-1;
y[47]=y[24];
  //3
  x[48] = x[31];
y[48] = y[47];

  //2h(2)
    Rotate(49, 31, 32, Var[29]+0);
  //2g(2)
    Rotate(50, 31, 31, Var[29]+0);
  //1i(2)
    Rotate(51, 31, 12, Var[29]+0);
  //Measurements Rotate Points Angle(2)
  Var[30]=normalizeangle(angle(x[50], y[50], x[12], y[12]) - angle(x[50], y[50], x[51], y[51]))*180/3.14159;
  //3a
    intersect(x[51],y[51],x[34],y[34],x[31],y[31],x[49],y[49], 0);
  x[52]=getresultx();
  y[52]=getresulty();

  //3a(2)
    Rotate(53, 50, 52, Var[30]+0);
  //Measurements Rotate Points Angle(6)
  Var[52]=normalizeangle(angle(x[31], y[31], x[53], y[53]) - angle(x[31], y[31], x[37], y[37]))*180/3.14159;
  //Measurements Rotate Points Angle(7)
  Var[55]=normalizeangle(angle(x[31], y[31], x[52], y[52]) - angle(x[31], y[31], x[53], y[53]))*180/3.14159;
  //2g(3)
    Rotate(54, 50, 50, Var[30]+0);
  //Measurements Rotate Points Angle(5)
  Var[51]=normalizeangle(angle(x[54], y[54], x[52], y[52]) - angle(x[54], y[54], x[53], y[53]))*180/3.14159;
  //3b
  x[55]=x[38];
y[55]=y[38]+Var[31]/4;
  //3c
  x[56]=x[3]+Var[19]/-4;
y[56]=y[3]+Var[25]/-1;
  //3d
  x[57]=x[56];
y[57]=y[56]+Var[7]/-1;
  //3e
  x[58]=x[57];
y[58]=y[57]+Var[31]/-1;
  //3f
  x[59]=x[58]+Var[19]/4;
y[59]=y[58];
  //3g
  x[60]=x[57]+Var[18]/4+-0.5;
y[60]=y[57];
  //3h
  x[61]= (x[56]+x[57])/2;
y[61]=(y[56]+y[57])/2;

  //3i
  x[62]=x[61];
y[62]=y[61]+Var[20]/-4;
  //3j
  x[63]=x[62]+Var[0]/4+-0.5;
y[63]=y[62];
  //3k
  x[64]=x[56]+Var[27]/2;
y[64]=y[56];
  //3l
  x[65]=x[64];
y[65]=y[64]+0.75;
  //Measurements Back neckline
  Var[48]=arclength(56, 64, 65);
  //3m
  x[66]=x[56]+Var[9]/2;
y[66]=y[56];
  //3n
  x[67]=x[66];
y[67]=y[66]+-1.25;
  //Measurements Back shoulder line
  Var[36]=distance(x[65], y[65], x[67], y[67]);
  //Measurements Back shoulder dart
  Var[37]=Var[35]/-1 +   
 Var[36]/1 +   
0;
  //3o
  x[68]= (x[56]+x[62])/2;
y[68]=(y[56]+y[62])/2;

  //3p
  x[69]=x[68]+Var[6]/2;
y[69]=y[68];
  //3q
  x[70] = x[69];
y[70] = y[63];

  //3r
  x[71]= (x[67]+x[69])/2;
y[71]=(y[67]+y[69])/2;

  //3s
  x[72] = x[69];
y[72] = y[71];

  //Measurements Back armhole a
  Var[43]=arclength(67, 72, 69);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3t
  x[73]=x[63]+Var[20]/4;
y[73]=y[63];
  //3u
  x[74]=x[60]+Var[21]/4;
y[74]=y[60];
  //3v
  x[75]=x[59]+Var[22]/4;
y[75]=y[59];
  //3w
    intersect(x[75],y[75],x[73],y[73],x[57],y[57],x[74],y[74], 0);
  x[76]=getresultx();
  y[76]=getresulty();

  //Measurements Back Waist reduction
  Var[32]=distance(x[76], y[76], x[74], y[74]);
  //3x
  x[77]= (x[76]+x[75])/2;
y[77]=(y[76]+y[75])/2;

  //3y
  x[78]=x[76]+Var[32]/-3;
y[78]=y[76];
  //33z
  x[79]= (x[68]+x[69])/2;
y[79]=(y[68]+y[69])/2;

  //4
  x[80] = x[79];
y[80] = y[62];

  //4a
  x[81] = x[80];
y[81] = y[57];

  //4b
  x[82] = x[81];
y[82] = y[58];

  //4c
  x[83]=x[81]+Var[32]/-3;
y[83]=y[81];
  //4d
  x[84]=x[81]+Var[32]/3;
y[84]=y[81];
  //4e
  cont(73, 78, 85, Var[34]/-1+0);

  //4f
  cont(52, 34, 86, Var[34]/-1+0);

  //4g
  cont(85, 73, 87, Var[26]/-4+0);

  //4h
  x[88]= (x[65]+x[67])/2;
y[88]=(y[65]+y[67])/2;

  //4i
  right_ang(89, 88, 65,  + -3, 0);

  //4j
  right_ang(90, 69, 67,  + -4, 0);

  //4k
    intersect(x[88],y[88],x[89],y[89],x[69],y[69],x[90],y[90], 0);
  x[91]=getresultx();
  y[91]=getresulty();

  //4l
  cont(65, 88, 92, Var[37]/-2+0);

  //4m
  cont(67, 88, 93, Var[37]/-2+0);

  //Measurements Rotate Points Angle(3)
  Var[38]=normalizeangle(angle(x[91], y[91], x[92], y[92]) - angle(x[91], y[91], x[93], y[93]))*180/3.14159;
  //4k(2)
    Rotate(94, 91, 91, Var[38]+0);
  //3p(2)
    Rotate(95, 91, 69, Var[38]+0);
  //Measurements Rotate Points Angle(4)
  Var[39]=normalizeangle(angle(x[91], y[91], x[69], y[69]) - angle(x[91], y[91], x[95], y[95]))*180/3.14159;
  //Measurements Back armhole b
  Var[44]=arclength(69, 95, 73);
  //Measurements back arm hole total
  Var[46]=Var[44]/1 +   
 Var[43]/1 +   
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //3n(2)
    Rotate(96, 91, 67, Var[38]+0);
  //4n
    intersect(x[96],y[96],x[65],y[65],x[94],y[94],x[92],y[92], 0);
  x[97]=getresultx();
  y[97]=getresulty();

  //4n(2)
    Rotate(98, 91, 97, Var[39]+0);
  //4o
  x[99]= (x[19]+x[15])/2;
y[99]=(y[19]+y[15])/2;

  //Measurements half shoulder dart front
  Var[58]=distance(x[150], y[150], x[99], y[99]);
  //4p
  cont(99, 31, 100, Var[2]/-1+0);

  //Measurements 4p2y
  Var[56]=distance(x[100], y[100], x[46], y[46]);
  //Measurements 4o4p
  Var[57]=distance(x[99], y[99], x[100], y[100]);
  //MoveStart(3)
  x[101]=x[0]+-3.01526402640264;
y[101]=y[0]+-10.6848184818482;
  //MoveEnd(3)
  x[102]=x[0]+-2.96988448844885;
y[102]=y[0]+-9.5049504950495;
  //3q(2)
  x[103] = x[70] + x[102] - x[101] ;
y[103] = y[70] + y[102] - y[101] ;

  //MoveStart(4)
  x[104]=x[0]+6.28754125412541;
y[104]=y[0]+-8.73349834983498;
  //MoveEnd(4)
  x[105]=x[0]+5.60684818481848;
y[105]=y[0]+-9.95874587458746;
  //1z(2)
  x[106] = x[25] + x[105] - x[104] ;
y[106] = y[25] + y[105] - y[104] ;

  //MoveStart(5)
  x[107]=x[0]+6.4236798679868;
y[107]=y[0]+-4.10478547854785;
  //MoveEnd(5)
  x[108]=x[0]+6.60519801980198;
y[108]=y[0]+-4.05940594059406;
  //1u(2)
  x[109] = x[22] + x[108] - x[107] ;
y[109] = y[22] + y[108] - y[107] ;

  //Measurements Front armhole a
  Var[40]=arclength(19, 109, 20);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(6)
  x[110]=x[0]+5.69760726072607;
y[110]=y[0]+-9.5503300330033;
  //MoveEnd(6)
  x[111]=x[0]+5.4707095709571;
y[111]=y[0]+-9.27805280528053;
  //1z(3)
  x[112] = x[106] + x[111] - x[110] ;
y[112] = y[106] + y[111] - y[110] ;

  //Measurements Front armhole b
  Var[41]=arclength(20, 112, 12);
  //Measurements Front arm hole total
  Var[45]=Var[41]/1 + 
 Var[40]/1 +  
 
 
0;
  //Measurements total armhole
  Var[49]=Var[46]/1 +   
 Var[45]/1 +   
0;
  //MoveStart(7)
  x[113]=x[0]+-7.04460778037259;
y[113]=y[0]+-1.91956874158687;
  //MoveEnd(7)
  x[114]=x[0]+-7.72550732581121;
y[114]=y[0]+-2.05574865067459;
  //3k(2)
  x[115] = x[64] + x[114] - x[113] ;
y[115] = y[64] + y[114] - y[113] ;

  //3a3
  x[116]= (x[53]+x[52])/2;
y[116]=(y[53]+y[52])/2;

  //3a4
    intersect(x[116],y[116],x[31],y[31],x[12],y[12],x[53],y[53], 0);
  x[117]=getresultx();
  y[117]=getresulty();

  //3a5
  cont(117, 31, 118, +-1);

  //Measurements inner french dart leg
  Var[61]=distance(x[118], y[118], x[156], y[156]);
  //761
  x[119]=x[31]+0.04;
y[119]=y[31];
  //76a
  x[120]=x[31];
y[120]=y[31]+-0.04;
  //76b
  x[121]=x[120]+-0.04;
y[121]=y[120];
  //76c
  x[122]=x[31]+-0.04;
y[122]=y[31];
  //76d
  x[123]=x[31];
y[123]=y[31]+0.04;
  //4q
  x[124] = x[31];
y[124] = y[20];

  //4r
  x[125]=x[25];
y[125]=y[25]+-10;
  //4s
  x[126]=x[70];
y[126]=y[70]+-10;
  //2y(2)
    Rotate(127, 31, 46, Var[55]+0);
  //2g(4)
    Rotate(128, 31, 31, Var[55]+0);
  //3a(3)
    Rotate(129, 31, 53, Var[55]+0);
  //1i(3)
    Rotate(130, 31, 12, Var[55]+0);
  //1z(5)
    Rotate(131, 31, 112, Var[55]+0);
  //1s(2)
    Rotate(132, 31, 20, Var[55]+0);
  //1u(4)
    Rotate(133, 31, 109, Var[55]+0);
  //1r(3)
    Rotate(134, 31, 19, Var[55]+0);
  //4o(3)
    Rotate(135, 31, 99, Var[55]+0);
  //4u
  x[158]= (x[80]+x[89])/2;
y[158]=(y[80]+y[89])/2;

  //4v
  x[159] = x[80];
y[159] = y[158];

  //4w
  cont(46, 135, 160, Var[57]/-1+0);

  //4x
    intersect(x[45],y[45],x[40],y[40],x[86],y[86],x[42],y[42], 0);
  x[161]=getresultx();
  y[161]=getresulty();

  //4y
  x[136] = x[82];
y[136] = y[55];

  //4z
    intersect(x[86],y[86],x[42],y[42],x[31],y[31],x[41],y[41], 0);
  x[162]=getresultx();
  y[162]=getresulty();

  //5a
  x[163]=x[80]+0.13;
y[163]=y[80];
  //5b
  x[164]=x[89]+0.25;
y[164]=y[89];
  //5c
  x[165]= (x[130]+x[86])/2;
y[165]=(y[130]+y[86])/2;

  //5d
  x[166]= (x[86]+x[34])/2;
y[166]=(y[86]+y[34])/2;

  //5e
  x[167] = x[130];
y[167] = y[165];

  //5f
  x[168] = x[34];
y[168] = y[166];

  //5g
  x[169] = x[78];
y[169] = y[87];

  //5h
    intersect(x[169],y[169],x[78],y[78],x[85],y[85],x[86],y[86], 0);
  x[170]=getresultx();
  y[170]=getresulty();

  //5i
  x[171]= (x[98]+x[89])/2;
y[171]=(y[98]+y[89])/2;

  //5j
  x[172] = x[89];
y[172] = y[164];

  //5k
  x[173]=x[161]+-0.625;
y[173]=y[161];
  //5l
  x[174]=x[162]+0.625;
y[174]=y[162];
  //4y1
  x[137]= (x[89]+x[80])/2;
y[137]=(y[89]+y[80])/2;

  //4y2
  cont(135, 46, 138, Var[2]/-1+0);

  //4y3
  x[139] = x[122];
y[139] = y[123];

  //4y4
  x[140] = x[119];
y[140] = y[139];

  //4y5
  x[141] = x[140];
y[141] = y[120];

  //4y6
  x[142] = x[80];
y[142] = y[137];

  //5k1
  x[175]= (x[173]+x[161])/2;
y[175]=(y[173]+y[161])/2;

  //4z1
  x[176]= (x[162]+x[174])/2;
y[176]=(y[162]+y[174])/2;

  //3d1
  x[143]= (x[142]+x[79])/2;
y[143]=(y[142]+y[79])/2;

  //4q1
  x[177] = x[31];
y[177] = y[132];

  //4q2
  x[178]=x[124]+-0.5;
y[178]=y[124]+-0.5;
  }

Flow1View6Objects()
{

  //Object Front
  if (HideObj[0] == 0)
    {

  Obj[0] = newobject("poly");
  current_point=addpoint(x[6],y[6],"LINE");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[10],y[10],"LINE");
  current_point=addpoint(x[14],y[14],"LINE");
  current_point=addpoint(x[16],y[16],"XARC_START");
  current_point=addpoint(x[17],y[17],"XARC_CORNER");
  current_point=addpoint(x[15],y[15],"LINE");
  current_point=addpoint(x[99],y[99],"LINE");
  current_point=addpoint(x[19],y[19],"XARC_START");
  current_point=addpoint(x[109],y[109],"XARC_CORNER");
  current_point=addpoint(x[20],y[20],"XARC_START");
  current_point=addpoint(x[178],y[178],"XARC_CORNER");
  current_point=addpoint(x[128],y[128],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[45],y[45],"XARC_CORNER");
  current_point=addpoint(x[176],y[176],"LINE");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[41],y[41],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[55],y[55],"XARC_CORNER");
  current_point=addpoint(x[38],y[38],"LINE");
    if (lang == 0) { name_object(Obj[0],"Front"); }
    if (lang == 1) { name_object(Obj[0],"Front"); }
    if (lang == 2) { name_object(Obj[0],"Front"); }
    if (lang == 3) { name_object(Obj[0],"Front"); }
    if (lang == 4) { name_object(Obj[0],"Front"); }
    if (lang == 5) { name_object(Obj[0],"Front"); }
    if (lang == 6) { name_object(Obj[0],"Front"); }
    }

  //Object BACK
  if (HideObj[2] == 0)
    {

  Obj[2] = newobject("poly");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[58],y[58],"LINE");
  current_point=addpoint(x[57],y[57],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[62],y[62],"LINE");
  current_point=addpoint(x[68],y[68],"LINE");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[56],y[56],"XARC_START");
  current_point=addpoint(x[115],y[115],"XARC_CORNER");
  current_point=addpoint(x[65],y[65],"LINE");
  current_point=addpoint(x[97],y[97],"LINE");
  current_point=addpoint(x[98],y[98],"LINE");
  current_point=addpoint(x[67],y[67],"XARC_START");
  current_point=addpoint(x[72],y[72],"XARC_CORNER");
  current_point=addpoint(x[95],y[95],"XARC_START");
  current_point=addpoint(x[143],y[143],"XARC_CORNER");
  current_point=addpoint(x[80],y[80],"LINE");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[83],y[83],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[136],y[136],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[2],"BACK"); }
    if (lang == 1) { name_object(Obj[2],"BACK"); }
    if (lang == 2) { name_object(Obj[2],"BACK"); }
    if (lang == 3) { name_object(Obj[2],"BACK"); }
    if (lang == 4) { name_object(Obj[2],"BACK"); }
    if (lang == 5) { name_object(Obj[2],"BACK"); }
    if (lang == 6) { name_object(Obj[2],"BACK"); }
    }

  //Object 60a
  if (HideObj[4] == 0)
    {
  if (lang == 0)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[4] = newobject("Text","Center Front Remove seam and cut on fold ",1.5707963267949,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[44],y[44],"LINE");
    if (lang == 0) { name_object(Obj[4],"60a"); }
    if (lang == 1) { name_object(Obj[4],"60a"); }
    if (lang == 2) { name_object(Obj[4],"60a"); }
    if (lang == 3) { name_object(Obj[4],"60a"); }
    if (lang == 4) { name_object(Obj[4],"60a"); }
    if (lang == 5) { name_object(Obj[4],"60a"); }
    if (lang == 6) { name_object(Obj[4],"60a"); }
    }

  //Object 60b
  if (HideObj[5] == 0)
    {
  if (lang == 0)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[5] = newobject("Text","Center Front",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint(x[124],y[124],"LINE");
    if (lang == 0) { name_object(Obj[5],"60b"); }
    if (lang == 1) { name_object(Obj[5],"60b"); }
    if (lang == 2) { name_object(Obj[5],"60b"); }
    if (lang == 3) { name_object(Obj[5],"60b"); }
    if (lang == 4) { name_object(Obj[5],"60b"); }
    if (lang == 5) { name_object(Obj[5],"60b"); }
    if (lang == 6) { name_object(Obj[5],"60b"); }
    }

  //Object 60c
  if (HideObj[6] == 0)
    {
  if (lang == 0)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[6] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[55]+0.5),(y[55]+-1),"LINE");
    if (lang == 0) { name_object(Obj[6],"60c"); }
    if (lang == 1) { name_object(Obj[6],"60c"); }
    if (lang == 2) { name_object(Obj[6],"60c"); }
    if (lang == 3) { name_object(Obj[6],"60c"); }
    if (lang == 4) { name_object(Obj[6],"60c"); }
    if (lang == 5) { name_object(Obj[6],"60c"); }
    if (lang == 6) { name_object(Obj[6],"60c"); }
    }

  //Object 60d
  if (HideObj[7] == 0)
    {
  if (lang == 0)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[7] = newobject("Text","Center Back",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+1),"LINE");
    if (lang == 0) { name_object(Obj[7],"60d"); }
    if (lang == 1) { name_object(Obj[7],"60d"); }
    if (lang == 2) { name_object(Obj[7],"60d"); }
    if (lang == 3) { name_object(Obj[7],"60d"); }
    if (lang == 4) { name_object(Obj[7],"60d"); }
    if (lang == 5) { name_object(Obj[7],"60d"); }
    if (lang == 6) { name_object(Obj[7],"60d"); }
    }

  //Object 60e
  if (HideObj[8] == 0)
    {
  if (lang == 0)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[8] = newobject("Text","Center back.  Grainline. ",4.71238898038469,0.35,0.35,"PatternMaker");
    }

  current_point=addpoint(x[68],y[68],"LINE");
    if (lang == 0) { name_object(Obj[8],"60e"); }
    if (lang == 1) { name_object(Obj[8],"60e"); }
    if (lang == 2) { name_object(Obj[8],"60e"); }
    if (lang == 3) { name_object(Obj[8],"60e"); }
    if (lang == 4) { name_object(Obj[8],"60e"); }
    if (lang == 5) { name_object(Obj[8],"60e"); }
    if (lang == 6) { name_object(Obj[8],"60e"); }
    }

  //Object 60f
  if (HideObj[9] == 0)
    {
  if (lang == 0)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[9] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[58]+1),(y[58]+1),"LINE");
    if (lang == 0) { name_object(Obj[9],"60f"); }
    if (lang == 1) { name_object(Obj[9],"60f"); }
    if (lang == 2) { name_object(Obj[9],"60f"); }
    if (lang == 3) { name_object(Obj[9],"60f"); }
    if (lang == 4) { name_object(Obj[9],"60f"); }
    if (lang == 5) { name_object(Obj[9],"60f"); }
    if (lang == 6) { name_object(Obj[9],"60f"); }
    }

  //Object Side front
  if (HideObj[12] == 0)
    {

  Obj[12] = newobject("poly");
  current_point=addpoint(x[31],y[31],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[45],y[45],"XARC_CORNER");
  current_point=addpoint(x[175],y[175],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[40],y[40],"XARC_START");
  current_point=addpoint(x[55],y[55],"XARC_CORNER");
  current_point=addpoint(x[38],y[38],"LINE");
  current_point=addpoint(x[30],y[30],"XARC_START");
  current_point=addpoint(x[36],y[36],"XARC_CORNER");
  current_point=addpoint(x[34],y[34],"XARC_START");
  current_point=addpoint(x[168],y[168],"XARC_CORNER");
  current_point=addpoint(x[86],y[86],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[167],y[167],"XARC_CORNER");
  current_point=addpoint(x[130],y[130],"XARC_START");
  current_point=addpoint(x[131],y[131],"XARC_CORNER");
  current_point=addpoint(x[132],y[132],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[177],y[177],"XARC_CORNER");
    if (lang == 0) { name_object(Obj[12],"Side front"); }
    if (lang == 1) { name_object(Obj[12],"Side front"); }
    if (lang == 2) { name_object(Obj[12],"Side front"); }
    if (lang == 3) { name_object(Obj[12],"Side front"); }
    if (lang == 4) { name_object(Obj[12],"Side front"); }
    if (lang == 5) { name_object(Obj[12],"Side front"); }
    if (lang == 6) { name_object(Obj[12],"Side front"); }
    }

  //Object side back
  if (HideObj[13] == 0)
    {

  Obj[13] = newobject("poly");
  current_point=addpoint(x[69],y[69],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[103],y[103],"XARC_CORNER");
  current_point=addpoint(x[73],y[73],"LINE");
  current_point=addpoint(x[87],y[87],"LINE");
  current_point=addpoint(x[85],y[85],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[78],y[78],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[77],y[77],"XARC_CORNER");
  current_point=addpoint(x[75],y[75],"LINE");
  current_point=addpoint(x[82],y[82],"LINE");
  current_point=addpoint(x[84],y[84],"LINE");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[163],y[163],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[143],y[143],"XARC_CORNER");
  current_point=addpoint(x[95],y[95],"LINE");
    if (lang == 0) { name_object(Obj[13],"side back"); }
    if (lang == 1) { name_object(Obj[13],"side back"); }
    if (lang == 2) { name_object(Obj[13],"side back"); }
    if (lang == 3) { name_object(Obj[13],"side back"); }
    if (lang == 4) { name_object(Obj[13],"side back"); }
    if (lang == 5) { name_object(Obj[13],"side back"); }
    if (lang == 6) { name_object(Obj[13],"side back"); }
    }

  //Object sbgrainline
  if (HideObj[14] == 0)
    {

  Obj[14] = newobject("poly");
  current_point=addpoint(x[70],y[70],"LINE");
  current_point=addpoint(x[126],y[126],"OPEN");
    if (lang == 0) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 1) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 2) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 3) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 4) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 5) { name_object(Obj[14],"sbgrainline"); }
    if (lang == 6) { name_object(Obj[14],"sbgrainline"); }
    }

  //Object sfgrainline
  if (HideObj[15] == 0)
    {

  Obj[15] = newobject("poly");
  current_point=addpoint(x[25],y[25],"LINE");
  current_point=addpoint(x[125],y[125],"OPEN");
    if (lang == 0) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 1) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 2) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 3) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 4) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 5) { name_object(Obj[15],"sfgrainline"); }
    if (lang == 6) { name_object(Obj[15],"sfgrainline"); }
    }

  //Object sfgrainlineTxt
  if (HideObj[16] == 0)
    {
  if (lang == 0)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[16] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[125],(y[125]+1),"LINE");
    if (lang == 0) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[16],"sfgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[16],"sfgrainlineTxt"); }
    }

  //Object sbgrainlineTxt
  if (HideObj[17] == 0)
    {
  if (lang == 0)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[17] = newobject("Text","Grainline",1.5707963267949,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint(x[126],(y[126]+1),"LINE");
    if (lang == 0) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 1) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 2) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 3) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 4) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 5) { name_object(Obj[17],"sbgrainlineTxt"); }
    if (lang == 6) { name_object(Obj[17],"sbgrainlineTxt"); }
    }

  //Object txt1
  if (HideObj[18] == 0)
    {
  if (lang == 0)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[18] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint(x[124],(y[124]+1),"LINE");
    if (lang == 0) { name_object(Obj[18],"txt1"); }
    if (lang == 1) { name_object(Obj[18],"txt1"); }
    if (lang == 2) { name_object(Obj[18],"txt1"); }
    if (lang == 3) { name_object(Obj[18],"txt1"); }
    if (lang == 4) { name_object(Obj[18],"txt1"); }
    if (lang == 5) { name_object(Obj[18],"txt1"); }
    if (lang == 6) { name_object(Obj[18],"txt1"); }
    }

  //Object TXT2
  if (HideObj[19] == 0)
    {
  if (lang == 0)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[19] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+0.5),"LINE");
    if (lang == 0) { name_object(Obj[19],"TXT2"); }
    if (lang == 1) { name_object(Obj[19],"TXT2"); }
    if (lang == 2) { name_object(Obj[19],"TXT2"); }
    if (lang == 3) { name_object(Obj[19],"TXT2"); }
    if (lang == 4) { name_object(Obj[19],"TXT2"); }
    if (lang == 5) { name_object(Obj[19],"TXT2"); }
    if (lang == 6) { name_object(Obj[19],"TXT2"); }
    }

  //Object txt3
  if (HideObj[20] == 0)
    {
  if (lang == 0)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[20] = newobject("Text","Side Front",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[129]+1.5),(y[129]+-0.5),"LINE");
    if (lang == 0) { name_object(Obj[20],"txt3"); }
    if (lang == 1) { name_object(Obj[20],"txt3"); }
    if (lang == 2) { name_object(Obj[20],"txt3"); }
    if (lang == 3) { name_object(Obj[20],"txt3"); }
    if (lang == 4) { name_object(Obj[20],"txt3"); }
    if (lang == 5) { name_object(Obj[20],"txt3"); }
    if (lang == 6) { name_object(Obj[20],"txt3"); }
    }

  //Object txt4
  if (HideObj[21] == 0)
    {
  if (lang == 0)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[21] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[68]+1),(y[68]+2),"LINE");
    if (lang == 0) { name_object(Obj[21],"txt4"); }
    if (lang == 1) { name_object(Obj[21],"txt4"); }
    if (lang == 2) { name_object(Obj[21],"txt4"); }
    if (lang == 3) { name_object(Obj[21],"txt4"); }
    if (lang == 4) { name_object(Obj[21],"txt4"); }
    if (lang == 5) { name_object(Obj[21],"txt4"); }
    if (lang == 6) { name_object(Obj[21],"txt4"); }
    }

  //Object txt5
  if (HideObj[22] == 0)
    {
  if (lang == 0)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[22] = newobject("Text","BODICE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),(y[80]+1),"LINE");
    if (lang == 0) { name_object(Obj[22],"txt5"); }
    if (lang == 1) { name_object(Obj[22],"txt5"); }
    if (lang == 2) { name_object(Obj[22],"txt5"); }
    if (lang == 3) { name_object(Obj[22],"txt5"); }
    if (lang == 4) { name_object(Obj[22],"txt5"); }
    if (lang == 5) { name_object(Obj[22],"txt5"); }
    if (lang == 6) { name_object(Obj[22],"txt5"); }
    }

  //Object txt6
  if (HideObj[23] == 0)
    {
  if (lang == 0)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[23] = newobject("Text","Side Back",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[80]+1.5),y[80],"LINE");
    if (lang == 0) { name_object(Obj[23],"txt6"); }
    if (lang == 1) { name_object(Obj[23],"txt6"); }
    if (lang == 2) { name_object(Obj[23],"txt6"); }
    if (lang == 3) { name_object(Obj[23],"txt6"); }
    if (lang == 4) { name_object(Obj[23],"txt6"); }
    if (lang == 5) { name_object(Obj[23],"txt6"); }
    if (lang == 6) { name_object(Obj[23],"txt6"); }
    }

  //Object txt7
  if (HideObj[24] == 0)
    {
  if (lang == 0)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[24] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[82]+1.5),(y[82]+1),"LINE");
    if (lang == 0) { name_object(Obj[24],"txt7"); }
    if (lang == 1) { name_object(Obj[24],"txt7"); }
    if (lang == 2) { name_object(Obj[24],"txt7"); }
    if (lang == 3) { name_object(Obj[24],"txt7"); }
    if (lang == 4) { name_object(Obj[24],"txt7"); }
    if (lang == 5) { name_object(Obj[24],"txt7"); }
    if (lang == 6) { name_object(Obj[24],"txt7"); }
    }

  //Object txt8
  if (HideObj[25] == 0)
    {
  if (lang == 0)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[25] = newobject("Text","GINANI PATTERNS",0,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[7]+1.5),(y[7]+1),"LINE");
    if (lang == 0) { name_object(Obj[25],"txt8"); }
    if (lang == 1) { name_object(Obj[25],"txt8"); }
    if (lang == 2) { name_object(Obj[25],"txt8"); }
    if (lang == 3) { name_object(Obj[25],"txt8"); }
    if (lang == 4) { name_object(Obj[25],"txt8"); }
    if (lang == 5) { name_object(Obj[25],"txt8"); }
    if (lang == 6) { name_object(Obj[25],"txt8"); }
    }

  //Object front waistline
  if (HideObj[26] == 0)
    {

  Obj[26] = newobject("poly");
  current_point=addpoint(x[5],y[5],"LINE");
  current_point=addpoint(x[41],y[41],"OPEN");
    if (lang == 0) { name_object(Obj[26],"front waistline"); }
    if (lang == 1) { name_object(Obj[26],"front waistline"); }
    if (lang == 2) { name_object(Obj[26],"front waistline"); }
    if (lang == 3) { name_object(Obj[26],"front waistline"); }
    if (lang == 4) { name_object(Obj[26],"front waistline"); }
    if (lang == 5) { name_object(Obj[26],"front waistline"); }
    if (lang == 6) { name_object(Obj[26],"front waistline"); }
    }

  //Object Back waistline
  if (HideObj[27] == 0)
    {

  Obj[27] = newobject("poly");
  current_point=addpoint(x[57],y[57],"LINE");
  current_point=addpoint(x[83],y[83],"OPEN");
    if (lang == 0) { name_object(Obj[27],"Back waistline"); }
    if (lang == 1) { name_object(Obj[27],"Back waistline"); }
    if (lang == 2) { name_object(Obj[27],"Back waistline"); }
    if (lang == 3) { name_object(Obj[27],"Back waistline"); }
    if (lang == 4) { name_object(Obj[27],"Back waistline"); }
    if (lang == 5) { name_object(Obj[27],"Back waistline"); }
    if (lang == 6) { name_object(Obj[27],"Back waistline"); }
    }

  //Object sf waistline
  if (HideObj[30] == 0)
    {

  Obj[30] = newobject("poly");
  current_point=addpoint(x[40],y[40],"LINE");
  current_point=addpoint(x[34],y[34],"OPEN");
    if (lang == 0) { name_object(Obj[30],"sf waistline"); }
    if (lang == 1) { name_object(Obj[30],"sf waistline"); }
    if (lang == 2) { name_object(Obj[30],"sf waistline"); }
    if (lang == 3) { name_object(Obj[30],"sf waistline"); }
    if (lang == 4) { name_object(Obj[30],"sf waistline"); }
    if (lang == 5) { name_object(Obj[30],"sf waistline"); }
    if (lang == 6) { name_object(Obj[30],"sf waistline"); }
    }

  //Object sb waistline
  if (HideObj[31] == 0)
    {

  Obj[31] = newobject("poly");
  current_point=addpoint(x[78],y[78],"LINE");
  current_point=addpoint(x[84],y[84],"OPEN");
    if (lang == 0) { name_object(Obj[31],"sb waistline"); }
    if (lang == 1) { name_object(Obj[31],"sb waistline"); }
    if (lang == 2) { name_object(Obj[31],"sb waistline"); }
    if (lang == 3) { name_object(Obj[31],"sb waistline"); }
    if (lang == 4) { name_object(Obj[31],"sb waistline"); }
    if (lang == 5) { name_object(Obj[31],"sb waistline"); }
    if (lang == 6) { name_object(Obj[31],"sb waistline"); }
    }

  //Object sbptxt1
  if (HideObj[32] == 0)
    {
  if (lang == 0)
    {
    Obj[32] = newobject("Text","Ease Shoulder line",-0.366519142918809,0.3,0.3,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[32] = newobject("Text","Ease Shoulder line",-0.366519142918809,0.3,0.3,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[32] = newobject("Text","Ease Shoulder line",-0.366519142918809,0.3,0.3,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[32] = newobject("Text","Ease Shoulder line",-0.366519142918809,0.3,0.3,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[32] = newobject("Text","Ease Shoulder line",-0.366519142918809,0.3,0.3,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[32] = newobject("Text","Ease Shoulder line",-0.366519142918809,0.3,0.3,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[32] = newobject("Text","Ease Shoulder line",-0.366519142918809,0.3,0.3,"PatternMaker");
    }

  current_point=addpoint((x[97]+-0.5),(y[97]+-0.5),"LINE");
    if (lang == 0) { name_object(Obj[32],"sbptxt1"); }
    if (lang == 1) { name_object(Obj[32],"sbptxt1"); }
    if (lang == 2) { name_object(Obj[32],"sbptxt1"); }
    if (lang == 3) { name_object(Obj[32],"sbptxt1"); }
    if (lang == 4) { name_object(Obj[32],"sbptxt1"); }
    if (lang == 5) { name_object(Obj[32],"sbptxt1"); }
    if (lang == 6) { name_object(Obj[32],"sbptxt1"); }
    }
  offset_mark(0, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(2, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(12, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  offset_mark(13, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow2View0()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow2View0");
    }
  Flow2View0Points();
  }

Flow2View0Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //7a
  x[179]=x[0]+Var[18];
y[179]=y[0];
  //7b
  x[180]=x[179];
y[180]=y[179]+Var[49]/-3+1;
  //7c
  x[181]=x[180]+Var[46]/-1;
y[181]=y[180];
  //7d
  x[182]=x[180]+Var[45];
y[182]=y[180];
  //7e
  LinePointDist(183, 181, 180, 179,  Var[46]  + 0, 0);

  //7f
  LinePointDist(184, 180, 182, 179,  Var[45]  + 0, 1);

  //7g
  x[185]= (x[184]+x[179])/2;
y[185]=(y[184]+y[179])/2;

  //7h
  x[186]= (x[179]+x[183])/2;
y[186]=(y[179]+y[183])/2;

  //7i
  right_ang(187, 185, 179,  + -0.5, 0);

  //7j
  right_ang(188, 186, 179,  + 0.5, 1);

  //7k
  x[189]= (x[188]+x[179])/2;
y[189]=(y[188]+y[179])/2;

  //7l
  x[190]= (x[183]+x[188])/2;
y[190]=(y[183]+y[188])/2;

  //7n
  x[191]= (x[184]+x[187])/2;
y[191]=(y[184]+y[187])/2;

  //7o
  x[192]=x[179];
y[192]=y[179]+Var[12]/-1;
  //7p
  x[193] = x[189];
y[193] = y[179];

  //7q
  x[194] = x[187];
y[194] = y[179];

  //7s
  x[195] = x[191];
y[195] = y[184];

  //7t
  x[196] = x[190];
y[196] = y[183];

  //7u
  x[197] = x[183];
y[197] = y[192];

  //7v
  x[198] = x[184];
y[198] = y[192];

  //7w
  x[199]= (x[197]+x[192])/2;
y[199]=(y[197]+y[192])/2;

  //7x
  x[200]= (x[197]+x[199])/2;
y[200]=(y[197]+y[199])/2;

  //7y
  x[201]= (x[192]+x[198])/2;
y[201]=(y[192]+y[198])/2;

  //7z
  x[202]= (x[201]+x[198])/2;
y[202]=(y[201]+y[198])/2;

  //7s1
  x[203]=x[195];
y[203]=y[195]+-0.75;
  //7s3
  x[204]=x[194]+-0.25;
y[204]=y[194];
  //MoveStart
  x[205]=x[0]+23.184324368117;
y[205]=y[0]+-5.73844884488449;
  //MoveEnd
  x[206]=x[0]+23.0935652922094;
y[206]=y[0]+-5.23927392739274;
  //7t(2)
  x[207] = x[196] + x[206] - x[205] ;
y[207] = y[196] + y[206] - y[205] ;

  //MoveStart(2)
  x[208]=x[0]+32.3056114968299;
y[208]=y[0]+-0.20214521452145;
  //MoveEnd(2)
  x[209]=x[0]+31.8971956552457;
y[209]=y[0]+0.0247524752475267;
  //7s3(2)
  x[210] = x[204] + x[209] - x[208] ;
y[210] = y[204] + y[209] - y[208] ;

  //8a
  x[211]= (x[184]+x[202])/2;
y[211]=(y[184]+y[202])/2;

  //8b
  x[212]= (x[183]+x[200])/2;
y[212]=(y[183]+y[200])/2;

  //8c
  cont(183, 212, 213, +-2);

  //8d
  cont(184, 211, 214, +-2);

  //8e
  x[215]= (x[214]+x[202])/2;
y[215]=(y[214]+y[202])/2;

  //8f
  x[216]= (x[213]+x[200])/2;
y[216]=(y[213]+y[200])/2;

  }

Flow2View0Objects()
{

  //Object SLEEVE
  if (HideObj[33] == 0)
    {

  Obj[33] = newobject("poly");
  current_point=addpoint(x[183],y[183],"XARC_START");
  current_point=addpoint(x[207],y[207],"XARC_CORNER");
  current_point=addpoint(x[188],y[188],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[193],y[193],"XARC_CORNER");
  current_point=addpoint(x[179],y[179],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[210],y[210],"XARC_CORNER");
  current_point=addpoint(x[187],y[187],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[203],y[203],"XARC_CORNER");
  current_point=addpoint(x[184],y[184],"LINE");
  current_point=addpoint(x[202],y[202],"LINE");
  current_point=addpoint(x[200],y[200],"LINE");
    if (lang == 0) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 1) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 2) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 3) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 4) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 5) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 6) { name_object(Obj[33],"SLEEVE"); }
    }

  //Object Grainline
  if (HideObj[34] == 0)
    {

  Obj[34] = newobject("poly");
  current_point=addpoint(x[179],y[179],"LINE");
  current_point=addpoint(x[180],y[180],"OPEN");
    if (lang == 0) { name_object(Obj[34],"Grainline"); }
    if (lang == 1) { name_object(Obj[34],"Grainline"); }
    if (lang == 2) { name_object(Obj[34],"Grainline"); }
    if (lang == 3) { name_object(Obj[34],"Grainline"); }
    if (lang == 4) { name_object(Obj[34],"Grainline"); }
    if (lang == 5) { name_object(Obj[34],"Grainline"); }
    if (lang == 6) { name_object(Obj[34],"Grainline"); }
    }

  //Object 70
  if (HideObj[35] == 0)
    {
  if (lang == 0)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+-1),"LINE");
    if (lang == 0) { name_object(Obj[35],"70"); }
    if (lang == 1) { name_object(Obj[35],"70"); }
    if (lang == 2) { name_object(Obj[35],"70"); }
    if (lang == 3) { name_object(Obj[35],"70"); }
    if (lang == 4) { name_object(Obj[35],"70"); }
    if (lang == 5) { name_object(Obj[35],"70"); }
    if (lang == 6) { name_object(Obj[35],"70"); }
    }

  //Object 70a
  if (HideObj[36] == 0)
    {
  if (lang == 0)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[188]+1),y[188],"LINE");
    if (lang == 0) { name_object(Obj[36],"70a"); }
    if (lang == 1) { name_object(Obj[36],"70a"); }
    if (lang == 2) { name_object(Obj[36],"70a"); }
    if (lang == 3) { name_object(Obj[36],"70a"); }
    if (lang == 4) { name_object(Obj[36],"70a"); }
    if (lang == 5) { name_object(Obj[36],"70a"); }
    if (lang == 6) { name_object(Obj[36],"70a"); }
    }

  //Object 70c
  if (HideObj[37] == 0)
    {
  if (lang == 0)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+2),"LINE");
    if (lang == 0) { name_object(Obj[37],"70c"); }
    if (lang == 1) { name_object(Obj[37],"70c"); }
    if (lang == 2) { name_object(Obj[37],"70c"); }
    if (lang == 3) { name_object(Obj[37],"70c"); }
    if (lang == 4) { name_object(Obj[37],"70c"); }
    if (lang == 5) { name_object(Obj[37],"70c"); }
    if (lang == 6) { name_object(Obj[37],"70c"); }
    }
  offset_mark(33, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow2View1()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow2View1");
    }
  Var[23] = CheckToMetric(2);
  if (lang == 0)
    {
    start_picture_input("Short");
      add_picture_input("Short sleeve length", Var[23], "");
    run_picture_input();
    }
  if (lang == 1)
    {
    start_picture_input("Short");
      add_picture_input("Short sleeve length", Var[23], "");
    run_picture_input();
    }
  if (lang == 2)
    {
    start_picture_input("Short");
      add_picture_input("Short sleeve length", Var[23], "");
    run_picture_input();
    }
  if (lang == 3)
    {
    start_picture_input("Short");
      add_picture_input("Short sleeve length", Var[23], "");
    run_picture_input();
    }
  if (lang == 4)
    {
    start_picture_input("Short");
      add_picture_input("Short sleeve length", Var[23], "");
    run_picture_input();
    }
  if (lang == 5)
    {
    start_picture_input("Short");
      add_picture_input("Short sleeve length", Var[23], "");
    run_picture_input();
    }
  if (lang == 6)
    {
    start_picture_input("Short");
      add_picture_input("Short sleeve length", Var[23], "");
    run_picture_input();
    }
  Var[23]= CheckFromMetric(Var[23]);
  Flow2View1Points();
  }

Flow2View1Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //7a
  x[179]=x[0]+Var[18];
y[179]=y[0];
  //7b
  x[180]=x[179];
y[180]=y[179]+Var[49]/-3+1;
  //7c
  x[181]=x[180]+Var[46]/-1;
y[181]=y[180];
  //7d
  x[182]=x[180]+Var[45];
y[182]=y[180];
  //7e
  LinePointDist(183, 181, 180, 179,  Var[46]  + 0, 0);

  //7f
  LinePointDist(184, 180, 182, 179,  Var[45]  + 0, 1);

  //7g
  x[185]= (x[184]+x[179])/2;
y[185]=(y[184]+y[179])/2;

  //7h
  x[186]= (x[179]+x[183])/2;
y[186]=(y[179]+y[183])/2;

  //7i
  right_ang(187, 185, 179,  + -0.5, 0);

  //7j
  right_ang(188, 186, 179,  + 0.5, 1);

  //7k
  x[189]= (x[188]+x[179])/2;
y[189]=(y[188]+y[179])/2;

  //7l
  x[190]= (x[183]+x[188])/2;
y[190]=(y[183]+y[188])/2;

  //7n
  x[191]= (x[184]+x[187])/2;
y[191]=(y[184]+y[187])/2;

  //7o
  x[192]=x[179];
y[192]=y[179]+Var[12]/-1;
  //7p
  x[193] = x[189];
y[193] = y[179];

  //7q
  x[194] = x[187];
y[194] = y[179];

  //7s
  x[195] = x[191];
y[195] = y[184];

  //7t
  x[196] = x[190];
y[196] = y[183];

  //7u
  x[197] = x[183];
y[197] = y[192];

  //7v
  x[198] = x[184];
y[198] = y[192];

  //7w
  x[199]= (x[197]+x[192])/2;
y[199]=(y[197]+y[192])/2;

  //7x
  x[200]= (x[197]+x[199])/2;
y[200]=(y[197]+y[199])/2;

  //7y
  x[201]= (x[192]+x[198])/2;
y[201]=(y[192]+y[198])/2;

  //7z
  x[202]= (x[201]+x[198])/2;
y[202]=(y[201]+y[198])/2;

  //7s1
  x[203]=x[195];
y[203]=y[195]+-0.75;
  //7s3
  x[204]=x[194]+-0.25;
y[204]=y[194];
  //MoveStart
  x[205]=x[0]+23.184324368117;
y[205]=y[0]+-5.73844884488449;
  //MoveEnd
  x[206]=x[0]+23.0935652922094;
y[206]=y[0]+-5.23927392739274;
  //7t(2)
  x[207] = x[196] + x[206] - x[205] ;
y[207] = y[196] + y[206] - y[205] ;

  //MoveStart(2)
  x[208]=x[0]+32.3056114968299;
y[208]=y[0]+-0.20214521452145;
  //MoveEnd(2)
  x[209]=x[0]+31.8971956552457;
y[209]=y[0]+0.0247524752475267;
  //7s3(2)
  x[210] = x[204] + x[209] - x[208] ;
y[210] = y[204] + y[209] - y[208] ;

  //8a
  x[211]= (x[184]+x[202])/2;
y[211]=(y[184]+y[202])/2;

  //8b
  x[212]= (x[183]+x[200])/2;
y[212]=(y[183]+y[200])/2;

  //8c
  cont(183, 212, 213, +-2);

  //8d
  cont(184, 211, 214, +-2);

  //8e
  x[215]= (x[214]+x[202])/2;
y[215]=(y[214]+y[202])/2;

  //8f
  x[216]= (x[213]+x[200])/2;
y[216]=(y[213]+y[200])/2;

  //8g
  cont(213, 183, 217, Var[23]/-1+0);

  //8h
  cont(214, 184, 218, Var[23]/-1+0);

  }

Flow2View1Objects()
{

  //Object SLEEVE
  if (HideObj[33] == 0)
    {

  Obj[33] = newobject("poly");
  current_point=addpoint(x[183],y[183],"XARC_START");
  current_point=addpoint(x[207],y[207],"XARC_CORNER");
  current_point=addpoint(x[188],y[188],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",1);
  current_point=addpoint(x[193],y[193],"XARC_CORNER");
  current_point=addpoint(x[179],y[179],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[210],y[210],"XARC_CORNER");
  current_point=addpoint(x[187],y[187],"XARC_START");
  notch_type(current_point,"NOTCH",1);
  current_point=addpoint(x[203],y[203],"XARC_CORNER");
  current_point=addpoint(x[184],y[184],"LINE");
  current_point=addpoint(x[218],y[218],"LINE");
  current_point=addpoint(x[217],y[217],"LINE");
    if (lang == 0) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 1) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 2) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 3) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 4) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 5) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 6) { name_object(Obj[33],"SLEEVE"); }
    }

  //Object Grainline
  if (HideObj[34] == 0)
    {

  Obj[34] = newobject("poly");
  current_point=addpoint(x[179],y[179],"LINE");
  current_point=addpoint(x[180],y[180],"OPEN");
    if (lang == 0) { name_object(Obj[34],"Grainline"); }
    if (lang == 1) { name_object(Obj[34],"Grainline"); }
    if (lang == 2) { name_object(Obj[34],"Grainline"); }
    if (lang == 3) { name_object(Obj[34],"Grainline"); }
    if (lang == 4) { name_object(Obj[34],"Grainline"); }
    if (lang == 5) { name_object(Obj[34],"Grainline"); }
    if (lang == 6) { name_object(Obj[34],"Grainline"); }
    }

  //Object 70
  if (HideObj[35] == 0)
    {
  if (lang == 0)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+-1),"LINE");
    if (lang == 0) { name_object(Obj[35],"70"); }
    if (lang == 1) { name_object(Obj[35],"70"); }
    if (lang == 2) { name_object(Obj[35],"70"); }
    if (lang == 3) { name_object(Obj[35],"70"); }
    if (lang == 4) { name_object(Obj[35],"70"); }
    if (lang == 5) { name_object(Obj[35],"70"); }
    if (lang == 6) { name_object(Obj[35],"70"); }
    }

  //Object 70a
  if (HideObj[36] == 0)
    {
  if (lang == 0)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[188]+1),y[188],"LINE");
    if (lang == 0) { name_object(Obj[36],"70a"); }
    if (lang == 1) { name_object(Obj[36],"70a"); }
    if (lang == 2) { name_object(Obj[36],"70a"); }
    if (lang == 3) { name_object(Obj[36],"70a"); }
    if (lang == 4) { name_object(Obj[36],"70a"); }
    if (lang == 5) { name_object(Obj[36],"70a"); }
    if (lang == 6) { name_object(Obj[36],"70a"); }
    }

  //Object 70c
  if (HideObj[37] == 0)
    {
  if (lang == 0)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+2),"LINE");
    if (lang == 0) { name_object(Obj[37],"70c"); }
    if (lang == 1) { name_object(Obj[37],"70c"); }
    if (lang == 2) { name_object(Obj[37],"70c"); }
    if (lang == 3) { name_object(Obj[37],"70c"); }
    if (lang == 4) { name_object(Obj[37],"70c"); }
    if (lang == 5) { name_object(Obj[37],"70c"); }
    if (lang == 6) { name_object(Obj[37],"70c"); }
    }
  offset_mark(33, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow2View2()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow2View2");
    }
  Flow2View2Points();
  }

Flow2View2Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //7a
  x[179]=x[0]+Var[18];
y[179]=y[0];
  //7b
  x[180]=x[179];
y[180]=y[179]+Var[49]/-3+1;
  //7c
  x[181]=x[180]+Var[46]/-1;
y[181]=y[180];
  //7d
  x[182]=x[180]+Var[45];
y[182]=y[180];
  //7e
  LinePointDist(183, 181, 180, 179,  Var[46]  + 0, 0);

  //7f
  LinePointDist(184, 180, 182, 179,  Var[45]  + 0, 1);

  //7g
  x[185]= (x[184]+x[179])/2;
y[185]=(y[184]+y[179])/2;

  //7h
  x[186]= (x[179]+x[183])/2;
y[186]=(y[179]+y[183])/2;

  //7i
  right_ang(187, 185, 179,  + -0.5, 0);

  //7j
  right_ang(188, 186, 179,  + 0.5, 1);

  //7k
  x[189]= (x[188]+x[179])/2;
y[189]=(y[188]+y[179])/2;

  //7l
  x[190]= (x[183]+x[188])/2;
y[190]=(y[183]+y[188])/2;

  //7n
  x[191]= (x[184]+x[187])/2;
y[191]=(y[184]+y[187])/2;

  //7o
  x[192]=x[179];
y[192]=y[179]+Var[12]/-1;
  //7p
  x[193] = x[189];
y[193] = y[179];

  //7q
  x[194] = x[187];
y[194] = y[179];

  //7s
  x[195] = x[191];
y[195] = y[184];

  //7t
  x[196] = x[190];
y[196] = y[183];

  //7u
  x[197] = x[183];
y[197] = y[192];

  //7v
  x[198] = x[184];
y[198] = y[192];

  //7w
  x[199]= (x[197]+x[192])/2;
y[199]=(y[197]+y[192])/2;

  //7x
  x[200]= (x[197]+x[199])/2;
y[200]=(y[197]+y[199])/2;

  //7y
  x[201]= (x[192]+x[198])/2;
y[201]=(y[192]+y[198])/2;

  //7z
  x[202]= (x[201]+x[198])/2;
y[202]=(y[201]+y[198])/2;

  //7s1
  x[203]=x[195];
y[203]=y[195]+-0.75;
  //7s3
  x[204]=x[194]+-0.25;
y[204]=y[194];
  //MoveStart
  x[205]=x[0]+23.184324368117;
y[205]=y[0]+-5.73844884488449;
  //MoveEnd
  x[206]=x[0]+23.0935652922094;
y[206]=y[0]+-5.23927392739274;
  //7t(2)
  x[207] = x[196] + x[206] - x[205] ;
y[207] = y[196] + y[206] - y[205] ;

  //MoveStart(2)
  x[208]=x[0]+32.3056114968299;
y[208]=y[0]+-0.20214521452145;
  //MoveEnd(2)
  x[209]=x[0]+31.8971956552457;
y[209]=y[0]+0.0247524752475267;
  //7s3(2)
  x[210] = x[204] + x[209] - x[208] ;
y[210] = y[204] + y[209] - y[208] ;

  //8a
  x[211]= (x[184]+x[202])/2;
y[211]=(y[184]+y[202])/2;

  //8b
  x[212]= (x[183]+x[200])/2;
y[212]=(y[183]+y[200])/2;

  //8c
  cont(183, 212, 213, +-2);

  //8d
  cont(184, 211, 214, +-2);

  //8e
  x[215]= (x[214]+x[202])/2;
y[215]=(y[214]+y[202])/2;

  //8f
  x[216]= (x[213]+x[200])/2;
y[216]=(y[213]+y[200])/2;

  }

Flow2View2Objects()
{

  //Object SLEEVE
  if (HideObj[33] == 0)
    {

  Obj[33] = newobject("poly");
  current_point=addpoint(x[183],y[183],"XARC_START");
  current_point=addpoint(x[207],y[207],"XARC_CORNER");
  current_point=addpoint(x[188],y[188],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[193],y[193],"XARC_CORNER");
  current_point=addpoint(x[179],y[179],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[210],y[210],"XARC_CORNER");
  current_point=addpoint(x[187],y[187],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[203],y[203],"XARC_CORNER");
  current_point=addpoint(x[184],y[184],"LINE");
  current_point=addpoint(x[214],y[214],"LINE");
  current_point=addpoint(x[213],y[213],"LINE");
    if (lang == 0) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 1) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 2) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 3) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 4) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 5) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 6) { name_object(Obj[33],"SLEEVE"); }
    }

  //Object Grainline
  if (HideObj[34] == 0)
    {

  Obj[34] = newobject("poly");
  current_point=addpoint(x[179],y[179],"LINE");
  current_point=addpoint(x[180],y[180],"OPEN");
    if (lang == 0) { name_object(Obj[34],"Grainline"); }
    if (lang == 1) { name_object(Obj[34],"Grainline"); }
    if (lang == 2) { name_object(Obj[34],"Grainline"); }
    if (lang == 3) { name_object(Obj[34],"Grainline"); }
    if (lang == 4) { name_object(Obj[34],"Grainline"); }
    if (lang == 5) { name_object(Obj[34],"Grainline"); }
    if (lang == 6) { name_object(Obj[34],"Grainline"); }
    }

  //Object 70
  if (HideObj[35] == 0)
    {
  if (lang == 0)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+-1),"LINE");
    if (lang == 0) { name_object(Obj[35],"70"); }
    if (lang == 1) { name_object(Obj[35],"70"); }
    if (lang == 2) { name_object(Obj[35],"70"); }
    if (lang == 3) { name_object(Obj[35],"70"); }
    if (lang == 4) { name_object(Obj[35],"70"); }
    if (lang == 5) { name_object(Obj[35],"70"); }
    if (lang == 6) { name_object(Obj[35],"70"); }
    }

  //Object 70a
  if (HideObj[36] == 0)
    {
  if (lang == 0)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[188]+1),y[188],"LINE");
    if (lang == 0) { name_object(Obj[36],"70a"); }
    if (lang == 1) { name_object(Obj[36],"70a"); }
    if (lang == 2) { name_object(Obj[36],"70a"); }
    if (lang == 3) { name_object(Obj[36],"70a"); }
    if (lang == 4) { name_object(Obj[36],"70a"); }
    if (lang == 5) { name_object(Obj[36],"70a"); }
    if (lang == 6) { name_object(Obj[36],"70a"); }
    }

  //Object 70c
  if (HideObj[37] == 0)
    {
  if (lang == 0)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+2),"LINE");
    if (lang == 0) { name_object(Obj[37],"70c"); }
    if (lang == 1) { name_object(Obj[37],"70c"); }
    if (lang == 2) { name_object(Obj[37],"70c"); }
    if (lang == 3) { name_object(Obj[37],"70c"); }
    if (lang == 4) { name_object(Obj[37],"70c"); }
    if (lang == 5) { name_object(Obj[37],"70c"); }
    if (lang == 6) { name_object(Obj[37],"70c"); }
    }
  offset_mark(33, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow2View3()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow2View3");
    }
  Flow2View3Points();
  }

Flow2View3Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //7a
  x[179]=x[0]+Var[18];
y[179]=y[0];
  //7b
  x[180]=x[179];
y[180]=y[179]+Var[49]/-3+1;
  //7c
  x[181]=x[180]+Var[46]/-1;
y[181]=y[180];
  //7d
  x[182]=x[180]+Var[45];
y[182]=y[180];
  //7e
  LinePointDist(183, 181, 180, 179,  Var[46]  + 0, 0);

  //7f
  LinePointDist(184, 180, 182, 179,  Var[45]  + 0, 1);

  //7g
  x[185]= (x[184]+x[179])/2;
y[185]=(y[184]+y[179])/2;

  //7h
  x[186]= (x[179]+x[183])/2;
y[186]=(y[179]+y[183])/2;

  //7i
  right_ang(187, 185, 179,  + -0.5, 0);

  //7j
  right_ang(188, 186, 179,  + 0.5, 1);

  //7k
  x[189]= (x[188]+x[179])/2;
y[189]=(y[188]+y[179])/2;

  //7l
  x[190]= (x[183]+x[188])/2;
y[190]=(y[183]+y[188])/2;

  //7n
  x[191]= (x[184]+x[187])/2;
y[191]=(y[184]+y[187])/2;

  //7o
  x[192]=x[179];
y[192]=y[179]+Var[12]/-1;
  //7p
  x[193] = x[189];
y[193] = y[179];

  //7q
  x[194] = x[187];
y[194] = y[179];

  //7s
  x[195] = x[191];
y[195] = y[184];

  //7t
  x[196] = x[190];
y[196] = y[183];

  //7u
  x[197] = x[183];
y[197] = y[192];

  //7v
  x[198] = x[184];
y[198] = y[192];

  //7w
  x[199]= (x[197]+x[192])/2;
y[199]=(y[197]+y[192])/2;

  //7x
  x[200]= (x[197]+x[199])/2;
y[200]=(y[197]+y[199])/2;

  //7y
  x[201]= (x[192]+x[198])/2;
y[201]=(y[192]+y[198])/2;

  //7z
  x[202]= (x[201]+x[198])/2;
y[202]=(y[201]+y[198])/2;

  //7s1
  x[203]=x[195];
y[203]=y[195]+-0.75;
  //7s3
  x[204]=x[194]+-0.25;
y[204]=y[194];
  //MoveStart
  x[205]=x[0]+23.184324368117;
y[205]=y[0]+-5.73844884488449;
  //MoveEnd
  x[206]=x[0]+23.0935652922094;
y[206]=y[0]+-5.23927392739274;
  //7t(2)
  x[207] = x[196] + x[206] - x[205] ;
y[207] = y[196] + y[206] - y[205] ;

  //MoveStart(2)
  x[208]=x[0]+32.3056114968299;
y[208]=y[0]+-0.20214521452145;
  //MoveEnd(2)
  x[209]=x[0]+31.8971956552457;
y[209]=y[0]+0.0247524752475267;
  //7s3(2)
  x[210] = x[204] + x[209] - x[208] ;
y[210] = y[204] + y[209] - y[208] ;

  //8a
  x[211]= (x[184]+x[202])/2;
y[211]=(y[184]+y[202])/2;

  //8b
  x[212]= (x[183]+x[200])/2;
y[212]=(y[183]+y[200])/2;

  //8c
  cont(183, 212, 213, +-2);

  //8d
  cont(184, 211, 214, +-2);

  //8e
  x[215]= (x[214]+x[202])/2;
y[215]=(y[214]+y[202])/2;

  //8f
  x[216]= (x[213]+x[200])/2;
y[216]=(y[213]+y[200])/2;

  }

Flow2View3Objects()
{

  //Object SLEEVE
  if (HideObj[33] == 0)
    {

  Obj[33] = newobject("poly");
  current_point=addpoint(x[183],y[183],"XARC_START");
  current_point=addpoint(x[207],y[207],"XARC_CORNER");
  current_point=addpoint(x[188],y[188],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[193],y[193],"XARC_CORNER");
  current_point=addpoint(x[179],y[179],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[210],y[210],"XARC_CORNER");
  current_point=addpoint(x[187],y[187],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[203],y[203],"XARC_CORNER");
  current_point=addpoint(x[184],y[184],"LINE");
  current_point=addpoint(x[215],y[215],"LINE");
  current_point=addpoint(x[216],y[216],"LINE");
    if (lang == 0) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 1) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 2) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 3) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 4) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 5) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 6) { name_object(Obj[33],"SLEEVE"); }
    }

  //Object Grainline
  if (HideObj[34] == 0)
    {

  Obj[34] = newobject("poly");
  current_point=addpoint(x[179],y[179],"LINE");
  current_point=addpoint(x[180],y[180],"OPEN");
    if (lang == 0) { name_object(Obj[34],"Grainline"); }
    if (lang == 1) { name_object(Obj[34],"Grainline"); }
    if (lang == 2) { name_object(Obj[34],"Grainline"); }
    if (lang == 3) { name_object(Obj[34],"Grainline"); }
    if (lang == 4) { name_object(Obj[34],"Grainline"); }
    if (lang == 5) { name_object(Obj[34],"Grainline"); }
    if (lang == 6) { name_object(Obj[34],"Grainline"); }
    }

  //Object 70
  if (HideObj[35] == 0)
    {
  if (lang == 0)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+-1),"LINE");
    if (lang == 0) { name_object(Obj[35],"70"); }
    if (lang == 1) { name_object(Obj[35],"70"); }
    if (lang == 2) { name_object(Obj[35],"70"); }
    if (lang == 3) { name_object(Obj[35],"70"); }
    if (lang == 4) { name_object(Obj[35],"70"); }
    if (lang == 5) { name_object(Obj[35],"70"); }
    if (lang == 6) { name_object(Obj[35],"70"); }
    }

  //Object 70a
  if (HideObj[36] == 0)
    {
  if (lang == 0)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[188]+1),y[188],"LINE");
    if (lang == 0) { name_object(Obj[36],"70a"); }
    if (lang == 1) { name_object(Obj[36],"70a"); }
    if (lang == 2) { name_object(Obj[36],"70a"); }
    if (lang == 3) { name_object(Obj[36],"70a"); }
    if (lang == 4) { name_object(Obj[36],"70a"); }
    if (lang == 5) { name_object(Obj[36],"70a"); }
    if (lang == 6) { name_object(Obj[36],"70a"); }
    }

  //Object 70c
  if (HideObj[37] == 0)
    {
  if (lang == 0)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+2),"LINE");
    if (lang == 0) { name_object(Obj[37],"70c"); }
    if (lang == 1) { name_object(Obj[37],"70c"); }
    if (lang == 2) { name_object(Obj[37],"70c"); }
    if (lang == 3) { name_object(Obj[37],"70c"); }
    if (lang == 4) { name_object(Obj[37],"70c"); }
    if (lang == 5) { name_object(Obj[37],"70c"); }
    if (lang == 6) { name_object(Obj[37],"70c"); }
    }
  offset_mark(33, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow2View4()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow2View4");
    }
  Flow2View4Points();
  }

Flow2View4Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //7a
  x[179]=x[0]+Var[18];
y[179]=y[0];
  //7b
  x[180]=x[179];
y[180]=y[179]+Var[49]/-3+1;
  //7c
  x[181]=x[180]+Var[46]/-1;
y[181]=y[180];
  //7d
  x[182]=x[180]+Var[45];
y[182]=y[180];
  //7e
  LinePointDist(183, 181, 180, 179,  Var[46]  + 0, 0);

  //7f
  LinePointDist(184, 180, 182, 179,  Var[45]  + 0, 1);

  //7g
  x[185]= (x[184]+x[179])/2;
y[185]=(y[184]+y[179])/2;

  //7h
  x[186]= (x[179]+x[183])/2;
y[186]=(y[179]+y[183])/2;

  //7i
  right_ang(187, 185, 179,  + -0.5, 0);

  //7j
  right_ang(188, 186, 179,  + 0.5, 1);

  //7k
  x[189]= (x[188]+x[179])/2;
y[189]=(y[188]+y[179])/2;

  //7l
  x[190]= (x[183]+x[188])/2;
y[190]=(y[183]+y[188])/2;

  //7n
  x[191]= (x[184]+x[187])/2;
y[191]=(y[184]+y[187])/2;

  //7o
  x[192]=x[179];
y[192]=y[179]+Var[12]/-1;
  //7p
  x[193] = x[189];
y[193] = y[179];

  //7q
  x[194] = x[187];
y[194] = y[179];

  //7s
  x[195] = x[191];
y[195] = y[184];

  //7t
  x[196] = x[190];
y[196] = y[183];

  //7u
  x[197] = x[183];
y[197] = y[192];

  //7v
  x[198] = x[184];
y[198] = y[192];

  //7w
  x[199]= (x[197]+x[192])/2;
y[199]=(y[197]+y[192])/2;

  //7x
  x[200]= (x[197]+x[199])/2;
y[200]=(y[197]+y[199])/2;

  //7y
  x[201]= (x[192]+x[198])/2;
y[201]=(y[192]+y[198])/2;

  //7z
  x[202]= (x[201]+x[198])/2;
y[202]=(y[201]+y[198])/2;

  //7s1
  x[203]=x[195];
y[203]=y[195]+-0.75;
  //7s3
  x[204]=x[194]+-0.25;
y[204]=y[194];
  //MoveStart
  x[205]=x[0]+23.184324368117;
y[205]=y[0]+-5.73844884488449;
  //MoveEnd
  x[206]=x[0]+23.0935652922094;
y[206]=y[0]+-5.23927392739274;
  //7t(2)
  x[207] = x[196] + x[206] - x[205] ;
y[207] = y[196] + y[206] - y[205] ;

  //MoveStart(2)
  x[208]=x[0]+32.3056114968299;
y[208]=y[0]+-0.20214521452145;
  //MoveEnd(2)
  x[209]=x[0]+31.8971956552457;
y[209]=y[0]+0.0247524752475267;
  //7s3(2)
  x[210] = x[204] + x[209] - x[208] ;
y[210] = y[204] + y[209] - y[208] ;

  //8a
  x[211]= (x[184]+x[202])/2;
y[211]=(y[184]+y[202])/2;

  //8b
  x[212]= (x[183]+x[200])/2;
y[212]=(y[183]+y[200])/2;

  //8c
  cont(183, 212, 213, +-2);

  //8d
  cont(184, 211, 214, +-2);

  //8e
  x[215]= (x[214]+x[202])/2;
y[215]=(y[214]+y[202])/2;

  //8f
  x[216]= (x[213]+x[200])/2;
y[216]=(y[213]+y[200])/2;

  }

Flow2View4Objects()
{

  //Object SLEEVE
  if (HideObj[33] == 0)
    {

  Obj[33] = newobject("poly");
  current_point=addpoint(x[183],y[183],"XARC_START");
  current_point=addpoint(x[207],y[207],"XARC_CORNER");
  current_point=addpoint(x[188],y[188],"XARC_START");
  notch_type(current_point,"DBL_NOTCH",0);
  current_point=addpoint(x[193],y[193],"XARC_CORNER");
  current_point=addpoint(x[179],y[179],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[210],y[210],"XARC_CORNER");
  current_point=addpoint(x[187],y[187],"XARC_START");
  notch_type(current_point,"NOTCH",0);
  current_point=addpoint(x[203],y[203],"XARC_CORNER");
  current_point=addpoint(x[184],y[184],"LINE");
  current_point=addpoint(x[202],y[202],"LINE");
  current_point=addpoint(x[200],y[200],"LINE");
    if (lang == 0) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 1) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 2) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 3) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 4) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 5) { name_object(Obj[33],"SLEEVE"); }
    if (lang == 6) { name_object(Obj[33],"SLEEVE"); }
    }

  //Object Grainline
  if (HideObj[34] == 0)
    {

  Obj[34] = newobject("poly");
  current_point=addpoint(x[179],y[179],"LINE");
  current_point=addpoint(x[180],y[180],"OPEN");
    if (lang == 0) { name_object(Obj[34],"Grainline"); }
    if (lang == 1) { name_object(Obj[34],"Grainline"); }
    if (lang == 2) { name_object(Obj[34],"Grainline"); }
    if (lang == 3) { name_object(Obj[34],"Grainline"); }
    if (lang == 4) { name_object(Obj[34],"Grainline"); }
    if (lang == 5) { name_object(Obj[34],"Grainline"); }
    if (lang == 6) { name_object(Obj[34],"Grainline"); }
    }

  //Object 70
  if (HideObj[35] == 0)
    {
  if (lang == 0)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[35] = newobject("Text","SLEEVE",0,0.7,0.7,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+-1),"LINE");
    if (lang == 0) { name_object(Obj[35],"70"); }
    if (lang == 1) { name_object(Obj[35],"70"); }
    if (lang == 2) { name_object(Obj[35],"70"); }
    if (lang == 3) { name_object(Obj[35],"70"); }
    if (lang == 4) { name_object(Obj[35],"70"); }
    if (lang == 5) { name_object(Obj[35],"70"); }
    if (lang == 6) { name_object(Obj[35],"70"); }
    }

  //Object 70a
  if (HideObj[36] == 0)
    {
  if (lang == 0)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[36] = newobject("Text","CUT 2",0,0.5,0.5,"PatternMaker");
    }

  current_point=addpoint((x[188]+1),y[188],"LINE");
    if (lang == 0) { name_object(Obj[36],"70a"); }
    if (lang == 1) { name_object(Obj[36],"70a"); }
    if (lang == 2) { name_object(Obj[36],"70a"); }
    if (lang == 3) { name_object(Obj[36],"70a"); }
    if (lang == 4) { name_object(Obj[36],"70a"); }
    if (lang == 5) { name_object(Obj[36],"70a"); }
    if (lang == 6) { name_object(Obj[36],"70a"); }
    }

  //Object 70c
  if (HideObj[37] == 0)
    {
  if (lang == 0)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 1)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 2)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 3)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 4)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 5)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }
  if (lang == 6)
    {
    Obj[37] = newobject("Text","GINANI PATTERNS",0,0.6,0.6,"PatternMaker");
    }

  current_point=addpoint((x[180]+-3),(y[180]+2),"LINE");
    if (lang == 0) { name_object(Obj[37],"70c"); }
    if (lang == 1) { name_object(Obj[37],"70c"); }
    if (lang == 2) { name_object(Obj[37],"70c"); }
    if (lang == 3) { name_object(Obj[37],"70c"); }
    if (lang == 4) { name_object(Obj[37],"70c"); }
    if (lang == 5) { name_object(Obj[37],"70c"); }
    if (lang == 6) { name_object(Obj[37],"70c"); }
    }
  offset_mark(33, CheckToMetric(0 + Var[50]/1));
  group(current_selection);
  deselect(current_selection);

  }

Flow2View5()
  {
  do_counter=0;
  do_max=0;
  if (is_function("macgen_write"))
    {
    macgen_write("Flow2View5");
    }
  Flow2View5Points();
  }

Flow2View5Points()
{
  //Start
  x[0]=0;
y[0]=0;

  //7a
  x[179]=x[0]+Var[18];
y[179]=y[0];
  //7b
  x[180]=x[179];
y[180]=y[179]+Var[49]/-3+1;
  //7c
  x[181]=x[180]+Var[46]/-1;
y[181]=y[180];
  //7d
  x[182]=x[180]+Var[45];
y[182]=y[180];
  //7e
  LinePointDist(183, 181, 180, 179,  Var[46]  + 0, 0);

  //7f
  LinePointDist(184, 180, 182, 179,  Var[45]  + 0, 1);

  //7g
  x[185]= (x[184]+x[179])/2;
y[185]=(y[184]+y[179])/2;

  //7h
  x[186]= (x[179]+x[183])/2;
y[186]=(y[179]+y[183])/2;

  //7i
  right_ang(187, 185, 179,  + -0.5, 0);

  //7j
  right_ang(188, 186, 179,  + 0.5, 1);

  //7k
  x[189]= (x[188]+x[179])/2;
y[189]=(y[188]+y[179])/2;

  //7l
  x[190]= (x[183]+x[188])/2;
y[190]=(y[183]+y[188])/2;

  //7n
  x[191]= (x[184]+x[187])/2;
y[191]=(y[184]+y[187])/2;

  //7o
  x[192]=x[179];
y[192]=y[179]+Var[12]/-1;
  //7p
  x[193] = x[189];
y[193] = y[179];

  //7q
  x[194] = x[187];
y[194] = y[179];

  //7s
  x[195] = x[191];
y[195] = y[184];

  //7t
  x[196] = x[190];
y[196] = y[183];

  //7u
  x[197] = x[183];
y[197] = y[192];

  //7v
  x[198] = x[184];
y[198] = y[192];

  //7w
  x[199]= (x[197]+x[192])/2;
y[199]=(y[197]+y[192])/2;

  //7x
  x[200]= (x[197]+x[199])/2;
y[200]=(y[197]+y[199])/2;

  //7y
  x[201]= (x[192]+x[198])/2;
y[201]=(y[192]+y[198])/2;

  //7z
  x[202]= (x[201]+x[198])/2;
y[202]=(y[201]+y[198])/2;

  //7s1
  x[203]=x[195];
y[203]=y[195]+-0.75;
  //7s3
  x[204]=x[194]+-0.25;
y[204]=y[194];
  //MoveStart
  x[205]=x[0]+23.184324368117;
y[205]=y[0]+-5.73844884488449;
  //MoveEnd
  x[206]=x[0]+23.0935652922094;
y[206]=y[0]+-5.23927392739274;
  //7t(2)
  x[207] = x[196] + x[206] - x[205] ;
y[207] = y[196] + y[206] - y[205] ;

  //MoveStart(2)
  x[208]=x[0]+32.3056114968299;
y[208]=y[0]+-0.20214521452145;
  //MoveEnd(2)
  x[209]=x[0]+31.8971956552457;
y[209]=y[0]+0.0247524752475267;
  //7s3(2)
  x[210] = x[204] + x[209] - x[208] ;
y[210] = y[204] + y[209] - y[208] ;

  //8a
  x[211]= (x[184]+x[202])/2;
y[211]=(y[184]+y[202])/2;

  //8b
  x[212]= (x[183]+x[200])/2;
y[212]=(y[183]+y[200])/2;

  //8c
  cont(183, 212, 213, +-2);

  //8d
  cont(184, 211, 214, +-2);

  //8e
  x[215]= (x[214]+x[202])/2;
y[215]=(y[214]+y[202])/2;

  //8f
  x[216]= (x[213]+x[200])/2;
y[216]=(y[213]+y[200])/2;

  }

Flow2View5Objects()
{
  }


mark(double pass_index)
 {
  if (Obj[pass_index]==0)
    {
    return;
    }
  Obj[pass_index]=marker_piece(Obj[pass_index],1);
  Mrk[marker_count] = Obj[pass_index];
  marker_count = marker_count + 1;
 }

offset_mark(double pass_index, double value)
 {
  point pnt, test;
  double save_x, save_y;

  if (Obj[pass_index]==0)
    {
    current_selection=newselection("OBJECT");
    return;
    }

  if (value != 0)
    {
    current_selection=newselection("OBJECT");
    select(current_selection,Obj[pass_index]);
    sel_push(current_selection);
    var_push(value);
    run_command("OFFSET");
    deselect(current_selection);
    Mrk[marker_count] = marker_piece(last_obj(),1);
    current_selection=newselection("OBJECT");
    select(current_selection, Mrk[marker_count]);
    select(current_selection, Obj[pass_index]);
    marker_count = marker_count + 1;
    }
  else
    {
    Obj[pass_index]=marker_piece(Obj[pass_index],1);
    Mrk[marker_count] = Obj[pass_index];
    current_selection=newselection("OBJECT");
    select(current_selection, Mrk[marker_count]);
    marker_count = marker_count + 1;
    }
 }
offset(double pass_index, double value)
 {
  point pnt, test;
  double save_x, save_y;
  if (Obj[pass_index]==0)
    {
    current_selection=newselection("OBJECT");
    return;
    }

  if (value != 0)
    {
    current_selection=newselection("OBJECT");
    select(current_selection,Obj[pass_index]);
    sel_push(current_selection);
    var_push(value);
    run_command("OFFSET");
    deselect(current_selection);
    current_selection=newselection("OBJECT");
    select(current_selection, last_obj());
    select(current_selection, Obj[pass_index]);
    }
  else
    {
    current_selection=newselection("OBJECT");
    select(current_selection, Obj[pass_index]);
    }
 }

double t0[2], t1[2];
double ftc[2];
double xar[13], yar[13];
double rx, ry;

arclength(double start, double corner, double end)  
{  
  double ct, last_x, last_y; double a_dist;
  last_x = x[start];
  last_y = y[start];
  a_dist=0; fts(start, corner, end, 0);
  for (ct=1; ct < 12; ct = ct + 1)
    {
    fts(start, corner, end, ct);
    a_dist = a_dist + distance(rx, ry, last_x, last_y);
    last_x=rx; last_y=ry;
    }   
  return a_dist;
} 
  
calc_if(double top, double bottom)
{
  if (Var[bottom] != 0)
    {
    return Var[top]/Var[bottom];
    }
  return 0;
}
  
cont (double cstart, double cend, double cdest, double cdist)
{
  double ang;
  ang=angle(x[cstart],y[cstart], x[cend], y[cend]);
  polar(x[cend],y[cend],ang,cdist);
  x[cdest]=getresultx();
  y[cdest]=getresulty();
}

  
LineArcIntersect(double start, double corner, double end, double lstart, double lend, double dest)
{
  x[dest]=0;
  y[dest]=0;
  if (arc_line_intersect(x[start], y[start], x[corner], y[corner], x[end], y[end], x[lstart], y[lstart], x[lend], y[lend], 1))
    {
    x[dest]=getresultx();
    y[dest]=getresulty();
    }
}

  
ArcArcIntersect(double start, double corner, double end, double a2start, double a2corner, double a2end, double dest)
{
  x[dest]=0;
  y[dest]=0;
  if (arc_arc_intersect(x[start], y[start], x[corner], y[corner], x[end], y[end], x[a2start], y[a2start], x[a2corner], y[a2corner], x[a2end], y[a2end],1))
    {
    x[dest]=getresultx();
    y[dest]=getresulty();
    }
}

  
LinePointDist(double dest, double line_start, double line_end, double from, double dist, double clockwise)
{
  double calc_dist, ang;
  LinePnt(dest, line_start, line_end, from);
  calc_dist=distance(x[from],y[from],x[dest],y[dest]);
  if (dist <= calc_dist)
    {
    x[dest] = 0;
    y[dest] = 0;
    }
  else
    {
    calc_dist=sqrt(dist*dist-calc_dist*calc_dist);
    ang=angle(x[from],y[from],x[dest],y[dest]);
    if (clockwise==1)
      {
      ang=ang+3.14159/2;
      }
    if (clockwise!=1)
      {
      ang=ang-3.14159/2;
      }
    x[dest] = x[dest] + calc_dist*cos(ang);
    y[dest] = y[dest] + calc_dist*sin(ang);
    }
}

  
Dart(double dest, double start, double end, double dist2, double dir)
{
  double dist, ang, dx, dy, h;
  dx=x[start]-x[end];
  dy=y[start]-y[end];
  dist=sqrt(dx*dx+dy*dy);
  h=sqrt((dist*dist)+(dist2/2)*(dist2/2));
  ang=atan(h,(dist2/2));
  if (dir==0)
    {
    ang=ang+angle(x[start], y[start], x[end], y[end]);
    }
  if (dir!=0)
    {
    ang=angle(x[start], y[start], x[end], y[end])-ang;
    }
  x[dest]=x[start]+dist2*cos(ang);
  y[dest]=y[start]+dist2*sin(ang);
}

  
LinePnt(double dest, double line_start, double line_end, double from)
{
  double v2x, v2y;
  double v1x, v1y;
  double dot;
  double norm2;
  v1x= x[from] - x[line_start];
  v1y= y[from] - y[line_start];
  v2x = x[line_end]-x[line_start];
  v2y = y[line_end]-y[line_start];
  dot = v1x * v2x + v1y * v2y;
  norm2 = sqrt(v2x * v2x + v2y * v2y);
  if (norm2 == 0)
    {
    x[dest] = x[line_start];
    y[dest] = y[line_start];
    }
  else
    {
    x[dest] = x[line_start] + dot * v2x / (norm2*norm2);
    y[dest] = y[line_start] + dot * v2y / (norm2*norm2);
    }
}
  
right_ang(double dest, double start, double end, double dist, double clockwise)
{
  double ang;
  ang=angle(x[start], y[start], x[end], y[end]);
  if (clockwise)
    {
    ang=ang + 3.14159/2;
    }
  if (!clockwise)
    {
    ang=ang - 3.14159/2;
    }
  x[dest]=x[start]+dist*cos(ang);
  y[dest]=y[start]+dist*sin(ang);
}

  
Mirror(double dest, double from, double line_start, double line_end)
{
  double v2x, v2y;
  double v1x, v1y;
  double dot;
  double norm2;
  v1x= x[from] - x[line_start];
  v1y= y[from] - y[line_start];
  v2x = x[line_end]-x[line_start];
  v2y = y[line_end]-y[line_start];
  dot = v1x * v2x + v1y * v2y;
  norm2 = sqrt(v2x * v2x + v2y * v2y);
  if (norm2 == 0)
    {
    x[dest] = x[line_start];
    y[dest] = y[line_start];
    }
  else
    {
    x[dest] = x[line_start] + dot * v2x / (norm2*norm2);
    y[dest] = y[line_start] + dot * v2y / (norm2*norm2);
    }
   x[dest]= x[from] + 2*( x[dest] - x[from]);
   y[dest]= y[from] + 2*( y[dest] - y[from]);
}

  
Rotate(double obj_numb, double start, double end, double pass_angle)
{
  double dist, ang;
  dist=distance(x[start], y[start], x[end], y[end]);
  if (dist > 0.01)
  {
    ang=(pass_angle*3.14159)/180 + angle(x[start], y[start], x[end], y[end]);
  }
  else
  {
    ang=0;
  }
  x[obj_numb]=x[start] + dist*cos(ang);
  y[obj_numb]=y[start] + dist*sin(ang);
}
  
RotDist(double obj_numb, double start, double end, double to_rot, double rdist)
{
  double dist, ang, ang2;
  dist=distance(x[start], y[start], x[end], y[end]);
  if (dist > 0.01)
  {
    ang2 = 2*asin(rdist/(2*dist));
    ang=angle(x[start], y[start], x[to_rot], y[to_rot]);
    dist=distance(x[start], y[start], x[to_rot], y[to_rot]);
    x[obj_numb]=x[start] + dist*cos(ang+ang2);
    y[obj_numb]=y[start] + dist*sin(ang+ang2);
  }
  else
  {
    x[obj_numb]=x[to_rot];
    y[obj_numb]=y[to_rot];
  }
}

  
ResizeX(double dest, double first, double second, double pass_scale)
{
  double dx, dy;
  dx=x[first]-x[second];
  dy=y[first]-y[second];
  x[dest]=x[first] - dx*pass_scale;
  y[dest]=y[first] - dy*pass_scale;
}

  
ResizeXY(double dest, double first, double second, double pass_xscale, double pass_yscale)
{
  double dx, dy;
  dx=x[first]-x[second];
  dy=y[first]-y[second];
  x[dest]=x[first] - dx*pass_xscale;
  y[dest]=y[first] - dy*pass_yscale;
}

  
OffsetDistance(double previous, double base, double next, double target, double odistp, double odistn, double iside)
  {
  double prev_ang, next_ang, temp_ang;
  double sin_of_ang, sin_of_temp;
  double off_dist;

  prev_ang = angle(x[base], y[base], x[previous], y[previous]);
  next_ang = angle(x[base], y[base], x[next],y[next]);
  prev_ang = normalizeangle(prev_ang);
  next_ang = normalizeangle(next_ang);
  if (prev_ang>next_ang)
    { temp_ang=(prev_ang + next_ang)/2; }
  else
    { temp_ang=(prev_ang + next_ang)/2 + 3.14159; }
  if (iside > 0)
    { temp_ang = temp_ang + 3.14159; }
  temp_ang = normalizeangle(temp_ang);
  sin_of_ang=sin(prev_ang - temp_ang);
  if (sin_of_ang < 0)
    { sin_of_ang = -sin_of_ang; }
  if (sin_of_ang < 0.1)
    { off_dist=odistp; }
  else
    { off_dist=odistp/sin_of_ang; }
  polar(x[base], y[base], temp_ang, off_dist);
  x[target] = getresultx();
  y[target] = getresulty();
  if (sin_of_ang >= 0.1)
    {
    sin_of_temp = sin(next_ang - prev_ang);
    if (sin_of_temp < 0)
      { sin_of_temp = -sin_of_temp; }
    if ( sin_of_temp >= 0.1 )
      {
      polar( x[target], y[target], prev_ang + (1 - iside) * 3.14159 , (odistn - odistp)/sin_of_temp );
      x[target] = getresultx();
      y[target] = getresulty();
      }
    }
}
  
// These global variables are used by fts for repeated calls.
	double A1, A2, B1, B2;  //transformation vectors
	double sx, sy, cx, cy, ex, ey;

fts(double start, double corner, double end, double pos)
{
  if (pos<1)
  {
  rx=x[start];
  ry=y[start];
  }
  else { if (pos<2)
  {
  sx = x[start];
  sy = y[start];
  cx = x[corner];
  cy = y[corner];
  ex = x[end];
  ey = y[end];

  A1=cx - sx;
  A2=cy - sy;
  B1=cx - ex;
  B2=cy - ey;

  A1=-A1;
  B1=-B1;
  A2=-A2;
  B2=-B2;

  t0[0]=A1;
  t0[1]=B1;
  t1[0]=A2;
  t1[1]=B2;

  ftc[0]= cx + (t0[0] + t0[1]);
  ftc[1]= cy + (t1[0] + t1[1]);

  rx = t0[0]*(xar[pos])+t0[1]*(yar[pos])+ ftc[0];
  ry = t1[0]*(xar[pos])+t1[1]*(yar[pos])+ ftc[1];
  }

  else {if (pos>10)
  {
  rx=x[end];
  ry=y[end];
  }
  else
  {
  rx = t0[0]*(xar[pos])+t0[1]*(yar[pos])+ ftc[0];
  ry = t1[0]*(xar[pos])+t1[1]*(yar[pos])+ ftc[1];
  }}}
}

init_xarc_array()
{
  // Must be called before calling fts().  This routine
  // sets the values in an array of sines and cosines.

  // You only need to call this routine once.

  double ang_start, ang_end, step, theta, ct;
  double XARC_PIECES;
  XARC_PIECES = 12;

  ang_start = -3.14159/2;
  ang_end= -3.14159;

  ct=0;

  step= (ang_end - ang_start)/(XARC_PIECES-1);
  for (theta=ang_start; ct < XARC_PIECES; theta = theta + step)
  {
  xar[ct] = cos(theta);
  yar[ct] = sin(theta);
  ct=ct+1;
  }
  //end init_xarc_array
}

CheckToMetric(double pass)
  {
  if (metric==1)
    {
    pass=pass*2.54;
    }
  return pass;
  }

CheckFromMetric(double pass)
  {
  if (metric==1)
    {
    pass=pass/2.54;
    }
  return pass;
  }