$***********************************************************
$   макро описывает карданную передачу крестового типа
$***********************************************************
$       формальные параметры шага МОДЕЛЬ
$ p1  - номер тела входного вала
$ p2  - номер узла 1 входного вала соединяющегося с крестовиной
$ p3  - номер узла 2 входного вала соединяющегося с крестовиной
$       (считается, что линия узлов 1 - 2 горизонтальна)
$ p4  - номер тела выходного вала
$ p5  - номер узла 1 выходного вала соединяющегося с крестовиной
$ p6  - номер узла 2 выходного вала соединяющегося с крестовиной
$       (считается, что линия узлов 1 - 2 вертикальна)
$ p7  - номер тела крестовина
$       (имеет заданную нумерацию узлов соединения - 1,2 - вертикальные, 3,4 - горизонтальные)
$
BL16 NMX NAPR  TUF  KPAR  TDF  KPAR
@  'цилиндрическая опора крестовины Y'
    nmx1   1   15    1    50    1
    nmx1   3   15    1    50    1
@  'цилиндрическая опора крестовины Z'
    nmx2   1   15    1    50    1
    nmx2   2   15    1    50    1
@  'сферическая опора крестовины'
    nmx3   1   15    1    50    1
    nmx3   2   15    1    50    1
    nmx3   3   15    1    50    1
BL17   NSE NPDS1  NUZ1 NPDS2  NUZ2  NMX
@   'крестовина - входной вал 1'
    nse1 p7  3    p1   p2   nmx3
@   'крестовина - входной вал 2'
    nse2 p7  4    p1   p3   nmx1
@   'крестовина - выходной вал 1'
    nse3 p7  1    p4   p5   nmx3
@   'крестовина - выходной вал 2'
    nse4 p7  2    p4   p6   nmx2
@ 'Сила в крестовине на входном вале X'
#wkt.mac 3 1 nse1  1  1  3
@ 'Сила в крестовине на входном вале Z'
#wkt.mac 3 1 nse1  1  3  3
@ 'Сила в крестовине на выходном вале X'
#wkt.mac 3 1 nse3  1  1  3
@ 'Сила в крестовине на выходном вале Y'
#wkt.mac 3 1 nse3  1  2  3
$************************************************
$     формальные параметры шага РАСЧЕТ
$             параметров нет
BL33    NXAR    PRSOST    PRSL      KSTROK
@  'цилиндрическая опора крестовины Y'
    nmx1   1     1      1
     0.0   0.0   0.0   0.0
    nmx1   1     2      1
     0.0   0.0   0.0   0.0
    nmx1   3     1      1
     0.0   0.0   0.0   0.0
    nmx1   3     2      1
     0.0   0.0   0.0   0.0
@  'цилиндрическая опора крестовины Z'
    nmx2   1     1      1
     0.0   0.0   0.0   0.0
    nmx2   1     2      1
     0.0   0.0   0.0   0.0
    nmx2   2     1      1
     0.0   0.0   0.0   0.0
    nmx2   2     2      1
     0.0   0.0   0.0   0.0
@  'сферическая опора крестовины'
    nmx3   1     1      1
     0.0   0.0   0.0   0.0
    nmx3   1     2      1
     0.0   0.0   0.0   0.0
    nmx3   2     1      1
     0.0   0.0   0.0   0.0
    nmx3   2     2      1
     0.0   0.0   0.0   0.0
    nmx3   3     1      1
     0.0   0.0   0.0   0.0
    nmx3   3     2      1
     0.0   0.0   0.0   0.0