Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Michael.3545

Pages: [1] 2 3 ... 6
1
General Calculator Help / Nspire Downgrading Question
« on: August 18, 2014, 07:29:09 pm »
I'm looking to buy an Nspire, and of course I want to be able to run Ndless on it.  If I get an Nspire with 3.9 but a pre-J hardware revision, will I still be able to downgrade it via the RS232 boot2 flashing method?  I know this method used to work, but I haven't been able to find any information about if 3.9 has done anything further to block this.  From what I know, I'd guess it'll still work, but I want to get a second opinion before I make a purchase.  Thanks all!

2
The Axe Parser Project / Re: Keep program output on graph screen?
« on: September 19, 2012, 03:56:25 pm »
I take this post to ask how to keep the screen in axis at the end of the program? but this time on the screen and normal all at once?

What?  Firstly, this topic has been inactive for four months.  Secondly, it isn't axis, it is Axe.  Thirdly, your questions aren't really questions, just statements ending in question marks.

But to answer what I assume you intended to ask, this post is asking if there is a way to reliably stay on the graph screen after a program exits, instead of what normally happens, which is returning to the home screen or clearing the graph screen.

Essentially my program draw something to the graph screen, and I wanted that output to remain visible after the program exits.  This is no longer a problem, however, as my program works fine.

3
The Axe Parser Project / Re: Keep program output on graph screen?
« on: May 05, 2012, 11:35:03 pm »
I don't notice any difference with or without the Asm(FCCB0386).  Sometimes it works, sometimes it doesn't.

Well, this is what I have been working on.  It is about 9001 times faster than the TIBASIC version I made first. 



Bonus points if you know what it is!
Spoiler For the answer:
It's a Ulam spiral!

4
The Axe Parser Project / Keep program output on graph screen?
« on: May 05, 2012, 10:19:39 pm »
When an axe program ends, it leaves anything you drew on the home screen.  (Unless you clear it first, of course)  I'd like to get this effect, only on the graph screen instead.  For example, PrettyPrint leaves its output on the graph screen, and you can refer back to it later, or store it to a picture if you wish.  Is this possible in Axe?

5
Humour and Jokes / Re: If TI Made a PC OS...
« on: November 23, 2010, 09:25:59 am »
129. K models would behave completely differently from all other models, as the engineers who designed the production process were doubtlessly high on something.

6
Axe / Re: Some (big) issues with ghosts
« on: November 01, 2010, 11:25:57 pm »
Judging by what runer changed, I guess it was an issue with the nibbles values, as squidget suggestet.

Well it took like three hours of stepping through the instructions one-by-one in wabbitemu's debugger, but I think I isolated and solved all the problems. :)

This is way beyond what I expected from anyone.  Runer112, you have earned my undying thanks and definitely mention in the final program.  Your new source is indeed working exactly as it should, much to my elation.  I have sent it to my calc, and will be looking to see what you did over the next few days.  If I can't work it out myself, I will post back here.  Thanks!

 :)

7
Axe / Re: Some (big) issues with ghosts
« on: November 01, 2010, 01:54:07 pm »
*bump*

8
General Calculator Help / Re: MSD8x/USB8x
« on: October 31, 2010, 09:19:09 pm »
@Darl181: Are you having problems?  I almost made one, but I couldn't bring myself to buy a cord just to cut in half for USB ends.  I did the research though.
Yes, I've tried to make two.  Neither gave the slightest indication of working.  0C00 error.
drives I've tried are an old Dane-elec 84mb and a sandisk cruzer micro skin 128mb.
more details in this forum on Cemetech (the last three pages)

Did you connect the grounds?  Besides the 4 pins, the grounds also need to be connected.  If you want, I can do a connectivity check on my working one and give you the exact wiring info.

9
General Calculator Help / Re: MSD8x/USB8x
« on: October 30, 2010, 11:30:52 pm »
I've determined that for some reason my FAT16 drive isn't supported.  Anyone know if MSD8x wants it formatted in a certain way?

