10 UDEF PSW(X),STP(X)
20 PRINT "PSW";\INPUT A$
30 P=PSW(X)
40 PRINT "STP";\INPUT A$
50 S=STP(X)
60 PRINT "PSW2";\INPUT A$
70 P=PSW(X)
80 GOTO 20
90 END