Welcome, Guest. Please login or register.


Author Topic: Raster Runner 4 player (Read 25539 times)

Offline geco

  • EP addict
  • *
  • Posts: 7082
  • Country: hu
    • Támogató Támogató
Re: Raster Runner 4 player
« Reply #60 on: 2021.September.29. 13:52:17 »
Engem is érdekel egy, és nincs bajom a külalakkal :D

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Raster Runner 4 player
« Reply #61 on: 2021.September.29. 18:29:37 »
Az adapterrel nekem sincs semmi bajom.
TVC-n is most készült el a 4 joy illesztésére alkalmas adapter. Ez véletlen, vagy valami van a háttérben? :D
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline Judge

  • EP lover
  • *
  • Posts: 677
  • Country: hu
Re: Raster Runner 4 player
« Reply #62 on: 2021.September.30. 00:56:04 »
Oké, ez a lista úgy tűnik, hogy működik a Joy1 és Joy2.

Kérlek Judge, ki tudod próbálni az adaptereddel?


Ok, this listing seems to work on Joy1 and Joy2.

Please Judge, can you try it with your adapter?

  100 PROGRAM "4JOYS.BAS"
  110 ALLOCATE 50
  120 CODE JOYS=HEX$("18,04,00,00,00,00,AF,47,0E,05,09,06,04,77,2B,
10,FC,23,01,00,05,F5,F3,D3,B5,DB,B6,FB,2F,1F,CB,16,1F,1F,CB,11,F1,3C,
10,ED,23,23,71,2B,FE,05,28,E2,C9")
  130 DO
  135   CALL USR(JOYS,JOYS)
  141   LET JOYSTICK1=PEEK(JOYS+1+1)
  142   LET JOYSTICK2=PEEK(JOYS+1+2)
  143   LET JOYSTICK3=PEEK(JOYS+1+3)
  144   LET JOYSTICK4=PEEK(JOYS+1+4)
  150   PRINT JOYSTICK1,JOYSTICK2,JOYSTICK3,JOYSTICK4
  160 LOOP

I tried it and it works. On all 4 ports. The second pair with the L common point.
Unfortunately I only have one joystick. I could not test what happens when I move multiple joysticks at the same time. Sorry for the Google translation.
Üdv.Judge

Offline gflorez

  • EP addict
  • *
  • Posts: 3607
  • Country: es
    • Támogató Támogató
Re: Raster Runner 4 player
« Reply #63 on: 2021.September.30. 10:53:20 »
Nagyszerű!

Akkor tökéletesen fog működni, mivel a diódák elkerülik a szellemnyomásokat.

Az L közös helyett a K közös olvasására való áttérés nagyon egyszerű, csak a kódban a két egymás utáni RRA parancs közül az egyiket egy NOP paranccsal kell helyettesíteni. Ez a harmadik bit helyett a sor második bitjét fogja hozzáadni:



Great!

Then it will work perfect, as the diodes will avoid ghost presses.

Switching to reading the K common instead of the L common is very easy, only replacing one of the two contiguous RRA commands on the code with a NOP command. This will add the second bit of the row instead of the third bit:

L common:

  120 CODE JOYS=HEX$("18,04,00,00,00,00,AF,47,0E,05,09,06,04,77,2B,
10,FC,23,01,00,05,F5,F3,D3,B5,DB,B6,FB,2F,1F,CB,16,1F,1F,CB,11,F1,3C,
10,ED,23,23,71,2B,FE,05,28,E2,C9")

K common:

  120 CODE JOYS=HEX$("18,04,00,00,00,00,AF,47,0E,05,09,06,04,77,2B,
10,FC,23,01,00,05,F5,F3,D3,B5,DB,B6,FB,2F,1F,CB,16,1F,00,CB,11,F1,3C,
10,ED,23,23,71,2B,FE,05,28,E2,C9")

Sorry... DeepL translator.
« Last Edit: 2021.September.30. 11:14:42 by gflorez »

Offline ergoGnomik

  • EP addict
  • *
  • Posts: 1291
  • Country: hu
  • Stray cat from Commodore alley
Re: Raster Runner 4 player
« Reply #64 on: 2021.September.30. 13:03:37 »
Would it be possible to make a version that reads all possible external joysticks? Those that are not selected on the adapter or connected at all will not respond anyway.

Offline gflorez

  • EP addict
  • *
  • Posts: 3607
  • Country: es
    • Támogató Támogató
Re: Raster Runner 4 player
« Reply #65 on: 2021.September.30. 16:20:22 »
Igen, ma este átrendezem.

Azért vonakodtam a K oszlopot felvenni, mert ha az 1-4. sorokba joystickot csatlakoztatunk, akkor néhány program vagy játék, amely egérrel számol, a hibásan beérkező adatok miatt megtévesztheti magát. A másik oldalon a 0, és az 5-9 sorok szabadon használhatók.

Ha csak tesztelési céllal, akkor jobb, ha a Balagesz HIDTEST-et használjuk.


Yes, I will rearrange it this night.

I was reluctant to include the K column because, if a joystick is connected on rows 1 to 4, some programs or games that expect there a mouse can become fooled by erroneous incoming data. On the other side rows 0, and 5 to 9 have free use.

If only for test purposes, it is better to use Balagesz's HIDTEST.

Offline Judge

  • EP lover
  • *
  • Posts: 677
  • Country: hu
Re: Raster Runner 4 player
« Reply #66 on: 2021.September.30. 16:58:56 »
Igen, ma este átrendezem.
If only for test purposes, it is better to use Balagesz's HIDTEST.

Ezt a tesztprogramot hol találom?

Where can I find this test program?
Üdv.Judge

Offline gflorez

  • EP addict
  • *
  • Posts: 3607
  • Country: es
    • Támogató Támogató
Re: Raster Runner 4 player
« Reply #67 on: 2021.September.30. 17:05:07 »
Valahogy így:

Something like this:

Code: [Select]
ORG:      JR START        ;HL points to ORG
Joy1:     db 0
Joy2:     db 0
Joy3:     db 0
Joy4:     db 0
Joy5:     db 0
Joy6:     db 0
START:
          XOR A
          LD B,A
          LD C,7
          ADD HL,BC

                    ; HL now contains Joy6

          LD B,6
LOOP1:    LD (HL),A     ;Clears the 6 Joysticks status downwards
          DEC HL
          DJNZ LOOP1
          
          INC HL      ; HL now contains Joy1
        
                            
                 ; First iteration: A holds 0 , so rows 0 to 4 are processed
                 ; Second iteration A holds 5 , so rows 5 to 9 are processed


READ:     LD BC, 0500h    ; B counts the 5 switches, and C and E will hold temporarily Joy3-Joy4 and Joy5-Joy6 status
          LD E,C
LOOP2:    PUSH AF         ; Save A as a row counter
          DI  
          OUT (B5h),A     ; Read Joystick port, row A
          IN A,(B6h)
          EI
          CPL             ; we need to invert A, because a switch pressed gives us a bit reset(=0)
          RRA             ;Button on column J is saved to Carry
          RL (HL)         ;Then Carry is stored on (HL), Joy1 and later on Joy2
          RRA             ;Button on column K is saved to Carry
          RL C            ;Then Carry is stored on C, Joy3 and later on Joy4
          RRA             ;Button on column L is saved to Carry
          RL E            ;Then Carry is stored on E, Joy5 and later on Joy6
          POP AF          ;retrieve A as row counter
          INC A           ;and increase it
          DJNZ LOOP2

          INC HL
          INC HL
          LD (HL), C      ; temporary C is saved on  Joy3 and later on Joy4

          INC HL
          INC HL
          LD (HL), E      ; temporary E is saved on  Joy5 and later on Joy6

          DEC HL
          DEC HL
          DEC HL          ;HL points to Joy2 on first iteration

          CP 5             ;If the lower rows still remain not read, then Jump READ one more time
          JR Z, READ

          RET

Itt a HIDTEST, egy magyar témában.

Here is HIDTEST, on an Hungarian topic.
« Last Edit: 2021.September.30. 19:34:08 by gflorez »

Offline Judge

  • EP lover
  • *
  • Posts: 677
  • Country: hu
Re: Raster Runner 4 player
« Reply #68 on: 2021.September.30. 18:28:41 »
 Sajnos onnan már nem letölthető . Kérem akinek megvan, töltse fel ide!

Unfortunately you can't download it from there anymore . Please upload it here! :(
Üdv.Judge

Offline gflorez

  • EP addict
  • *
  • Posts: 3607
  • Country: es
    • Támogató Támogató
Re: Raster Runner 4 player
« Reply #69 on: 2021.September.30. 18:34:08 »
Ez a link nálam működik.

This link works for me.


Edit: latest version is 11.
« Last Edit: 2021.September.30. 21:06:38 by gflorez »

Offline Judge

  • EP lover
  • *
  • Posts: 677
  • Country: hu
Re: Raster Runner 4 player
« Reply #70 on: 2021.September.30. 18:42:17 »
Thank you!  It worked. :smt023
Üdv.Judge

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Raster Runner 4 player
« Reply #71 on: 2021.September.30. 19:28:01 »
Sajnos onnan már nem letölthető . Kérem akinek megvan, töltse fel ide!
ep128.hu-n a Util programcsokorban is benne van. Meg az SD image-ben is az UTIL partición :-)

Offline Judge

  • EP lover
  • *
  • Posts: 677
  • Country: hu
Re: Raster Runner 4 player
« Reply #72 on: 2021.September.30. 20:27:25 »
ep128.hu-n a Util programcsokorban is benne van. Meg az SD image-ben is az UTIL partición :-)

Milyen néven? Mert én egyikben sem találom.... :smt017

[ Guests cannot view attachments ]

[ Guests cannot view attachments ]

Egyébként már sikerült letölteni gflorez linkjéről...
Üdv.Judge

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Raster Runner 4 player
« Reply #73 on: 2021.September.30. 20:34:45 »
Milyen néven? Mert én egyikben sem találom.... :smt017
Mondom a Util csokorban :-)

Az SD-n meg menj le a fájlokhoz :-)
[ Guests cannot view attachments ]

Offline SlashNet

  • EP addict
  • *
  • Posts: 1192
  • Country: ua
  • Enterprise 128K | Cubietruck
    • My old site about Enterprise
Re: Raster Runner 4 player
« Reply #74 on: 2021.September.30. 20:48:57 »
Mondom a Util csokorban :-)

the utils page on the utils page?
"We must to go deeper" :)

I hardly found this program on the forum not long ago, as I did not catch a sight of it on ep128.hu.

Maybe such special subpages somehow move to the top of the lists?

(I'm talking about the BASIC program pack page too);)
« Last Edit: 2021.September.30. 20:53:07 by SlashNet »