@Darl181: Are you having problems?  I almost made one, but I couldn't bring myself to buy a cord just to cut in half for USB ends.  I did the research though.

10
Computer Projects and Ideas / Re: Things made in PowerPoint
« on: October 30, 2010, 11:24:41 pm »
Here are two mazes I made a couple of years ago.  Because of the lack of images, I was able to actually attach both.  If you look at them you will be able to see vast improvement between the first and second.  I just looked these over, and realized how non-funny some of my text is.  Please ignore my dumb comments :)

thepenguin, I tried to run your PowerPoint a couple of times, but I got odd freezing as soon as your clones appear.  What I saw so far looked great though, and I was especially impressed with the turning skis on the opening scene.

11
Computer Projects and Ideas / Things made in PowerPoint
« on: October 30, 2010, 12:33:46 am »
On IRC today, we ended up talking about making games in PowerPoint.  I just happened to have a really cool old math project on my Google docs, and DJ figured that the rest of you may be interested.  It has a super secret surprise theme, don't spoil it!

Freakishly long link:
https://docs.google.com/leaf?id=0B1AfyYYD6YT9MmI1OTljMTgtYWI0NC00ZWRiLTg5NGItNWRiNzNlN2JiNmEw&hl=en&authkey=CMj22fwE
*Note that this is a PowerPoint file, I just stuck it inside a .exe file, because I am cool like that.

I also have a couple of mazes I made, one with moving parts.  If the above file goes down well I'll take the time to upload those too.

If anyone else has a cool PowerPoint thing, please share it with us!

12
General Calculator Help / MSD8x/USB8x
« on: October 28, 2010, 12:44:22 pm »
Yesterday, the adapter cable for USB8x came in the mail, and i was euphoric.  I was able to use a mouse and keyboard to get input, but for some reason my flash drive would work with MSD8x.  It simply says "Drive not responding to commands".  This leads me to think that either the drive is not supported, or that I don't have enough power.  If I run MSD8x a second time, it does the odd glitch where the app menu ends up with a cursor.  I tested it with both a 2G and a 256M flash drives.  I know the 2G one to be FAT16.

On a scale from 0 to 4, with 4 being new and 0 being poor, my batteries return a 4.  (according to my battery checking program)
3 are Energizer and one are Duracell.
Testing with a voltmeter, all of the batteries are in the "good" zone, but one is bordering "good" and "?".

Any ideas?

13
Humour and Jokes / Re: Fate approves of my evilness >:D
« on: October 27, 2010, 05:39:37 pm »
Little known fact:
If you can access google and download and run .exes, you can almost always install Chrome on your account.  

Chrome > IE

Note that this will only be on your account, and only on that computer.

EDIT:
Not that I would know.  I am a good little student!

14
Axe / Some (big) issues with ghosts
« on: October 26, 2010, 06:49:08 pm »
Hello Omnimagicians, I seem to be having a bit of an issue.  I am working on a pacman clone.  The ghosts used to behave like this:


I finally added a method of controlling the ghost's movements, and instead of moving as expected, I got this:


This is the code I added:
Code: [Select]
:   .G-BRAIN
:..............
:
:   .On tile
:   !If {A}^7 or ({B}^7)
:    L4+2?P
:    0?{L4}r
:    0?{P}
:    If J
:     J*?1?{L4}
:    Else
:     K*?1?{L4+1}
:    End
:
:.stop indent
:
:.1  UP
:!If pxl-Test({A},{B}-1)r
:If {L4+1}??1
: 0?{{P}*2+L4+3}
: ?1?{{P}*2+L4+4}
: {P}+1?{P}
:End
:End
:
:.2  RIGHT
:!If pxl-Test({A}+7,{B})r
:If {L4}?1
: 1?{{P}*2+L4+3}
: 0?{{P}*2+L4+4)
: {P}+1?{P}
:End
:End
:
:.3  DOWN
:!If pxl-Test({A},{B}+7)r
:If {L4+1}?1
: 0?{{P}*2+L4+3}
: 1?{{P}*2+L4+4}
: {P}+1?{P}
:End
:End
:
:.4  LEFT
:!If pxl-Test({A}-1,{B})r
:If {L4}??1
: ?1?{{P}*2+L4+3}
: 0?{{P}*2+L4+4}
: {P}+1?{P}
:End
:End
:
:.resume indent
:
:    {rand^{L4+2}*2+L4+3}?P
:    {P}?iPart(U}
:    {P+1}?iPart(V}
:    sub(GGD)
:   End
:
:..............

I am using L4 as super temporary storage.  It is used in one routine during my loop, and I write completely new data to it each time I use it, so volatility isn't an issue.  I tested all of the things I wasn't sure about (such as using pxl-test() on an off-screen locaiton) and all of that sort of stuff works as expected.

Here is what my variables do:
  • A,B: Pointers to where the ghosts x and y positions are saved.  (1 byte each)
  • J,K: Temporary variables, they store the ghost's x and y velocity.*
  • U,V: Pointers to where the ghost's x an y velocity are stored.  (1 nibble each)*
  • P:  A temporary variable I use to avoid repeating math I've already done.


Here is the structure of L4:
  • {L4},{L4+1}: the x and y velocity opposite to which a ghost is currently moving at.*
  • {L4+3}: The number of x and y velocities stored in the next 6 bytes of ram
  • {L4+4},{L4+5}: A possible x,y velocity*
  • {L4+6},{L4+7}: same as above
  • {L4+8},{L4+9}: same as above


*These values are either 1, 0, or -1.

