wow thx a lot i understand how to jump now! and i found a little glitch lol one of your line is (0,0,0,64) so if getkey(2) and (X/=0) should be if getkey(2) and (X/=1)

ah ok and that is my next question, how can i put more collision? :O

easiest way is to do it is with pxl-test. just throw in arguments like
if getkey(2) and pxl-test(X,Y+8)=0  //if left is pushed and the pxl at the bottom left hand corner is off (remember X and Y set at zero is the top left hand corner)

I think he gets the gravity, it's just replacing the left and right hitting of objects.....but go ahead (I'm actually interested in seeing how your doing it, cause you generally optimize better then me)

sorry I misread you post, go ahead, I think that might help

Mine are slightly skewed as well, But I'm working on it...as for simple collision and gravity, pxl-test will work for now

heres a source code for a simple movement/platformer engine I made a while back I hope it helps a little

:.JUMP
:[1C141C080C081C22]→Pic0MR
:[3828381030103844]→Pic0ML
:1→D
:0→J
:40→X
:55→Y
:Lbl 1
:Line(0,63,95,63)
:Line(0,0,0,63)
:Line(95,0,95,63)
:Line(0,0,95,0)
:Line(0,50,25,50)
:Line(25,50,25,63)
:Line(70,50,95,50)
:Line(70,50,70,63)
:
:Repeat getKey(15)
:If getKey(2) and (pxl-Test(X,Y+7)≠1)
:X-1→X
:2→D
:End
:If getKey(3) and (pxl-Test(X+7,Y+7)≠1)
:X+1→X
:1→D
:End
:If getKey(4) and (pxl-Test(X+1,Y+8) or pxl-Test(X+8,Y+8) and (S≠1))
:15→J
:End
:If (J>0)
:Y-1→Y
:J-1→J
:End
:If (pxl-Test(X+8,Y+8) or pxl-Test(X+1,Y+8)=0) and (J=0)
:Y+1→Y
:End
:If (D=1)
:Pt-Change(X,Y,Pic0MR)
:Pause 20
:End
:If (D=2)
:Pt-Change(X,Y,Pic0ML)
:Pause 20
:End
:DispGraph
:If (D=1)
:Pt-Change(X,Y,Pic0MR)
:End
:If (D=2)
:Pt-Change(X,Y,Pic0ML)
:End
:End

btw, the D variable is for the direction of the sprite (look at my screenie a couple posts above) you don't need this unless you want your sprite to look like he is looking different directions

The reason I didn't optimize it was because this is so he can learn how to do it, I know how to do all that.....but thanks...?