10 cls
20 print "Frame buffer at: "hex$(scrnadr)
30 print "Pitch          :"grapitch
40 print "X resolution   :"gramaxx+1
50 print "Y resolution   :"gramaxy+1
60 print "Text columns   :"txtmaxx
70 print "Text lines     :"txtmaxy
80 print
90 print "Data segment bottom (LOMEM) : "hex$(lomem)
100 print"Data segment top (HIMEM)    : "hex$(himem)
110 print"Free memory bottom (FREEBOT): "hex$(freebot)
120 print"Free memory top (FREETOP)   : "hex$(freetop)
130 print
