PRO set_x_devices
;
; Set X devices
;
; font

   !p.font = -1
   device,  true_color = 24
END