Is möglicherweise das Problem, dass Bascom bei "print" ja noch ein CRLF anhängt, du kriegst also in Wirklichkeit 5 zeichen.

Schreibe
Code:
Print Format(geraete1, 000) ;
mit einem semikolon am Ende , dadurch wird CRLF unterdrückt