Vorticon

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.

You mean the pascal code I posted? That has the corrected randians conversion.

It would be good to also include UCSD Pascal in the comparison. Not sure what type of randomizer function it uses. I can help with the test code.

When I initially tried it, the computer crashed until I realized the radians conversion was incorrect. So odd you're getting a usable output...

Your values result in a nicer spiral than the ones I used. Shouldn't however line 23 be W=(A/180)*COS(A*5.5*PI/180) in order to convert the A * 5.5 to radians? I like the PUTPEN function which relocates the turtle and sets the angle all in one shot. Saves an instruction. I stole your values Takes about 1:24 to complete, so close to 50% faster than TML. Classic99 QI399.065 2024-04-22 21-39-41.mp4 program spiral; uses {$u turtleunit.code} turtlegraphics; var a, w, r : real; begin page(output); grafmode; pen_mode(none); a := 0; repeat w := (a / 180) * cos(a * 5.5 * 3.14159 / 180); turnto(round(a)); r := 9 + a / 17; moveto(127, 99); move(round(r - w)); pen_mode(draw); move(round((w * 2))); pen_mode(none); a := a + 3; until a > 1440; repeat until false; end.

Assembly I get, C not so much. Once you know assembly, you can substantially enhance straight XB programs without the need to learn another high level language.

How do you change screen color with the turtlegraphics package?

Yeah, whtech is like Alibaba's treasure hunt. Who knows where/what you will find there.

Any way to download all the attachments in one large file by any chance?

I second that.

Incredibly sad news. May he rest in peace. He will be sorely missed.

I'll be there.

Never seen this before. A set of macros is provided during assembly to facilitate accessing specific TI-99/4 hardware features such as the Video Display Processor, or the sound chip. An I/0 utility is available which may be linked with an assembly routine to provide access to peripherals such as disk drive, RS-232, etc. Although the disk format of the PASCAL system is different from that used by Extended BASIC, a utility is provided to convert a PASCAL object file to the format required by Extended BASIC. These extensions would have been quite useful...

Saw this posted in the BASIC group of FB programmed in Tektronix 4051 Basic and it looked like turtle graphics, so I thought I would try @apersson850's turtle unit and see if I can reproduce it. Here's the original image: Here's the UCSD Pascal code using the turtlegrahics unit: program spiral; uses {$u turtleunit.code} turtlegraphics; var a, w, r : real; begin page(output); grafmode; pen_mode(none); a := 0; repeat w := (a / 240) * cos(3.14159 * (a * 5.5) / 180); turnto(round(a)); r := 3 + a / 22; moveto(127, 99); move(round(r - w / 2)); pen_mode(draw); move(round((w * 1.5))); pen_mode(none); a := a + 4; until a > 1920; repeat until false; end. Not bad, considering the significant resolution limitation on the TI Classic99 QI399.065 2024-04-20 20-12-33.mp4 turtle.dsk PWORK.dsk

Best holiday reading 😁