1
0
Fork 0

Remove Line-Nr und Header

from txt files. The Encoder will add them and it messes up version
management.
This commit is contained in:
Joerg Elfring 2019-11-20 19:14:34 +01:00
parent edec3000d2
commit 61789cb41f
9 changed files with 357 additions and 366 deletions

View file

@ -1,75 +1,74 @@
00 { 181-Byte Prgm }
01▸LBL "BASE"
02▸LBL 00
03 255
04 AND
05 STO "WORD"
06 CLMENU
07 "ASCII"
08 KEY 1 XEQ 01
09 "HEX"
10 KEY 2 XEQ 02
11 "DEC"
12 KEY 3 XEQ 03
13 "BIN"
14 KEY 4 XEQ 04
15 KEY 9 GTO 09
16 " "
17 XTOA
18 10
19 X<>Y
20 X=Y?
21 "LF"
22 ├" "
23 256
24 +
25 HEXM
26 ARCL ST X
27 ├" "
28 744
29 +
30 AIP
31 ├" "
32 LASTX
33 -
34 BINM
35 ARCL ST X
36 4
37 AROT
38 ATOX
39 4
40 AROT
41 ATOX
42 5
43 AROT
44 ATOX
45 8
46 AROT
47 AVIEW
48 MENU
49 RCL "WORD"
50 STOP
51 GTO 00
52▸LBL 01
53 CLA
54 RCL "WORD"
55 XTOA
56 AON
57 STOP
58 AOFF
59 ATOX
60 RTN
61▸LBL 02
62 HEXM
63 GTO 05
64▸LBL 03
65 DECM
66 GTO 05
67▸LBL 04
68 BINM
69▸LBL 05
70 INPUT "WORD"
71 RTN
72▸LBL 09
73 EXITALL
74 END
LBL "BASE"
LBL 00
255
AND
STO "WORD"
CLMENU
"ASCII"
KEY 1 XEQ 01
"HEX"
KEY 2 XEQ 02
"DEC"
KEY 3 XEQ 03
"BIN"
KEY 4 XEQ 04
KEY 9 GTO 09
" "
XTOA
10
X<>Y
X=Y?
"LF"
├" "
256
+
HEXM
ARCL ST X
├" "
744
+
AIP
├" "
LASTX
-
BINM
ARCL ST X
4
AROT
ATOX
4
AROT
ATOX
5
AROT
ATOX
8
AROT
AVIEW
MENU
RCL "WORD"
STOP
GTO 00
LBL 01
CLA
RCL "WORD"
XTOA
AON
STOP
AOFF
ATOX
RTN
LBL 02
HEXM
GTO 05
LBL 03
DECM
GTO 05
LBL 04
BINM
LBL 05
INPUT "WORD"
RTN
LBL 09
EXITALL
END

View file

@ -1,25 +1,24 @@
00 { 93-Byte Prgm }
01▸LBL "GFWtr"
02 INPUT "Asslg l"
03 INPUT "Malz kg"
04 2.7
05 ×
06 3.5
07 +
08 STO 01
09 RCL "Asslg l"
10 5
11 +
12 RCL 01
13 -
14 RCL "Malz kg"
15 0.8
16 ×
17 +
18 STO 02
19 "H Guss: "
20 ARCL 01
21 ├"[LF]N Guss: "
22 ARCL 02
23 AVIEW
24 END
LBL "GFWtr"
INPUT "Asslg l"
INPUT "Malz kg"
2.7
×
3.5
+
STO 01
RCL "Asslg l"
5
+
RCL 01
-
RCL "Malz kg"
0.8
×
+
STO 02
"H Guss: "
ARCL 01
├"[LF]N Guss: "
ARCL 02
AVIEW
END

View file

@ -1,22 +1,21 @@
00 { 77-Byte Prgm }
01▸LBL "SPND"
02 MVAR "bar"
03 MVAR "°C"
04 MVAR "g/l"
05 2617.25
06 273.15
07 RCL "°C"
08 +
09 ÷
10 10.73797
11 -
12 E↑X
13 RCL "bar"
14 1.013
15 +
16 ×
17 10
18 ×
19 RCL "g/l"
20 -
21 END
LBL "SPND"
MVAR "bar"
MVAR "°C"
MVAR "g/l"
2617.25
273.15
RCL "°C"
+
÷
10.73797
-
E↑X
RCL "bar"
1.013
+
×
10
×
RCL "g/l"
-
END

View file

