PSX-Pad an AVR (Bascom) Problem

[Georg W. (souschl)]

Hallo Leute bin neu hier und hätte da eine kleine Frage.
Ich arbeite momentan daran einen Playstation One Controller an meinem 
mega32 mit Bascom auszulesen.
Dazu hab ich den Code von dieser Seite 
http://www.grote.net/bascom/msg18553.html
den Code mal einfach kopiert und an meinen Controller angepasst.
Nun habe ich das Problem das etwas mit dem Attention (ATT) Byte nicht 
stimmt.

Das Problem ist wenn das Kabel eingesteckt ist (egal welcher Port am µC) 
bekomme ich immer die Meldung "No Response from PSX-PAD" was ja laut 
Programm dafür steht das der PSX-Controller nicht eingesteckt ist.

Wenn ich aber das ATT Kabel auf meinem Steckbrett ausstecke bekomme ich 
kurz eine Verbindung und im Terminal werden mir für 1-2 mal die Print 
Befehle für die Tasten  angezeigt, dann wieder 1-5 "No Response" und 
sobald ich das ATT Kabel wieder einsteckte geht wieder nichts!

Habe es jetzt mit einem mega8 und 2 verschiedenen mega32 ausprobiert, 
immer das gleiche.

Vieleicht könnt ihr mir ja helfen und sagen was ich falsch mache.

Hier noch mein Bascom Code:

  Konfiguration                                                          ***
'*******************************************************************************
'AVR
$regfile = "M32def.dat"
$crystal = 16000000
$hwstack = 100
$swstack = 100
$framesize = 100
$baud = 19200


'**************************************************************************
'*** Ein-Ausgängedefinieren                                             ***
'**************************************************************************
Config Portd.6 = Output
Pad_att_line Alias Portd.6

'**************************************************************************
'***  Variablen                                                         ***
'**************************************************************************
Dim Cmdstart As Byte
    Cmdstart = &H01
Dim Cmdstatus As Byte
    Cmdstatus = &H42

'PSX Type ID
Const Cnstid_digital = &H41
Const Cnstid_negocn = &H23
Const Cnstid_analogred = &H73
Const Cnstid_analoggreen = &H53

'These are for local storage of last read packet from PSX PAD
Dim Pspad_present As Byte
Dim Pspad_mode As Byte
Dim Pspad_byte1 As Byte
Dim Pspad_byte2 As Byte

'PSX PAD Joysticks
'Horizontal
Dim Pspad_rjoy_h_pos As Byte                    '0 = Left , 255 = Right
Dim Pspad_ljoy_h_pos As Byte                    '0 = Left , 255 = Right

'Vertikal
Dim Pspad_rjoy_v_pos As Byte                    '0 = Up , 255 = Down
Dim Pspad_ljoy_v_pos As Byte                    '0 = Up , 255 = Down


'**************************************************************************
'***  Alias Namen für PSX-PAD Tasten                                    ***
'**************************************************************************
Pspad_key_select Alias Pspad_byte1.0
Pspad_key_joyr Alias Pspad_byte1 .1
Pspad_key_joyl Alias Pspad_byte1.2
Pspad_key_start Alias Pspad_byte1.3
Pspad_key_up Alias Pspad_byte1.4
Pspad_key_right Alias Pspad_byte1.5
Pspad_key_down Alias Pspad_byte1.6
Pspad_key_left Alias Pspad_byte1.7

Pspad_key_l2 Alias Pspad_byte2.0
Pspad_key_r2 Alias Pspad_byte2.1
Pspad_key_l1 Alias Pspad_byte2.2
Pspad_key_r1 Alias Pspad_byte2.3
Pspad_key_triangle Alias Pspad_byte2.4
Pspad_key_circle Alias Pspad_byte2.5
Pspad_key_x Alias Pspad_byte2.6
Pspad_key_square Alias Pspad_byte2.7

'**************************************************************************
'***  Subroutine Declaration                                            ***
'**************************************************************************
Declare Sub Query_pspad

'**************************************************************************
'***  SPI-Mode in Hardware konfigurieren                                ***
'**************************************************************************
Config Spi = Hard , Interrupt = Off , Data Order = Lsb , Master = Yes , _
        Polarity = High , Phase = 1 , Clockrate = 128
Spiinit

'**************************************************************************
'***  HAUPTPROGRAMM                                                     ***
'**************************************************************************

Do
'Buttons are active low
   'Update langsam zum testen im Terminal
   Waitms 1000
   'Get current Button states from PSX-Controller
   Gosub Query_pspad
      'Now do something base on the results
