&ACCESS RVP1
&REL 28
&PARAM TEMPLATE = C:\KRC\Roboter\Template\vorgabe
&PARAM EDITMASK = *
DEF SAKRL( )
;FOLD INI
;BOOL bContinue

  ;FOLD BASISTECH INI
    GLOBAL INTERRUPT DECL 3 WHEN $STOPMESS==TRUE DO IR_STOPM ( )
    INTERRUPT ON 3
    BAS (#INITMOV,0 )
  ;ENDFOLD (BASISTECH INI)
  ;FOLD USER INI
;Make your modifications here
  AtHome = 0
  AtStart = 0
  motionProgramRunning = FALSE
  bGo = FALSE
  bAbort = FALSE
  velocityPct = 20.0
  accelerationPct = 20.0
  jtVelocityPct = 20.0
  jtAccelerationPct = 20.0
  GoodMsgCount = 0
  NoMsgCount = 0
  tstMsgType = 23
  MsgType = 23
  frameNum = 0
 
  sardEStop = FALSE
  GLOBAL INTERRUPT DECL 5 WHEN sardEStop==TRUE DO  HitEStop( )

  cmd8InMainLoop = FALSE
  cmd8InInterruptLoop = FALSE
  MoveCalled = FALSE
  InMoveFcn = FALSE
  GotToEndofGetMessages = FALSE
  cmd8B4EndOfGetMessages = FALSE
  cmd8AtEndOfGetMessages = FALSE
  ;ENDFOLD (USER INI)
;ENDFOLD (INI)
;FOLD Declare Timer-based interrupts for communication

  ; Interrupt to check for incoming messages every 250ms
  INTERRUPT DECL 6 WHEN $TIMER[4] >= 250 DO GetMessages()
  ; Init the timer for the interrupt
  $TIMER_STOP[4] = TRUE
  $TIMER[4] = 0
  
  ; Interrupt to write robot position during execution of move commands
  ;GLOBAL INTERRUPT DECL 7 WHEN $TIMER[5] >= 250 DO SendStatus()
  ; Init the timer for the interrupt
  ;$TIMER_STOP[5] = TRUE
  ;$TIMER[5] = 0
;ENDFOLD

;FOLD PTP HOME  Vel= 100 % DEFAULT;%{PE}%R 5.4.24,%MKUKATPBASIS,%CMOVE,%VPTP,%P 1:PTP, 2:HOME, 3:, 5:100, 7:DEFAULT
$BWDSTART = FALSE
PDAT_ACT=PDEFAULT
FDAT_ACT=FHOME
BAS(#PTP_PARAMS,100)
$H_POS=XHOME
PTP XHOME
;ENDFOLD

;FOLD Declare sensorname and open a channel
bRet = strClear(sensorname[]) 
sensorname[]="RAC" 
errint = EKX_open(sensorname[])
EKX_handleerror(errint)


;ENDFOLD
;FOLD Build Dataset for messages received
;receive structure - Matches RACData.xml on server & robot
rectext[1].s[] = "RAC.RACData.MsgType"
rectext[2].s[] = "RAC.RACData.ProgNum"
rectext[3].s[] = "RAC.RACData.InspectionIndex"
rectext[4].s[] = "RAC.RACData.Position.XPos"
rectext[5].s[] = "RAC.RACData.Position.YPos"
rectext[6].s[] = "RAC.RACData.Position.ZPos"
rectext[7].s[] = "RAC.RACData.Position.APos"
rectext[8].s[] = "RAC.RACData.Position.BPos"
rectext[9].s[] = "RAC.RACData.Position.CPos"
rectext[10].s[] = "RAC.RACData.Closure.Status"
rectext[11].s[] = "RAC.RACData.Closure.Turn"
rectext[12].s[] = "RAC.RACData.Joints.A1"
rectext[13].s[] = "RAC.RACData.Joints.A2"
rectext[14].s[] = "RAC.RACData.Joints.A3"
rectext[15].s[] = "RAC.RACData.Joints.A4"
rectext[16].s[] = "RAC.RACData.Joints.A5"
rectext[17].s[] = "RAC.RACData.Joints.A6"
rectext[18].s[] = "RAC.RACData.Velocity"
rectext[19].s[] = "RAC.RACData.Acceleration"
rectext[20].s[] = "RAC.RACData.JtVelocity"
rectext[21].s[] = "RAC.RACData.JtAcceleration"
rectext[22].s[]= "RAC.RACData"
;ENDFOLD
; Fold Initialize Variables

bContinue = TRUE
MsgCount = 0
Command = #NONE
bRet = strClear(ErrorText[])
ErrorText[] = "No errors"
; ENDFOLD
;FOLD Start the Timer based interrupt for reading incoming data
INTERRUPT ON 6
$TIMER_STOP[4] = false
; ENDFOLD

; Sent this robot's joint ranges
SendJointRanges()

; Since we just moved home, send a status message
AtHome = 1
SendStatus()

; *****************
; MAIN PROGRAM LOOP
; *****************
WHILE bContinue
  ; "Long" commands are handled in the main loop
  ; "Short" commands are handled in the message receiver interrupt
  SWITCH (Command)
    CASE #NONE
    CASE #LOAD_PROG
      Command = #NONE
      RunMotionProgram()

    CASE #MOVE_HOME
    CASE #MOVE_START
    CASE #MOVE_CART
      cmd8InMainLoop = TRUE
      ;Command = #NONE
      ;MoveToCartesianPosition()
      ;Command = #NONE

    CASE #MOVE_JTS
      ;Command = #NONE
      ;MoveToJointPose()
      ;Command = #NONE

  ENDSWITCH
Command = #NONE

if tstMsgType == 8 then
  tstMsgType = 0
  MoveToCartesianPosition()
endif

if tstMsgType == 9 then
  tstMsgType = 0
  MoveToJointPose()
endif

if tstMsgType == 6 then
  tstMsgType = 0
  bContinue = FALSE
endif

if tstMsgType == 3 then
  tstMsgType = 0
  SendStatus()
endif

if tstMsgType == 7 then
  tstMsgType = 0
  SendStatus()
endif

if tstMsgType == 12 then
  tstMsgType = 0
  SendJointRanges()
endif

if tstMsgType == 13 then
  tstMsgType = 0
  DoForwardKinematics()
endif

if tstMsgType == 14 then
  tstMsgType = 0
  DoInverseKinematics()
endif

if tstMsgType == 15 then
  tstMsgType = 0
  GetToolFrame()
endif

if tstMsgType == 16 then
  tstMsgType = 0
  SetToolFrame()
endif

if tstMsgType == 17 then
  tstMsgType = 0
  AddFrameToArray()
endif

if tstMsgType == 18 then
  tstMsgType = 0
  DoSpline()
endif

if tstMsgType == 19 then
  tstMsgType = 0
  DoMultiLin()
endif
      
  ; Throttle
  WAIT SEC 0.1
  ;Command = #NONE
ENDWHILE

;FOLD Close channel
EKX_OK = EKX_close(sensorname[])
if EKX_OK == false then
  halt
endif
;ENDFOLD
;End Program
;FOLD PTP HOME  Vel= 100 % DEFAULT;%{PE}%R 5.4.24,%MKUKATPBASIS,%CMOVE,%VPTP,%P 1:PTP, 2:HOME, 3:, 5:100, 7:DEFAULT
;$BWDSTART = FALSE
;PDAT_ACT=PDEFAULT
;FDAT_ACT=FHOME
;BAS(#PTP_PARAMS,100)
;$H_POS=XHOME
;PTP XHOME
;ENDFOLD
END

;FOLD GetMessages
GLOBAL DEF GetMessages()
  BOOL bNew
  ; Disable the interrupt to handle without interruption
  INTERRUPT OFF 6
  ; Reset the timer
  $TIMER_STOP[4] = TRUE
  $TIMER[4] = 0
  intcount = intcount + 1


  ; Check for an incoming message - timeout is 12ms (1 IPO)
  EKX_OK = EKX_waitforsensordata(0,rectext[22].s[], 12)
  if EKX_OK == false then
     ; No messages available or a bad or partial message
    NoMsgCount = NoMsgCount + 1
  ELSE
    ; Get the message Type
    EKX_OK = EKX_getintegerelement(0, rectext[1].s[], MsgType, bNew)
    tstMsgType = MsgType
    if EKX_OK == false then
       halt
    endif
    ; Get the Program number
    EKX_OK = EKX_getintegerelement(0, rectext[2].s[], ProgNum, bNew)
    frameNum = ProgNum
    if EKX_OK == false then
      halt
    endif
    ; Get the inspection index
    EKX_OK = EKX_getintegerelement(0, rectext[3].s[], InspIndex, bNew)
    if EKX_OK == false then
      halt
    endif
    ;get position
    FOR i=1 TO 6
      EKX_OK = EKX_getrealelement(0, rectext[3+i].s[], position[i], bNew)
      if EKX_OK == false then
        halt
      endif
    ENDFOR
    ; Get Closure: Status
    EKX_OK = EKX_getintegerelement(0, rectext[10].s[], closure[1], bNew)
    if EKX_OK == false then
      halt
    endif
    ; Get the Closure: Turn
    EKX_OK = EKX_getintegerelement(0, rectext[11].s[], closure[2], bNew)
    if EKX_OK == false then
      halt
    endif
    ;get joint values
    FOR j=1 TO 6
      EKX_OK = EKX_getrealelement(0, rectext[11+j].s[], joints[j], bNew)
      if EKX_OK == false then
        halt
      endif
    ENDFOR
    ; Get velocity
    EKX_OK = EKX_getrealelement(0, rectext[18].s[], velocityPct, bNew)
    if EKX_OK == false then
      halt
    endif
    ; Get acceleration
    EKX_OK = EKX_getrealelement(0, rectext[19].s[], accelerationPct, bNew)
    if EKX_OK == false then
      halt
    endif
    
    ; Get Axis velocity
    EKX_OK = EKX_getrealelement(0, rectext[20].s[], jtVelocityPct, bNew)
    if EKX_OK == false then
      halt
    endif
    ; Get Axis acceleration
    EKX_OK = EKX_getrealelement(0, rectext[21].s[], jtAccelerationPct, bNew)
    if EKX_OK == false then
      halt
    endif
    
  ENDIF

  ; Transform the message into a program command
  IF Command <> #NONE THEN
    ; mcc69 Error - cant' handle multiple requests simultaneously - or need to wait...???
  ENDIF
  
  SWITCH MsgType
    CASE 1
      Command = #LOAD_PROG
    CASE 2
      Command = #EXEC_MOVE
    CASE 3
      ;if motionProgramRunning == TRUE then
        SendStatus()
      ;endif
      Command = #GET_POS
    CASE 4
      Command = #MOVE_HOME
    CASE 5
      Command = #MOVE_START
    CASE 6
      Command = #ABORT_PROG
    CASE 7
      Command = #GET_STATUS
    CASE 8
      Command = #MOVE_CART
      cmd8InInterruptLoop = TRUE
    CASE 9
      Command = #MOVE_JTS
    CASE 10
      Command = #SET_VEL_ACCEL
    CASE 11
      ;if motionProgramRunning == TRUE then
        Command = #HIT_E_STOP
        sardEStop = TRUE
      ;endif
    CASE 12
      SendJointRanges()
    CASE 13
      DoForwardKinematics()
    CASE 14
      DoInverseKinematics()
    CASE 15
      ;GetToolFrame()
      Command = #NONE
    CASE 16
      SetToolFrame()
      Command = #NONE
  ENDSWITCH
  
   IF Command == #MOVE_CART THEN
    cmd8B4EndOfGetMessages= TRUE
  ENDIF

  ; IF A PROGRAM is already loaded and running, then not
  ; all commands are allowed.  Some Commands must be 
  ; handled immediately (GET_POS, GET_STATUS, EXEC_MOVE)
  SWITCH (Command)
    CASE #EXEC_MOVE
      bGo = TRUE
      Command = #NONE
    CASE #ABORT_PROG
      bAbort = TRUE
      bContinue = FALSE
      bGo = TRUE
      Command = #NONE
    CASE #MOVE_CART
    CASE #MOVE_JTS
    CASE #GET_STATUS
      SendStatus()
      ;Command = #NONE
    CASE #GET_POS
      if motionProgramRunning == TRUE then
        SendStatus()
      endif
      ;Command = #NONE
    CASE #SET_VEL_ACCEL
      ;do nothing, values get set from receipt of xml

  ENDSWITCH
  
  GotToEndofGetMessages = TRUE
  IF Command == #MOVE_CART THEN
    cmd8AtEndOfGetMessages= TRUE
  ENDIF

  ; Enable the interrupt and start the timer
  INTERRUPT ON 6
  $TIMER_STOP[4] = FALSE
  GoodMsgCount = GoodMsgCount + 1
END

;ENDFOLD

;FOLD WriteStatusInfo
DEF WriteStatusInfo()
  ; Set the atHome, atStart and Error and position fields
  ; Write the data to the XML structure
  errint = EKX_WriteReal("RAC.RACData.Position.XPos", $POS_ACT.X)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.YPos", $POS_ACT.Y)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.ZPos", $POS_ACT.Z)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.APos", $POS_ACT.A)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.BPos", $POS_ACT.B)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.CPos", $POS_ACT.C)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Status", $POS_ACT.S)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Turn", $POS_ACT.T)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A1", $AXIS_ACT.A1)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A2", $AXIS_ACT.A2)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A3", $AXIS_ACT.A3)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A4", $AXIS_ACT.A4)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A5", $AXIS_ACT.A5)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A6", $AXIS_ACT.A6)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Velocity", velocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Acceleration", accelerationPct)
  EKX_HandleError(errint)
    errint = EKX_WriteReal("RAC.RACData.JtVelocity", jtVelocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.JtAcceleration", jtAccelerationPct)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtHome", AtHome)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtStart", AtStart)
  EKX_HandleError(errint)
  errint = EKX_WriteString("RAC.RACData.Error", ErrorText[])
  EKX_HandleError(errint)
