Setvirtualresolution(640,480) ResetTimer() Do Print ("Device Width: "+Str(GetDeviceWidth(),2)) Sync() If Timer()>20 Then Exit Loop End