Well, since we're in space, it should be impossible to control ... I might think of non-reducing momentum, since there is no friction to slow the ship down, that'd be fun

Hey guys,

I've been reluctant about making a thread for this as I wanted it to be my secret project, but tifreak convinced me, so here it is

Faces is a 3D space shooter taking place in a distant (and much unlikely to happen) future where a rebel armada took over many planets of the universe to do rebellion-related stuffs. Your mission, as an agent sent by the official government, is to free these planets by destroying the turrets the rebellion put on them.

The game is far from finished and not really enjoyable as the enemies don't have sprites, don't fire and die with one shot, I have only one planet (although the level format/loading is working) among other things.

BUT ! All the 3D rendering is done, XY rotations are working, planets are solid, I have a beautiful stars background, 3D collisions between your laser and the faces of the planet and the enemies are done, score with custom font is working (thanks Keoni29 from Omnimaga for the font), everything running at 20 FPS at 6 MHz on my TI-83+.fr.

So, let's have a little screenshot, shall we ?



I don't post a demo for now because I don't think it's really worth it, but if you want to try anyway with the few things you can do with it, just ask and I'll post it

Share comments

@Spyro543 you're welcome

@XiiR3CR34T10N Well, that's kinda the point, right ?

Hey guys,

With TheMachine02 we made a contest about who could write the fastest 3D cube, me vs GLib The rules are simple :

• XY rotation
• The cube must be made out of 8 dots that are always visible
• Each dot appears on-screen as a 2*2 square
• No ASM code, only pure Axe
• 6 MHz only

My program reaches 56 FPS (when not moving, and 54 FPS when moving) while respecting all these conditions. I'm pretty proud



And here's the source :

:.FASTCUBE
:#ExprOn
:FnOff
:Data(‾40r,40r,‾40r)→°Verts
:Data(40r,40r,‾40r)
:Data(40r,‾40r,‾40r)
:Data(‾40r,‾40r,‾40r)
:Data(‾40r,40r,40r)
:Data(40r,40r,40r)
:Data(40r,‾40r,40r)
:Data(‾40r,‾40r,40r)
:
:Buff(6)→°Back
:
:L₃→°CosLUT
:
:L₃+512→°CosX+2→°CosY+2→°SinX+2→°SinY+2→°CXCY+2→°CXSY+2→°SXCY+2→°SXSY
:
:‾1
:For(256)
:Select(+1,cos(→r₁)→{r₁*2+°CosLUT}r)
:End
:
:0→X→Y
:
:While 1
:Sin(X)→SinX
:Cos(Y)→CosY
:Sin(Y)→SinY
:*SinX//128→SXSY
:Cos(X)→CosX*CosY//128→CXCY
:‾CosX*SinY//128→CXSY
:CosY*SinX//128→SXCY
:
:°Verts-6
:For(8)
:{+6→r₂}r*CosY+(SinY*{r₂+4}r)//128→{°Back}r
:SXSY*{r₂}r+(CosX*{r₂+2}r)-(SXCY*{r₂+4}r)//128→{°Back+2}r
:CXSY*{r₂}r+(SinX*{r₂+2}r)+(CXCY*{r₂+4}r)//128+192→{°Back+4}r
:
:Rect({°Back}r*64//{°Back+4}r+48,{°Back+2}r*64//{°Back+4}r+32,2,)
:r₂
:End
:
:DispGraphClrDraw
:getKey(3)-getKey(2)*4+Y→Y
:getKey(4)-getKey(1)*4+X→X
:EndIf getKey(15)
:Return
:
:Lbl Sin
:-64
:Lbl Cos
:{^256*2+°CosLUT}r

Generated by the BBify'r (http://clrhome.org/bbify/)

If you want to try, please do

I think there's a maximum of nested conditions like this. Not sure how much.

I don't think so unfortunately. I already have too many projects.

Welcome to Omnimaga

Also, I wrote a similar shell, AxeSh, which uses an axiom I wrote to open the Axe app, compile a program and enable Axe's hook from within the shell. Here's the thread : http://ourl.ca/17048

Also, I attached to this post the axiom I use to interface with the Axe app, in Axe (I never released it) . The axiom features 4 commands : RunPrgm(, MainMenu, CompileAxe( and AxeHook. RunPrgm and CompileAxe both take a string as an argument, which obviously must be a program name starting with the token "prgm". RunPrgm can only run non-archived Nostub programs, but it only takes 12 bytes.