BEGIN PGM nc\iTNC/ProbeCommonKin.h MM ; hncc 1.35_2011_07_18
QS12 =  "/"                                            ; ProbeCommonKin.hpp:4
QS13 =  "="                                            ; ProbeCommonKin.hpp:4
CALL LBL "$F109"                                       ; class KINEMAT Kinemat
CALL LBL "$F113"                                       ; class KINEMAT Kinemat
FN 9: IF 0 EQU 0 GOTO LBL "EOF_PROBECOMMONKIN"         ; ProbeCommonKin.hpp:4
LBL "$F109"                                            ; Memory.hpp
QS12 = "/"                                             ; Memory.hpp:32
QS13 = "="                                             ; Memory.hpp:33
 QS7 = ""                                              ; Memory.hpp:36
 QS8 = ""                                              ; Memory.hpp:36
 QS9 = ""                                              ; Memory.hpp:36
 QS10 = ""                                             ; Memory.hpp:36
 QS11 = ""                                             ; Memory.hpp:36
Q16 = 0                                                ; Memory.hpp:38
LBL 0                                                  ; ProbeCommonKin.hpp:34
LBL "$F113"                                            ; kinemat.hpp
QL8 =  0                                               ; kinemat.hpp:70
Q19 = 0                                                ; kinemat.hpp:77
Q20 = 0                                                ; kinemat.hpp:78
Q21 = 0                                                ; kinemat.hpp:79
Q22 = 0                                                ; kinemat.hpp:80
Q23 = 0                                                ; kinemat.hpp:81
Q24 = 0                                                ; kinemat.hpp:82
Q25 = 0                                                ; kinemat.hpp:83
Q26 = 0                                                ; kinemat.hpp:84
Q27 = 0                                                ; kinemat.hpp:85
QL0 = 1                                                ; kinemat.hpp:89
QL10 = 0                                               ; kinemat.hpp:90
READ KINEMATICS NOTE_ QS18 MODE_ QL0 RESULT_ QL1 KEY "KEY;AXIS;COORD;COMPTAB" TO QS19
 FN 10: IF QL1  NE 0  GOTO LBL "IFNOT16_1"             ; kinemat.hpp:93
 FN 18: SYSREAD Q28 = ID 630 NR 0 IDX 52               ; kinemat.hpp:95
  FN 10: IF Q28  NE 1  GOTO LBL "IFNOT16_2"            ; kinemat.hpp:95
  QL10 = 1                                             ; kinemat.hpp:97
  LBL "IFNOT16_2"                                      ; kinemat.hpp:97
 FN 9: IF +0 EQU +0 GOTO LBL "IFEND16_1"               ; kinemat.hpp:100
 LBL "IFNOT16_1"                                       ; kinemat.hpp:100
 READ KINEMATICS NOTE_ QS18 MODE_ QL0 RESULT_ QL1 KEY "KEY;AXIS;COORD" TO QS19
  FN 9: IF QL1  EQU 0  GOTO LBL "IFNOT16_3"            ; kinemat.hpp:102
  FN 14: ERROR = 1100                                  ; kinemat.hpp:102
  LBL "IFNOT16_3"                                      ; kinemat.hpp:102
 LBL "IFEND16_1"                                       ; kinemat.hpp:103
 QL2=0                                                 ; kinemat.hpp:113
 QL0=0                                                 ; kinemat.hpp:113
 QL7=0                                                 ; kinemat.hpp:113
 QL9=0                                                 ; kinemat.hpp:113
 FN 9: IF +0 EQU +0 GOTO LBL "FORCOND16_4"             ; kinemat.hpp:113
 LBL "FORINC16_4"                                      ; kinemat.hpp:113
 LBL "FORCOND16_4"                                     ; kinemat.hpp:113
 FN 9: IF QL2 EQU 121  GOTO LBL "FORNOT16_4"           ; kinemat.hpp:113
 FN 11: IF QL2 GT 121  GOTO LBL "FORNOT16_4"           ; kinemat.hpp:113
  FN 9: IF QL2  EQU 0  GOTO LBL "IFNOT16_5"            ; kinemat.hpp:115
  FN 12: IF QL2  LT 0  GOTO LBL "IFNOT16_5"            ; kinemat.hpp:115
   FN 9: IF  QL10  EQU 1 GOTO LBL "SWITCH16_6_0"       ; kinemat.hpp:120
   FN 9: IF +0 EQU +0 GOTO LBL "SWITCHDEF16_6"         ; kinemat.hpp:123
   LBL "SWITCH16_6_0"                                  ; kinemat.hpp:120
   READ KINEMATICS NOTE_ QS18 MODE_ QL0 RESULT_ QL1 KEY "KEY;AXIS;COORD;COMPTAB" TO QS19
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_6"           ; kinemat.hpp:122
   LBL "SWITCHDEF16_6"                                 ; kinemat.hpp:123
   READ KINEMATICS NOTE_ QS18 MODE_ QL0 RESULT_ QL1 KEY "KEY;AXIS;COORD" TO QS19
   LBL "SWITCHEND16_6"                                 ; kinemat.hpp:124
  LBL "IFNOT16_5"                                      ; kinemat.hpp:135
 FN 10: IF QL1  NE 0  GOTO LBL "FORNOT16_4"            ; kinemat.hpp:137
 QS22 = QS19                                           ; kinemat.hpp:141
 QL14 = 1                                              ; kinemat.hpp:141
 QS23 = ";"                                            ; kinemat.hpp:141
 CALL LBL "$F35"                                       ; call vec_read( ReadString, 1, ";", >, Elemen
 QS20  = QS24                                          ; kinemat.hpp:141
  QS21 = "X"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR1_16_7"      ; kinemat.hpp:146
  QL4 = 1                                              ; kinemat.hpp:147
  QL5 = 1                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR1_16_7"                                ; kinemat.hpp:160
  QS21 = "Y"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR2_16_7"      ; kinemat.hpp:146
  QL4 = 2                                              ; kinemat.hpp:147
  QL5 = 2                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR2_16_7"                                ; kinemat.hpp:160
  QS21 = "Z"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR3_16_7"      ; kinemat.hpp:146
  QL4 = 3                                              ; kinemat.hpp:147
  QL5 = 3                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR3_16_7"                                ; kinemat.hpp:160
  QS21 = "A"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR4_16_7"      ; kinemat.hpp:146
  QL4 = 4                                              ; kinemat.hpp:147
  QL5 = 1                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR4_16_7"                                ; kinemat.hpp:160
  QS21 = "B"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR5_16_7"      ; kinemat.hpp:146
  QL4 = 5                                              ; kinemat.hpp:147
  QL5 = 2                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR5_16_7"                                ; kinemat.hpp:160
  QS21 = "C"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR6_16_7"      ; kinemat.hpp:146
  QL4 = 6                                              ; kinemat.hpp:147
  QL5 = 3                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR6_16_7"                                ; kinemat.hpp:160
  QS21 = "U"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR7_16_7"      ; kinemat.hpp:146
  QL4 = 7                                              ; kinemat.hpp:147
  QL5 = 1                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR7_16_7"                                ; kinemat.hpp:160
  QS21 = "V"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR8_16_7"      ; kinemat.hpp:146
  QL4 = 8                                              ; kinemat.hpp:147
  QL5 = 2                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR8_16_7"                                ; kinemat.hpp:160
  QS21 = "W"                                           ; kinemat.hpp:144
  QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                 ; kinemat.hpp:145
  FN 10: IF QL6  NE 0  GOTO LBL "STARTFORR9_16_7"      ; kinemat.hpp:146
  QL4 = 9                                              ; kinemat.hpp:147
  QL5 = 3                                              ; kinemat.hpp:149
  FN 9: IF 0 EQU 0 GOTO LBL "ENDFORR16_7"              ; kinemat.hpp:160
  LBL "STARTFORR9_16_7"                                ; kinemat.hpp:160
  LBL "ENDFORR16_7"                                    ; kinemat.hpp:160
 QS22 = QS19                                           ; kinemat.hpp:169
 QL14 = 0                                              ; kinemat.hpp:169
 QS23 = ";"                                            ; kinemat.hpp:169
 CALL LBL "$F35"                                       ; call vec_read( ReadString, 0, ";", >, Elemen
 QS20  = QS24                                          ; kinemat.hpp:169
 QS21 = "Trans"                                        ; kinemat.hpp:171
 QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                  ; kinemat.hpp:172
  FN 10: IF QL6  NE 0  GOTO LBL "IFNOT16_8"            ; kinemat.hpp:173
  QL3 = 1                                              ; kinemat.hpp:175
  QL2 = QL2 + 1                                        ; kinemat.hpp:176
  QS25 = "NOTE" || TOCHAR( DAT+QL2 DECIMALS0 ) || "=" || QS18
  CALL LBL "$F110"                                     ; call MKinemat.Write( "NOTE" || TOCHAR( DAT+L
  QS25 = "KEY" || TOCHAR( DAT+ QL2 DECIMALS0 ) || "=" || TOCHAR( DAT+QL3 DECIMALS0 )
  CALL LBL "$F110"                                     ; call MKinemat.Write( "KEY" || TOCHAR( DAT+ L
  QS25 = "AXIS" || TOCHAR( DAT+ QL2 DECIMALS0 ) || "=" || TOCHAR( DAT+QL4 DECIMALS0 )
  CALL LBL "$F110"                                     ; call MKinemat.Write( "AXIS" || TOCHAR( DAT+ 
  QS22 = QS19                                          ; kinemat.hpp:180
  QL14 = 2                                             ; kinemat.hpp:180
  QS23 = ";"                                           ; kinemat.hpp:180
  CALL LBL "$F35"                                      ; call vec_read( ReadString, 2, ";", >, Elemen
  QS20  = QS24                                         ; kinemat.hpp:180
  QS25 = "COORD" || TOCHAR( DAT+ QL2 DECIMALS0 ) || "=" || QS20
  CALL LBL "$F110"                                     ; call MKinemat.Write( "COORD" || TOCHAR( DAT+
   FN 10: IF QL10  NE 1  GOTO LBL "IFNOT16_9"          ; kinemat.hpp:182
   QS22 = QS19                                         ; kinemat.hpp:185
   QL14 = 3                                            ; kinemat.hpp:185
   QS23 = ";"                                          ; kinemat.hpp:185
   CALL LBL "$F35"                                     ; call vec_read( ReadString, 3, ";", >, Elemen
   QS20  = QS24                                        ; kinemat.hpp:185
   QS25 = "COMP" || TOCHAR( DAT+QL2 DECIMALS0 ) || "=" || QS20
   CALL LBL "$F110"                                    ; call MKinemat.Write( "COMP" || TOCHAR( DAT+L
   LBL "IFNOT16_9"                                     ; kinemat.hpp:189
  FN 9: IF 0 EQU 0 GOTO LBL "FORINC16_4"               ; kinemat.hpp:191
  LBL "IFNOT16_8"                                      ; kinemat.hpp:191
 QS21 = "MachAxis"                                     ; kinemat.hpp:194
 QL6 = STRCOMP( SRC_ QS20 SEA_ QS21 )                  ; kinemat.hpp:195
  FN 10: IF QL6  NE 0  GOTO LBL "IFNOT16_10"           ; kinemat.hpp:196
  QL3 = 2                                              ; kinemat.hpp:198
  QL7 = QL7 + 1                                        ; kinemat.hpp:199
  QL2 = QL2 + 1                                        ; kinemat.hpp:200
  QS25 = "NOTE" || TOCHAR( DAT+QL2 DECIMALS0 ) || "=" || QS18
  CALL LBL "$F110"                                     ; call MKinemat.Write( "NOTE" || TOCHAR( DAT+L
  QS25 = "KEY" || TOCHAR( DAT+ QL2 DECIMALS0 ) || "=" || TOCHAR( DAT+QL3 DECIMALS0 )
  CALL LBL "$F110"                                     ; call MKinemat.Write( "KEY" || TOCHAR( DAT+ L
  QS25 = "AXLNK" || TOCHAR( DAT+ QL4 DECIMALS0 ) || "=" || TOCHAR( DAT+QL2 DECIMALS0 )
  CALL LBL "$F110"                                     ; call MKinemat.Write( "AXLNK" || TOCHAR( DAT+
  QS25 = "AXIDX" || TOCHAR( DAT+ QL4 DECIMALS0 ) || "=" || TOCHAR( DAT+QL7 DECIMALS0 )
  CALL LBL "$F110"                                     ; call MKinemat.Write( "AXIDX" || TOCHAR( DAT+
  QS25 = "AXIS" || TOCHAR( DAT+ QL2 DECIMALS0 ) || "=" || TOCHAR( DAT+QL4 DECIMALS0 )
  CALL LBL "$F110"                                     ; call MKinemat.Write( "AXIS" || TOCHAR( DAT+ 
  QS25 = "DIR" || TOCHAR( DAT+ QL2 DECIMALS0 ) || "=" || TOCHAR( DAT+QL5 DECIMALS0 )
  CALL LBL "$F110"                                     ; call MKinemat.Write( "DIR" || TOCHAR( DAT+ L
   FN 9: IF  QL4  EQU 1 GOTO LBL "SWITCH16_11_0"       ; kinemat.hpp:213
   FN 9: IF  QL4  EQU 2 GOTO LBL "SWITCH16_11_1"       ; kinemat.hpp:214
   FN 9: IF  QL4  EQU 3 GOTO LBL "SWITCH16_11_2"       ; kinemat.hpp:215
   FN 9: IF  QL4  EQU 4 GOTO LBL "SWITCH16_11_3"       ; kinemat.hpp:223
   FN 9: IF  QL4  EQU 5 GOTO LBL "SWITCH16_11_4"       ; kinemat.hpp:224
   FN 9: IF  QL4  EQU 6 GOTO LBL "SWITCH16_11_5"       ; kinemat.hpp:225
   FN 9: IF +0 EQU +0 GOTO LBL "SWITCHEND16_11"        ; kinemat.hpp:228
   LBL "SWITCH16_11_0"                                 ; kinemat.hpp:213
   LBL "SWITCH16_11_1"                                 ; kinemat.hpp:214
   LBL "SWITCH16_11_2"                                 ; kinemat.hpp:215
    FN 9: IF QL8  EQU 1  GOTO LBL "IFNOT16_12"         ; kinemat.hpp:216
    Q18 = QL2                                          ; kinemat.hpp:218
    QS25 = "BASLNK=" || TOCHAR( DAT+QL2 DECIMALS0 )    ; kinemat.hpp:219
    CALL LBL "$F110"                                   ; call MKinemat.Write( "BASLNK=" || TOCHAR( DA
    QL8 = 1                                            ; kinemat.hpp:220
    LBL "IFNOT16_12"                                   ; kinemat.hpp:220
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_11"          ; kinemat.hpp:222
   LBL "SWITCH16_11_3"                                 ; kinemat.hpp:223
   LBL "SWITCH16_11_4"                                 ; kinemat.hpp:224
   LBL "SWITCH16_11_5"                                 ; kinemat.hpp:225
   QL9 = QL9 + 1                                       ; kinemat.hpp:226
   QS25 = "ROTAXIS" || TOCHAR( DAT+QL9 DECIMALS0 ) || "=" || TOCHAR( DAT+QL4 DECIMALS0 )
   CALL LBL "$F110"                                    ; call MKinemat.Write( "ROTAXIS" || TOCHAR( DA
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_11"          ; kinemat.hpp:228
   LBL "SWITCHEND16_11"                                ; kinemat.hpp:228
   FN 9: IF  QL4  EQU 1 GOTO LBL "SWITCH16_13_0"       ; kinemat.hpp:232
   FN 9: IF  QL4  EQU 2 GOTO LBL "SWITCH16_13_1"       ; kinemat.hpp:235
   FN 9: IF  QL4  EQU 3 GOTO LBL "SWITCH16_13_2"       ; kinemat.hpp:238
   FN 9: IF  QL4  EQU 4 GOTO LBL "SWITCH16_13_3"       ; kinemat.hpp:241
   FN 9: IF  QL4  EQU 5 GOTO LBL "SWITCH16_13_4"       ; kinemat.hpp:244
   FN 9: IF  QL4  EQU 6 GOTO LBL "SWITCH16_13_5"       ; kinemat.hpp:247
   FN 9: IF  QL4  EQU 7 GOTO LBL "SWITCH16_13_6"       ; kinemat.hpp:250
   FN 9: IF  QL4  EQU 8 GOTO LBL "SWITCH16_13_7"       ; kinemat.hpp:253
   FN 9: IF  QL4  EQU 9 GOTO LBL "SWITCH16_13_8"       ; kinemat.hpp:256
   FN 9: IF +0 EQU +0 GOTO LBL "SWITCHEND16_13"        ; kinemat.hpp:258
   LBL "SWITCH16_13_0"                                 ; kinemat.hpp:232
   Q19 = QL2                                           ; kinemat.hpp:233
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:234
   LBL "SWITCH16_13_1"                                 ; kinemat.hpp:235
   Q20 = QL2                                           ; kinemat.hpp:236
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:237
   LBL "SWITCH16_13_2"                                 ; kinemat.hpp:238
   Q21 = QL2                                           ; kinemat.hpp:239
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:240
   LBL "SWITCH16_13_3"                                 ; kinemat.hpp:241
   Q25 = QL2                                           ; kinemat.hpp:242
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:243
   LBL "SWITCH16_13_4"                                 ; kinemat.hpp:244
   Q26 = QL2                                           ; kinemat.hpp:245
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:246
   LBL "SWITCH16_13_5"                                 ; kinemat.hpp:247
   Q27 = QL2                                           ; kinemat.hpp:248
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:249
   LBL "SWITCH16_13_6"                                 ; kinemat.hpp:250
   Q22 = QL2                                           ; kinemat.hpp:251
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:252
   LBL "SWITCH16_13_7"                                 ; kinemat.hpp:253
   Q23 = QL2                                           ; kinemat.hpp:254
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:255
   LBL "SWITCH16_13_8"                                 ; kinemat.hpp:256
   Q24 = QL2                                           ; kinemat.hpp:257
   FN 9: IF 0 EQU 0 GOTO LBL "SWITCHEND16_13"          ; kinemat.hpp:258
   LBL "SWITCHEND16_13"                                ; kinemat.hpp:258
  FN 9: IF 0 EQU 0 GOTO LBL "FORINC16_4"               ; kinemat.hpp:260
  LBL "IFNOT16_10"                                     ; kinemat.hpp:260
 FN 9: IF +0 EQU +0 GOTO LBL "FORINC16_4"              ; kinemat.hpp:274
 LBL "FORNOT16_4"                                      ; kinemat.hpp:274
 FN 9: IF QL8  EQU 1  GOTO LBL "IFNOT16_14"            ; kinemat.hpp:280
 QL2 = QL2 + 1                                         ; kinemat.hpp:282
 Q18 = QL2                                             ; kinemat.hpp:283
 QS25 = "BASLNK=" || TOCHAR( DAT+Q18 DECIMALS0 )       ; kinemat.hpp:284
 CALL LBL "$F110"                                      ; call MKinemat.Write( "BASLNK=" || TOCHAR( DA
 QL8 = 1                                               ; kinemat.hpp:285
 LBL "IFNOT16_14"                                      ; kinemat.hpp:285
Q17 = QL2                                              ; kinemat.hpp:287
QS25 = "MaxLinkNb=" || TOCHAR( DAT+Q17 DECIMALS0 )     ; kinemat.hpp:288
CALL LBL "$F110"                                       ; call MKinemat.Write( "MaxLinkNb=" || TOCHAR(
LBL 0                                                  ; ProbeCommonKin.hpp:61
LBL "$F35"                                             ; Misc.hpp
QS24 = ""                                              ; Misc.hpp:247
QL17 = STRLEN( SRC_QS22 )                              ; Misc.hpp:251
FN 9: IF QL17  EQU 0  GOTO LBL "EO_35"                 ; Misc.hpp:252
QL16 = -1                                              ; Misc.hpp:256
 LBL "DO17_15"                                         ; Misc.hpp:257
 QL18 = QL16 + 1                                       ; Misc.hpp:259
  FN 9: IF QL18  EQU QL17  GOTO LBL "IFNOT17_16"       ; Misc.hpp:261
  FN 11: IF QL18  GT QL17  GOTO LBL "IFNOT17_16"       ; Misc.hpp:261
  QL16 = INSTR( SRC_QS22 SEA_QS23 BEG QL18 )           ; Misc.hpp:263
  FN 9: IF +0 EQU +0 GOTO LBL "IFEND17_16"             ; Misc.hpp:265
  LBL "IFNOT17_16"                                     ; Misc.hpp:265
  FN 9: IF 0 EQU 0 GOTO LBL "EO_35"                    ; Misc.hpp:267
  LBL "IFEND17_16"                                     ; Misc.hpp:267
 QL14 = QL14 - 1                                       ; Misc.hpp:269
 FN 12: IF QL14  LT 0  GOTO LBL "DONOT17_15"           ; Misc.hpp:270
 FN 9: IF 0 EQU 0 GOTO LBL "DO17_15"                   ; Misc.hpp:270
 LBL "DONOT17_15"                                      ; Misc.hpp:270
QL17 = QL16 - QL18                                     ; Misc.hpp:274
QS24 = SUBSTR( SRC_QS22 BEG QL18 LEN QL17 )            ; Misc.hpp:275
LBL "EO_35"                                            ; ProbeCommonKin.hpp:240
LBL 0                                                  ; ProbeCommonKin.hpp:240
LBL "$F110"                                            ; Memory.hpp
QL20 = STRLEN( SRC_ QS25 )                             ; Memory.hpp:95
FN 9: IF QL20  EQU 0  GOTO LBL "EO_110"                ; Memory.hpp:96
QL19 = INSTR( SRC_ QS25 SEA_ QS13 BEG 0 )              ; Memory.hpp:100
 FN 9: IF QL20  EQU QL19  GOTO LBL "IFNOT18_17"        ; Memory.hpp:101
 FN 11: IF QL20  GT QL19  GOTO LBL "IFNOT18_17"        ; Memory.hpp:101
 QS17 = "mem_write      : " || QS25 || "\n    " || "= is missing!"
 QS26  = QS17                                          ; Memory.hpp:104
 CALL LBL "$fdbg"                                      ; call fdbg( Debug )
 QL15 = 1                                              ; Memory.hpp:105
 FN 9: IF 0 EQU 0 GOTO LBL "EO_110"                    ; Memory.hpp:106
 LBL "IFNOT18_17"                                      ; Memory.hpp:106
QL19 = QL19 + 1                                        ; Memory.hpp:108
QS16 = SUBSTR( SRC_ QS25 BEG 0 LEN QL19 )              ; Memory.hpp:109
 FN 11: IF 0  GT Q16  GOTO LBL "ENDFORR18_18"          ; Memory.hpp:115
 QL20 = STRLEN( SRC_ QS7 ) - INSTR( SRC_ QS7 SEA_ QS16 BEG 0 )
  FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_19"          ; Memory.hpp:117
  QL19 = INSTR( SRC_ QS7 SEA_ QS16 BEG 0 )             ; Memory.hpp:119
  QS14 = ""                                            ; Memory.hpp:120
   FN 9: IF QL19  EQU 0  GOTO LBL "IFNOT18_20"         ; Memory.hpp:122
   QS14 = SUBSTR( SRC_ QS7 BEG 0 LEN QL19 )            ; Memory.hpp:124
   LBL "IFNOT18_20"                                    ; Memory.hpp:124
  QL19 = INSTR( SRC_ QS7 SEA_ QS12 BEG QL19 ) + 1      ; Memory.hpp:127
  QL20 = STRLEN( SRC_ QS7 ) - QL19                     ; Memory.hpp:128
  QS15 = ""                                            ; Memory.hpp:129
   FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_21"         ; Memory.hpp:131
   QS15 = SUBSTR( SRC_ QS7 BEG QL19 LEN QL20 )         ; Memory.hpp:133
   LBL "IFNOT18_21"                                    ; Memory.hpp:133
  QS7 = QS14 || QS15                                   ; Memory.hpp:135
  LBL "IFNOT18_19"                                     ; Memory.hpp:135
 FN 11: IF 1  GT Q16  GOTO LBL "ENDFORR18_18"          ; Memory.hpp:115
 QL20 = STRLEN( SRC_ QS8 ) - INSTR( SRC_ QS8 SEA_ QS16 BEG 0 )
  FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_22"          ; Memory.hpp:117
  QL19 = INSTR( SRC_ QS8 SEA_ QS16 BEG 0 )             ; Memory.hpp:119
  QS14 = ""                                            ; Memory.hpp:120
   FN 9: IF QL19  EQU 0  GOTO LBL "IFNOT18_23"         ; Memory.hpp:122
   QS14 = SUBSTR( SRC_ QS8 BEG 0 LEN QL19 )            ; Memory.hpp:124
   LBL "IFNOT18_23"                                    ; Memory.hpp:124
  QL19 = INSTR( SRC_ QS8 SEA_ QS12 BEG QL19 ) + 1      ; Memory.hpp:127
  QL20 = STRLEN( SRC_ QS8 ) - QL19                     ; Memory.hpp:128
  QS15 = ""                                            ; Memory.hpp:129
   FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_24"         ; Memory.hpp:131
   QS15 = SUBSTR( SRC_ QS8 BEG QL19 LEN QL20 )         ; Memory.hpp:133
   LBL "IFNOT18_24"                                    ; Memory.hpp:133
  QS8 = QS14 || QS15                                   ; Memory.hpp:135
  LBL "IFNOT18_22"                                     ; Memory.hpp:135
 FN 11: IF 2  GT Q16  GOTO LBL "ENDFORR18_18"          ; Memory.hpp:115
 QL20 = STRLEN( SRC_ QS9 ) - INSTR( SRC_ QS9 SEA_ QS16 BEG 0 )
  FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_25"          ; Memory.hpp:117
  QL19 = INSTR( SRC_ QS9 SEA_ QS16 BEG 0 )             ; Memory.hpp:119
  QS14 = ""                                            ; Memory.hpp:120
   FN 9: IF QL19  EQU 0  GOTO LBL "IFNOT18_26"         ; Memory.hpp:122
   QS14 = SUBSTR( SRC_ QS9 BEG 0 LEN QL19 )            ; Memory.hpp:124
   LBL "IFNOT18_26"                                    ; Memory.hpp:124
  QL19 = INSTR( SRC_ QS9 SEA_ QS12 BEG QL19 ) + 1      ; Memory.hpp:127
  QL20 = STRLEN( SRC_ QS9 ) - QL19                     ; Memory.hpp:128
  QS15 = ""                                            ; Memory.hpp:129
   FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_27"         ; Memory.hpp:131
   QS15 = SUBSTR( SRC_ QS9 BEG QL19 LEN QL20 )         ; Memory.hpp:133
   LBL "IFNOT18_27"                                    ; Memory.hpp:133
  QS9 = QS14 || QS15                                   ; Memory.hpp:135
  LBL "IFNOT18_25"                                     ; Memory.hpp:135
 FN 11: IF 3  GT Q16  GOTO LBL "ENDFORR18_18"          ; Memory.hpp:115
 QL20 = STRLEN( SRC_ QS10 ) - INSTR( SRC_ QS10 SEA_ QS16 BEG 0 )
  FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_28"          ; Memory.hpp:117
  QL19 = INSTR( SRC_ QS10 SEA_ QS16 BEG 0 )            ; Memory.hpp:119
  QS14 = ""                                            ; Memory.hpp:120
   FN 9: IF QL19  EQU 0  GOTO LBL "IFNOT18_29"         ; Memory.hpp:122
   QS14 = SUBSTR( SRC_ QS10 BEG 0 LEN QL19 )           ; Memory.hpp:124
   LBL "IFNOT18_29"                                    ; Memory.hpp:124
  QL19 = INSTR( SRC_ QS10 SEA_ QS12 BEG QL19 ) + 1     ; Memory.hpp:127
  QL20 = STRLEN( SRC_ QS10 ) - QL19                    ; Memory.hpp:128
  QS15 = ""                                            ; Memory.hpp:129
   FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_30"         ; Memory.hpp:131
   QS15 = SUBSTR( SRC_ QS10 BEG QL19 LEN QL20 )        ; Memory.hpp:133
   LBL "IFNOT18_30"                                    ; Memory.hpp:133
  QS10 = QS14 || QS15                                  ; Memory.hpp:135
  LBL "IFNOT18_28"                                     ; Memory.hpp:135
 FN 11: IF 4  GT Q16  GOTO LBL "ENDFORR18_18"          ; Memory.hpp:115
 QL20 = STRLEN( SRC_ QS11 ) - INSTR( SRC_ QS11 SEA_ QS16 BEG 0 )
  FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_31"          ; Memory.hpp:117
  QL19 = INSTR( SRC_ QS11 SEA_ QS16 BEG 0 )            ; Memory.hpp:119
  QS14 = ""                                            ; Memory.hpp:120
   FN 9: IF QL19  EQU 0  GOTO LBL "IFNOT18_32"         ; Memory.hpp:122
   QS14 = SUBSTR( SRC_ QS11 BEG 0 LEN QL19 )           ; Memory.hpp:124
   LBL "IFNOT18_32"                                    ; Memory.hpp:124
  QL19 = INSTR( SRC_ QS11 SEA_ QS12 BEG QL19 ) + 1     ; Memory.hpp:127
  QL20 = STRLEN( SRC_ QS11 ) - QL19                    ; Memory.hpp:128
  QS15 = ""                                            ; Memory.hpp:129
   FN 9: IF QL20  EQU 0  GOTO LBL "IFNOT18_33"         ; Memory.hpp:131
   QS15 = SUBSTR( SRC_ QS11 BEG QL19 LEN QL20 )        ; Memory.hpp:133
   LBL "IFNOT18_33"                                    ; Memory.hpp:133
  QS11 = QS14 || QS15                                  ; Memory.hpp:135
  LBL "IFNOT18_31"                                     ; Memory.hpp:135
 LBL "ENDFORR18_18"                                    ; Memory.hpp:136
 QL20 = STRLEN( SRC_ QS7 ) + STRLEN( SRC_ QS25 )       ; Memory.hpp:143
  FN 9: IF QL20  EQU 2040  GOTO LBL "IFNOT18_35"       ; Memory.hpp:144
  FN 11: IF QL20  GT 2040  GOTO LBL "IFNOT18_35"       ; Memory.hpp:144
  QS7 = QS7 || QS25 || QS12                            ; Memory.hpp:146
   FN 9: IF 0  EQU Q16  GOTO LBL "IFNOT18_36"          ; Memory.hpp:147
   FN 12: IF 0  LT Q16  GOTO LBL "IFNOT18_36"          ; Memory.hpp:147
   Q16 = 0                                             ; Memory.hpp:148
   LBL "IFNOT18_36"                                    ; Memory.hpp:148
  QS17 = "mem_write      : " || QS25 || "\n    " || "in mem[0] (" || TOCHAR( DAT QL20 DECIMALS 0 ) || ")"
  QS26  = QS17                                         ; Memory.hpp:150
  CALL LBL "$fdbg"                                     ; call fdbg( Debug )
  QL15 = 0                                             ; Memory.hpp:151
  FN 9: IF 0 EQU 0 GOTO LBL "EO_110"                   ; Memory.hpp:152
  LBL "IFNOT18_35"                                     ; Memory.hpp:152
 QL20 = STRLEN( SRC_ QS8 ) + STRLEN( SRC_ QS25 )       ; Memory.hpp:143
  FN 9: IF QL20  EQU 2040  GOTO LBL "IFNOT18_37"       ; Memory.hpp:144
  FN 11: IF QL20  GT 2040  GOTO LBL "IFNOT18_37"       ; Memory.hpp:144
  QS8 = QS8 || QS25 || QS12                            ; Memory.hpp:146
   FN 9: IF 1  EQU Q16  GOTO LBL "IFNOT18_38"          ; Memory.hpp:147
   FN 12: IF 1  LT Q16  GOTO LBL "IFNOT18_38"          ; Memory.hpp:147
   Q16 = 1                                             ; Memory.hpp:148
   LBL "IFNOT18_38"                                    ; Memory.hpp:148
  QS17 = "mem_write      : " || QS25 || "\n    " || "in mem[1] (" || TOCHAR( DAT QL20 DECIMALS 0 ) || ")"
  QS26  = QS17                                         ; Memory.hpp:150
  CALL LBL "$fdbg"                                     ; call fdbg( Debug )
  QL15 = 0                                             ; Memory.hpp:151
  FN 9: IF 0 EQU 0 GOTO LBL "EO_110"                   ; Memory.hpp:152
  LBL "IFNOT18_37"                                     ; Memory.hpp:152
 QL20 = STRLEN( SRC_ QS9 ) + STRLEN( SRC_ QS25 )       ; Memory.hpp:143
  FN 9: IF QL20  EQU 2040  GOTO LBL "IFNOT18_39"       ; Memory.hpp:144
  FN 11: IF QL20  GT 2040  GOTO LBL "IFNOT18_39"       ; Memory.hpp:144
  QS9 = QS9 || QS25 || QS12                            ; Memory.hpp:146
   FN 9: IF 2  EQU Q16  GOTO LBL "IFNOT18_40"          ; Memory.hpp:147
   FN 12: IF 2  LT Q16  GOTO LBL "IFNOT18_40"          ; Memory.hpp:147
   Q16 = 2                                             ; Memory.hpp:148
   LBL "IFNOT18_40"                                    ; Memory.hpp:148
  QS17 = "mem_write      : " || QS25 || "\n    " || "in mem[2] (" || TOCHAR( DAT QL20 DECIMALS 0 ) || ")"
  QS26  = QS17                                         ; Memory.hpp:150
  CALL LBL "$fdbg"                                     ; call fdbg( Debug )
  QL15 = 0                                             ; Memory.hpp:151
  FN 9: IF 0 EQU 0 GOTO LBL "EO_110"                   ; Memory.hpp:152
  LBL "IFNOT18_39"                                     ; Memory.hpp:152
 QL20 = STRLEN( SRC_ QS10 ) + STRLEN( SRC_ QS25 )      ; Memory.hpp:143
  FN 9: IF QL20  EQU 2040  GOTO LBL "IFNOT18_41"       ; Memory.hpp:144
  FN 11: IF QL20  GT 2040  GOTO LBL "IFNOT18_41"       ; Memory.hpp:144
  QS10 = QS10 || QS25 || QS12                          ; Memory.hpp:146
   FN 9: IF 3  EQU Q16  GOTO LBL "IFNOT18_42"          ; Memory.hpp:147
   FN 12: IF 3  LT Q16  GOTO LBL "IFNOT18_42"          ; Memory.hpp:147
   Q16 = 3                                             ; Memory.hpp:148
   LBL "IFNOT18_42"                                    ; Memory.hpp:148
  QS17 = "mem_write      : " || QS25 || "\n    " || "in mem[3] (" || TOCHAR( DAT QL20 DECIMALS 0 ) || ")"
  QS26  = QS17                                         ; Memory.hpp:150
  CALL LBL "$fdbg"                                     ; call fdbg( Debug )
  QL15 = 0                                             ; Memory.hpp:151
  FN 9: IF 0 EQU 0 GOTO LBL "EO_110"                   ; Memory.hpp:152
  LBL "IFNOT18_41"                                     ; Memory.hpp:152
 QL20 = STRLEN( SRC_ QS11 ) + STRLEN( SRC_ QS25 )      ; Memory.hpp:143
  FN 9: IF QL20  EQU 2040  GOTO LBL "IFNOT18_43"       ; Memory.hpp:144
  FN 11: IF QL20  GT 2040  GOTO LBL "IFNOT18_43"       ; Memory.hpp:144
  QS11 = QS11 || QS25 || QS12                          ; Memory.hpp:146
   FN 9: IF 4  EQU Q16  GOTO LBL "IFNOT18_44"          ; Memory.hpp:147
   FN 12: IF 4  LT Q16  GOTO LBL "IFNOT18_44"          ; Memory.hpp:147
   Q16 = 4                                             ; Memory.hpp:148
   LBL "IFNOT18_44"                                    ; Memory.hpp:148
  QS17 = "mem_write      : " || QS25 || "\n    " || "in mem[4] (" || TOCHAR( DAT QL20 DECIMALS 0 ) || ")"
  QS26  = QS17                                         ; Memory.hpp:150
  CALL LBL "$fdbg"                                     ; call fdbg( Debug )
  QL15 = 0                                             ; Memory.hpp:151
  FN 9: IF 0 EQU 0 GOTO LBL "EO_110"                   ; Memory.hpp:152
  LBL "IFNOT18_43"                                     ; Memory.hpp:152
QS17 = "mem_write      : " || QS25 || "\n    " || "overflow!!!"
QS26  = QS17                                           ; Memory.hpp:159
CALL LBL "$fdbg"                                       ; call fdbg( Debug )
QL15 = 2                                               ; Memory.hpp:160
LBL "EO_110"                                           ; ProbeCommonKin.hpp:89
LBL 0                                                  ; ProbeCommonKin.hpp:89
LBL "$fdbg"                                            ; OutStream.hpp
 FN 10: IF Q999  NE +79513  GOTO LBL "IFNOT20_45"      ; OutStream.hpp:15
 QS5 = QS26                                            ; OutStream.hpp:17
 FN 16: F-PRINT ProbeCommonprintfile.a / %CycleDebug.A ; OutStream.hpp:20
 LBL "IFNOT20_45"                                      ; OutStream.hpp:23
LBL 0                                                  ; ProbeCommonKin.hpp:8
LBL "EOF_PROBECOMMONKIN"                               ; ProbeCommonKin.hpp:4
END PGM MM