END
;ENDFOLD

;FOLD WriteJointRangeInfo
DEF WriteJointRangeInfo()
  ; Set the atHome, atStart and Error and position fields
  ; Write the data to the XML structure
  errint = EKX_WriteReal("RAC.RACData.Position.XPos", $SOFTN_END[1])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.YPos", $SOFTP_END[1])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.ZPos", $SOFTN_END[2])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.APos", $SOFTP_END[2])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.BPos", $SOFTN_END[3])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.CPos", $SOFTP_END[3])
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Status", $POS_ACT.S)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Turn", $POS_ACT.T)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A1", $SOFTN_END[4])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A2", $SOFTP_END[4])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A3", $SOFTN_END[5])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A4", $SOFTP_END[5])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A5", $SOFTN_END[6])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A6", $SOFTP_END[6])
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Velocity", velocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Acceleration", accelerationPct)
  EKX_HandleError(errint)
    errint = EKX_WriteReal("RAC.RACData.JtVelocity", jtVelocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.JtAcceleration", jtAccelerationPct)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtHome", AtHome)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtStart", AtStart)
  EKX_HandleError(errint)
  errint = EKX_WriteString("RAC.RACData.Error", ErrorText[])
  EKX_HandleError(errint)
;inSendRanges = true
END
;ENDFOLD

;FOLD WriteTOOLFrameInfo
DEF WriteTOOLFrameInfo()
  ; Write the data to the XML structure
  errint = EKX_WriteReal("RAC.RACData.Position.XPos", TOOL_DATA[16].X)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.YPos", TOOL_DATA[16].Y)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.ZPos", TOOL_DATA[16].Z)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.APos", TOOL_DATA[16].A)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.BPos", TOOL_DATA[16].B)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.CPos", TOOL_DATA[16].C)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Status", $POS_ACT.S)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Turn", $POS_ACT.T)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A1", $AXIS_ACT.A1)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A2", $AXIS_ACT.A2)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A3", $AXIS_ACT.A3)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A4", $AXIS_ACT.A4)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A5", $AXIS_ACT.A5)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A6", $AXIS_ACT.A6)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Velocity", velocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Acceleration", accelerationPct)
  EKX_HandleError(errint)
    errint = EKX_WriteReal("RAC.RACData.JtVelocity", jtVelocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.JtAcceleration", jtAccelerationPct)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtHome", AtHome)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtStart", AtStart)
  EKX_HandleError(errint)
  errint = EKX_WriteString("RAC.RACData.Error", ErrorText[])
  EKX_HandleError(errint)
;inSendRanges = true
END
;ENDFOLD

