(05-05-2019 04:51 AM)Ángel Martin Wrote: Can you post the complete code here? There seem to be missing steps in the reference, like steps 101 and 111 are nowhere to be found?
Merci bien,
ÁM
OK!
Code:
001 LBL A 011 CF 3 021 3 031 RND 041 GTO 9 051 + 061 STO-3 071 1 081 7 091 LBL 8
002 STO 5 012 GSB E 022 / 032 1 042 LBL 8 052 1 062 RCL 4 072 3 082 GSB 4 092 GSB 2
003 6 013 1 023 ENTER 033 - 043 GSB 1 053 0 063 2 073 GSB 3 083 STO-2 093 GTO 9
004 0 014 - 024 INT 034 STO+0 044 GSB 2 054 / 064 3 074 2 084 RCL 4 094 LBL 3
005 STO I 015 x<0? 025 1 035 X<>Y 045 X<>Y 055 STO 4 065 GSB 3 075 7 085 3 095 x<=y?
006 GRAD 016 GTO 9 026 - 036 STO+1 046 4 056 3 066 3 076 GSB 4 086 3 096 SF 0
007 GSB 0 017 9 027 X<>Y 037 GTO 8 047 0 057 GSB 3 067 7 077 STO+2 087 x>y? 097 RCL 4
008 GSB 1 018 x<=y? 028 FRAC 038 LBL 9 048 0 058 1 068 GSB 4 078 RCL 4 088 GTO 8 098 RTN
009 GSB 2 019 GTO 9 029 3 039 DSP 0 049 X<>Y 059 7 069 STO+3 079 0 089 1 099 LBL 4
010 LBL 9 020 X<>Y 030 * 040 5 050 x<0? 060 GSB 4 070 RCL 4 080 GSB 3 090 STO-2 100 x>y?
101 SF 1 111 FS? 1 121 FIX 131 1 141 LBL 2 151 DSP 3 161 * 171 PI 181 FRAC 191 -
102 0 112 GTO 5 122 DSP 1 132 0 142 RCL 3 152 FIX 162 GSB 6 172 x^2 182 8 192 1/x
103 GSB 5 113 CF 0 123 8 133 / 143 RCL 1 153 PAUSE 163 STO 3 173 e^x 183 * 193 LBL E
104 RTN 114 RTN 124 RCL 0 134 + 144 - 154 RTN 164 RCL 5 174 * 184 INT 194 SCI
105 LBL 5 115 LBL 5 125 GSB 7 135 PAUSE 145 RCL 2 155 LBL 0 165 PI 175 GSB 6 185 RTN 195 DSP 3
106 FS? 0 116 CF 0 126 8 136 x#0? 146 RCL 0 156 RCL 5 166 e^x 176 STO 1 186 LBL 7 196 FS? 3
107 GTO 5 117 CF 1 127 RCL 1 137 RTN 147 - 157 GSB 6 167 * 177 RTN 187 x<0? 197 RTN
108 CF 1 118 1 128 GSB 7 138 FIX 148 ->P 158 STO 2 168 GSB 6 178 LBL 6 188 SQR x 198 DSZ I
109 RTN 119 RTN 129 X<>Y 139 - x - 149 x=0? 159 RCL 5 169 STO 0 179 8 189 x#y? 199 GTO 0
110 LBL 5 120 LBL 1 130 Rd 140 R/S 150 1/x 160 PI 170 RCL 5 180 / 190 RTN 200 RCL I
201 1/x 211 GTO E ---------------------------------------------------------------------------------------------
202 LBL 0 | Reg. I : temps (s.) | LBL 0 : Routine d'affectation positions J & A, entre autres |
203 RCL I | Reg. 0 : Xj | LBL 1 : Routine de visualisation position J |
204 10^x | Reg. 1 : Yj | LBL 2 : Routine de visualisation distance AJ |
205 * | Reg. 2 : Xa | LBL 3 & 4 : Routines d'économie (voir LBL 8) |
206 PAUSE | Reg. 3 : Ya | LBL 5 : Routines de déplacement A |
207 FS? 3 | Reg. 4 : angle | LBL 6 : Routine d'économie (voir LBL 0) |
208 RTN | Reg. 5 : graine | LBL 7 : Routine d'économie (voir LBL 1) |
209 LAST x | | LBL 8 : Routine de détermination angulaire |
210 / | | LBL 9 : Routine d'interprétation clavier |
| | LBL E : Routine d'interfaçage clavier |
|-------------------------------------------------------------------------------------------|
BEST!
SlideRule