High-Resolution Plot

The Beta programme is where a device becomes fully formed. If you have any suggestions for features to integrate into the DM41X then feel free to make them here. We can't guarantee that they'll all end up in the final product but we'll certainly consider all sensible proposals.
Ángel Martin
Posts: 145
Joined: Mon Apr 24, 2017 8:19 pm

High-Resolution Plot

Post by Ángel Martin »

Not sure if my IR printer is misbehavin' or the program has issues... just dug it up from a heap of very old & forgotten listings, maybe somebody can take it for a spin with a validated printer...

Code: Select all

1	LBL "PLOT"
2	"F. NAME ?"
3	AON
4	PROMPT
5	ASTO 20
6	AOFF
7	"X INIT=?"
8	PROMPT
9	STO 14
10	"“X END=?"
11	PROMPT
12	STO 16
13	"Y MAX=?"
14	PROMPT
15	STO 10
16	STO 01
17	"Y MIN=?"
18	PROMPT
19	STO 11
20	STO 00
21	-
22	133
23	/
24	STO 12
25	LBL E
26	"X INC=?"
27	PROMPT
28	STO 13
29	"X AXIS=?"
30	PROMPT
31	STO 04
32	LBL "PLOTP"
33	RCL 04
34	RCL 11
35	-
36	RCL 12
37	/
38	,5
39	+
40	INT
41	,127
42	+
43	STO 18
44	ADV
45	"      PLOT OF "
46	ARCL 20
47	PRA
48	"   X <UNITS= 1"
49	>",> "
50	ACA
51	7
52	ACCHR
53	PRBUF
54	133
55	STO 02
56	XROM "PRAXIS"
57	RCL 16
58	ABS
59	RCL 14
60	ABS
61	X<Y?
62	X<>Y
63	LOG
64	INT
65	2
66	-
67	CHS
68	FIX IND X
69	LBL A
70	,006
71	STO 15
72	RCL 18
73	STO 07
74	LBL 01
75	RCL 14
76	XEQ IND 20
77	RCL 11
78	-
79	RCL 12
80	/
81	INT
82	2
83	RCL 15
84	INT
85	Y^X
86	 E-3
87	*
88	+
89	STO IND 15
90	RCL 13
91	ST+ 14
92	ISG 15
93	GTO 01
94	4
95	*
96	ST+ 14
97	XEQ D
98	RCL 16
99	RCL 14
100	X<=Y?
101	GTO A
102	RTN
103	LBL D
104	SF 00
105	,006
106	STO 08
107	LBL 21
108	RCL 08
109	1,001
110	+
111	STO 09
112	RCL 08
113	RCL IND 08
114	LBL 22
115	RCL IND 09
116	X>Y?
117	GTO 23
118	RCL 09
119	X<>Y
120	ENTER^
121	LBL 23
122	RDN
123	ISG 09
124	GTO 22
125	RCL IND 08
126	STO IND Z
127	RDN
128	STO IND 08
129	ISG 08
130	GTO 21
131	CF 00
132	CLX
133	STO 08
134	STO 17
135	,007
136	STO 15
137	RCL 14
138	RCL 13
139	11
140	*
141	-
142	ACX
143	LBL 11
144	RCL 15
145	 E
146	+
147	STO 19
148	RCL IND 15
149	STO 09
150	INT
151	LBL 12
152	RCL IND 19
153	INT
154	X#Y?
155	GTO 13
156	LASTX
157	FRC
158	ST+ 09
159	RDN
160	 E
161	ST+ 15
162	RDN
163	ISG 19
164	GTO 12
165	LBL 13
166	RCL IND 15
167	INT
168	RCL 17
169	-
170	ST+ 17
171	 E
172	-
173	SKPCOL
174	RCL 09
175	FRC
176	 E3
177	*
178	127
179	X<Y?
180	X<>Y
181	X<>Y
182	ACCOL
183	ISG 15
184	GTO 11
185	132
186	RCL 17
187	-
188	E
189	-
190	SKPCOL
191	ADV
192	END
Attachments
HIGHRES.RAW
(512 Bytes) Downloaded 245 times
rprosperi
Posts: 1703
Joined: Mon Apr 24, 2017 7:48 pm
Location: New York

Re: High-Resolution Plot

Post by rprosperi »

Ángel Martin wrote:
Thu Feb 13, 2020 5:22 pm
...maybe somebody can take it for a spin with a validated printer...
Some suggestion on parameters to use would help please... I've no idea what this does
--bob p

DM42: β00071 & 00282, DM41X: β00071 & 00656, DM10L: 071/100
toml_12953
Posts: 795
Joined: Wed May 03, 2017 7:46 pm
Location: Malone, NY USA

Re: High-Resolution Plot

Post by toml_12953 »

rprosperi wrote:
Thu Feb 13, 2020 11:26 pm
Ángel Martin wrote:
Thu Feb 13, 2020 5:22 pm
...maybe somebody can take it for a spin with a validated printer...
Some suggestion on parameters to use would help please... I've no idea what this does
All I get is a DATA ERROR.
Tom L

Some people call me inept but I'm as ept as anybody!
DM10L SN: 059/100
DM41X SN: 00023 (Beta)
DM41X SN: 00506 (Shipping)
DM42 SN: 00025 (Beta)
DM42 SN: 00221 (Shipping)
WP43 SN: 00025 (Prototype)
toml_12953
Posts: 795
Joined: Wed May 03, 2017 7:46 pm
Location: Malone, NY USA