;FOLD WriteKinematicInfo
DEF WriteKinematicInfo()
  ; Set the atHome, atStart and Error and position fields
  ; Write the data to the XML structure
  errint = EKX_WriteReal("RAC.RACData.Position.XPos", PPOS.X)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.YPos", PPOS.Y)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.ZPos", PPOS.Z)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.APos", PPOS.A)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.BPos", PPOS.B)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Position.CPos", PPOS.C)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Status", PPOS.S)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.Closure.Turn", PPOS.T)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A1", PAXIS.A1)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A2", PAXIS.A2)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A3", PAXIS.A3)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A4", PAXIS.A4)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A5", PAXIS.A5)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Joints.A6", PAXIS.A6)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Velocity", velocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.Acceleration", accelerationPct)
  EKX_HandleError(errint)
    errint = EKX_WriteReal("RAC.RACData.JtVelocity", jtVelocityPct)
  EKX_HandleError(errint)
  errint = EKX_WriteReal("RAC.RACData.JtAcceleration", jtAccelerationPct)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtHome", AtHome)
  EKX_HandleError(errint)
  errint = EKX_WriteInteger("RAC.RACData.AtStart", AtStart)
  EKX_HandleError(errint)
  errint = EKX_WriteString("RAC.RACData.Error", ErrorText[])
  EKX_HandleError(errint)
END
;ENDFOLD

;FOLD SendStatus
GLOBAL DEF SendStatus()
  ; Set the message type
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 3)
  EKX_HAndleError(errint)
  WriteStatusInfo()
  SendMsg()
  ;$TIMER[5] = 0
END
;ENDFOLD

;FOLD SendReady
GLOBAL DEF SendReady()
  ; Set the message type
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 1)
  EKX_HAndleError(errint)
  WriteStatusInfo()
  SendMsg()
END
;ENDFOLD

;FOLD SendJointRanges
GLOBAL DEF SendJointRanges()
  ; Set the message type
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 12)
  EKX_HAndleError(errint)
  WriteJointRangeInfo()
  SendMsg()
END
;ENDFOLD

;FOLD DoForwardKinematics
GLOBAL DEF DoForwardKinematics()
  ; Set the message type
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 13)
  EKX_HAndleError(errint)
  PAXIS.A1=joints[1]
  PAXIS.A2=joints[2]
  PAXIS.A3=joints[3]
  PAXIS.A4=joints[4]
  PAXIS.A5=joints[5]
  PAXIS.A6=joints[6]
  PPOS = FORWARD (PAXIS, errint)
  WriteKinematicInfo()
  SendMsg()
END
;ENDFOLD

;FOLD DoInverseKinematics -- FROM CURRENT JOINT POSITION
GLOBAL DEF DoInverseKinematics()
  ; Set the message type
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 14)
  EKX_HAndleError(errint)
  PPOS.X=position[1]
  PPOS.Y=position[2]
  PPOS.Z=position[3]
  PPOS.A=position[4]
  PPOS.B=position[5]
  PPOS.C=position[6]
  ;PPOS.S=closure[1]
  ;PPOS.T=closure[2]
  PAXIS = INVERSE (PPOS, $AXIS_ACT,  errint) ; always from current frame, $AXIS_ACT
  WriteKinematicInfo()
  SendMsg()
END
;ENDFOLD

;FOLD SetToolFrame -- W.R.T. Flange Frame
GLOBAL DEF SetToolFrame()
  ; advance run...
  TOOL_DATA[16].X=position[1]
  TOOL_DATA[16].Y=position[2]
  TOOL_DATA[16].Z=position[3]
  TOOL_DATA[16].A=position[4]
  TOOL_DATA[16].B=position[5]
  TOOL_DATA[16].C=position[6]
END
;ENDFOLD

;FOLD GetToolFrame -- W.R.T. Flange Frame
GLOBAL DEF GetToolFrame()
  ; Set the message type
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 15)
  EKX_HAndleError(errint)
  WriteToolFrameInfo()
  SendMsg()
END
;ENDFOLD

;FOLD PTP Move to commanded Cartesian Position
DEF MoveToCartesianPosition()
  Command = #NONE
  MoveCalled = TRUE
  IF motionProgramRunning == FALSE THEN
    bGo = TRUE
    bAbort = FALSE
    sardEStop = FALSE
    motionProgramRunning = TRUE
  
    MoveToFrame()
  ELSE
    bRet = strClear(ErrorText[])
    ;ErrorText[] = "Motion already running"
    ;SendStatus()  
  ENDIF
END
;ENDFOLD

;FOLD PTP Move to commanded Joint Pose
DEF MoveToJointPose()
  Command = #NONE
  MoveCalled = TRUE
  IF motionProgramRunning == FALSE THEN
    bGo = TRUE
    bAbort = FALSE
    sardEStop = FALSE
    motionProgramRunning = TRUE
    MoveToJointSet()
  ELSE
    bRet = strClear(ErrorText[])
    ;ErrorText[] = "Motion already running"
    ;SendStatus()  
  ENDIF
END
;ENDFOLD

