0 Members and 1 Guest are viewing this topic.
KEY K_Home()BEGIN IF Entry==2 THEN Entry:=0; ELSE Entry:=2; END; STARTVIEW(-8,0); STARTVIEW(-1,1); RETURN 5;END;
Solution: Do not connect the cable for god's sake! I mean, obviously the link activity is interacting with the foreground job. There should be a programmatic way to prevent it.Nice ad, btw.
HP Prime - This is ridiculousMessage #1 Posted by Michael de Estrada on 25 Nov 2013, 2:25 p.m.For the third time I've had to re-format the flash drive on the Prime to recover the OS. This time the settings screens locked up and I couldn't make any changes. When I did the restore from my pc with the connectivity kit, I got the old Apps key reboot routine, so I had to re-format again. Next I transferred some programs from my Emulator to the Prime, but the Apps transfer caused memory to explode, so I'll have to type them all back in on the Prime, which I'm not about to do.But it gets better, since now programs that used to work no longer do, despite all settings being the same. CAS solve won't work in a program despite working fine previously, so basically the program is now worthless.In short, this calculator is a nightmare, and possibly the worst product ever to wear the hp logo. I may continue working with the Emulator, but the physical Prime is going into permanent storage.
This one's more a suggestion than a bug: Despite being in CAS mode, using the Define box only creates 'normal' functions, not xcas ones.Another bug: This program errors with "Invalid input" when I hit ENTER, yet works fine in debug mode:Code: [Select]EXPORT CURSOR()BEGINLOCAL X,Y,K,C,P;0▶X;0▶Y;0▶P;WHILE 1 DO //WAIT()▶K; WAIT(.05); IF ISKEYDOWN(4) THEN RETURN {X,Y}; END; IF ISKEYDOWN(2) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); Y-1▶Y; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(12) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); Y+1▶Y; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(7) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); X-1▶X; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(8) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); X+1▶X; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(30) THEN REPEAT MOUSE()▶P; P[1]▶P; UNTIL P[5]==#1; B→R(P[1])▶X; B→R(P[2])▶Y; END; END; END;END;
EXPORT CURSOR()BEGINLOCAL X,Y,K,C,P;0▶X;0▶Y;0▶P;WHILE 1 DO //WAIT()▶K; WAIT(.05); IF ISKEYDOWN(4) THEN RETURN {X,Y}; END; IF ISKEYDOWN(2) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); Y-1▶Y; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(12) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); Y+1▶Y; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(7) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); X-1▶X; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(8) THEN GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); X+1▶X; GETPIX_P(G0,X,Y)▶C; BITNOT(C)▶C; PIXON_P(G0,X,Y,C); END; IF ISKEYDOWN(30) THEN REPEAT MOUSE()▶P; P[1]▶P; UNTIL P[5]==#1; B→R(P[1])▶X; B→R(P[2])▶Y; END; END; END;END;