1 IFPEEK(45)=1THENSYS7202:END
2 SYS2082