Code: Select all
w=OpenWindow(0, 0, 0, 322,150, "CharacterExtra", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
hdc=GetDC_(w)
StartDrawing(WindowOutput(0))
SetTextCharacterExtra_(hdc,46)
DrawingMode(#PB_2DDrawing_Transparent)
TextOut_(hdc, 50, 100, "Hello", 5)
DrawText(22, 22, "Hello World!", #Red)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
StopDrawing()