//NOTE: For this example to work you will need to copy 'custom.png' and 'custom subimages.txt'
//to the media folder at the location where you are running this example.
//Both files can be found in your [AGK Install Directory]/Projects/Basic/Examples/Text/CustomText/media/
Setvirtualresolution(640,480)
ResetTimer()
//Check for required custom font files in media folder
fileok=GetFileExists("custom.png")
fileok=fileok+GetFileExists("custom subimages.txt")
If fileok<>2
Repeat
Print ("Both 'custom.png' and 'custom subimages.txt'")
Print ("need to be in your media folder")
Sync()
Until Timer()>5
EndIF
If fileok=2
fontimage = LoadImage ("custom.png")
CreateEditBox(1)
SetEditBoxPosition(1,10,100)
SetEditBoxCursorColor(1,255,0,0)
SetEditBoxCursorWidth(1,2)
SetEditBoxFontImage (1,fontimage)
Repeat
Sync()
Until Timer()>15
EndIf
End
Help make AGK better by submitting an example for this command! (All examples are subject to approval)
//NOTE: For this example to work you will need to copy 'custom.png' and 'custom subimages.txt' //to the media folder at the location where you are running this example. //Both files can be found in your [AGK Install Directory]/Projects/Basic/Examples/Text/CustomText/media/ Setvirtualresolution(640,480) ResetTimer() //Check for required custom font files in media folder fileok=GetFileExists("custom.png") fileok=fileok+GetFileExists("custom subimages.txt") If fileok<>2 Repeat Print ("Both 'custom.png' and 'custom subimages.txt'") Print ("need to be in your media folder") Sync() Until Timer()>5 EndIF If fileok=2 fontimage = LoadImage ("custom.png") CreateEditBox(1) SetEditBoxPosition(1,10,100) SetEditBoxCursorColor(1,255,0,0) SetEditBoxCursorWidth(1,2) SetEditBoxFontImage (1,fontimage) Repeat Sync() Until Timer()>15 EndIf End