05-17-2023, 01:47 AM
To show the difference in the newer graphic commands and the old version of Print:
As you can see, the new UPrint tends to have extra space between rows, just so letters don't get clipped and overwritten as often. As for the "3" seeming to squash the "2" somewhat, I don't know what the heck is up with that. It's not a monospaced font, so is it designed that way? Or is it a flaw in the new font rendering? I dunno at the moment and something like that will probably take a little looking into to see how it's supposed to look and display for us, and what the glitch might be, if there is one.
Code: (Select All)
Dim As Long Screen1, Font24, Font12
$NoPrefix
Screen1 = NewImage(1280, 720, 32)
Font24 = NewImage(600, 300, 32)
Font12 = NewImage(210, 100, 32)
Screen Screen1
Font LoadFont("arial.ttf", 60)
Print "1234567890-=`~!@#$%^&*()_+?:<>"
Print "abcdefghijklmonpqrstuvwxyz"
Print UCase$("abcdefghijklmonpqrstuvwxyz")
Sleep
UPrintString (0, 4 * ULineSpacing), "1234567890-=`~!@#$%^&*()_+?:<>"
UPrintString (0, 5 * ULineSpacing), "abcdefghijklmonpqrstuvwxyz"
UPrintString (0, 6 * ULineSpacing), UCase$("abcdefghijklmonpqrstuvwxyz")
Sleep
Cls
Font LoadFont("arial.ttf", 48)
Print "1234567890-=`~!@#$%^&*()_+?:<>"
Print "abcdefghijklmonpqrstuvwxyz"
Print UCase$("abcdefghijklmonpqrstuvwxyz")
Print
UPrintString (0, 4 * ULineSpacing), "1234567890-=`~!@#$%^&*()_+?:<>"
UPrintString (0, 5 * ULineSpacing), "abcdefghijklmonpqrstuvwxyz"
UPrintString (0, 6 * ULineSpacing), UCase$("abcdefghijklmonpqrstuvwxyz")
Sleep
Cls
Font LoadFont("arial.ttf", 24)
Print "1234567890-=`~!@#$%^&*()_+?:<>"
Print "abcdefghijklmonpqrstuvwxyz"
Print UCase$("abcdefghijklmonpqrstuvwxyz")
Print
UPrintString (0, 4 * ULineSpacing), "1234567890-=`~!@#$%^&*()_+?:<>"
UPrintString (0, 5 * ULineSpacing), "abcdefghijklmonpqrstuvwxyz"
UPrintString (0, 6 * ULineSpacing), UCase$("abcdefghijklmonpqrstuvwxyz")
Sleep
Cls
Font LoadFont("arial.ttf", 12)
Print "1234567890-=`~!@#$%^&*()_+?:<>"
Print "abcdefghijklmonpqrstuvwxyz"
Print UCase$("abcdefghijklmonpqrstuvwxyz")
'LINE (0, 0)-(209, 39), , B
Print
UPrintString (0, 4 * ULineSpacing), "1234567890-=`~!@#$%^&*()_+?:<>"
UPrintString (0, 5 * ULineSpacing), "abcdefghijklmonpqrstuvwxyz"
UPrintString (0, 6 * ULineSpacing), UCase$("abcdefghijklmonpqrstuvwxyz")
Sleep
SystemAs you can see, the new UPrint tends to have extra space between rows, just so letters don't get clipped and overwritten as often. As for the "3" seeming to squash the "2" somewhat, I don't know what the heck is up with that. It's not a monospaced font, so is it designed that way? Or is it a flaw in the new font rendering? I dunno at the moment and something like that will probably take a little looking into to see how it's supposed to look and display for us, and what the glitch might be, if there is one.