RosettaCodeData/Task/Terminal-control-Dimensions/Locomotive-Basic/terminal-control-dimensions-3.basic
2023-07-01 13:44:08 -04:00

3 lines
160 B
Text

10 w%=0:h%=0 ' initialize and force integer type
20 |getwh,@w%,@h% ' call RSX and pass variables as pointers
30 PRINT "window width:"; w%; ", height:"; h%