RosettaCodeData/Task/Terminal-control-Dimensions/Locomotive-Basic/terminal-control-dimensions...

mirror of https://github.com/acmeism/RosettaCodeData.git
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%
	`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%`