Guru
Joined: 05/10/2019
Location: United KingdomPosts: 9134
| Posted: 07:33am 19 Apr 2023 |
Try
For i=48 To 55
For j=48 To 55
Print Chr$(27);"[3"+Chr$(i)+";"+"4"+Chr$(j)+"mABCDEFGH";
Next
Print
Next
Print Chr$(27);"[37;40m" ' clear to white on black
For j=48 To 55
Print Chr$(27);"[3"+Chr$(i)+";"+"4"+Chr$(j)+"mABCDEFGH";
Next
Next
Print Chr$(27);"[37;40m" ' clear to white on black
Vertical bars should be in the order Black, Red, Green, Yellow,Blue,Magenta,Cyan,White
Edited 2023-04-19 17:39 by Mixtel90