Mirror of CollapseOS
Du kannst nicht mehr als 25 Themen auswählen Themen müssen entweder mit einem Buchstaben oder einer Ziffer beginnen. Sie können Bindestriche („-“) enthalten und bis zu 35 Zeichen lang sein.

17 Zeilen
320B

  1. CODE ROT ( a b c -- b c a )
  2. HL POP, ( C ) DE POP, ( B ) BC POP, ( A ) chkPS,
  3. DE PUSH, ( B ) HL PUSH, ( C ) BC PUSH, ( A )
  4. ;CODE
  5. CODE DUP ( a -- a a )
  6. HL POP, chkPS,
  7. HL PUSH, HL PUSH,
  8. ;CODE
  9. CODE ?DUP
  10. HL POP, chkPS,
  11. HL PUSH,
  12. HLZ, IFNZ, HL PUSH, THEN,
  13. ;CODE
  14. CODE DROP ( a -- )
  15. HL POP,
  16. ;CODE