HP Forums
newbie and coding help needed - Printable Version

+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Calculators (and very old HP Computers) (/forum-3.html)
+--- Forum: General Forum (/forum-4.html)
+--- Thread: newbie and coding help needed (/thread-12258.html)



newbie and coding help needed - railwayman - 01-23-2019 08:36 PM

Hi guys,

Nice to be here. I am an engineer and PhD student from Manchester UK, having fun with DM42. I had 42s few years ago but I sold it and cannot regret it. However, hope to hve good fun here.

I am playing with coding. I am about the make pixel drawing program which I called D.raw Smile With DM42 capablitities to print to image, it could be interesting.

For now I have a cursor/pointer, which I can move around. I would like to use keys "PUT" to put pixel and "DEL" to delete pixel from particular location. But I have no idea how to do that. I am playing with flags 34 and 35 but does not work. So I need your help.

[Image: 9YaPqe8.png]

CODE:


00 { 174-Byte Prgm }
01▸LBL "DRAW"
02 INPUT "X"
03 STO "X"
04 INPUT "Y"
05 STO "Y"
06▸LBL "MAIN"
07 "←"
08 KEY 1 XEQ "ML"
09 "→"
10 KEY 6 XEQ "MR"
11 "↑"
12 KEY 2 XEQ "MU"
13 "↓"
14 KEY 5 XEQ "MD"
15 "PUT"
16 KEY 4 XEQ "PUT"
17 "DEL"
18 KEY 3 XEQ "DEL"
19 MENU
20 STOP
21 XEQ "XS"
22 GTO "MAIN"
23 RTN
24▸LBL "MR"
25 RCL "Y"
26 1
27 +
28 STO "Y"
29 RTN
30▸LBL "MD"
31 RCL "X"
32 1
33 +
34 STO "X"
35 RTN
36▸LBL "ML"
37 RCL "Y"
38 1
39 -
40 STO "Y"
41 RTN
42▸LBL "MU"
43 RCL "X"
44 1
45 -
46 STO "X"
47▸LBL "XS"
48 RCL "X"
49 ENTER
50 RCL "Y"
51 "μ←←←•"
52 AGRAPH
53 .END.

Thanks


RE: newbie and coding help needed - pier4r - 01-24-2019 02:02 PM

This other forum may help too https://forum.swissmicros.com


RE: newbie and coding help needed - Massimo Gnerucci - 01-24-2019 03:34 PM

Goran also asked for help on Facebook.