| Author |
Message |
|
Weregoose
Authentic INTJ
Super Elite (Last Title)
Joined: 25 Nov 2004
Posts: 3976
|
 Posted: 24 Dec 2005 05:10:57 pm Post subject: |
|
|
File Name :: Hop-Over 1.0
Author :: Weregoose
Category :: Ti-83plus Basic Games
Description ::
HOPOVER 1.0
©2005 Weregoose
Squares can only move left, and crosshairs can only move right. Pieces are allowed to jump over one another, but not to exceed a distance of two spaces. The goal is to yield four squares on the right, four crosshairs on the left, and an unoccupied space in the middle.
Use the left and right arrow keys to move the triangular cursor over any piece, then press [2nd] or [ENTER] to move the selected piece one (1) space, relative to the direction it is allowed to go given its type. If it is barricaded by another piece in that direction, then it may jump over the restricting piece, but only if there is a vacant spot on the other side. If there is no such spot, then the selected piece is trapped and will not move.
Press [CLEAR] at any time to quit to the home screen.
Source
[font="courier new"]StoreGDB 1
FnOff
ClrHome
ClrDraw
GridOff
AxesOff
PlotsOff
0→Xmin:1→ΔX
0→Ymin:1→ΔY
23
Text(17,32,"HOP-OVER
Line(Ans,38,71,38
Line(71,38,71,28
Line(71,28,Ans,28
Line(Ans,28,Ans,38
For(A,1,9
If A≠5
Pt-On(5A+22,31,2+(A<5
End
DelVar B47→A
Repeat C=45
Repeat C=45 or 42=abs(C-63pxl-Test(32,Ans
If C≠21
Then
Pt-Off(B,35,3
Line(B-2,36,B+2,36,0
Pt-On(A,35,3
Line(A-2,36,A+2,36
A→B
End
Repeat Ans
getKey→C
End
A+5((Ans=26)-(Ans=24
Ans+45((Ans=22)-(Ans=72→A
End
If C≠45
Then
pxl-Test(31,A
5(Ans-not(Ans→D
pxl-Test(32,A+Ans
Pt-Off(A,31
Pt-Off(A,31,2
Pt-On(A+Dnot(Ans)(A≠4D+47)+2DAns(A≠3D+47)not(pxl-Test(32,A+2D)),31,2+(D>0
End
End
RecallGDB 1
"------
Output(3,3,Ans+Ans+"░░░░By Weregoose░░░░"+Ans+Ans+"░░░░UnitedTI.org
Challenge
Find a stopwatch and time yourself!
I finished in under ten seconds on a TI-84 Plus Silver Edition.
View File
Last edited by Guest on 24 Dec 2005 09:07:17 pm; edited 1 time in total |
|
| Back to top |
|
|
Weregoose
Authentic INTJ
Super Elite (Last Title)
Joined: 25 Nov 2004
Posts: 3976
|
| Posted: 24 Dec 2005 06:49:53 pm Post subject: |
|
|
Unbelievable. I edited the screenshot, and now the program won't download.  |
|
| Back to top |
|
|
DarkerLine
ceci n'est pas une |
Super Elite (Last Title)
Joined: 04 Nov 2003
Posts: 8328
|
| Posted: 24 Dec 2005 06:54:39 pm Post subject: |
|
|
That sucks. If you resubmit it I'll fix things. I think that's the only way.
I can't see the screenshot either, anymore. |
|
| Back to top |
|
|
Rezek
Better Than You
Calc Guru
Joined: 24 Apr 2005
Posts: 1229
|
| Posted: 24 Dec 2005 07:18:13 pm Post subject: |
|
|
Excellent program. One thing though, I couldn't find 'plotssoff' so I omitted it.
Freaking download it already! |
|
| Back to top |
|
|
Weregoose
Authentic INTJ
Super Elite (Last Title)
Joined: 25 Nov 2004
Posts: 3976
|
| Posted: 24 Dec 2005 08:22:33 pm Post subject: |
|
|
Thanks, guys. :)
This gave me a chance to locate and fix a small bug, as well as cut the image file size in half. (It's sent.)
[font="courier new"]PlotsOff - [2nd] [Y=] [4] |
|
| Back to top |
|
|
Weregoose
Authentic INTJ
Super Elite (Last Title)
Joined: 25 Nov 2004
Posts: 3976
|
| Posted: 24 Dec 2005 09:04:44 pm Post subject: |
|
|
File Name :: Hop-Over 1.1
Author :: Weregoose
Category :: Ti-83plus Basic Games
Screenshot :: [img]http://www.unitedti.org/index.php?act=downloads&do=imgss&id=152[/img]
Description ::
HOPOVER 1.1
©2005 Weregoose
Squares can only move left, and crosshairs can only move right. Pieces are allowed to jump over one another, but not to exceed a distance of two spaces. The goal is to yield four squares on the right, four crosshairs on the left, and an unoccupied space in the middle.
Use the left and right arrow keys to move the triangular cursor over any piece, then press [2nd] or [ENTER] to move the selected piece one (1) space, relative to the direction it is allowed to go given its type. If it is barricaded by another piece in that direction, then it may jump over the restricting piece, but only if there is a vacant spot on the other side. If there is no such spot, then the selected piece is trapped and will not move.
Press [CLEAR] at any time to quit to the home screen.
Challenge: Find a stopwatch and time yourself!
(I finished in under ten seconds on a TI-84 Plus Silver Edition.)
Source ::
[font="courier new"]StoreGDB 1
FnOff
ClrHome
ClrDraw
GridOff
AxesOff
PlotsOff
0→Xmin:1→ΔX
0→Ymin:1→ΔY
23
Text(17,32,"HOP-OVER
Line(Ans,38,71,38
Line(71,38,71,28
Line(71,28,Ans,28
Line(Ans,28,Ans,38
For(A,1,9
If A≠5
Pt-On(5A+22,31,2+(A<5
End
DelVar B47→A
Repeat C=45
Repeat C=45 or 42=abs(C-63)pxl-Test(32,Ans
If C≠21
Then
Pt-Off(B,35,3
Line(B-2,36,B+2,36,0
Pt-On(A,35,3
Line(A-2,36,A+2,36
A→B
End
Repeat Ans
getKey→C
End
A+5((Ans=26)-(Ans=24
Ans+45((Ans=22)-(Ans=72→A
End
If C≠45
Then
pxl-Test(31,A
5(Ans-not(Ans→D
pxl-Test(32,A+Ans
Pt-Off(A,31
Pt-Off(A,31,2
Pt-On(A+Dnot(Ans)(A≠4D+47)+2DAns(A≠3D+47)not(pxl-Test(32,A+2D)),31,2+(D>0
End
End
RecallGDB 1
"------
Output(3,3,Ans+Ans+"░░░░By Weregoose░░░░"+Ans+Ans+"░░░░UnitedTI.org
Version History ::
- Version 1.1
Bug fixed—Pressing [APPS] over the blank spot produced a square, rendering the puzzle unsolvable. This was fixed by placing a right parentheses between the [font="courier new"]63 and neighboring [font="courier new"]pxl-Test() in the argument of the second [font="courier new"]Repeat.
- Version 1.0
Initial release.
View File |
|
| Back to top |
|
|
DarkerLine
ceci n'est pas une |
Super Elite (Last Title)
Joined: 04 Nov 2003
Posts: 8328
|
| Posted: 24 Dec 2005 09:08:22 pm Post subject: |
|
|
| Done. I wish there were a better downloads system out there. |
|
| Back to top |
|
|
Rezek
Better Than You
Calc Guru
Joined: 24 Apr 2005
Posts: 1229
|
| Posted: 24 Dec 2005 10:00:39 pm Post subject: |
|
|
Quote: The goal is to yield four squares on the right, four crosshairs on the left, and an unoccupied space in the middle.
Shouldn't it be vica-versa? |
|
| Back to top |
|
|
Weregoose
Authentic INTJ
Super Elite (Last Title)
Joined: 25 Nov 2004
Posts: 3976
|
| Posted: 24 Dec 2005 10:11:15 pm Post subject: |
|
|
| That was correct, but only before I swapped the two sides to save space. |
|
| Back to top |
|
|
DarkerLine
ceci n'est pas une |
Super Elite (Last Title)
Joined: 04 Nov 2003
Posts: 8328
|
| Posted: 24 Dec 2005 10:13:24 pm Post subject: |
|
|
| Just pick one. And don't try to edit the post, it will cause problems with the screenshot. |
|
| Back to top |
|
|
Vinthian
formerly known as shortround4271
Advanced Member
Joined: 24 May 2005
Posts: 258
|
| Posted: 04 Jan 2006 07:27:14 pm Post subject: |
|
|
Weregoose wrote: Unbelievable. I edited the screenshot, and now the program won't download.
[post="65187"]<{POST_SNAPBACK}>[/post]
I think an admin should look into this ( pokes AlienCC )
i've updated my screenshots a few times to go back and check and my programs wont' download either. also, great game. |
|
| Back to top |
|
|
elfprince13
Retired
Super Elite (Last Title)
Joined: 11 Apr 2005
Posts: 3500
|
| Posted: 04 Jan 2006 07:29:38 pm Post subject: |
|
|
| Our whole download system is screwed up....try going to the last page of downloads on any multi page download section. ANd you can rate your own files *evil grin* |
|
| Back to top |
|
|
Vinthian
formerly known as shortround4271
Advanced Member
Joined: 24 May 2005
Posts: 258
|
| Posted: 04 Jan 2006 07:33:04 pm Post subject: |
|
|
lol, i can't even go to the last page of the Ti-83+ basic games category,
"The Page You Are Trying To View Doesn't Exist."
>.< |
|
| Back to top |
|
|
DarkerLine
ceci n'est pas une |
Super Elite (Last Title)
Joined: 04 Nov 2003
Posts: 8328
|
| Posted: 04 Jan 2006 08:01:44 pm Post subject: |
|
|
shortround4271 wrote: Weregoose wrote: Unbelievable. I edited the screenshot, and now the program won't download.
[post="65187"]<{POST_SNAPBACK}>[/post]
I think an admin should look into this ( pokes AlienCC )
[post="66033"]<{POST_SNAPBACK}>[/post]
|
|
| Back to top |
|
|
|
Project Releases => Your Projects
