vorher alias festlegen
y1 alias pind.0

und dann if y1=1 or y2=1 or y3=1 or y4=1 then gosub keyboardread