Swiping on the TI-84+ CE (aka Fruit-Ninja input)

Forum Attachments

Swiping on the TI-84+ CE (aka Fruit-Ninja input)

Michael2_3B 22 Jun 2018 06:58

It is yet another tireless night, and I have created a program that converts a swipe across the calculator keyboard into a line on the screen. This is just the same kind of algorithm that you see in the game fruit-ninja. This has been done before on the monochrome calculator, however I created this program in TI-Basic for the CE.

You can see it in action here (please ignore the scruff marks around the screen):
https://www.youtube.com/watch?v=SQfMjDxo1lg

0->dim(L1
ClrDraw
0->Xmin:264->Xmax
~164->Ymin:0->Ymax
AxesOff
DispGraph
DelVar IDelVar ADelVar BDelVar CDelVar D
While 1
    getKey
    If Ans
    Then
        Ans->L1(1+dim(L1
        0->I
    Else
        I+1->I
        If Ans>=20 and dim(L1
        Then
            If A
            Line(B,A,D,C,0
            ~164+(164/10)(abs(L1(1)-101)/10->A
            iPart(L1(1)/10)*10
            (264/5)(L1(1)-Ans)-26->B
            ~164+(164/10)(abs(L1(dim(L1))-101)/10->C
            iPart(L1(dim(L1))/10)*10
            (264/5)(L1(dim(L1))-Ans)-26->D
            Line(B,A,D,C
            0->dim(L1
        End
    End
End

Re: Swiping on the TI-84+ CE (aka Fruit-Ninja input)

kg583 22 Jun 2018 16:18

Well done. How'd your calc get so beat up?

---

The solution to a complex problem is often a simple answer.

Re: Swiping on the TI-84+ CE (aka Fruit-Ninja input)

Michael2_3B 23 Jun 2018 04:11

Please don’t ask that :P I’ve had this calc for several years :P

Also, I optimized the code a bit. I added this right before the While 1, taking advantage of the special blue variables.

"~155+16.4(.1abs(L1(X)-101->|u
"~26+52.8(L1(X)-10iPart(.1L1(X->|v

And in the Central Portion, it becomes:

Line(B,A,D,C,0
1->X
|u->A
|v->B
dim(L1->X
|u->C
|v->D
Line(B,A,D,C
0->dim(L1

Re: Swiping on the TI-84+ CE (aka Fruit-Ninja input)

Michael2_3B 23 Jun 2018 19:23

I have created another version, which accounts for all the keys pressed in the swipe, instead of just the first and last key. You can try it here.

See it in action: https://www.youtube.com/watch?v=wgbOkv4KLck

0->dim(L1
ClrDraw
0->Xmin:264->Xmax
~164->Ymin:0->Ymax
AxesOff
DispGraph
DelVar IDelVar ADelVar BDelVar CDelVar D
"~155+16.4(.1abs(L1(X)-101->|u
"~26+52.8(L1(X)-10iPart(.1L1(X->|v
While 1
    getKey
    If Ans
    Then
        Ans->L1(1+dim(L1
        dim(L1)-(dim(L1)>1->X
        |u->A:|v->B
        dim(L1->X:|u->C:|v->D
        Line(B,A,D,C
        0->I
    Else
        I+1->I
        If Ans>=10 and dim(L1
        Then
            ClrDraw
            0->dim(L1
        End
    End
End

Re: Swiping on the TI-84+ CE (aka Fruit-Ninja input)

Graic 28 Jun 2018 22:26

Yo that's so cool :) I'll be sure to try it out