;FOLD AddFrameToArray
DEF AddFrameToArray()
  IF frameNum == 1 THEN
    POS1.X=position[1]
    POS1.Y=position[2]
    POS1.Z=position[3]
    POS1.A=position[4]
    POS1.B=position[5]
    POS1.C=position[6]
  ENDIF
  
   IF frameNum == 2 THEN
    POS2.X=position[1]
    POS2.Y=position[2]
    POS2.Z=position[3]
    POS2.A=position[4]
    POS2.B=position[5]
    POS2.C=position[6]
  ENDIF
  
  IF frameNum == 3 THEN
    POS3.X=position[1]
    POS3.Y=position[2]
    POS3.Z=position[3]
    POS3.A=position[4]
    POS3.B=position[5]
    POS3.C=position[6]
  ENDIF
  
  IF frameNum == 4 THEN
    POS4.X=position[1]
    POS4.Y=position[2]
    POS4.Z=position[3]
    POS4.A=position[4]
    POS4.B=position[5]
    POS4.C=position[6]
  ENDIF
  
  IF frameNum == 5 THEN
    POS5.X=position[1]
    POS5.Y=position[2]
    POS5.Z=position[3]
    POS5.A=position[4]
    POS5.B=position[5]
    POS5.C=position[6]
  ENDIF
  
  IF frameNum == 6 THEN
    POS6.X=position[1]
    POS6.Y=position[2]
    POS6.Z=position[3]
    POS6.A=position[4]
    POS6.B=position[5]
    POS6.C=position[6]
  ENDIF
  
  IF frameNum == 7 THEN
    POS7.X=position[1]
    POS7.Y=position[2]
    POS7.Z=position[3]
    POS7.A=position[4]
    POS7.B=position[5]
    POS7.C=position[6]
  ENDIF
  
  IF frameNum == 8 THEN
    POS8.X=position[1]
    POS8.Y=position[2]
    POS8.Z=position[3]
    POS8.A=position[4]
    POS8.B=position[5]
    POS8.C=position[6]
  ENDIF
  
  IF frameNum == 9 THEN
    POS9.X=position[1]
    POS9.Y=position[2]
    POS9.Z=position[3]
    POS9.A=position[4]
    POS9.B=position[5]
    POS9.C=position[6]
  ENDIF
  
  IF frameNum == 10 THEN
    POS10.X=position[1]
    POS10.Y=position[2]
    POS10.Z=position[3]
    POS10.A=position[4]
    POS10.B=position[5]
    POS10.C=position[6]
  ENDIF
  
  IF frameNum == 11 THEN
    POS11.X=position[1]
    POS11.Y=position[2]
    POS11.Z=position[3]
    POS11.A=position[4]
    POS11.B=position[5]
    POS11.C=position[6]
  ENDIF
  
   IF frameNum == 12 THEN
    POS12.X=position[1]
    POS12.Y=position[2]
    POS12.Z=position[3]
    POS12.A=position[4]
    POS12.B=position[5]
    POS12.C=position[6]
  ENDIF
  
  IF frameNum == 13 THEN
    POS13.X=position[1]
    POS13.Y=position[2]
    POS13.Z=position[3]
    POS13.A=position[4]
    POS13.B=position[5]
    POS13.C=position[6]
  ENDIF
  
  IF frameNum == 14 THEN
    POS14.X=position[1]
    POS14.Y=position[2]
    POS14.Z=position[3]
    POS14.A=position[4]
    POS14.B=position[5]
    POS14.C=position[6]
  ENDIF
  
  IF frameNum == 15 THEN
    POS15.X=position[1]
    POS15.Y=position[2]
    POS15.Z=position[3]
    POS15.A=position[4]
    POS15.B=position[5]
    POS15.C=position[6]
  ENDIF
  
  IF frameNum == 16 THEN
    POS16.X=position[1]
    POS16.Y=position[2]
    POS16.Z=position[3]
    POS16.A=position[4]
    POS16.B=position[5]
    POS16.C=position[6]
  ENDIF
  
  IF frameNum == 17 THEN
    POS17.X=position[1]
    POS17.Y=position[2]
    POS17.Z=position[3]
    POS17.A=position[4]
    POS17.B=position[5]
    POS17.C=position[6]
  ENDIF
  
  IF frameNum == 18 THEN
    POS18.X=position[1]
    POS18.Y=position[2]
    POS18.Z=position[3]
    POS18.A=position[4]
    POS18.B=position[5]
    POS18.C=position[6]
  ENDIF
  
  IF frameNum == 19 THEN
    POS19.X=position[1]
    POS19.Y=position[2]
    POS19.Z=position[3]
    POS19.A=position[4]
    POS19.B=position[5]
    POS19.C=position[6]
  ENDIF
  
  IF frameNum == 20 THEN
    POS20.X=position[1]
    POS20.Y=position[2]
    POS20.Z=position[3]
    POS20.A=position[4]
    POS20.B=position[5]
    POS20.C=position[6]
  ENDIF
  
  IF frameNum == 21 THEN
    POS21.X=position[1]
    POS21.Y=position[2]
    POS21.Z=position[3]
    POS21.A=position[4]
    POS21.B=position[5]
    POS21.C=position[6]
  ENDIF
  
   IF frameNum == 22 THEN
    POS22.X=position[1]
    POS22.Y=position[2]
    POS22.Z=position[3]
    POS22.A=position[4]
    POS22.B=position[5]
    POS22.C=position[6]
  ENDIF
  
  IF frameNum == 23 THEN
    POS23.X=position[1]
    POS23.Y=position[2]
    POS23.Z=position[3]
    POS23.A=position[4]
    POS23.B=position[5]
    POS23.C=position[6]
  ENDIF
  
  IF frameNum == 24 THEN
    POS24.X=position[1]
    POS24.Y=position[2]
    POS24.Z=position[3]
    POS24.A=position[4]
    POS24.B=position[5]
    POS24.C=position[6]
  ENDIF
  
  IF frameNum == 25 THEN
    POS25.X=position[1]
    POS25.Y=position[2]
    POS25.Z=position[3]
    POS25.A=position[4]
    POS25.B=position[5]
    POS25.C=position[6]
  ENDIF
  
  IF frameNum == 26 THEN
    POS26.X=position[1]
    POS26.Y=position[2]
    POS26.Z=position[3]
    POS26.A=position[4]
    POS26.B=position[5]
    POS26.C=position[6]
  ENDIF
  
  IF frameNum == 27 THEN
    POS27.X=position[1]
    POS27.Y=position[2]
    POS27.Z=position[3]
    POS27.A=position[4]
    POS27.B=position[5]
    POS27.C=position[6]
  ENDIF
  
  IF frameNum == 28 THEN
    POS28.X=position[1]
    POS28.Y=position[2]
    POS28.Z=position[3]
    POS28.A=position[4]
    POS28.B=position[5]
    POS28.C=position[6]
  ENDIF
  
  IF frameNum == 29 THEN
    POS29.X=position[1]
    POS29.Y=position[2]
    POS29.Z=position[3]
    POS29.A=position[4]
    POS29.B=position[5]
    POS29.C=position[6]
  ENDIF
  
  IF frameNum == 30 THEN
    POS30.X=position[1]
    POS30.Y=position[2]
    POS30.Z=position[3]
    POS30.A=position[4]
    POS30.B=position[5]
    POS30.C=position[6]
  ENDIF
  
  IF frameNum == 31 THEN
    POS31.X=position[1]
    POS31.Y=position[2]
    POS31.Z=position[3]
    POS31.A=position[4]
    POS31.B=position[5]
    POS31.C=position[6]
  ENDIF
  
   IF frameNum == 32 THEN
    POS32.X=position[1]
    POS32.Y=position[2]
    POS32.Z=position[3]
    POS32.A=position[4]
    POS32.B=position[5]
    POS32.C=position[6]
  ENDIF
  
  IF frameNum == 33 THEN
    POS33.X=position[1]
    POS33.Y=position[2]
    POS33.Z=position[3]
    POS33.A=position[4]
    POS3.B=position[5]
    POS33.C=position[6]
  ENDIF
  
  IF frameNum == 34 THEN
    POS24.X=position[1]
    POS34.Y=position[2]
    POS34.Z=position[3]
    POS34.A=position[4]
    POS34.B=position[5]
    POS34.C=position[6]
  ENDIF
  
  IF frameNum == 35 THEN
    POS35.X=position[1]
    POS35.Y=position[2]
    POS35.Z=position[3]
    POS35.A=position[4]
    POS35.B=position[5]
    POS35.C=position[6]
  ENDIF
  
  IF frameNum == 36 THEN
    POS36.X=position[1]
    POS36.Y=position[2]
    POS36.Z=position[3]
    POS36.A=position[4]
    POS36.B=position[5]
    POS36.C=position[6]
  ENDIF
  
  IF frameNum == 37 THEN
    POS37.X=position[1]
    POS37.Y=position[2]
    POS37.Z=position[3]
    POS37.A=position[4]
    POS37.B=position[5]
    POS37.C=position[6]
  ENDIF
  
  IF frameNum == 38 THEN
    POS38.X=position[1]
    POS38.Y=position[2]
    POS38.Z=position[3]
    POS38.A=position[4]
    POS38.B=position[5]
    POS38.C=position[6]
  ENDIF
  
  IF frameNum == 39 THEN
    POS39.X=position[1]
    POS39.Y=position[2]
    POS39.Z=position[3]
    POS39.A=position[4]
    POS39.B=position[5]
    POS39.C=position[6]
  ENDIF
  
  IF frameNum == 40 THEN
    POS40.X=position[1]
    POS40.Y=position[2]
    POS40.Z=position[3]
    POS40.A=position[4]
    POS40.B=position[5]
    POS40.C=position[6]
  ENDIF
  
  IF frameNum == 41 THEN
    POS41.X=position[1]
    POS41.Y=position[2]
    POS41.Z=position[3]
    POS41.A=position[4]
    POS41.B=position[5]
    POS41.C=position[6]
  ENDIF
  
   IF frameNum == 42 THEN
    POS42.X=position[1]
    POS42.Y=position[2]
    POS42.Z=position[3]
    POS42.A=position[4]
    POS42.B=position[5]
    POS42.C=position[6]
  ENDIF
  
  IF frameNum == 43 THEN
    POS43.X=position[1]
    POS43.Y=position[2]
    POS43.Z=position[3]
    POS43.A=position[4]
    POS43.B=position[5]
    POS43.C=position[6]
  ENDIF
  
  IF frameNum == 44 THEN
    POS44.X=position[1]
    POS44.Y=position[2]
    POS44.Z=position[3]
    POS44.A=position[4]
    POS44.B=position[5]
    POS44.C=position[6]
  ENDIF
  
  IF frameNum == 45 THEN
    POS45.X=position[1]
    POS45.Y=position[2]
    POS45.Z=position[3]
    POS45.A=position[4]
    POS45.B=position[5]
    POS45.C=position[6]
  ENDIF
  
  IF frameNum == 46 THEN
    POS46.X=position[1]
    POS46.Y=position[2]
    POS46.Z=position[3]
    POS46.A=position[4]
    POS46.B=position[5]
    POS46.C=position[6]
  ENDIF
  
  IF frameNum == 47 THEN
    POS47.X=position[1]
    POS47.Y=position[2]
    POS47.Z=position[3]
    POS47.A=position[4]
    POS47.B=position[5]
    POS47.C=position[6]
  ENDIF
  
  IF frameNum == 48 THEN
    POS48.X=position[1]
    POS48.Y=position[2]
    POS48.Z=position[3]
    POS48.A=position[4]
    POS48.B=position[5]
    POS48.C=position[6]
  ENDIF
  
  IF frameNum == 49 THEN
    POS49.X=position[1]
    POS49.Y=position[2]
    POS49.Z=position[3]
    POS49.A=position[4]
    POS49.B=position[5]
    POS49.C=position[6]
  ENDIF
  
  IF frameNum == 50 THEN
    POS50.X=position[1]
    POS50.Y=position[2]
    POS50.Z=position[3]
    POS50.A=position[4]
    POS50.B=position[5]
    POS50.C=position[6]
  ENDIF

  IF frameNum == 51 THEN
    POS51.X=position[1]
    POS51.Y=position[2]
    POS51.Z=position[3]
    POS51.A=position[4]
    POS51.B=position[5]
    POS51.C=position[6]
  ENDIF
  
   IF frameNum == 52 THEN
    POS52.X=position[1]
    POS52.Y=position[2]
    POS52.Z=position[3]
    POS52.A=position[4]
    POS52.B=position[5]
    POS52.C=position[6]
  ENDIF
  
  IF frameNum == 53 THEN
    POS53.X=position[1]
    POS53.Y=position[2]
    POS53.Z=position[3]
    POS53.A=position[4]
    POS53.B=position[5]
    POS53.C=position[6]
  ENDIF
  
  IF frameNum == 54 THEN
    POS54.X=position[1]
    POS54.Y=position[2]
    POS54.Z=position[3]
    POS54.A=position[4]
    POS54.B=position[5]
    POS54.C=position[6]
  ENDIF
  
  IF frameNum == 55 THEN
    POS55.X=position[1]
    POS55.Y=position[2]
    POS55.Z=position[3]
    POS55.A=position[4]
    POS55.B=position[5]
    POS55.C=position[6]
  ENDIF
  
  IF frameNum == 56 THEN
    POS56.X=position[1]
    POS56.Y=position[2]
    POS56.Z=position[3]
    POS56.A=position[4]
    POS56.B=position[5]
    POS56.C=position[6]
  ENDIF
  
  IF frameNum == 57 THEN
    POS57.X=position[1]
    POS57.Y=position[2]
    POS57.Z=position[3]
    POS57.A=position[4]
    POS57.B=position[5]
    POS57.C=position[6]
  ENDIF
  
  IF frameNum == 58 THEN
    POS58.X=position[1]
    POS58.Y=position[2]
    POS58.Z=position[3]
    POS58.A=position[4]
    POS58.B=position[5]
    POS58.C=position[6]
  ENDIF
  
  IF frameNum == 59 THEN
    POS59.X=position[1]
    POS59.Y=position[2]
    POS59.Z=position[3]
    POS59.A=position[4]
    POS59.B=position[5]
    POS59.C=position[6]
  ENDIF
  
  IF frameNum == 60 THEN
    POS60.X=position[1]
    POS60.Y=position[2]
    POS60.Z=position[3]
    POS60.A=position[4]
    POS60.B=position[5]
    POS60.C=position[6]
  ENDIF

  IF frameNum == 61 THEN
    POS61.X=position[1]
    POS61.Y=position[2]
    POS61.Z=position[3]
    POS61.A=position[4]
    POS61.B=position[5]
    POS61.C=position[6]
  ENDIF
  
   IF frameNum == 62 THEN
    POS62.X=position[1]
    POS62.Y=position[2]
    POS62.Z=position[3]
    POS62.A=position[4]
    POS62.B=position[5]
    POS62.C=position[6]
  ENDIF
  
  IF frameNum == 63 THEN
    POS63.X=position[1]
    POS63.Y=position[2]
    POS63.Z=position[3]
    POS63.A=position[4]
    POS63.B=position[5]
    POS63.C=position[6]
  ENDIF
  
  IF frameNum == 64 THEN
    POS64.X=position[1]
    POS64.Y=position[2]
    POS64.Z=position[3]
    POS64.A=position[4]
    POS64.B=position[5]
    POS64.C=position[6]
  ENDIF
  
  IF frameNum == 65 THEN
    POS65.X=position[1]
    POS65.Y=position[2]
    POS65.Z=position[3]
    POS65.A=position[4]
    POS65.B=position[5]
    POS65.C=position[6]
  ENDIF
  
  IF frameNum == 66 THEN
    POS66.X=position[1]
    POS56.Y=position[2]
    POS66.Z=position[3]
    POS66.A=position[4]
    POS66.B=position[5]
    POS66.C=position[6]
  ENDIF
  
  IF frameNum == 67 THEN
    POS67.X=position[1]
    POS67.Y=position[2]
    POS67.Z=position[3]
    POS67.A=position[4]
    POS67.B=position[5]
    POS67.C=position[6]
  ENDIF
  
  IF frameNum == 68 THEN
    POS68.X=position[1]
    POS68.Y=position[2]
    POS68.Z=position[3]
    POS68.A=position[4]
    POS68.B=position[5]
    POS68.C=position[6]
  ENDIF
  
  IF frameNum == 69 THEN
    POS69.X=position[1]
    POS69.Y=position[2]
    POS69.Z=position[3]
    POS69.A=position[4]
    POS69.B=position[5]
    POS69.C=position[6]
  ENDIF
  
  IF frameNum == 70 THEN
    POS70.X=position[1]
    POS70.Y=position[2]
    POS70.Z=position[3]
    POS70.A=position[4]
    POS70.B=position[5]
    POS70.C=position[6]
  ENDIF
  
  IF frameNum == 71 THEN
    POS71.X=position[1]
    POS71.Y=position[2]
    POS71.Z=position[3]
    POS71.A=position[4]
    POS71.B=position[5]
    POS71.C=position[6]
  ENDIF
  
   IF frameNum == 72 THEN
    POS72.X=position[1]
    POS72.Y=position[2]
    POS72.Z=position[3]
    POS72.A=position[4]
    POS72.B=position[5]
    POS72.C=position[6]
  ENDIF
  
  IF frameNum == 73 THEN
    POS73.X=position[1]
    POS73.Y=position[2]
    POS73.Z=position[3]
    POS73.A=position[4]
    POS73.B=position[5]
    POS73.C=position[6]
  ENDIF
  
  IF frameNum == 74 THEN
    POS74.X=position[1]
    POS74.Y=position[2]
    POS74.Z=position[3]
    POS74.A=position[4]
    POS74.B=position[5]
    POS74.C=position[6]
  ENDIF
  
  IF frameNum == 75 THEN
    POS75.X=position[1]
    POS75.Y=position[2]
    POS75.Z=position[3]
    POS75.A=position[4]
    POS75.B=position[5]
    POS75.C=position[6]
  ENDIF
  
  IF frameNum == 76 THEN
    POS76.X=position[1]
    POS76.Y=position[2]
    POS76.Z=position[3]
    POS76.A=position[4]
    POS76.B=position[5]
    POS76.C=position[6]
  ENDIF
  
  IF frameNum == 77 THEN
    POS77.X=position[1]
    POS77.Y=position[2]
    POS77.Z=position[3]
    POS77.A=position[4]
    POS77.B=position[5]
    POS77.C=position[6]
  ENDIF
  
  IF frameNum == 78 THEN
    POS78.X=position[1]
    POS78.Y=position[2]
    POS78.Z=position[3]
    POS78.A=position[4]
    POS78.B=position[5]
    POS78.C=position[6]
  ENDIF
  
  IF frameNum == 79 THEN
    POS79.X=position[1]
    POS79.Y=position[2]
    POS79.Z=position[3]
    POS79.A=position[4]
    POS79.B=position[5]
    POS79.C=position[6]
  ENDIF
  
  IF frameNum == 80 THEN
    POS80.X=position[1]
    POS80.Y=position[2]
    POS80.Z=position[3]
    POS80.A=position[4]
    POS80.B=position[5]
    POS80.C=position[6]
  ENDIF
  
  IF frameNum == 71 THEN
    POS71.X=position[1]
    POS71.Y=position[2]
    POS71.Z=position[3]
    POS71.A=position[4]
    POS71.B=position[5]
    POS71.C=position[6]
  ENDIF
  
   IF frameNum == 72 THEN
    POS72.X=position[1]
    POS72.Y=position[2]
    POS72.Z=position[3]
    POS72.A=position[4]
    POS72.B=position[5]
    POS72.C=position[6]
  ENDIF
  
  IF frameNum == 73 THEN
    POS73.X=position[1]
    POS73.Y=position[2]
    POS73.Z=position[3]
    POS73.A=position[4]
    POS73.B=position[5]
    POS73.C=position[6]
  ENDIF
  
  IF frameNum == 74 THEN
    POS74.X=position[1]
    POS74.Y=position[2]
    POS74.Z=position[3]
    POS74.A=position[4]
    POS74.B=position[5]
    POS74.C=position[6]
  ENDIF
  
  IF frameNum == 75 THEN
    POS75.X=position[1]
    POS75.Y=position[2]
    POS75.Z=position[3]
    POS75.A=position[4]
    POS75.B=position[5]
    POS75.C=position[6]
  ENDIF
  
  IF frameNum == 76 THEN
    POS76.X=position[1]
    POS76.Y=position[2]
    POS76.Z=position[3]
    POS76.A=position[4]
    POS76.B=position[5]
    POS76.C=position[6]
  ENDIF
  
  IF frameNum == 77 THEN
    POS77.X=position[1]
    POS77.Y=position[2]
    POS77.Z=position[3]
    POS77.A=position[4]
    POS77.B=position[5]
    POS77.C=position[6]
  ENDIF
  
  IF frameNum == 78 THEN
    POS78.X=position[1]
    POS78.Y=position[2]
    POS78.Z=position[3]
    POS78.A=position[4]
    POS78.B=position[5]
    POS78.C=position[6]
  ENDIF
  
  IF frameNum == 79 THEN
    POS79.X=position[1]
    POS79.Y=position[2]
    POS79.Z=position[3]
    POS79.A=position[4]
    POS79.B=position[5]
    POS79.C=position[6]
  ENDIF
  
  IF frameNum == 80 THEN
    POS80.X=position[1]
    POS80.Y=position[2]
    POS80.Z=position[3]
    POS80.A=position[4]
    POS80.B=position[5]
    POS80.C=position[6]
  ENDIF
  
  IF frameNum == 81 THEN
    POS81.X=position[1]
    POS81.Y=position[2]
    POS81.Z=position[3]
    POS81.A=position[4]
    POS81.B=position[5]
    POS81.C=position[6]
  ENDIF
  
   IF frameNum == 82 THEN
    POS82.X=position[1]
    POS82.Y=position[2]
    POS82.Z=position[3]
    POS82.A=position[4]
    POS82.B=position[5]
    POS82.C=position[6]
  ENDIF
  
  IF frameNum == 83 THEN
    POS83.X=position[1]
    POS83.Y=position[2]
    POS83.Z=position[3]
    POS83.A=position[4]
    POS83.B=position[5]
    POS83.C=position[6]
  ENDIF
  
  IF frameNum == 84 THEN
    POS84.X=position[1]
    POS84.Y=position[2]
    POS84.Z=position[3]
    POS84.A=position[4]
    POS84.B=position[5]
    POS84.C=position[6]
  ENDIF
  
  IF frameNum == 85 THEN
    POS85.X=position[1]
    POS85.Y=position[2]
    POS85.Z=position[3]
    POS85.A=position[4]
    POS85.B=position[5]
    POS85.C=position[6]
  ENDIF
  
  IF frameNum == 86 THEN
    POS86.X=position[1]
    POS86.Y=position[2]
    POS86.Z=position[3]
    POS86.A=position[4]
    POS86.B=position[5]
    POS86.C=position[6]
  ENDIF
  
  IF frameNum == 87 THEN
    POS87.X=position[1]
    POS87.Y=position[2]
    POS87.Z=position[3]
    POS87.A=position[4]
    POS87.B=position[5]
    POS87.C=position[6]
  ENDIF
  
  IF frameNum == 88 THEN
    POS88.X=position[1]
    POS88.Y=position[2]
    POS88.Z=position[3]
    POS88.A=position[4]
    POS88.B=position[5]
    POS88.C=position[6]
  ENDIF
  
  IF frameNum == 89 THEN
    POS89.X=position[1]
    POS89.Y=position[2]
    POS89.Z=position[3]
    POS89.A=position[4]
    POS89.B=position[5]
    POS89.C=position[6]
  ENDIF
  
  IF frameNum == 90 THEN
    POS90.X=position[1]
    POS90.Y=position[2]
    POS90.Z=position[3]
    POS90.A=position[4]
    POS90.B=position[5]
    POS90.C=position[6]
  ENDIF
  
  IF frameNum == 91 THEN
    POS91.X=position[1]
    POS91.Y=position[2]
    POS91.Z=position[3]
    POS91.A=position[4]
    POS91.B=position[5]
    POS91.C=position[6]
  ENDIF
  
   IF frameNum == 92 THEN
    POS92.X=position[1]
    POS92.Y=position[2]
    POS92.Z=position[3]
    POS92.A=position[4]
    POS92.B=position[5]
    POS92.C=position[6]
  ENDIF
  
  IF frameNum == 93 THEN
    POS93.X=position[1]
    POS93.Y=position[2]
    POS93.Z=position[3]
    POS93.A=position[4]
    POS93.B=position[5]
    POS93.C=position[6]
  ENDIF
  
  IF frameNum == 94 THEN
    POS94.X=position[1]
    POS94.Y=position[2]
    POS94.Z=position[3]
    POS94.A=position[4]
    POS94.B=position[5]
    POS94.C=position[6]
  ENDIF
  
  IF frameNum == 95 THEN
    POS95.X=position[1]
    POS95.Y=position[2]
    POS95.Z=position[3]
    POS95.A=position[4]
    POS95.B=position[5]
    POS95.C=position[6]
  ENDIF
  
  IF frameNum == 96 THEN
    POS96.X=position[1]
    POS96.Y=position[2]
    POS96.Z=position[3]
    POS96.A=position[4]
    POS96.B=position[5]
    POS96.C=position[6]
  ENDIF
  
  IF frameNum == 97 THEN
    POS97.X=position[1]
    POS97.Y=position[2]
    POS97.Z=position[3]
    POS97.A=position[4]
    POS97.B=position[5]
    POS97.C=position[6]
  ENDIF
  
  IF frameNum == 98 THEN
    POS98.X=position[1]
    POS98.Y=position[2]
    POS98.Z=position[3]
    POS98.A=position[4]
    POS98.B=position[5]
    POS98.C=position[6]
  ENDIF
  
  IF frameNum == 99 THEN
    POS99.X=position[1]
    POS99.Y=position[2]
    POS99.Z=position[3]
    POS99.A=position[4]
    POS99.B=position[5]
    POS99.C=position[6]
  ENDIF
  
  IF frameNum == 100 THEN
    POS100.X=position[1]
    POS100.Y=position[2]
    POS100.Z=position[3]
    POS100.A=position[4]
    POS100.B=position[5]
    POS100.C=position[6]
  ENDIF
  
  SendMotionComplete()
