[avel]

не совсем в тему, но всеже... вдруг кому пригодитсо...

Graphics 780,440,16
Color 200,100,100
For i=0 To 7
	For j=1 To 32
		If i*32+j=128 Then Color 100,200,100
		Text i*100+10,j*13, i*32+j +" - " + Chr$(i*32+j)
	Next 
Next  
WaitMouse 
End