Login [Register]
Don't have an account? Register now to chat, post, use our tools, and much more.
This is an archived, read-only copy of the United-TI subforum , including posts and topic from May 2003 to April 2012. If you would like to discuss any of the topics in this forum, you can visit Cemetech's Your Projects subforum. Some of these topics may also be directly-linked to active Cemetech topics. If you are a Cemetech member with a linked United-TI account, you can link United-TI topics here with your current Cemetech topics.

This forum is locked: you cannot post, reply to, or edit topics. Contra 83 => Your Projects
United-TI Archives -> Contra 83
 
    » Goto page 1, 2  Next
» View previous topic :: View next topic  
Author Message
Bryan Thomas
Outer Limit Software


Advanced Member


Joined: 20 May 2003
Posts: 298

Posted: 04 Feb 2005 08:10:21 pm    Post subject:

Well guys, Sorry to keep you guys waiting so long. I guess after I realized TiCalc was not gonna feature Contra, I got pissed and took a long break to cool off and realize that alot of people liked it, and that the project must go further.

So first off, here is what you guys have been wanting...
[url="http://www.freewebs.com/jotun11/83Contra(UNPROTECTED).zip"]http://www.freewebs.com/jotun11/83Contra(UNPROTECTED).zip[/url]

There ya go. I am ready to here code optimizations Very Happy

Just so you know tho, the things talked about by many people on ways to improve Contra, have no yet been included. The file you are downloading is strictly the same version u have played, just unprotected. The other changes will be released along with the level editor shortly.

The level editor is going good, just a little bit slow. I got some screens tho...

http://www.freewebs.com/jotun11/Lvledit.jpg
http://www.freewebs.com/jotun11/Lvledit2.jpg
http://www.freewebs.com/jotun11/Lvledit3.jpg

Guys...ummm for some reason I couldnt even get these links to work. So if they are not working just highlight and paste url into the actual address bar or just post b/c for some reason they are acting weird...

I want to make sure the LVL Editor is just as advanced as Contra 83 was. I want to make it as user friendly as possible and show people a little more BASIC power Very Happy . Ive already developed some pretty advanced menu systems and subroutines to shorten code as much as possible. Going good so far...just a little bit slow...sorry.

Overall guys I hope you enjoy the code analysis Very Happy and the screenshots, sorry this topic was a little barren (sp? Very Happy ), but you must understand my fury haha


Last edited by Guest on 04 Feb 2005 08:21:59 pm; edited 1 time in total
Back to top
optimize


Advanced Newbie


Joined: 03 Aug 2004
Posts: 99

Posted: 04 Feb 2005 08:50:18 pm    Post subject:

That level editor looks sick for basic!
Back to top
leofox
INF student


Super Elite (Last Title)


Joined: 11 Apr 2004
Posts: 3562

Posted: 05 Feb 2005 10:48:20 am    Post subject:

i agree with optimize, it's teh awesomest. I suppose it runs better on a SE or 84+?
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328

Posted: 05 Feb 2005 01:44:15 pm    Post subject:

Hm, I had problems with freewebs links as well earlier.


Would it be too much to ask for a .txt file of the code?
Back to top
Weregoose
Authentic INTJ


Super Elite (Last Title)


Joined: 25 Nov 2004
Posts: 3976

Posted: 05 Feb 2005 02:32:29 pm    Post subject:

In fact, I've just started putting them together. I'll edit this post and supply the proper font once I'm done.

[EDIT]
Well, that was fast. Click
The .ttf should go into your fonts directory, enabling your standard text editor to view it properly.

I intend to go mad with optimisations here. If I'm gone for six months, it's likely because I locked myself in a dark closet with nothing but a clipboard, a pencil, and enough pizzas to sustain me until the cows come home. You'll have to drag me out with an ingenious mechanism involving candy canes, cheese burritos, and a Boeing 747! Razz


Last edited by Guest on 05 Feb 2005 02:47:14 pm; edited 1 time in total
Back to top
Arcane Wizard
`semi-hippie`


Super Elite (Last Title)


Joined: 02 Jun 2003
Posts: 8993

Posted: 05 Feb 2005 03:50:01 pm    Post subject:

Why not upload it to your UTI account?
Back to top
Bryan Thomas
Outer Limit Software


Advanced Member


Joined: 20 May 2003
Posts: 298

Posted: 05 Feb 2005 04:05:12 pm    Post subject:

Quote:
Why not upload it to your UTI account?