Re: High-Resolution Plot

Post by toml_12953 »

toml_12953 wrote:
Thu Feb 13, 2020 11:44 pm
rprosperi wrote:
Thu Feb 13, 2020 11:26 pm
Ángel Martin wrote:
Thu Feb 13, 2020 5:22 pm
...maybe somebody can take it for a spin with a validated printer...
Some suggestion on parameters to use would help please... I've no idea what this does
All I get is a name and labels, then the Y-axis printed and NONEXISTENT. Am I supposed to enter a function somewhere?

Ohhh! I see now. The first prompt NAME is the name of the function to be plotted.
Tom L

Some people call me inept but I'm as ept as anybody!
DM10L SN: 059/100
DM41X SN: 00023 (Beta)
DM41X SN: 00506 (Shipping)
DM42 SN: 00025 (Beta)
DM42 SN: 00221 (Shipping)
WP43 SN: 00025 (Prototype)
toml_12953
Posts: 795
Joined: Wed May 03, 2017 7:46 pm
Location: Malone, NY USA

Re: High-Resolution Plot

Post by toml_12953 »

Ángel Martin wrote:
Thu Feb 13, 2020 5:22 pm
Not sure if my IR printer is misbehavin' or the program has issues... just dug it up from a heap of very old & forgotten listings, maybe somebody can take it for a spin with a validated printer...
Now that I figured out what it's looking for it works OK on my 82240B.

The plot points look like small lines. Is this right?
Tom L

Some people call me inept but I'm as ept as anybody!
DM10L SN: 059/100
DM41X SN: 00023 (Beta)
DM41X SN: 00506 (Shipping)
DM42 SN: 00025 (Beta)
DM42 SN: 00221 (Shipping)
WP43 SN: 00025 (Prototype)
Ángel Martin
Posts: 145
Joined: Mon Apr 24, 2017 8:19 pm

Re: High-Resolution Plot

Post by Ángel Martin »

toml_12953 wrote:
Fri Feb 14, 2020 12:04 am
Now that I figured out what it's looking for it works OK on my 82240B.
The plot points look like small lines. Is this right?
it's supposed to plot the curve, so each printer head stroke needs to draw the shape of the curve in that tiny space. Try it with sin x in DEG mode between 0 and 180, increments of 5 deg...
toml_12953
Posts: 795
Joined: Wed May 03, 2017 7:46 pm
Location: Malone, NY USA

Re: High-Resolution Plot

Post by toml_12953 »

Ángel Martin wrote:
Fri Feb 14, 2020 6:55 am
toml_12953 wrote:
Fri Feb 14, 2020 12:04 am
Now that I figured out what it's looking for it works OK on my 82240B.
The plot points look like small lines. Is this right?
it's supposed to plot the curve, so each printer head stroke needs to draw the shape of the curve in that tiny space. Try it with sin x in DEG mode between 0 and 180, increments of 5 deg...
Here's what it looks like on my DM 41X. The X-Axis isn't complete:
Image
Tom L

Some people call me inept but I'm as ept as anybody!
DM10L SN: 059/100
DM41X SN: 00023 (Beta)
DM41X SN: 00506 (Shipping)
DM42 SN: 00025 (Beta)
DM42 SN: 00221 (Shipping)
WP43 SN: 00025 (Prototype)
Ángel Martin
Posts: 145
Joined: Mon Apr 24, 2017 8:19 pm

Re: High-Resolution Plot

Post by Ángel Martin »

toml_12953 wrote:
Fri Feb 14, 2020 2:14 pm
Here's what it looks like on my DM 41X. The X-Axis isn't complete:
ok, we're getting close... I'll double check the listing - thanks for doing the testing!
Ángel Martin
Posts: 145
Joined: Mon Apr 24, 2017 8:19 pm

Re: High-Resolution Plot

Post by Ángel Martin »

Ángel Martin wrote:
Fri Feb 14, 2020 2:23 pm
toml_12953 wrote:
Fri Feb 14, 2020 2:14 pm
Here's what it looks like on my DM 41X. The X-Axis isn't complete:
ok, we're getting close... I'll double check the listing - thanks for doing the testing!

That's a strange zero axis, Can you try with xmin = -0.1 and xmax = 1.1 ?
toml_12953
Posts: 795
Joined: Wed May 03, 2017 7:46 pm
Location: Malone, NY USA

Re: High-Resolution Plot

Post by toml_12953 »

Ángel Martin wrote:
Fri Feb 14, 2020 2:44 pm
Ángel Martin wrote:
Fri Feb 14, 2020 2:23 pm
toml_12953 wrote:
Fri Feb 14, 2020 2:14 pm
Here's what it looks like on my DM 41X. The X-Axis isn't complete:
ok, we're getting close... I'll double check the listing - thanks for doing the testing!

That's a strange zero axis, Can you try with xmin = -0.1 and xmax = 1.1 ?
Do you mean ymin and ymax? If so, I get a DATA ERROR after x=165. 110 is the last line printed when I do that.
Tom L

Some people call me inept but I'm as ept as anybody!
DM10L SN: 059/100
DM41X SN: 00023 (Beta)
DM41X SN: 00506 (Shipping)
DM42 SN: 00025 (Beta)
DM42 SN: 00221 (Shipping)
WP43 SN: 00025 (Prototype)
Post Reply