First issue

2019-09-01 18:11:29 +02:00
commit 39ee11b688
12 changed files with 1534 additions and 0 deletions
--- a/originals/res-c.hp42s
+++ b/originals/res-c.hp42s
@@ -0,0 +1,63 @@
+00 { 143-Byte Prgm }
+01 LBL "RES-C"
+02 X≤0?
+03 GTO 11
+04 CLA
+05 ENTER
+06 ENTER
+07 LOG
+08 IP
+09 1
+10 -
+11 STO ST Z
+12 10↑X
+13 ÷
+14 10
+15 ÷
+16 IP
+17 XEQ IND ST X
+18 ⊢" "
+19 R↓
+20 LASTX
+21 FP
+22 10
+23 ×
+24 XEQ IND ST X
+25 ⊢" "
+26 XEQ IND ST Y
+27 R↑
+28 GTO 10
+29 LBL 00
+30 ⊢"BLACK"
+31 RTN
+32 LBL 01
+33 ⊢"BROWN"
+34 RTN
+35 LBL 02
+36 ⊢"RED"
+37 RTN
+38 LBL 03
+39 ⊢"ORANGE"
+40 RTN
+41 LBL 04
+42 ⊢"YELLOW"
+43 RTN
+44 LBL 05
+45 ⊢"GREEN"
+46 RTN
+47 LBL 06
+48 ⊢"BLUE"
+49 RTN
+50 LBL 07
+51 ⊢"VIOLET"
+52 RTN
+53 LBL 08
+54 ⊢"GREY"
+55 RTN
+56 LBL 09
+57 ⊢"WHITE"
+58 RTN
+59 LBL 10
+60 AVIEW
+61 LBL 11
+62 END