home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 87xx / 8708a.d64 / ggt (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  64b  |  5 lines
  1. 20 INPUTA,B
  2. 30 X=A-B:IFB<XTHENA=X:GOTO30
  3. 40 A=B:B=X:IFA<>BTHEN30
  4. 50 PRINTA
  5.