Post by: dinhotheone on December 30, 2007, 06:15:00 pm
Sidescro
the basic engine uses a string for a level, your a little n that you move around jumping and stuff. left right and up are movement. (move left, right and jump) this program requires xlib so that you can jump horizontally. the controlls suck which is another thing that i will atempt to remedy in a future version. anyhelp in this area would be nice, all my efforts have been failures.
leveled, this is a basic level editor, make sure there is a level in str1 by running newstr or pulling a level out of levels. move around and press y= to chose why symbol to put in, i think 2nd is put in, and alpha erasses,
levels:
this is like a level pack, since this is where the levels are at run it and press0, . or - maybe 1 and 2 are also viable options. it will send the level to the string and give you a message saying you ahve succesffully created a syntax error due to my half-assing of this part or the beta.
newstr: run it and it clears str1..well it sets the dimension of str1 to the necessary length to put into leveled or the engine. engine wont work without correct amount of stuff in the string, well it may, but not well.
Other things. i feel bad that i asked for your help above, i really need it but i fear that i am sending you into an abyss of terribly complex code. i use finance vars as well as exceedingly long logic structures with no documentation. this may change later on. also this version does not have the ability to jump real high on certain tiles like i had said before. i think i have the version on sourcecoder over at cemetech but the fact that it doesnt handle finance vars with any level of success means that it may be a while before i can get that version ready for download. also, this is a group file, idk how that'll work for you 83ers but if you know it wont work and know how it will work for you guys, ill certainly do it.
any suggestions are welcome, use the code if you want idk how your supsed to handle credit when i modified some elses thing but ill probably find out before it matters anyway.
also, this is not me putting everything neetly together to show to the world finnaly, this is me trying to force myself to man up and work on this. there should be progress and i apologize for the massive intro of text.
try it out, enjoy it. there are different ways to beat the levels, im planning on making that important in some way later on. good luck
newfile:
Post by: DJ Omnimaga on December 30, 2007, 07:13:00 pm
Post by: dinhotheone on December 30, 2007, 08:53:00 pm
Post by: DJ Omnimaga on December 31, 2007, 09:38:00 am
Btw I love the level you can get to by pressing . and - in prgmLEVEL
Post by: Radical Pi on December 31, 2007, 10:08:00 am
I think I'll put it on my calc for real once I get the batteries recharged.
(EDIT: Not rechargable batteries >_<)
Post by: DJ Omnimaga on December 31, 2007, 10:24:00 am
Post by: Radical Pi on December 31, 2007, 10:55:00 am
But on the bright side... I just got new batteries :P
Post by: dinhotheone on December 31, 2007, 11:20:00 am
c1-->
| CODE |
| ec1:ClrHome :0→P :2→N:1→I :24→T :0→F :Repeat PN=570 or I=8 :real(8) :Ans→T :F+(I≥0)6/(2-(sub(Str1,54abs(I)+N+P,1)="U"))(max(T={4,7,8}))not(F)(sub(Str1,54abs(I)+N+P,1)≠" →F :If I≥1:Then :sub(Str1,54I-53+N+P,1)=" →D :sub(Str1,54I-55+N+P,1)=" →E :Else :1→D :1→E :End :P+(P≠38 and DN=12 and max(T={3,6,8→P :N-(max(T={2,5,7}) and EN>1)+(max(DT={3,6,8}) and ((P=38 and N<15) or N<12→N :F(I≤1)+F(I>1)(sub(Str1,54abs(I)+N+P-108(I>1),1)=" →F :I+(I<0)+not(F)(sub(Str1,54abs(I)+N+P,1)=" ")(I≥0)-not(not(F→I :F-not(not(F→F :Output(1,1,sub(Str1,1+P,16)+sub(Str1,55+P,16)+sub(Str1,109+P,16)+sub(Str1,163+P,16)+sub(Str1,217+P,16)+sub(Str1,271+P,16)+sub(Str1,325+P,16)+sub(Str1,379+P,16 :If 3.5≥abs(4.5-I:Then :Output(I,N,"N :End :End :Return c2 |
ec2
variable explanantions: P-x value of screen in teh whole map
N- x value of ninja in the screen
I- y value of ninja in screen
F- momentum in the y direction. this variable changes when you jump. if tthis value is 3 then you will move up 3 spaces during the next 3 frames unless you hit something above you.
T-holds keypress
anybugs you notice or optimizations are appreciated. and being that this is a bare bones engine, xlib detection is not gona ever be in it. it will be in an overlying program that calls the engine later on. the code isnt that bad now that ive looked over it, the only thing is that this is probably the fourth version of the code. ive goten optimization ideas 3 times that ive applied to the entire program so some of the functions of code sequences may be a bit hard to understand but i think i explained it all in the commen program.
also if you want to compare source coder code to the calculator code:
P=PV
N=N
I=I%
T=PMT
F=FV
variable explanantions: P-x value of screen in teh whole map
N- x value of ninja in the screen
I- y value of ninja in screen
F- momentum in the y direction. this variable changes when you jump. if tthis value is 3 then you will move up 3 spaces during the next 3 frames unless you hit something above you.
T-holds keypress
anybugs you notice or optimizations are appreciated. and being that this is a bare bones engine, xlib detection is not gona ever be in it. it will be in an overlying program that calls the engine later on. the code isnt that bad now that ive looked over it, the only thing is that this is probably the fourth version of the code. ive goten optimization ideas 3 times that ive applied to the entire program so some of the functions of code sequences may be a bit hard to understand but i think i explained it all in the commen program.
also if you want to compare source coder code to the calculator code:
P=PV
N=N
I=I%
T=PMT
F=FV
Post by: Radical Pi on December 31, 2007, 11:24:00 am
| CODE |
| ec1:(sub(Str1,54I-53+N+P,1)=" →D :(sub(Str1,54I-55+N+P,1)=" →Ec2 |
ec2
I might be mistaken, but on these two lines you could remove the opening parenthesis. Why are they even there?
EDIT:c1
-->I might be mistaken, but on these two lines you could remove the opening parenthesis. Why are they even there?
EDIT:c1
| CODE |
| ec1:P+(P≠38 and DN=12 and max(T={3,6,8→Pc2 |
ec2
Reordering FTL- of two bytes :P
Reordering FTL- of two bytes :P
Post by: dinhotheone on December 31, 2007, 11:34:00 am
| QUOTE (Radical Pi @ 31 Dec, 2007, 17:24) | ||||
c1-->
ec2 -->I might be mistaken, but on these two lines you could remove the opening parenthesis. Why are they even there? EDIT:c1
ec2 Reordering FTL- of two bytes :P |
yup, i was wrong. but i coulda sworn those parenthesis were necessary...i thought that to make an = opration into a binary value, you needed parenthesis. i tested it and it still works
Post by: Radical Pi on December 31, 2007, 11:36:00 am
Post by: dinhotheone on December 31, 2007, 11:42:00 am
| QUOTE (Radical Pi @ 31 Dec, 2007, 17:36) |
| = operations, and all other 'tests' for that matter, always produce a binary result. |
i probably did something dumb like E=3 + E->E (supposed to mean (E=3)+E->E) at one point, misinterpreted the result, and then never questioned it...
like here: I+(I<0)+not(F)(sub(Str1,54abs(I)+N+P,1)=" ")(I≥0)-not(not(F→I
Post by: Radical Pi on December 31, 2007, 11:47:00 am
I remember making the same mistake at one point though, so eh...
Post by: dinhotheone on December 31, 2007, 11:58:00 am
Post by: Radical Pi on December 31, 2007, 12:20:00 pm
Post by: dinhotheone on December 31, 2007, 12:24:00 pm
ok sounds good. has anyone besides radical pie or dj tried this?
Post by: Radical Pi on December 31, 2007, 12:37:00 pm
c1-->
| CODE |
| ec1:Repeat I=8 or (P=38 and N=15c2 |
ec2
I think that can be changed to
c1
-->I think that can be changed to
c1
| CODE |
| ec1:Repeat PN=570 or I=8c2 |
ec2
Post by: dinhotheone on December 31, 2007, 03:13:00 pm