$X and $Y are reflecting the actual cursor positions
It is allowed to set these variables
S $X=0
S $Y=0
but this does not mean that a cursor is
moved from one postion to the other
(setting these variables has something to do with the device parameters WITH and WRAP,
please ask if this is not clear)
The cursor should be positioned with ESC-Sequences, see following example:
W $C(27,91)_"11;22H"
moves the cursor to line 11, row 22
you can play with indirections to make
programs easier to read (and write)
S POS="$C(27,91)_Y_$C(59)_X_$C(72)"
S X=22,Y=11 W @POS
reverse video:
S INV=$C(27,91)_"7m"
W INV
normal:
S NOR=$C(27,91)_"m"
W NOR
Regards
Martin
If you would like to refer to this comment somewhere else in this project, copy and paste the following link:
If you would like to refer to this comment somewhere else in this project, copy and paste the following link:
Anonymous
-
2003-04-30
Hi Flvio,
Try these:
w $C(155)_$G(Y)_";"_$G(X)_"H"
where X,Y are the coordinates of the cursor new position.
w $C(155)_"?25h": to switch cursor on
w $C(155)_"?25l": to switch cursor off
w $C(155)_"m": to turn video attributes off
w $C(155)_";1m": to increase video intensity
w $C(155)_";7m": to turn reverse video on
w $C(155)_";4m": to turn underline on
w $C(155)_";5m": to turn blinking on
w $C(155)_"4h": to turn insert mode on
w $C(155)_"4l": to turn insert mode off
w $C(27)_"(B"_$C(27)_")0": to turn graphics on
w $C(15): to turn graphics off
Regards,
Robert
If you would like to refer to this comment somewhere else in this project, copy and paste the following link:
I am greatly disappointed to learn that GT.M does not support device handling mnemonics. This will force me to litter my code with GT.M-specific junk if I am use this product.
If you would like to refer to this comment somewhere else in this project, copy and paste the following link:
Hi All,
1) Im a new GT.M user
2) GT.M does not have write mnemonics for things like positioning the cursor or switching to reverse video?
3) Just $X and $Y might be used to position the cursor?
Please help me!
Thanks!
Flvio/Brazil
Hi Flavio
$X and $Y are reflecting the actual cursor positions
It is allowed to set these variables
S $X=0
S $Y=0
but this does not mean that a cursor is
moved from one postion to the other
(setting these variables has something to do with the device parameters WITH and WRAP,
please ask if this is not clear)
The cursor should be positioned with ESC-Sequences, see following example:
W $C(27,91)_"11;22H"
moves the cursor to line 11, row 22
you can play with indirections to make
programs easier to read (and write)
S POS="$C(27,91)_Y_$C(59)_X_$C(72)"
S X=22,Y=11 W @POS
reverse video:
S INV=$C(27,91)_"7m"
W INV
normal:
S NOR=$C(27,91)_"m"
W NOR
Regards
Martin
Martin,
Thank you for your help!
Flvio
Hi Flvio,
Try these:
w $C(155)_$G(Y)_";"_$G(X)_"H"
where X,Y are the coordinates of the cursor new position.
w $C(155)_"?25h": to switch cursor on
w $C(155)_"?25l": to switch cursor off
w $C(155)_"m": to turn video attributes off
w $C(155)_";1m": to increase video intensity
w $C(155)_";7m": to turn reverse video on
w $C(155)_";4m": to turn underline on
w $C(155)_";5m": to turn blinking on
w $C(155)_"4h": to turn insert mode on
w $C(155)_"4l": to turn insert mode off
w $C(27)_"(B"_$C(27)_")0": to turn graphics on
w $C(15): to turn graphics off
Regards,
Robert
Dear Robert.
Thank you!
Best Regards,
Flvio
I am greatly disappointed to learn that GT.M does not support device handling mnemonics. This will force me to litter my code with GT.M-specific junk if I am use this product.