senior_falcon Posted April 24 Share Posted April 24 13 hours ago, Vorticon said: When I initially tried it, the computer crashed until I realized the radians conversion was incorrect. So odd you're getting a usable output... Don't know why it would not work for you. I just copied and pasted the code above and it works fine. Quote Link to comment Share on other sites More sharing options...
+Vorticon Posted April 24 Share Posted April 24 48 minutes ago, senior_falcon said: Don't know why it would not work for you. I just copied and pasted the code above and it works fine. You mean the pascal code I posted? That has the corrected randians conversion. Quote Link to comment Share on other sites More sharing options...
senior_falcon Posted April 24 Share Posted April 24 (edited) 1 hour ago, Vorticon said: You mean the pascal code I posted? That has the corrected randians conversion. No, the XB/TML code with the error that I posted that you said crashed the computer. Here is the program modified to avoid having to use COS. This is compiled and you can see it is a bit less leisurely.This is running at normal speed, not CPU overdrive. But of course, although it works the same, it is no longer the same program. 100 DIM SINE(11) 110 FOR I=1 TO 11 :: READ SINE(I):: NEXT I 120 CALL SCREEN(2):: PD=1 130 A=0 135 IF PD=1 THEN CALL LINK("PENHUE",3+INT(RND*14),2) 140 FOR I=1 TO 11 150 CALL LINK("PUTPEN",100,120,A) 160 W=A/180*SINE(I) 170 R=9+A/18 180 CALL LINK("PU"):: CALL LINK("FWD",R-W/200) 190 IF PD=1 THEN CALL LINK("PD")ELSE CALL LINK("PE") 195 CALL LINK("FWD",W/100) 200 A=A+3 :: IF A>1453 THEN 230 210 NEXT I :: GOTO 140 230 PD=PD+1 :: PD=PD AND 1 :: GOTO 130 240 DATA 0,51,97,136,164,178,178,164,136,97,51,0 Edited April 24 by senior_falcon 7 Quote Link to comment Share on other sites More sharing options...
+Vorticon Posted April 24 Share Posted April 24 Quite impressive I have to say. Your compiler has been a boon to program development in XB on the TI as demonstrated by the sheer number and quality of new games developed with it by the likes of @Retrospect and @Cheung among others. 3 1 Quote Link to comment Share on other sites More sharing options...
+Vorticon Posted April 27 Share Posted April 27 Was there a keyboard strip made for the p-system? 1 Quote Link to comment Share on other sites More sharing options...
apersson850 Posted April 27 Author Share Posted April 27 (edited) Yes, there was. It shows that the FCTN-keys 1 to 9 have these definitions: DEL, INS, FLUSH, BREAK, STOP, ALPHA LOCK, SCREEN LEFT, SCREEN RIGHT, LINE DELETE. As you can see there's an ALPHA LOCK key too. It's redundant on the TI 99/4A, but was there to allow both upper and lower case on the 99/4. Since the p-system loads all character definitions from the file OS:SYSTEM.CHARAC at startup, it doesn't care which definitions are in the ROM chips in the console. Edited April 28 by apersson850 5 1 Quote Link to comment Share on other sites More sharing options...
+Vorticon Posted April 29 Share Posted April 29 I have a bunch of blank strips, so I'm going to make one 🙂 Aside from the function keys, any control keys were listed on the strip as well? Quote Link to comment Share on other sites More sharing options...
apersson850 Posted April 29 Author Share Posted April 29 No, the control keys used by the p-system according to the default key configuration setup are <ext>, <esc> and <tab>, neither of which are mapped to any number key. 2 Quote Link to comment Share on other sites More sharing options...
+Vorticon Posted April 30 Share Posted April 30 Not bad... 4 Quote Link to comment Share on other sites More sharing options...
apersson850 Posted April 30 Author Share Posted April 30 The left part looks more or less identical to the original. Good artwork! 1 Quote Link to comment Share on other sites More sharing options...
+Ksarul Posted Wednesday at 04:31 AM Share Posted Wednesday at 04:31 AM On 4/29/2024 at 11:59 PM, Vorticon said: Not bad... Here are fully functionl versions of the p-Code strip in both possible /4A formats. . .this is actually one of the harder TI keystrips to find as an original. They turn up once in a while, but nowhere near as often as the other TI-sourced keystrips. 4 1 Quote Link to comment Share on other sites More sharing options...
+Vorticon Posted Wednesday at 05:52 AM Share Posted Wednesday at 05:52 AM Thanks! Looks like I inverted the Del and Ins locations. I'll see if I can get a closer replica made. Quote Link to comment Share on other sites More sharing options...
apersson850 Posted Wednesday at 07:03 AM Author Share Posted Wednesday at 07:03 AM Yes, but I didn't notice that immediately either. They are used when you do an eXchange in the editor. Quote Link to comment Share on other sites More sharing options...
jschultzpedersen Posted Wednesday at 07:48 AM Share Posted Wednesday at 07:48 AM Thanks. This is working well, when printed to thick paper, too. I just had to rescale the print slightly to make an image in Paint, that fits perfectly on the TI99. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.