Re: TIB: Re: (86 Basic) Please help


[Prev][Next][Index][Thread]

Re: TIB: Re: (86 Basic) Please help




Hey, I might be just dumb, but I don't understand how this works. Can
you explain it? also, the up/down doesn't work

> Dave Twaddell wrote:

---cutting out-----

> :Outpt(Y,X,Q
> :Lbl TOP
> :Repeat Ans
> :getKy
> :End
> :If Ans==24 or Ans==25 or Ans==26 or Ans==34
> :Then
> :Outpt(Y,X,SP
> :(Ans==26)(X<20) - (Ans==24)(X>2)+X (=>) X
> :(Ans==34)(Y<7) - (Ans==25)(Y>2)+Y (=>) Y
> :Outpt(Y,X,Q
> :End
> :Goto TOP


References: