Post Reply 
newbie and coding help needed
01-23-2019, 08:36 PM (This post was last modified: 01-24-2019 04:12 PM by railwayman.)
Post: #1
newbie and coding help needed
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
Find all posts by this user
Quote this message in a reply
01-24-2019, 02:02 PM
Post: #2
RE: newbie and coding help needed
This other forum may help too https://forum.swissmicros.com

Wikis are great, Contribute :)
Find all posts by this user
Quote this message in a reply
01-24-2019, 03:34 PM
Post: #3
RE: newbie and coding help needed
Goran also asked for help on Facebook.

Greetings,
    Massimo

-+×÷ ↔ left is right and right is wrong
Visit this user's website Find all posts by this user
Quote this message in a reply
Post Reply 




User(s) browsing this thread: 1 Guest(s)