{"id":1383,"date":"2015-12-07T13:38:39","date_gmt":"2015-12-07T13:38:39","guid":{"rendered":"http:\/\/www.sydneysmith.com\/wordpress\/?p=1383"},"modified":"2017-05-14T00:45:42","modified_gmt":"2017-05-14T00:45:42","slug":"hp-65-program-code-jump-table","status":"publish","type":"post","link":"https:\/\/www.sydneysmith.com\/wordpress\/1383\/hp-65-program-code-jump-table\/","title":{"rendered":"HP-65 Program Code Jump Table"},"content":{"rendered":"<p>When the HP-65 runs program steps it gets a program code (0-63) from program memory and then does something depending on the program code. <!--more--><\/p>\n<p>Here is the table of what it does:<\/p>\n<pre>\r\n01000\tgoto 01242               ; 000 NOP (start prog code jump table)\r\n01001\tgoto 01360               ; 001 STO 4\r\n01002\trom 5                    ; 002 3\r\n01003\trom 5                    ; 003 2\r\n01004\trom 5                    ; 004 1\r\n01005\tgoto 01360               ; 005 STO 6\r\n01006\tgoto 01310               ; 006 *\r\n01007\trom 5                    ; 007 x!=y\r\n01010\tgoto 01347               ; 010 g\r\n01011\tgoto 01342               ; 011 R^\r\n01012\tgoto 01347               ; 012 RCL\r\n01013\tgoto 01347               ; 013 STO\r\n01014\tgoto 01347               ; 014 f-1\r\n01015\tgoto 01215               ; 015 Rv\r\n01016\tgoto 01347               ; 016 f\r\n01017\tgoto 01360               ; 017 RCL 8\r\n01020\tgoto 01360               ; 020 RCL 7\r\n01021\tgoto 01322               ; 021 x&lt;-&gt;y\r\n01022\trom 5                    ; 022 6\r\n01023\trom 5                    ; 023 5\r\n01024\trom 5                    ; 024 4\r\n01025\tgoto 01360               ; 025 RCL 6\r\n01026\tgoto 01311               ; 026 &plus;\r\n01027\tgoto 01360               ; 027 RCL 4\r\n01030\tgoto 01351               ; 030 E\r\n01031\trom 5                    ; 031 x==y\r\n01032\tgoto 01351               ; 032 D\r\n01033\tgoto 01351               ; 033 C\r\n01034\tgoto 01351               ; 034 B\r\n01035\tgoto 01360               ; 035 RCL 5\r\n01036\tgoto 01351               ; 036 A\r\n01037\tgoto 01360               ; 037 RCL 3\r\n01040\tgoto 01360               ; 040 RCL 2\r\n01041\tgoto 01360               ; 041 RCL 1\r\n01042\tgoto 01101               ; 042 R\/S\r\n01043\tgoto 01271               ; 043 .\r\n01044\trom 5                    ; 044 0\r\n01045\tgoto 01360               ; 045 STO 7\r\n01046\tgoto 01307               ; 046 \/\r\n01047\trom 1                    ; 047 (rsvd)\r\n01050\tgoto 01347               ; 050 (rsvd)\r\n01051\trom 5                    ; 051 x&gt;y\r\n01052\tgoto 01347               ; 052 RTN\r\n01053\tgoto 01347               ; 053 LBL\r\n01054\tgoto 01347               ; 054 GTO\r\n01055\tgoto 01360               ; 055 STO 5\r\n01056\tgoto 01347               ; 056 DSP\r\n01057\tgoto 01360               ; 057 STO 3\r\n01060\tgoto 01360               ; 060 STO 2\r\n01061\tgoto 01360               ; 061 STO 1\r\n01062\trom 5                    ; 062 9\r\n01063\trom 5                    ; 063 8\r\n01064\trom 5                    ; 064 7\r\n01065\tgoto 01360               ; 065 STO 8\r\n01066\tgoto 01312               ; 066 -\r\n01067\trom 5                    ; 067 x&lt;=y\r\n01070\tgoto 01234               ; 070 CLx\r\n01071\tno operation             ; 071 (ptr2)\r\n01072\tgoto 01277               ; 072 EEX\r\n01073\tgoto 01375               ; 073 CHS\r\n01074\trom 0                    ; 074 LSTx\r\n01075\tno operation             ; 075 (ptr1)\r\n01076\tgoto 01047               ; 076 ENTER\r\n01077\tc &lt;-&gt; m                  ; 077 (begin)\r\n<\/pre>\n<p>How does it get to this table? See <a href=\"http:\/\/www.sydneysmith.com\/wordpress\/1398\/hp-65-key-press-routine\/\">HP-65 Key Press Routine<\/a>.<\/p>\n","protected":false},"excerpt":{"rendered":"<p>When the HP-65 runs program steps it gets a program code (0-63) from program memory and then does something depending on the program code.<\/p>\n","protected":false},"author":3,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":[],"categories":[16,5,39],"tags":[37,32],"_links":{"self":[{"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/posts\/1383"}],"collection":[{"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/comments?post=1383"}],"version-history":[{"count":2,"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/posts\/1383\/revisions"}],"predecessor-version":[{"id":1401,"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/posts\/1383\/revisions\/1401"}],"wp:attachment":[{"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/media?parent=1383"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/categories?post=1383"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.sydneysmith.com\/wordpress\/wp-json\/wp\/v2\/tags?post=1383"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}