Jump to content

Photo

tutachamons tomb, need help getting it to use joystick 1


7 replies to this topic

#1 jrhodes ONLINE  

jrhodes

    Chopper Commander

  • 244 posts
  • RUN "CS1"

Posted Mon Jul 16, 2018 1:48 PM

I am attempting to convert a game that uses joystick 2 to use joystick 1.
I know i should change 630 CALL KEY(2,K,S) to 630 CALL KEY(1,K,S),
and change 640 CALL JOYST(2,YJ,XJ) to 640 CALL JOYST(1,YJ,XJ)
but i am confused what to use here:780 IF K=-7 THEN 810

Original:
 

630 CALL KEY(2,K,S) :: IF S THEN 780
640 CALL JOYST(2,YJ,XJ) :: IF XJ+YJ=0 THEN 620
780 IF K=-7 THEN 810

 

What i have so far:
 

630 CALL KEY(1,K,S) :: IF S THEN 780
640 CALL JOYST(1,YJ,XJ) :: IF XJ+YJ=0 THEN 620
780 IF K=[b][i]??[/i][/b] THEN 810

Original game is attached to this post.

Spoiler

Attached File  TUTACHAMON.zip   5.18KB   7 downloads



#2 OLD CS1 OFFLINE  

OLD CS1

    Technomancer

  • 5,933 posts
  • Technology Samurai
  • Location:Tallahassee, FL

Posted Mon Jul 16, 2018 2:54 PM

If that line works then I would think changing the scanned units in CALL KEY and CALL JOYST should be sufficient.



#3 jrhodes ONLINE  

jrhodes

    Chopper Commander

  • Topic Starter
  • 244 posts
  • RUN "CS1"

Posted Mon Jul 16, 2018 3:09 PM

Just was not sure. I was searching for new games, previewing them through TI99Dir. I hate swapping my joystick around.

I actually have not run it yet, just running through what i think i will need to do to make it work with joystick 1.

 

The following loop never yields a -7 with CALL KEY(2,K,S), so i'm honestly not sure what they are looking for here:

1 CALL KEY(2,K,S)
2 IF S=0 THEN 1
3 PRINT K :: GOTO 1


#4 OLD CS1 OFFLINE  

OLD CS1

    Technomancer

  • 5,933 posts
  • Technology Samurai
  • Location:Tallahassee, FL

Posted Mon Jul 16, 2018 6:17 PM

Got me.  I cannot find (CTRL-F) any other place in the program which literally sets K.  Unless the programmer is exploiting some quirk of the key scan which could possibly produce a -7 return.

 

EDIT: I think your pasted listing is missing something.  I cannot find anywhere TEK is actually assigned, either.



#5 OLD CS1 OFFLINE  

OLD CS1

    Technomancer

  • 5,933 posts
  • Technology Samurai
  • Location:Tallahassee, FL

Posted Mon Jul 16, 2018 6:28 PM

Got me.  I cannot find (CTRL-F) any other place in the program which literally sets K.  Unless the programmer is exploiting some quirk of the key scan which could possibly produce a -7 return.

 

EDIT: I think your pasted listing is missing something.  I cannot find anywhere TEK is actually assigned, either.

 

Nope.  The program lists the same way.  My brain hurts right now :)



#6 OLD CS1 OFFLINE  

OLD CS1

    Technomancer

  • 5,933 posts
  • Technology Samurai
  • Location:Tallahassee, FL

Posted Mon Jul 16, 2018 6:31 PM

You need to edit lines 1060, 1260, 1660.  These have JOYST and KEY calls.



#7 sparkdrummer OFFLINE  

sparkdrummer

    Stargunner

  • 1,050 posts
  • Status? I don't need no stinkin' status!
  • Location:Phoenix,Arizona

Posted Wed Jul 18, 2018 1:27 AM

I have that game as well - good game. No need to change 780, it is correct as is. As OLD CS1 states above, you do need to change those other lines. I can upload my copy if needed. 



#8 jrhodes ONLINE  

jrhodes

    Chopper Commander

  • Topic Starter
  • 244 posts
  • RUN "CS1"

Posted Wed Jul 18, 2018 7:15 AM

You need to edit lines 1060, 1260, 1660.  These have JOYST and KEY calls.

Got it.

Attached version is joystick #1, thanks for the help! ;-)

Attached File  TUTACHMNJ1.zip   5.18KB   4 downloads


Edited by jrhodes, Wed Jul 18, 2018 7:18 AM.





0 user(s) are browsing this forum

0 members, 0 guests, 0 anonymous users