END
;ENDFOLD

;FOLD DoMultiLIN
DEF DoMultiLIN()
  IF frameNum == 1 THEN
    LIN POS1
  ENDIF
  
  IF frameNum == 2 THEN
    LIN POS1
    LIN POS2
  ENDIF
  
  IF frameNum == 3 THEN
    LIN POS1
    LIN POS2
    LIN POS3
  ENDIF
  
  IF frameNum == 4 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
  ENDIF
  
  IF frameNum == 5 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
  ENDIF
  
  IF frameNum == 6 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
  ENDIF
 
  IF frameNum == 7 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
  ENDIF
  
  IF frameNum == 8 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
  ENDIF 
  
  IF frameNum == 9 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
  ENDIF 
  
  IF frameNum == 10 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
  ENDIF 
  
  IF frameNum == 11 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
  ENDIF
  
  IF frameNum == 12 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
  ENDIF
  
  IF frameNum == 13 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
  ENDIF
  
  IF frameNum == 14 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
  ENDIF
  
  IF frameNum == 15 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
  ENDIF
  
  IF frameNum == 16 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
  ENDIF
 
  IF frameNum == 17 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
  ENDIF
  
  IF frameNum == 18 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
  ENDIF 
  
  IF frameNum == 19 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
  ENDIF 
  
  IF frameNum == 20 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
  ENDIF 
  
  IF frameNum == 21 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
  ENDIF
  
  IF frameNum == 22 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
  ENDIF
  
  IF frameNum == 23 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
  ENDIF
  
  IF frameNum == 24 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
  ENDIF
  
  IF frameNum == 25 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
  ENDIF
  
  IF frameNum == 26 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
  ENDIF
 
  IF frameNum == 27 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
  ENDIF
  
  IF frameNum == 28 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
  ENDIF 
  
  IF frameNum == 29 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
  ENDIF 
  
  IF frameNum == 30 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
  ENDIF 

  IF frameNum == 31 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
  ENDIF
  
  IF frameNum == 32 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
  ENDIF
  
  IF frameNum == 33 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
  ENDIF
  
  IF frameNum == 34 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
  ENDIF
  
  IF frameNum == 35 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
  ENDIF
  
  IF frameNum == 36 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
  ENDIF
 
  IF frameNum == 37 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
  ENDIF
  
  IF frameNum == 38 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
  ENDIF 
  
  IF frameNum == 39 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
  ENDIF 
  
  IF frameNum == 40 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
  ENDIF 
  
  IF frameNum == 41 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
  ENDIF
  
  IF frameNum == 42 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
  ENDIF
  
  IF frameNum == 43 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
  ENDIF
  
  IF frameNum == 44 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
  ENDIF
  
  IF frameNum == 45 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
  ENDIF
  
  IF frameNum == 46 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
  ENDIF
 
  IF frameNum == 47 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
  ENDIF
  
  IF frameNum == 48 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
  ENDIF 
  
  IF frameNum == 49 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
  ENDIF 
  
  IF frameNum == 50 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
  ENDIF 
  
  IF frameNum == 51 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
  ENDIF
  
  IF frameNum == 52 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
  ENDIF
  
  IF frameNum == 53 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
  ENDIF
  
  IF frameNum == 54 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
  ENDIF
  
  IF frameNum == 55 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
  ENDIF
  
  IF frameNum == 56 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
  ENDIF
 
  IF frameNum == 57 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
  ENDIF
  
  IF frameNum == 58 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
  ENDIF 
  
  IF frameNum == 59 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
  ENDIF 
  
  IF frameNum == 60 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
  ENDIF 
  
  IF frameNum == 61 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
  ENDIF
  
  IF frameNum == 62 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
  ENDIF
  
  IF frameNum == 63 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
  ENDIF
  
  IF frameNum == 64 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
  ENDIF
  
  IF frameNum == 65 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
  ENDIF
  
  IF frameNum == 66 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
  ENDIF
 
  IF frameNum == 67 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
  ENDIF
  
  IF frameNum == 68 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
  ENDIF 
  
  IF frameNum == 69 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
  ENDIF 
  
  IF frameNum == 70 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
  ENDIF 
  
  IF frameNum == 71 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
  ENDIF
  
  IF frameNum == 72 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
  ENDIF
  
  IF frameNum == 73 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
  ENDIF
  
  IF frameNum == 74 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
  ENDIF
  
  IF frameNum == 75 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
  ENDIF
  
  IF frameNum == 76 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
  ENDIF
 
  IF frameNum == 77 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
  ENDIF
  
  IF frameNum == 78 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
  ENDIF 
  
  IF frameNum == 79 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
  ENDIF 
  
  IF frameNum == 80 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
  ENDIF 

  IF frameNum == 81 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
  ENDIF
  
  IF frameNum == 82 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
  ENDIF
  
  IF frameNum == 83 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
  ENDIF
  
  IF frameNum == 84 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
  ENDIF
  
  IF frameNum == 85 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
  ENDIF
  
  IF frameNum == 86 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
  ENDIF
 
  IF frameNum == 87 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
  ENDIF
  
  IF frameNum == 88 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
  ENDIF 
  
  IF frameNum == 89 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
  ENDIF 
  
  IF frameNum == 90 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
  ENDIF 
  
  IF frameNum == 91 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
  ENDIF
  
  IF frameNum == 92 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
  ENDIF
  
  IF frameNum == 93 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
  ENDIF
  
  IF frameNum == 94 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
    LIN POS94
  ENDIF
  
  IF frameNum == 95 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
    LIN POS94
    LIN POS95
  ENDIF
  
  IF frameNum == 96 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
    LIN POS94
    LIN POS95
    LIN POS96
  ENDIF
 
  IF frameNum == 97 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
    LIN POS94
    LIN POS95
    LIN POS96
    LIN POS97
  ENDIF
  
  IF frameNum == 98 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
    LIN POS94
    LIN POS95
    LIN POS96
    LIN POS97
    LIN POS98
  ENDIF 
  
  IF frameNum == 99 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
    LIN POS94
    LIN POS95
    LIN POS96
    LIN POS97
    LIN POS98
    LIN POS99
  ENDIF 
  
  IF frameNum == 100 THEN
    LIN POS1
    LIN POS2
    LIN POS3
    LIN POS4
    LIN POS5
    LIN POS6
    LIN POS7
    LIN POS8
    LIN POS9
    LIN POS10
    LIN POS11
    LIN POS12
    LIN POS13
    LIN POS14
    LIN POS15
    LIN POS16
    LIN POS17
    LIN POS18
    LIN POS19
    LIN POS20
    LIN POS21
    LIN POS22
    LIN POS23
    LIN POS24
    LIN POS25
    LIN POS26
    LIN POS27
    LIN POS28
    LIN POS29
    LIN POS30
    LIN POS31
    LIN POS32
    LIN POS33
    LIN POS34
    LIN POS35
    LIN POS36
    LIN POS37
    LIN POS38
    LIN POS39
    LIN POS40
    LIN POS41
    LIN POS42
    LIN POS43
    LIN POS44
    LIN POS45
    LIN POS46
    LIN POS47
    LIN POS48
    LIN POS49
    LIN POS50
    LIN POS51
    LIN POS52
    LIN POS53
    LIN POS54
    LIN POS55
    LIN POS56
    LIN POS57
    LIN POS58
    LIN POS59
    LIN POS60
    LIN POS61
    LIN POS62
    LIN POS63
    LIN POS64
    LIN POS65
    LIN POS66
    LIN POS67
    LIN POS68
    LIN POS69
    LIN POS70
    LIN POS71
    LIN POS72
    LIN POS73
    LIN POS74
    LIN POS75
    LIN POS76
    LIN POS77
    LIN POS78
    LIN POS79
    LIN POS80
    LIN POS81
    LIN POS82
    LIN POS83
    LIN POS84
    LIN POS85
    LIN POS86
    LIN POS87
    LIN POS88
    LIN POS89
    LIN POS90
    LIN POS91
    LIN POS92
    LIN POS93
    LIN POS94
    LIN POS95
    LIN POS96
    LIN POS97
    LIN POS98
    LIN POS99
    LIN POS100
  ENDIF 
 
  SendMotionComplete()
