mit Bascom 1.11.7.4 musste es
if pina.x=1 heissen