Setvirtualresolution(640,480)
ResetTimer()
//Create an example image
id=_CreateImage(25,0,255,0)
//Set Background Color
SetClearColor(50,50,100)
//Create Sprtes
For i=1 to 8
CreateSprite(i,id)
SetSpriteY(i,i*35)
Next i
Do
If Timer()>15 Then Exit
Sync()
Loop
End
Function _CreateImage(size,r,g,b)
swap()
Drawline(0,0,size,size,r,g,b)
Update(0)
Render()
Drawline(0,size,size,0,r,g,b)
Update(0)
Render()
giid=GetImage(0,0,size,size)
EndFunction giid
Help make AGK better by submitting an example for this command! (All examples are subject to approval)
Setvirtualresolution(640,480) ResetTimer() //Create an example image id=_CreateImage(25,0,255,0) //Set Background Color SetClearColor(50,50,100) //Create Sprtes For i=1 to 8 CreateSprite(i,id) SetSpriteY(i,i*35) Next i Do If Timer()>15 Then Exit Sync() Loop End Function _CreateImage(size,r,g,b) swap() Drawline(0,0,size,size,r,g,b) Update(0) Render() Drawline(0,size,size,0,r,g,b) Update(0) Render() giid=GetImage(0,0,size,size) EndFunction giid