# Create an ObliqueSlice with Friedman plane #
ObliqueSlice orientation hit 0
ObliqueSlice setPlane -14.106791 71.525139 1775.894043 1.000000 0.000000 0.000000 0.000000 1.000000 0.000000
ObliqueSlice sampling setState item 0 3 item 1 0 item 2 1 item 3 0 item 4 0
ObliqueSlice fire
set planepos [ObliqueSlice translate getValue]
set maxvalue [ObliqueSlice translate getMaxValue]
set planepos [expr {$maxvalue - int($planepos)}]
ObliqueSlice createImage P255_$planepos
create HxCastField {CastField}
CastField data connect P255_$planepos
CastField fire
CastField scaling setValue 0 0.21
CastField scaling setValue 1 200
CastField fire
[ {CastField} create ] setLabel P255_$planepos.jpeg
P255_$planepos.jpeg exportData "JPEG" R:/data/P/2/5/P255-3005592/CT-P255-3005592-1/amira/P255_$planepos.jpeg

# Get image for muscle measurement #
ObliqueSlice orientation hit 0
ObliqueSlice setPlane 3.076187 83.613510 1782.852295 -0.148264 0.984301 0.095761 0.219887 0.127219 -0.967194
ObliqueSlice fire
ObliqueSlice sampling setState item 0 3 item 1 1 item 2 1 item 3 0 item 4 0
ObliqueSlice createImage {P255_new}
P255_new exportData "2D Tiff" R:/data/P/2/5/P255-3005592/CT-P255-3005592-1/amira/P255_new.tif
saveNetwork

ObliqueSlice2 setPlane -14.106791 71.525139 1775.894043 -0.219887 -0.127219 0.967194
ObliqueSlice2 fire
ObliqueSlice2 options setValue 0 1
ObliqueSlice2 sampling setState item 0 3 item 1 1 item 2 1 item 3 0 item 4 0

ObliqueSlice3 setPlane -14.106791 71.525139 1775.894043 -0.964193 -0.122343 -0.235297 -30.797563 2.862158 -8.249261
ObliqueSlice3 fire
ObliqueSlice3 options setValue 0 1
ObliqueSlice3 sampling setState item 0 3 item 1 1 item 2 1 item 3 0 item 4 0

ObliqueSlice4 setPlane -14.106791 71.525139 1775.894043 -0.148264 0.984301 0.095761
ObliqueSlice4 fire
ObliqueSlice4 options setValue 0 1
ObliqueSlice4 sampling setState item 0 3 item 1 1 item 2 1 item 3 0 item 4 0

ObliqueSlice5 setPlane -14.106791 71.525139 1775.894043 -0.916831 0.237290 -0.321114 0.190981 0.895341 -0.402357
ObliqueSlice5 fire
ObliqueSlice5 options setValue 0 1
ObliqueSlice5 sampling setState item 0 3 item 1 1 item 2 1 item 3 0 item 4 0

ObliqueSlice6 setPlane -14.106791 71.525139 1775.894043 -0.916831 0.237290 -0.321114 -0.053582 0.958804 -0.278968
ObliqueSlice6 fire
ObliqueSlice6 options setValue 0 1
ObliqueSlice6 sampling setState item 0 3 item 1 1 item 2 1 item 3 0 item 4 0

remove CreateSphereP255 HumSphereP255.surf SphereViewP255 Intersection
remove CreateSphereP255_2 GlenoidSphereP255.surf SphereViewP255_2 Intersection2
create HxCreateSphere {CreateSphereP255}
CreateSphereP255 setIconPosition 20 500
CreateSphereP255 radius setMinMax 0 50
CreateSphereP255 radius setValue 28.635068
CreateSphereP255 coords setValue 0 -42.132641
CreateSphereP255 coords setValue 1 78.778645
CreateSphereP255 coords setValue 2 1766.078168
CreateSphereP255 fire
[ {CreateSphereP255} create
 ] setLabel {HumSphereP255.surf}
HumSphereP255.surf setIconPosition 200 500
HumSphereP255.surf master connect CreateSphereP255
HumSphereP255.surf fire
create HxDisplaySurface {SphereViewP255}
SphereViewP255 setIconPosition 400 500
SphereViewP255 data connect HumSphereP255.surf
SphereViewP255 drawStyle setValue 4
SphereViewP255 fire
create HxOverlayGrid {Intersection}
Intersection module connect ObliqueSlice4
Intersection data connect HumSphereP255.surf
Intersection lineWidth setValue 2
ObliqueSlice4 setViewerMask 16383
ObliqueSlice4 setPlane 42.132641 78.778645 1766.078168 1 0 0 0 1 0
ObliqueSlice4 fire

create HxCreateSphere {CreateSphereP255_2}
CreateSphereP255_2 setIconPosition 20 520
CreateSphereP255_2 radius setMinMax 0 50
CreateSphereP255_2 radius setValue 32.922377
CreateSphereP255_2 coords setValue 0 -44.904354
CreateSphereP255_2 coords setValue 1 74.387297
CreateSphereP255_2 coords setValue 2 1767.644782
CreateSphereP255_2 fire
[ {CreateSphereP255_2} create
 ] setLabel {GlenoidSphereP255.surf}
GlenoidSphereP255.surf setIconPosition 200 520
GlenoidSphereP255.surf master connect CreateSphereP255_2
GlenoidSphereP255.surf fire
create HxDisplaySurface {SphereViewP255_2}
SphereViewP255_2 setIconPosition 400 520
SphereViewP255_2 data connect GlenoidSphereP255.surf
SphereViewP255_2 drawStyle setValue 4
SphereViewP255_2 fire
create HxOverlayGrid {Intersection2}
Intersection2 module connect ObliqueSlice5
Intersection2 data connect GlenoidSphereP255.surf
Intersection2 lineWidth setValue 2
ObliqueSlice5 setViewerMask 16383
ObliqueSlice5 setPlane 44.904354 74.387297 1767.644782 1 0 0 0 1 0
ObliqueSlice5 fire