folder  = "subProg_Demo/"
//M0
TestCase=1

IF TestCase ==1 THEN
   P subProg_Demo/sub_G0
   TestCase =TestCase +1
ENDIF

WAIT
SLEEP(1)

IF TestCase ==2 THEN
    P subProg_Demo/sub_G1
    TestCase =TestCase +1
ENDIF

IF TestCase ==3 THEN
    P subProg_Demo/sub_G90
    TestCase =TestCase +1
ENDIF

IF TestCase ==4 THEN
    P subProg_Demo/sub_G91
    TestCase =TestCase +1
ENDIF

IF TestCase ==5 THEN
    subProg_Demo/sub_G94
    subProg_Demo/sub_G8_G9 
    TestCase =TestCase +1
ENDIF

IF TestCase ==6 THEN
    subProg_Demo/sub_circle
    subProg_Demo/sub_G16_G19
    TestCase =TestCase +1
ENDIF

IF TestCase ==7 THEN
    subProg_Demo/sub_AC_IC
    TestCase =TestCase +1
ENDIF

IF TestCase ==8 THEN
    ; subProg_Demo/sub_Tool
    TestCase =TestCase +1
ENDIF

IF TestCase ==9 THEN
  ;  subProg_Demo/sub_PCSoffset
    TestCase =TestCase +1
ENDIF

IF TestCase ==10 THEN
  ;  subProg_Demo/sub_G53
    TestCase =TestCase +1
ENDIF

IF TestCase ==11 THEN
    subProg_Demo/sub_PolyTransCmd
    TestCase =TestCase +1
ENDIF

IF TestCase ==12 THEN
    subProg_Demo/sub_REV
    TestCase =TestCase +1
ENDIF

IF TestCase ==13 THEN
    subProg_Demo/sub_signal
    TestCase =TestCase +1
ENDIF

IF TestCase ==14 THEN
    subProg_Demo/sub_Blend
    TestCase =TestCase +1
ENDIF

IF TestCase ==15 THEN
    subProg_Demo/sub_cpl_while
    TestCase =TestCase +1
ENDIF

IF TestCase ==16 THEN
    subProg_Demo/sub_cpl_for_loop
    TestCase =TestCase +1
ENDIF

IF TestCase ==17 THEN
N100   
    file =  folder + "sub_cpl_expr"
    [file]
    TestCase =TestCase +1
ENDIF

IF TestCase  == 18 THEN
WAIT
ENDIF

WAIT
SLEEP(1)