Post Reply 
Set theory program for hp prime?
09-30-2022, 04:17 PM
Post: #7
RE: Set theory program for hp prime?
(09-30-2022 03:57 PM)DrEureka Wrote:  
(09-30-2022 03:15 PM)matalog Wrote:  Do you just mean the Venn diagrams?

If so then you could use something like this, although I really hope there is a better way.

Code:
EXPORT RQST()
BEGIN
FOR Y FROM 0 TO 239 DO
FOR X FROM 0 TO 319 DO
IF (X-120)^2+(Y-120)^2<80^2 THEN
PIXON_P(X,Y,RGB(255,0,0));
END;
IF (X-180)^2+(Y-120)^2<80^2 THEN
PIXON_P(X,Y,RGB(0,255,0));
END;
 
IF (X-180)^2+(Y-120)^2<80^2 AND (X-120)^2+(Y-120)^2<80^2 THEN
PIXON_P(X,Y,RGB(0,0,255));
END;
 
  
END;

END;

END;
I'll check it out, thank you very much. yes from venn diagram


This is a little more optimised, but there must be a much faster way of doing it:

Code:
EXPORT RQST()
BEGIN
LOCAL R=80^2;
LOCAL S:=0;
LOCAL T:=0;
LOCAL U:=0;
FOR Y FROM 0 TO 239 DO
U:=(Y-120)^2;
FOR X FROM 0 TO 319 DO
S:=(X-120)^2+U<R;
T:=(X-180)^2+U<R;
IF S THEN
PIXON_P(X,Y,RGB(255,0,0));
END;
IF T THEN
PIXON_P(X,Y,RGB(0,255,0));
END;
IF S AND T THEN
PIXON_P(X,Y,RGB(0,0,255));
END;

END;
END;
END;
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: Set theory program for hp prime? - matalog - 09-30-2022 04:17 PM



User(s) browsing this thread: