FOR I=0 TO 511 SPSET I,0,0,0,0 NEXT とりあえずエラーが出てもXSCREENやACLSの前にこれ呼び出せば何とか動く