(11C) Roll Two Dice at Random

[Thomas Klemm]

Or then you ditch the idea and don't use registers at all:

Code:

001-42,21,11   LBL A
002-    32 0   GSB 0
003-      36   ENTER
004-    32 0   GSB 0
005-      40   +
006-      34   x<>y
007-   43 36   LSTx
008-       1   1
009-       0   0
010-      10   ÷
011-      40   +
012-   42 31   PSE
013-      34   x<>y
014-   43 32   RTN
015-42,21, 0   LBL 0
016-   42 36   RAN#
017-       6   6
018-      20   ×
019-       1   1
020-      40   +
021-   43 44   INT
022-   43 32   RTN