Thanks for your help!  It is depressing that I couldn't figure it out myself.  :'(

15
TI Z80 / Re: Pacman in Axe
« on: October 25, 2010, 11:28:39 pm »
Ztrumpet, I am using a method I created myself just for this purpose.

This is designed to be called as sub(GHS).  PrgmAAAINPUT is supposed to be the last line of a file.  If you have any questions, ask.
Code: [Select]
:.GETHISCR
:Lbl GHS
:
:Fix 1
:Fix 4
:
:0→{GDB0}
:0→E→L→K→I+1→U
:
:sub(DSP)
:
:Repeat E
: getKey→K
: If K=9 and (L>0)
:  1→E
: End
: If K=4
:  1→U
: ElseIf K=1
:  0→U
: ElseIf K=2
:  If L>0
:   L-1→L
:   0→{GDB0+L}
:   sub(DSP)
:  End
: End
: If K
:  For(I,0,26)
:   If {GDB00+I}=K
:    sub(SC1,I)
:   End
:  End
: End
:
:
: While getKey(0)
: End
:End
:Fix 0
:Fix 5
:ClrHome
:Return
:
:Lbl SC1
:If r1=0
: sub(SC2,32)
: Return
:End
:If U
: sub(SC2,r1+64)
:Else
: sub(SC2,r1+96)
:End
:Return
:
:Lbl SC2
:If L<16
: r1→{GDB0+L}
: 0→{GDB0+L+1}
: L+1→L
: sub(DSP)
:End
:Return
:
:Lbl DSP
:ClrHome
:Text(16,0,"HIGH SCORE!")
:Output(0,2,"Type your name:")
:If {GDB0}
: Output(0,3,GDB0
:End
:If L<16
: Output(L,3,95►Frac)
:End
IMPORTANT:  before starting this sub, GDB0 and GDB00 must be initialized exactly like so:
Code: [Select]
:det(17)→GDB0
:DeltaList(33,47,39,31,46,38,30,22,14,45,37,29,21,13,44,36,28,20,12,43,35,27,19,11,42,34,26)→GDB00


Omnimagicians, I need help!
I just added some code to try to make the ghosts turn at intersections, and I got this:


I have looked over it several times and can't figure out what is going on.  The changes I just made are between the
:   .G-BRAIN
:..............
and the
:..............

Please ask me any questions you have.  I will be offline after this post, but should be back on tomorrow morning.  Sorry for the delay, and sorry Opera users for any massive scrolling I have caused you.

Here is my source:
Code: [Select]
:.AAPACMAN A fun arcade game
:DiagnosticOff
:
:
:.appvar
:Lbl AV
:"vPac-Man"→Str1
:
:.only if exist
:.UnarchiveStr1
:
:.exists? if notmake
:!If GetCalc(Str1)→O
:
: .create, ret  if < RAM
: Return!If GetCalc(Str1,57)→O
: 666→{O}r
: 256→{O+2}r
: 13→{O+4}r
: "DJ"→Str01
: "Byte"→Str02
: "Clyde"→Str03
: For(I,0,16)
:  {Str01+I}→{O+I+6}
: End
: For(I,0,16)
:  {Str02+I}→{O+I+23}
: End
: For(I,0,16)
:  {Str03+I}→{O+I+40}
: End
:End
:
:.wrong size
:ReturnIf {O-2}r≠57
:
:
:.SPRITES:
:.CLOSED
:[387CFEFEFE7C3800]→Pic0
:.UP
:[82C6EEFEFE7C3800]→Pic1
:.RIGHT
:[3E7CF8F0F87C3E00]→Pic2
:.LEFT
:[F87C3E1E3E7CF800]→Pic3
:.DOWN
:[387CFEFEEEC68200]→Pic4
:.DOT
:[0000102810000000]→Pic5
:.LIFE
:[70E0C0E070000000]→Pic6
:.GHOST
:[387CD6FEFEFEAA00]→Pic7
:
:
:.no. of maps:
:3→θ
:.MAP DATA
:[FFFC006B6B1B120246C6B6B001FFF811B1B7171001F00FFFFC006F7B1112224446F7B001FFF8631767B70F0F0F0FFFFC446AAB4452FA5116AAB111FFF83491B4971001100F]→GDB1
:
:
:.hi scr stuffs
:det(17)→GDB0
:DeltaList(33,47,39,31,46,38,30,22,14,45,37,29,21,13,44,36,28,20,12,43,35,27,19,11,42,34,26)→GDB00
:
:
:.TEXT DRAWN TO BUFFER
:Fix 5
:
:
:.MAIN MENU
:Lbl MM
:ClrDraw
:Fix 1
:Text(27,0,"PAC-MAN")
:Fix 0
:ref(0,8,96,1)
:Text(1,10,"By Michael Ripley")
:
:21→A
:Text(4,A,"2ND - Start")
:Text(4,A+7,"ALPHA - High Scores"
:Text(4,A+14,"MODE - Quit")
:L1→P
:
:DispGraph
:
:While getKey(0)
:Pause 5
:End
:Repeat getKey(54)
: If getKey(15) or getKey(55)
:  Goto EX
: Else If getKey(48)
:  Goto HS
: End
:End
:Goto SG
:
:.HIGH SCORE
:Lbl HS
:ClrDraw
:Fix 1
:Text(16,0,"High Scores")
:Fix 0
:For(I,0,2)
: I*7+10→P
: Text(3,P,I+49►Frac,"."
: Text(15,P,{I*2+O}r►Dec)
: Text(40,P,I*17+O+6)
:End
:DispGraph
:While getKey(0)
:Pause 50
:End
:Repeat getKey(54) or getKey(15) or getKey(55) or getKey(48)
:End
:Goto MM
:
:
:
:.START GAME
:Lbl SG
:
:.init vars
:0→M→S+3→L
:
:
:.NEXT MAP
:Lbl NM
:
:
:.Load map data
:For(I,0,116)
: {M*23+(I/8)+GDB1}e(I^8)*2→iPart(L1*2+I+20}
:End
:
:
:.Draw map
:0→N
:ClrDrawr
:For(B,0,8)
: For(A,0,12)
:  iPart(B*13+A+(L1*2)+20}→P
:  If P=2
:   ref(A*7,B*7,7,7)r
:  End
:  If P=0
:   N+1→N
:   Pt-On(A*7,B*7,Pic5)r
:  End
: End
:End
:
:
:.RESET
:Lbl RS
:
:
:.G-pos
:0→{L1}
:
:.G-dir
:conj(M*23+GDB1+20,L1+1,3)
:
:.G-pos
:For(I,0,5)
: iPart(M*23+GDB1+16*2+I}*7→{L1+I+4}
:End
:
:.reset vars
:0→E→F+1→C→Q→Z
:
:.P-pos
:M*23+GDB1+15*2→P
:iPart(P}*7→X
:iPart(P+1}*7→Y
:
:.P-dir
:M*23+GDB1+19*2→P
:iPart(P}→G
:iPart(P+1}→H
:If G=15
: ‾1→G
:ElseIf H=15
: ‾1→H
:End
:If H=‾1
: 1→D
:ElseIf G=1
: 2→D
:ElseIf G=‾1
: 3→D
:Else
: 4→D
:End
:
:sub(RD,1)
:sub(DW)
:Pause 1000
:
:.MAIN LOOP
:Repeat getKey(55) or F
:
: .KEY PRESSES
: If getKey(1)
:  !If pxl-Test(X,Y+7)r+pxl-Test(X+6,Y+7)r
:   0→G+1→H+3→D
:  End
: End
: If getKey(2)
:  !If pxl-Test(X-1,Y)r+pxl-Test(X-1,Y+6)r
:   ‾1→G+1→H+3→D
:  End
: End
: If getKey(3)
:  !If pxl-Test(X+7,Y)r+pxl-Test(X+7,Y+6)r
:   0→H+1→G+1→D
:  End
: End
: If getKey(4)
:  !If pxl-Test(X,Y-1)r+pxl-Test(X+6,Y-1)r
:   ‾1→H+1→G+1→D
:  End
: End
:
: .MOVE
: DS<(Z,2)
: X+G→A
: Y+H→B
: !If pxl-Test(A,B)r+pxl-Test(A+6,B)r+pxl-Test(A,B+6)r+pxl-Test(A+6,B+6)r
:   A→X
:   B→Y
:   If X=91
:    0→X
:   ElseIf X=‾1
:    90→X
:   End
:   If X>84
:    X-91→E
:   Else
:    0→E
:   End
:  End
:
:  .MOVE GHOSTS
:  For(I,0,2)
:   .gXp, gYp
:   I*2+L1+4→A+1→B
:   L1+1*2+(I*2)→U+1→V
:
:   .get J,K
:   sub(GGD)
:
:
:   .G-BRAIN
:..............
:
:   .On tile
:   !If {A}^7 or ({B}^7)
:    L4+2→P
:    0→{L4}r
:    0→{P}
:    If J
:     J*‾1→{L4}
:    Else
:     K*‾1→{L4+1}
:    End
:
:.stop indent
:
:.1  UP
:!If pxl-Test({A},{B}-1)r
:If {L4+1}≠‾1
: 0→{{P}*2+L4+3}
: ‾1→{{P}*2+L4+4}
: {P}+1→{P}
:End
:End
:
:.2  RIGHT
:!If pxl-Test({A}+7,{B})r
:If {L4}≠1
: 1→{{P}*2+L4+3}
: 0→{{P}*2+L4+4)
: {P}+1→{P}
:End
:End
:
:.3  DOWN
:!If pxl-Test({A},{B}+7)r
:If {L4+1}≠1
: 0→{{P}*2+L4+3}
: 1→{{P}*2+L4+4}
: {P}+1→{P}
:End
:End
:
:.4  LEFT
:!If pxl-Test({A}-1,{B})r
:If {L4}≠‾1
: ‾1→{{P}*2+L4+3}
: 0→{{P}*2+L4+4}
: {P}+1→{P}
:End
:End
:
:.resume indent
:
:    {rand^{L4+2}*2+L4+3}→P
:    {P}→iPart(U}
:    {P+1}→iPart(V}
:    sub(GGD)
:   End
:
:..............
:
:   {A}+J→{A}
:   {B}+K→{B}
:
:   .coll test
:   If N
:    If {A}-5≤X and ({A}+5≥X)
:     If {B}-5≤Y and ({B}+5≥Y)
:      1→F
:      L-1→L
:     End
:    End
:   End
:  End
: End
:
:
: .WOKKA WOKKA
: DS<(Q,10)
:  C=0→C
: End
:
: sub(RD,0)
: sub(DW)
:End
:
:.Game Over
:If F=3
: ClrDraw
: Fix 1
: Text(0,0,"Game Over")
: Fix 0
: Text(0,10,"Score: ",S►Dec)
: DispGraph
: While getKey(0)
: .do-nothing
: Pause 50
: End
: Repeat getKey(54)
: End
:
: .HI SCORE!
: If S>{O+4}r
:  .in ext prog
:  sub(GHS)
:  S→{O+4}r
:  For(I,0,17)
:   {GDB0+I}→{O+I+40}
:  End
:  If {O+4}r>{O+2}r
:   expr(O+4,O+2,2)
:   expr(O+40,O+23,17)
:   If {O+2}r>{O}r
:    expr(O+2,O,2)
:    expr(O+23,O+6,17)
:   End
:  End
: End
:End
:
:.beat level
:If F=2
: M+1→M
: .map loopback
: If M=θ
:  0→M
: End
: Goto NM
:End
:
:.lost life
:If F=1
: Fix 3
: Text(10,0,"You have died")
: Fix 2
: DispGraph
: Repeat getKey(54)
: End
: Goto RS
:End
:
:.pressed MODE
:Goto MM
:
:
:.EXIT
:Lbl EX
:Fix 4
:ClrHome
:While getKey(0)
:Pause 5
:End
:Return
:
:
:.get G-dir
:Lbl GGD
:If iPart(U}=15
: ‾1→J
:ElseIf iPart(V}=15
: ‾1→K
:End
:Return
:
:
:.remove dot
:Lbl RD
:!If X^7 or (Y^7)
: X/7→A
: Y/7→B
: B*13+A+(L1*2)+20→P
: !If iPart(P}
:  N-1→N
:  !If N
:   2→F
:  End
:  !If r1
:   S+1→S
:  End
:  1→iPart(P}
:  Pxl-Off(X+3,Y+2)r
:  Pxl-Off(X+2,Y+3)r
:  Pxl-Off(X+4,Y+3)r
:  Pxl-Off(X+3,Y+4)r
: End
:End
:Return
:
:
:.DRAW
:Lbl DW
:ClrDraw
:RecallPic
:
:
:.ghost
:For(I,0,2)
: I*2+L1+4→P
: Pt-On({P},{P+1},Pic7)
:End
:
:Pt-On(X,Y,C*D*8+Pic0)
:If E
: Pt-On(E,Y,C*D*8+Pic0)
:End
:If L>>0
: For(P,0,L-1)
:  Pt-On(92,P*6,Pic6)
: End
:Else
: If L=‾1
:  3→F
: End
:End
:ref(91,28,5,7)
:rref(91,28,5,7)
:DispGraph
:Return
:
:.HISCORE STUFF
:prgmAAAINPUT

EDIT:
Changed the word "Omnimaga" to the more grammatically correct "Omnimagicians".

Pages: [1] 2 3 ... 6