ascii art
Posted: Mon Feb 07, 2011 8:24 pm
Hi, is there a way to write extended ascii cmd style in editor gadget?
Something like this?braveheart wrote:Hi, is there a way to write extended ascii cmd style in editor gadget?
Code: Select all
OpenWindow(#PB_Any,0,0,250,250,"test",#PB_Window_ScreenCentered|#PB_Window_SystemMenu)
stuff = EditorGadget(#PB_Any,5,5,240,240)
For z = 0 To 255
AddGadgetItem(stuff,0,Chr(z))
Next z
Repeat : Delay(10)
eventID = WaitWindowEvent(1)
Until eventID = #PB_Event_CloseWindow
Code: Select all
_____________†††______________
___________†††††††____________
_____________†††______________
_____________†††______________
______†______†††______†_______
_____†††_____†††_____†††______
___††††††††††††††††††††††††___
_____†††_____†††_____†††______
_______†_____†††_____†________
_____________†††______________
_____________†††______________
_____________†††______________
_____________†††______________
_____________†††______________
_____________†††______________
_____________†††______________
___________†††††††____________
____________†††††_____________
______________†_______________
Code: Select all
CharToOem_(Text.s, Text.s)