END
;ENDFOLD

;FOLD DoSpline
DEF DoSpline()

  IF frameNum == 1 THEN
    LIN POS1
  ENDIF
  
  IF frameNum == 2 THEN
    SPLINE
      SPL POS1
      SPL POS2
    ENDSPLINE
  ENDIF
  
  IF frameNum == 3 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
    ENDSPLINE
  ENDIF
  
  IF frameNum == 4 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
    ENDSPLINE
  ENDIF
  
  IF frameNum == 5 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
    ENDSPLINE
  ENDIF
  
  IF frameNum == 6 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
    ENDSPLINE
  ENDIF
 
  IF frameNum == 7 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
    ENDSPLINE
  ENDIF
  
  IF frameNum == 8 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 9 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 10 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
    ENDSPLINE
  ENDIF
    
  IF frameNum == 11 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
    ENDSPLINE
  ENDIF
  
  IF frameNum == 12 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
    ENDSPLINE
  ENDIF
  
  IF frameNum == 13 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
    ENDSPLINE
  ENDIF
  
  IF frameNum == 14 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
    ENDSPLINE
  ENDIF
  
  IF frameNum == 15 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
    ENDSPLINE
  ENDIF
  
  IF frameNum == 16 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
    ENDSPLINE
  ENDIF
 
  IF frameNum == 17 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
    ENDSPLINE
  ENDIF
  
  IF frameNum == 18 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 19 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 20 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
    ENDSPLINE
  ENDIF
    
  IF frameNum == 21 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
    ENDSPLINE
  ENDIF
  
  IF frameNum == 22 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
    ENDSPLINE
  ENDIF
  
  IF frameNum == 23 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
    ENDSPLINE
  ENDIF
  
  IF frameNum == 24 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
    ENDSPLINE
  ENDIF
  
  IF frameNum == 25 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
    ENDSPLINE
  ENDIF
  
  IF frameNum == 26 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
    ENDSPLINE
  ENDIF
 
  IF frameNum == 27 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
    ENDSPLINE
  ENDIF
  
  IF frameNum == 28 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 29 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 30 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
    ENDSPLINE
  ENDIF
    
  IF frameNum == 31 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
    ENDSPLINE
  ENDIF
  
  IF frameNum == 32 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
    ENDSPLINE
  ENDIF
  
  IF frameNum == 33 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
    ENDSPLINE
  ENDIF
  
  IF frameNum == 34 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
    ENDSPLINE
  ENDIF
  
  IF frameNum == 35 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
    ENDSPLINE
  ENDIF
  
  IF frameNum == 36 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
    ENDSPLINE
  ENDIF
 
  IF frameNum == 37 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
    ENDSPLINE
  ENDIF
  
  IF frameNum == 38 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 39 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 40 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 41 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
    ENDSPLINE
  ENDIF
  
  IF frameNum == 42 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
    ENDSPLINE
  ENDIF
  
  IF frameNum == 43 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
    ENDSPLINE
  ENDIF
  
  IF frameNum == 44 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
    ENDSPLINE
  ENDIF
  
  IF frameNum == 45 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
    ENDSPLINE
  ENDIF
  
  IF frameNum == 46 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
    ENDSPLINE
  ENDIF
 
  IF frameNum == 47 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
    ENDSPLINE
  ENDIF
  
  IF frameNum == 48 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 49 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 50 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 51 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
    ENDSPLINE
  ENDIF
  
  IF frameNum == 52 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
    ENDSPLINE
  ENDIF
  
  IF frameNum == 53 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
    ENDSPLINE
  ENDIF
  
  IF frameNum == 54 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
    ENDSPLINE
  ENDIF
  
  IF frameNum == 55 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
    ENDSPLINE
  ENDIF
  
  IF frameNum == 56 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
    ENDSPLINE
  ENDIF
 
  IF frameNum == 57 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
    ENDSPLINE
  ENDIF
  
  IF frameNum == 58 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 59 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 60 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 61 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
    ENDSPLINE
  ENDIF
  
  IF frameNum == 62 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
    ENDSPLINE
  ENDIF
  
  IF frameNum == 63 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
    ENDSPLINE
  ENDIF
  
  IF frameNum == 64 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
    ENDSPLINE
  ENDIF
  
  IF frameNum == 65 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
    ENDSPLINE
  ENDIF
  
  IF frameNum == 66 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
    ENDSPLINE
  ENDIF
 
  IF frameNum == 67 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
    ENDSPLINE
  ENDIF
  
  IF frameNum == 68 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 69 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 70 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 71 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
    ENDSPLINE
  ENDIF
  
  IF frameNum == 72 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
    ENDSPLINE
  ENDIF
  
  IF frameNum == 73 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
    ENDSPLINE
  ENDIF
  
  IF frameNum == 74 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
    ENDSPLINE
  ENDIF
  
  IF frameNum == 75 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
    ENDSPLINE
  ENDIF
  
  IF frameNum == 76 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
    ENDSPLINE
  ENDIF
 
  IF frameNum == 77 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
    ENDSPLINE
  ENDIF
  
  IF frameNum == 78 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 79 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 80 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS780
    ENDSPLINE
  ENDIF 

  IF frameNum == 81 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
    ENDSPLINE
  ENDIF
  
  IF frameNum == 82 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
    ENDSPLINE
  ENDIF
  
  IF frameNum == 83 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
    ENDSPLINE
  ENDIF
  
  IF frameNum == 84 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
    ENDSPLINE
  ENDIF
  
  IF frameNum == 85 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
    ENDSPLINE
  ENDIF
  
  IF frameNum == 86 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
    ENDSPLINE
  ENDIF
 
  IF frameNum == 87 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
    ENDSPLINE
  ENDIF
  
  IF frameNum == 88 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 89 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 90 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 91 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
    ENDSPLINE
  ENDIF
  
  IF frameNum == 92 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
    ENDSPLINE
  ENDIF
  
  IF frameNum == 93 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
    ENDSPLINE
  ENDIF
  
  IF frameNum == 94 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
      SPL POS94
    ENDSPLINE
  ENDIF
  
  IF frameNum == 95 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
      SPL POS94
      SPL POS95
    ENDSPLINE
  ENDIF
  
  IF frameNum == 96 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
      SPL POS94
      SPL POS95
      SPL POS96
    ENDSPLINE
  ENDIF
 
  IF frameNum == 97 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
      SPL POS94
      SPL POS95
      SPL POS96
      SPL POS97
    ENDSPLINE
  ENDIF
  
  IF frameNum == 98 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
      SPL POS94
      SPL POS95
      SPL POS96
      SPL POS97
      SPL POS98
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 99 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
      SPL POS94
      SPL POS95
      SPL POS96
      SPL POS97
      SPL POS98
      SPL POS99
    ENDSPLINE
  ENDIF 
  
  IF frameNum == 100 THEN
    SPLINE
      SPL POS1
      SPL POS2
      SPL POS3
      SPL POS4
      SPL POS5
      SPL POS6
      SPL POS7
      SPL POS8
      SPL POS9
      SPL POS10
      SPL POS11
      SPL POS12
      SPL POS13
      SPL POS14
      SPL POS15
      SPL POS16
      SPL POS17
      SPL POS18
      SPL POS19
      SPL POS20
      SPL POS21
      SPL POS22
      SPL POS23
      SPL POS24
      SPL POS25
      SPL POS26
      SPL POS27
      SPL POS28
      SPL POS29
      SPL POS30
      SPL POS31
      SPL POS32
      SPL POS33
      SPL POS34
      SPL POS35
      SPL POS36
      SPL POS37
      SPL POS38
      SPL POS39
      SPL POS40
      SPL POS41
      SPL POS42
      SPL POS43
      SPL POS44
      SPL POS45
      SPL POS46
      SPL POS47
      SPL POS48
      SPL POS49
      SPL POS50
      SPL POS51
      SPL POS52
      SPL POS53
      SPL POS54
      SPL POS55
      SPL POS56
      SPL POS57
      SPL POS58
      SPL POS59
      SPL POS60
      SPL POS61
      SPL POS62
      SPL POS63
      SPL POS64
      SPL POS65
      SPL POS66
      SPL POS67
      SPL POS68
      SPL POS69
      SPL POS70
      SPL POS71
      SPL POS72
      SPL POS73
      SPL POS74
      SPL POS75
      SPL POS76
      SPL POS77
      SPL POS78
      SPL POS79
      SPL POS80
      SPL POS81
      SPL POS82
      SPL POS83
      SPL POS84
      SPL POS85
      SPL POS86
      SPL POS87
      SPL POS88
      SPL POS89
      SPL POS90
      SPL POS91
      SPL POS92
      SPL POS93
      SPL POS94
      SPL POS95
      SPL POS96
      SPL POS97
      SPL POS98
      SPL POS99
      SPL POS100
    ENDSPLINE
  ENDIF 
 
  SendMotionComplete()