@ -1,25 +1,24 @@
00 { 64-Byte Prgm }
01▸LBL "MOD"
02 100
03 ÷
04 STO 01
05 1.4
06 RCL 01
07 ÷
08 1
09 -
10 10
11 ×
12 "MOD1,4= "
13 ARCL ST X
14 1.6
15 RCL 01
16 ÷
17 1
18 -
19 10
20 ×
21 ├"[LF]MOD1,6= "
22 ARCL ST X
23 AVIEW
24 END
LBL "MOD"
100
÷
STO 01
1.4
RCL 01
÷
1
-
10
×
"MOD1,4= "
ARCL ST X
1.6
RCL 01
÷
1
-
10
×
├"[LF]MOD1,6= "
ARCL ST X
AVIEW
END

View file

@ -1,18 +1,17 @@
00 { 46-Byte Prgm }
01▸LBL "NTRX"
02 MVAR "D"
03 MVAR "Pp"
04 MVAR "EAN"
05 RCL "D"
06 10
07 ÷
08 1
09 +
10 RCL "EAN"
11 100
12 ÷
13 ×
14 RCL "Pp"
15 -
16 END
LBL "NTRX"
MVAR "D"
MVAR "Pp"
MVAR "EAN"
RCL "D"
10
÷
1
+
RCL "EAN"
100
÷
×
RCL "Pp"
-
END

View file

@ -1,44 +1,43 @@
00 { 133-Byte Prgm }
01▸LBL "MWVE"
02 INPUT "Watt"
03 INPUT "Zeit"
04 →HR
05 STO "Zeit"
06 100
07 STO 00
08 RCL "Watt"
09 270
10 X≤Y?
11 STO 00
12 RCL "Watt"
13 300
14 X≤Y?
15 STO 00
16 RCL "Watt"
17 440
18 X≤Y?
19 STO 00
20 RCL "Watt"
21 600
22 X≤Y?
23 STO 00
24 RCL "Watt"
25 950
26 X≤Y?
27 STO 00
28 RCL "Watt"
29 RCL 00
30 ÷
31 RCL "Zeit"
32 ×
33 "t= "
34 →HMS
35 0.01
36 ×
37 ATIME
38 RCL 00
39 ├"[LF]P= "
40 AIP
41 ├"W"
42 AVIEW
43 END
LBL "MWVE"
INPUT "Watt"
INPUT "Zeit"
→HR
STO "Zeit"
100
STO 00
RCL "Watt"
270
X≤Y?
STO 00
RCL "Watt"
300
X≤Y?
STO 00
RCL "Watt"
440
X≤Y?
STO 00
RCL "Watt"
600
X≤Y?
STO 00
RCL "Watt"
950
X≤Y?
STO 00
RCL "Watt"
RCL 00
÷
RCL "Zeit"
×
"t= "
→HMS
0.01
×
ATIME
RCL 00
├"[LF]P= "
AIP
├"W"
AVIEW
END

View file

@ -1,20 +1,19 @@
00 { 35-Byte Prgm }
01▸LBL "SPLIT"
02 STO "m"
03 RSUM
04 DET
05 STO 01
06 RCL "m"
07 DIM?
08 RCL 01
09 X<>Y
10 ÷
11 STO 02
12 RCL 01
13 X<>Y
14 RCL "m"
15 X<>Y
16 -
17 RCL 02
18 X<>Y
19 END
LBL "SPLIT"
STO "m"
RSUM
DET
STO 01
RCL "m"
DIM?
RCL 01
X<>Y
÷
STO 02
RCL 01
X<>Y
RCL "m"
X<>Y
-
RCL 02
X<>Y
END

View file

@ -1,18 +1,17 @@
00 { 40-Byte Prgm }
01▸LBL "ΣnCk"
02 0
03 STO 00
04 INPUT "n"
05 INPUT "k"
06▸LBL 06
07 RCL "n"
08 RCL "k"
09 COMB
10 STO+ 00
11 1
12 STO- "k"
13 RCL "k"
14 X>0?
15 GTO 06
16 RCL 00
17 END
LBL "ΣnCk"
0
STO 00
INPUT "n"
INPUT "k"
LBL 06
RCL "n"
RCL "k"
COMB
STO+ 00
1
STO- "k"
RCL "k"
X>0?
GTO 06
RCL 00
END

View file