If Pspad_present = 1 Then                  '0 = not present , 1 = present

         Print "Select:" ; Pspad_key_select
         Print "JoyR:" ; Pspad_key_joyr
         Print "JoyL:" ; Pspad_key_joyl
         Print "Start:" ; Pspad_key_start
         Print "Up:" ; Pspad_key_up
         Print "Right:" ; Pspad_key_right
         Print "Down:" ; Pspad_key_down
         Print "Left:" ; Pspad_key_left
         Print "L2:" ; Pspad_key_l2
         Print "R2:" ; Pspad_key_r2
         Print "L1:" ; Pspad_key_l1
         Print "R1:" ; Pspad_key_r1
         Print "Triangle:" ; Pspad_key_triangle
         Print "Circle:" ; Pspad_key_circle
         Print "X Key:" ; Pspad_key_x
         Print "Square:" ; Pspad_key_square
         Print "Right Joystick H Position:" ; Pspad_rjoy_h_pos
         Print "Right Joystick V Position:" ; Pspad_rjoy_v_pos
         Print "Left Joystick H Position:" ; Pspad_ljoy_h_pos
         Print "Left Joystick V Position:" ; Pspad_ljoy_v_pos

Else
   Print " No Response From PSX-PAD"
End If

Loop

'**************************************************************************

Sub Query_pspad
   Reset Pad_att_line                       'Get PSX-PAD Attention
      Spiout Cmdstart , 1                   'Send Start
   Pspad_mode = Spimove(cmdstatus)          'Send Request, Receive ID Byte

   Spiin Pspad_present , 1                  'Is PAD Responding
      'Now see if the Controller is going to send something


   If Pspad_present = 90 Then               '90 = Data on its way
      Pspad_present = 1                     'Set the global bit
      Spiin Pspad_byte1 , 1                 'Byte 1 and 2 are always used
      Spiin Pspad_byte2 , 1
      Spiin Pspad_rjoy_h_pos , 1            'Byte 3-6 are for Analog Modes
      Spiin Pspad_rjoy_v_pos , 1
      Spiin Pspad_ljoy_h_pos , 1
      Spiin Pspad_ljoy_v_pos , 1
      Set Pad_att_line

   Else

Pspad_present = 0                           'Set the   global state set  Pad_Att_Line 'Release Attention Line to the PS2 PAD

  End If

End Sub


'*******************************************************************************

[Karl H. (kbuchegg)]

Georg Wolfsteiner schrieb:


> Nun habe ich das Problem das etwas mit dem Attention (ATT) Byte nicht
> stimmt.

Das ist kein Byte sondern eine Ausgangsleitung.

Hier

Config Portd.6 = Output
Pad_att_line Alias Portd.6

steht eindeutig an welchem Port-Pin die Leitung rauskommt.

> Das Problem ist wenn das Kabel eingesteckt ist (egal welcher Port am µC)

Du kannst nicht einfach an irgendeinen Port anstecken. Du musst schon 
den Pin nehmen, der auch im Programm benutzt wird.

> bekomme ich immer die Meldung "No Response from PSX-PAD" was ja laut
> Programm dafür steht das der PSX-Controller nicht eingesteckt ist.

Nö.
Das steht dafür, dass sich der Controller nicht gemeldet hat. Warum auch 
immer. Da gibt es ja auch noch andere Gründe.

zb. kannst du nicht einfach

Config Spi = Hard , Interrupt = Off , Data Order = Lsb , Master = Yes , _
        Polarity = High , Phase = 1 , Clockrate = 128

irgendwelche Portpins für die Datenübertragung benutzen, sondern musst 
natürlich schon die vom Mega vorgegebenen SPI Pins dafür benutzen und 
dann auch noch richtig mit dem Controller verbinden. Sonst kommt keine 
Kommunikation zu Stande und dein Programm gibt "No Response From 
PSX-PAD" aus.

[Georg W. (souschl)]

Hallo Karl, ich glaube ich hätte mich genauer ausdrücken sollen!

> Das ist kein Byte sondern eine Ausgangsleitung.

Da habe ich wohl falsch gedacht, danke für die Ausbesserung

> Du kannst nicht einfach an irgendeinen Port anstecken. Du musst schon
> den Pin nehmen, der auch im Programm benutzt wird.

Das ist mir natürlich klar, ich habe damit gemeint egal welchen Pin/Port 
ich im Programm angebe (und die ATT-Leitung an dem definiertem Pin 
anstecke) , es funktioniert nicht

> Nö.
> Das steht dafür, dass sich der Controller nicht gemeldet hat. Warum auch
> immer. Da gibt es ja auch noch andere Gründe.
>
> zb. kannst du nicht einfach
>

> Config Spi = Hard , Interrupt = Off , Data Order = Lsb , Master = Yes , 
> _
>         Polarity = High , Phase = 1 , Clockrate = 128
> 
>

>
> irgendwelche Portpins für die Datenübertragung benutzen, sondern musst
> natürlich schon die vom Mega vorgegebenen SPI Pins dafür benutzen und
> dann auch noch richtig mit dem Controller verbinden. Sonst kommt keine
> Kommunikation zu Stande und dein Programm gibt "No Response From
> PSX-PAD" aus.

Wie ist das gemeint? Muss ich bei Config Spi also die Portpins MOSI, 
MISO und SCK (an die das PSX-PAD natürlich angeschlossen ist) also extra 
angeben oder reicht es so wie ich es im Programm gemacht habe? (Ist 
meine erste Anwendung mit SPI)

Danke für die Hilfe