open-discussion
open-discussion > RE: for ksegment
Dec 18, 2017 06:12 PM | Ge Tan
RE: for ksegment
Dear Rorden,
I tried to do the step of kSegments as shown in the web (http://www.mccauslandcenter.sc.edu/mricr...),
CONST
kSegments = 5;
VAR
i: integer;
start, thick: single;
BEGIN
thick := 1/kSegments;
RESETDEFAULTS;
COLORBARVISIBLE(false);
BACKCOLOR(255, 255, 255);
LOADIMAGE('G:\Analysis0073\Results\T2_FC_Grey_ROI2_93');
OVERLAYLOAD('motor');
OVERLAYMINMAX(1, -2, -2);
AZIMUTHELEVATION(130, 15);
FOR i := 1 TO kSegments DO BEGIN
start := (i-1)*thick;
CLIPAZIMUTHELEVATION(start, 0, 180);
CUTOUT(0.0, 0.0, 0.0, 1.0, 1.0-start-thick, 1.0);
SAVEBMP('sector'+inttostr(i));
END;
END.
but what I got was wrong (as the following figure). I expected to get some help from you to adjust the script.
Best regard,
Ge Tan
I tried to do the step of kSegments as shown in the web (http://www.mccauslandcenter.sc.edu/mricr...),
CONST
kSegments = 5;
VAR
i: integer;
start, thick: single;
BEGIN
thick := 1/kSegments;
RESETDEFAULTS;
COLORBARVISIBLE(false);
BACKCOLOR(255, 255, 255);
LOADIMAGE('G:\Analysis0073\Results\T2_FC_Grey_ROI2_93');
OVERLAYLOAD('motor');
OVERLAYMINMAX(1, -2, -2);
AZIMUTHELEVATION(130, 15);
FOR i := 1 TO kSegments DO BEGIN
start := (i-1)*thick;
CLIPAZIMUTHELEVATION(start, 0, 180);
CUTOUT(0.0, 0.0, 0.0, 1.0, 1.0-start-thick, 1.0);
SAVEBMP('sector'+inttostr(i));
END;
END.
but what I got was wrong (as the following figure). I expected to get some help from you to adjust the script.
Best regard,
Ge Tan
Threaded View
Title | Author | Date |
---|---|---|
Ge Tan | Dec 17, 2017 | |
Chris Rorden | Dec 17, 2017 | |
Ge Tan | Dec 19, 2017 | |
Ge Tan | Dec 18, 2017 | |
Ge Tan | Dec 18, 2017 | |