END
;ENDFOLD

;FOLD SendMotionComplete
GLOBAL DEF SendMotionComplete()
  ; Disable the interrupt that sends position data during moves
  ;INTERRUPT OFF 7
  ; Reset the timer
  ;$TIMER_STOP[5] = TRUE
  ;$TIMER[5] = 0
  ; Send the current status, because this info should be updated
  AtHome = 0
  AtStart = 0
  motionProgramRunning = FALSE
  ; Set the message type and current inspection point
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 2)
  EKX_HAndleError(errint)
  ;errint = EKX_WriteInteger("RAC.RACData.InspectionIndex", CurInspPoint)
  ;EKX_HandleError(errint)
  WriteStatusInfo()
  SendMsg()
END
;ENDFOLD

;FOLD SendProgramComplete
GLOBAL DEF SendProgramComplete()
  ; Send the current status, because this info should be updated
  AtHome = 0
  AtStart = 1
  motionProgramRunning = FALSE
  ; Set the message type
  ; Write the data to the XML structure
  errint = EKX_WriteInteger("RAC.RACData.MsgType", 4)
  EKX_HAndleError(errint)
  WriteStatusInfo()
  SendMsg()
END
;ENDFOLD

;FOLD SendMsg
GLOBAL DEF SendMsg()
  ;FOLD Increase message counter
  MsgCount = MsgCount + 1
  errint = EKX_WriteInteger("RAC.RACData.MsgCount", MsgCount)
  EKX_HandleError(errint)
  ;ENDFOLD
  errint = EKX_Send("RAC")
  EKX_HandleError(errint)
END
;ENDFOLD

;FOLD RunMotionProgram
DEF RunMotionProgram()
  IF motionProgramRunning == FALSE THEN
    bGo = TRUE
    bAbort = FALSE
    motionProgramRunning = TRUE
    SWITCH ProgNum
      CASE 1
        ;Insp1()
      CASE 2
        ;Insp2() 
    ENDSWITCH
  ELSE
    bRet = strClear(ErrorText[])
    ErrorText[] = "Program already running"
    SendStatus()  
  ENDIF
END
;ENDFOLD

;FOLD ProgramIsReady
GLOBAL DEF ProgramIsReady()
  AtHome = 0
  AtStart = 1
  bGo = FALSE
  SendReady()
END
;ENDFOLD

;FOLD AtInspPoint
GLOBAL DEF AtInspPoint(PointNum : IN)
  INT PointNum
  CurInspPoint = PointNum
  SendMotionComplete()
END
;ENDFOLD

;FOLD ProgramComplete
GLOBAL DEF ProgramComplete()
  SendProgramComplete()
END
;ENDFOLD