I have been having some FTP problems lately and I have not been able to upload anything onto my real UTI webspace. So I have to use gay a freewebs. However I just now hooked up my new fast a computer and I hope that It should solve all my problems.

I use Flash FXP. I think it is the best. AlienCC reccomends FileZilla, but I cant stand it haha Very Happy

Quote:
I intend to go mad with optimisations here. If I'm gone for six months, it's likely because I locked myself in a dark closet with nothing but a clipboard, a pencil, and enough pizzas to sustain me until the cows come home. You'll have to drag me out with an ingenious mechanism involving candy canes, cheese burritos, and a Boeing 747! 

GOOD!!!!
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328

Posted: 05 Feb 2005 04:37:38 pm    Post subject:

Here's something for the game-loading source to make it faster in most cases:

Lbl L
PV -> G
UnArchive L_CS
L_CS(1+Z -> X
L_CS(2+Z -> PV
L_CS(3+Z -> R
L_CS(4+Z -> M
L_CS(5+Z -> F
L_CS(6+Z -> Q
L_CS(7+Z -> J
Archive L_CS
Lbl B:ClrDraw
If PV=7:Then
ClrDraw
Text(-1,5,3,"CONGRATULATIONS
Line(2,-14,92,-14
Text(16,8,"Youve Beaten Contra 83+
Line(46,-23,46,-32:Line(46,-32,44,-30:Line(46,-32,48,-30
Line(8,-34,87,-34:Line(8,-34,8,-56:Line(87,-56,8,-56:Line(87,-56,87,-34
Text(36,15,"Final Score=",R
1+4(J<4)+6(J<3
Text(42,15,"Difficulty=",sub("EasyMediumHard",Ans,4+2(J=3
4-J:223850*Ans
int(R/(311975+Ans)E2:Text(48,35,Ans,"I%
Text(48,15,"Grade=",Ans
If J>2:Then
Text(57,3,"Try beating Contra on hard
End:Pause :End
If PV=7:Goto J
Text(27,17,"Level ",PV," Loading...
-26:Line(16,Ans,78,Ans:Line(15,Ans,15,-34:Line(79,-34,79,Ans
DelVar [A]DelVar Pic0DelVar Pic2DelVar KLine(16,-34,78,-34
Archive Pic1
If PV=G:Goto SL
If PV=1:Then
UnArchive L_O1:L_O1 -> L1:Archive L_O1
UnArchive L_O2:L_O2 -> L2:Archive L_O2
UnArchive L_O3:L_O3 -> L3:Archive L_O3
UnArchive L_O4:L_O4 -> L4:Archive L_O4
UnArchive L_O5:L_O5 -> L5:Archive L_O5
UnArchive L_O6:L_O6 -> L6:Archive L_O6
End
...
Lbl SL
L_2(X+51 -> A

This isn't perfect yet. Some things that need to be done so this won't screw up:

* make sure the level = 0 when you start Contra.
* when you Goto B, store PV to G first.
* there's probably something else I've overlooked.

but this makes loading when you're on the same level a whole lot faster!

I think that keeping L_CS unarchived will make loading and saving faster too.
Back to top
Bryan Thomas
Outer Limit Software


Advanced Member


Joined: 20 May 2003
Posts: 298

Posted: 05 Feb 2005 04:59:12 pm    Post subject:

Yeah,

The code u have there is pretty much my idea to make it load faster... It will definetely work, so good job w00t keep them coming!
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328

Posted: 05 Feb 2005 05:06:39 pm    Post subject:

I don't seem to be able to read that source properly, it's kind of hard to optimize when all you see is
L[box](S+2[box]V
L[box](S+1[box]U
L[box](S+4[box]H


Last edited by Guest on 05 Feb 2005 05:06:52 pm; edited 1 time in total
Back to top
Weregoose
Authentic INTJ


Super Elite (Last Title)


Joined: 25 Nov 2004
Posts: 3976

Posted: 05 Feb 2005 05:34:35 pm    Post subject:

Even with the font in place and updated?* The TI-83+ fontset uses only extended-ASCII character positions, so there shouldn't be the dilemma involving unicode support. Perhaps it would work better in Wordpad or something like it? If not, then I'd be glad to include a few .html files for local use.
*Restarting may be necessary to do this.
Back to top
axcho


Active Member


Joined: 09 Nov 2004
Posts: 555

Posted: 05 Feb 2005 05:41:27 pm    Post subject:

I just sent Sir Robin an email with the ASCII programs exported by graphlink. All the weird characters are enclosed by backslashes.
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328

Posted: 05 Feb 2005 07:55:50 pm    Post subject:

Thanks. This should make optimizing much easier.
Back to top
koolmansam375


Advanced Member


Joined: 09 Oct 2004
Posts: 254

Posted: 06 Feb 2005 06:45:16 am    Post subject:

cant people (those who know how at least) just unprotect it themself? If Contra is recognized by Mirage its simply a matter of hitting sin,cos, or tan i forget which. Otherwise they could just use Codex.
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328

Posted: 06 Feb 2005 01:32:13 pm    Post subject:

Or CalcSys.

I have a confession to make... that was the first thing I did when I installed Contra.
Back to top
alexrudd
pm me if you read this


Bandwidth Hog


Joined: 06 Oct 2004
Posts: 2335

Posted: 06 Feb 2005 06:48:29 pm    Post subject:

koolmansam375 wrote:
cant people (those who know how at least) just unprotect it themself? If Contra is recognized by Mirage its simply a matter of hitting sin,cos, or tan i forget which. Otherwise they could just use Codex.

Big if there, which happens to be false....

I'm not on the right computer for calc stuff, but when I get a chance, I'll take a look. Does it even make any sense to anyone other than Bryan?
Back to top
Bryan Thomas
Outer Limit Software


Advanced Member


Joined: 20 May 2003
Posts: 298

Posted: 07 Feb 2005 11:03:39 pm    Post subject:

Very Happy Yeah, my stupid a 4got to make it Mirage Compatibale 0x5.

So.. did everyone get the version ok? because freewebs is definetely wack Very Happy
Back to top
alexrudd
pm me if you read this


Bandwidth Hog


Joined: 06 Oct 2004
Posts: 2335

Posted: 08 Feb 2005 06:34:03 pm    Post subject:

Do you have a list of what variables are what?
I think A is the Y-coordinate for the person, PV is the level, R is score, Q is the number of weapon upgrades, and Z and Y are temporary? Until I figure out what does what, I can't suggest many optimizations.

Code:
While (CZ4+B>=0 and CZ4+B89) and ZQ
Rearranging the conditionals would knock off a parenthesis.
Or

Code:
Line(U+1+-T(H!=1),Ans,U+1+T+T(H!=1),Ans
Here, couldn't that +-T become -T?

At the end of ZNME (last lines of program)

Code:
If 4+4H>=abs(U-B
Then:6:prgmZSUB:End
How about
Code:
If 4+4H<abs(U-B
Return:6:prgmZSUB
Notice the >= changed to <.

Lastly, there are some places where using Ans might add a bit of speed.

Code:
4randInt(L(X+40)+1,Ans)-4->S
L3(S+2->V
L3(S+1->U
L3(S+4->H
-1+2(B>U->T
If not([A](V/7,(U+3)/4
If T!=L3(S+3
Then:Return:End
Rearranging bit and using Ans might make it a tiny bit faster.
Code:
4randInt(L2(X+40)+1,Ans)-4->S
L3(Ans+2->V
L3(S+4->H
L3(S+1->U
-1+2(B>Ans->T
If not([A](V/7,(U+3)/4
Then:Return:End
If Ans!=L3(S+3
Back to top
Bryan Thomas
Outer Limit Software


Advanced Member


Joined: 20 May 2003
Posts: 298

Posted: 08 Feb 2005 10:54:23 pm    Post subject:

Nice finds Alex!!! Very Happy

ok here are some variable definitions:

PV = Current Level
X = Frame
Q = Range of Weapon
R = Score
J = Difficulty
F = # of Continues
A = (used for Y cord of Contra Sprite and Some menus)
B = (used for X cord of Contra Sprite and Some menus)
C = direction ur facing
D = Leg movement (also a temp variable in level drawing)
E = used to calculate momentum and time (also a temp variable in level drawing)
L1 = Line list
L2 = Mother list
L3 = NME list
L4 = Mine list
L5 = Weap. Up. list
L6 = Water list
Z,Y = Temp variables

That should be all u need to know, just ask if u have any more Q's. Becuase I got A's Very Happy


Last edited by Guest on 08 Feb 2005 10:55:08 pm; edited 1 time in total
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328

Posted: 09 Feb 2005 08:04:43 pm    Post subject:

Yes, how are L1 through L6 encoded?
Back to top
Display posts from previous:   
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
    » Goto page 1, 2  Next
» View previous topic :: View next topic  
Page 1 of 2 » All times are GMT - 5 Hours

 

Advertisement