KB#00059-Using the 'TR' mnemonic to read in the current screen
Using the 'TR' mnemonic to read in the current screen
This code reads the screen from (0,0) to (78,24) and prints it back out again.
7100 REM "call piece of code after drawing your screen....
7140 INPUT @(78,24),'EE','GS'+'TR',A$,'GE','BE'
7150 PRINT 'CS'
7160 DIM ATTR$:"bcolor:U(1),fcolor:U(1),attribs:U(1),ccode:C(1)"
7170 FOR I=1 TO LEN(A$) STEP 4
7180 LET ATTR$=A$(1,4); LET A$=A$(5)
7190 PRINT (CHAN)'RGB'(AND(ATTR.BCOLOR$+ATTR.FCOLOR$,$7F7F$)),'ATTR'(ATTR.ATTRIBS$)+ATTR.CCODE$,
7200 NEXT I
Last Modified: 10/17/1997 Product: PRO/5 Operating System: All platforms
BASIS structures five components of their technology into the BBx Generations.