@ -1,120 +1,119 @@
00 { 359-Byte Prgm }
01▸LBL "VirtV"
02▸LBL A
03 "DevID"
04 KEY 1 XEQ 01
05 "GrMod"
06 KEY 2 XEQ 02
07 "ResX"
08 KEY 3 XEQ 03
09 "ResY"
10 KEY 4 XEQ 04
11 "Vbat"
12 KEY 5 XEQ 05
13 "RefLCD"
14 KEY 6 XEQ 06
15 KEY 7 GTO B
16 KEY 8 GTO B
17 KEY 9 GTO 09
18 MENU
19 STOP
20 GTO A
21▸LBL 09
22 RTN
23▸LBL B
24 RCL "GrMod"
25 "HP"
26 X=0?
27 ├"•"
28 KEY 1 GTO 11
29 "200"
30 2
31 -
32 X=0?
33 ├"•"
34 KEY 2 GTO 12
35 1
36 -
37 "400"
38 X=0?
39 ├"•"
40 KEY 3 GTO 13
41 1
42 RCL "RefLCD"
43 AND
44 "Main"
45 X≠0?
46 ├"•"
47 KEY 4 GTO 14
48 RCL "RefLCD"
49 2
50 AND
51 "Goos"
52 X≠0?
53 ├"•"
54 KEY 5 GTO 15
55 RCL "RefLCD"
56 4
57 AND
58 "Ann"
59 X≠0?
60 ├"•"
61 KEY 6 GTO 16
62 KEY 7 GTO A
63 KEY 8 GTO A
64 KEY 9 GTO 09
65 MENU
66 STOP
67 RTN
68▸LBL 01
69 "DevID"
70 GTO 00
71▸LBL 02
72 "GrMod"
73 GTO 00
74▸LBL 03
75 "ResX"
76 GTO 00
77▸LBL 04
78 "ResY"
79 GTO 00
80▸LBL 05
81 "Vbat"
82 GTO 00
83▸LBL 06
84 "RefLCD"
85▸LBL 00
86 ASTO ST L
87 FS?C 22
88 STO IND ST L
89 CLX
90 RCL IND ST L
91 ├"="
92 ARCL ST X
93 AVIEW
94 RTN
95▸LBL 11
96 CLX
97▸LBL 10
98 STO "GrMod"
99 GTO B
100▸LBL 12
101 2
102 GTO 10
103▸LBL 13
104 3
105 GTO 10
106▸LBL 14
107 1
108▸LBL 17
109 RCL "RefLCD"
110 XOR
111 STO "RefLCD"
112 GTO B
113▸LBL 15
114 2
115 GTO 17
116▸LBL 16
117 4
118 GTO 17
119 END
LBL "VirtV"
LBL A
"DevID"
KEY 1 XEQ 01
"GrMod"
KEY 2 XEQ 02
"ResX"
KEY 3 XEQ 03
"ResY"
KEY 4 XEQ 04
"Vbat"
KEY 5 XEQ 05
"RefLCD"
KEY 6 XEQ 06
KEY 7 GTO B
KEY 8 GTO B
KEY 9 GTO 09
MENU
STOP
GTO A
LBL 09
RTN
LBL B
RCL "GrMod"
"HP"
X=0?
├"•"
KEY 1 GTO 11
"200"
2
-
X=0?
├"•"
KEY 2 GTO 12
1
-
"400"
X=0?
├"•"
KEY 3 GTO 13
1
RCL "RefLCD"
AND
"Main"
X≠0?
├"•"
KEY 4 GTO 14
RCL "RefLCD"
2
AND
"Goos"
X≠0?
├"•"
KEY 5 GTO 15
RCL "RefLCD"
4
AND
"Ann"
X≠0?
├"•"
KEY 6 GTO 16
KEY 7 GTO A
KEY 8 GTO A
KEY 9 GTO 09
MENU
STOP
RTN
LBL 01
"DevID"
GTO 00
LBL 02
"GrMod"
GTO 00
LBL 03
"ResX"
GTO 00
LBL 04
"ResY"
GTO 00
LBL 05
"Vbat"
GTO 00
LBL 06
"RefLCD"
LBL 00
ASTO ST L
FS?C 22
STO IND ST L
CLX
RCL IND ST L
├"="
ARCL ST X
AVIEW
RTN
LBL 11
CLX
LBL 10
STO "GrMod"
GTO B
LBL 12
2
GTO 10
LBL 13
3
GTO 10
LBL 14
1
LBL 17
RCL "RefLCD"
XOR
STO "RefLCD"
GTO B
LBL 15
2
GTO 17
LBL 16
4
GTO 17
END