KB#00059-Using the 'TR' mnemonic to read in the current screen

Title:

Using the 'TR' mnemonic to read in the current screen

Description:

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.