For one thing:
FOR i% = 0 TO l% ' <<< Start at 1 not 0, first letter is at 1
c$ = MID$(s$, i%, 1)
For another I'd block spacing out in fitting the letter pixels in the block like one or 2 more spaces in columns and rows, that way letter blocks can go next to each other without another variable calculation like the 8x16 default font does. eg 2 more spaces on right and below letter pixels. I am lost trying to figure out what that kerning thing is.
BTW I don't see a need to spec source for _Putimage, the destination block is sufficient.
FOR i% = 0 TO l% ' <<< Start at 1 not 0, first letter is at 1
c$ = MID$(s$, i%, 1)
For another I'd block spacing out in fitting the letter pixels in the block like one or 2 more spaces in columns and rows, that way letter blocks can go next to each other without another variable calculation like the 8x16 default font does. eg 2 more spaces on right and below letter pixels. I am lost trying to figure out what that kerning thing is.
BTW I don't see a need to spec source for _Putimage, the destination block is sufficient.
b = b + ...