Zitat:

---

Original von Ralf27:
Also wenn MaikG

code:

---

DEFINT a-z

---

genommen hat, dann sind die Integerwerte in 2Bytes codiert. Denn bei 32768 gibt es dann ein überlauf.

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Also die folgende Zeile kann ja vermutlich so nicht stimmen...

basic code:

---

IF DoIO&(InputIO&) THEN PRINT "Fehler4 DOIO":GOTO 1235

---

Also wenn ein Fehler passiert, dann wird nix mehr zurück gegeben? Und dieses Goto schmerz mir auch in denn Augen. Eigentlich könnte doch dieses Goto komplett verschwinden. Dann werden auch die Resourcen zurückgegeben.

---

[ - Antworten - Zitieren - Direktlink - ]

>Also wenn ein Fehler passiert, dann wird nix mehr zurück gegeben?
>Und dieses Goto schmerz mir auch in denn Augen. Eigentlich könnte
>doch dieses Goto komplett verschwinden. Dann werden auch die
>Resourcen zurückgegeben.

Ja, ja ist ja nur ein kleiner test...


> code:
> POKEL(InputIO&+IOStdReqio_Flags%), IOF_QUICK&

>Ich kenne mich in Basic nicht mehr so aus, aber die Flags sind
>nur 1 Byte groß. Ist es da richtig POKEL zu verwenden? Ist aber
>auch egal. Wie ich inzwischen gesehen habe, kann die Zeile sowieso
>raus, weil DoIO() das Flag automatisch setzt.

IOF_Quick& steht als LONG in der exec.bc, wird also richtig sein.


War das mit dem Port Byte, mit Varptr()+3 gehts.
Naja, wiederum nicht, weil mein ursprüngliches Programm jetzt
feuer 2 und 3 nicht mehr richtig erkennt. Bei Knopf C noch
wenn man den start reinpresst, Knopf A gar nicht mehr.
Bei der Maus sind ja 0 Ohm schalter drin, beim Joypad nicht...

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
IOF_Quick& steht als LONG in der exec.bc, wird also richtig sein.

---

[ - Antworten - Zitieren - Direktlink - ]

C code:

---

#include <exec/types.h>
#include <devices/input.h>
#include <devices/gameport.h>

#include <clib/exec_protos.h>

#include <stdio.h>

int main(void)
{
  struct IOStdReq  *inputIO;
  struct MsgPort   *inputMP;

/*BYTE type = GPCT_NOCONTROLLER; /* keine Maus mehr vorhanden */
  BYTE type = GPCT_RELJOYSTICK; /* Joystick */

  if(inputMP = CreateMsgPort())
  {
    if(inputIO=(struct IOStdReq *)CreateExtIO(inputMP, sizeof(struct IOStdReq)))
    {
      if(!OpenDevice("input.device", 0, (struct IORequest*)inputIO, 0))
      {
        inputIO->io_Command = IND_SETMTYPE;
        inputIO->io_Data    = &type;
        inputIO->io_Length  = 1;
        DoIO((struct IORequest*)inputIO);
        if(inputIO->io_Error)
            printf("nIND_SETMTYPE failed %dn",inputIO->io_Error);
        else
        {

        /* hier machst du deine Sachen */

          type = GPCT_MOUSE; /* Besser wäre natürlich vorher alten Typ abfragen */
          inputIO->io_Command = IND_SETMTYPE;
          inputIO->io_Data    = &type;
          inputIO->io_Length  = 1;
          DoIO((struct IORequest *)inputIO);
          if(inputIO->io_Error)
              printf("n(setting back) IND_SETMTYPE failed %dn",inputIO->io_Error);
        }

        CloseDevice((struct IORequest *)inputIO);
      }
      else printf("Error: Could not open input.devicen");

      DeleteExtIO((struct IORequest *)inputIO);
    }
    else printf("Error: Could not create I/O requestn");


    DeletePort(inputMP);
  }
  else printf("Error: Could not create message portn");
}

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
War das mit dem Port Byte, mit Varptr()+3 gehts.
Naja, wiederum nicht, weil mein ursprüngliches Programm jetzt
feuer 2 und 3 nicht mehr richtig erkennt. Bei Knopf C noch
wenn man den start reinpresst, Knopf A gar nicht mehr.
Bei der Maus sind ja 0 Ohm schalter drin, beim Joypad nicht...

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Ich hab jetzt nur den Ausgang für die Rechte und Mittlere Maustaste,
wie das mit der Linken geht weiss ich noch nicht.

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
Bei Holger's Beispiel(Joy ist an Mouseport) gehen die Ausgänge
nicht(immer high),...

---

C code:

---

#include <exec/types.h>
#include <dos/dos.h>
#include <devices/input.h>
#include <devices/gameport.h>
#include <resources/potgo.h>
#include <hardware/custom.h>

#include <clib/exec_protos.h>
#include <clib/potgo_protos.h>

#include <stdio.h>

#define OUTRY (1L<<15)
#define DATRY (1L<<14)
#define OUTRX (1L<<13)
#define DATRX (1L<<12)

#define OUTLY (1L<<11)
#define DATLY (1L<<10)
#define OUTLX (1L<< 9)
#define DATLX (1L<< 8)

struct PotgoBase *PotgoBase;
extern struct Custom custom;

int main(void)
{
  ULONG potbits;
  UWORD value;
  struct IOStdReq  *inputIO;
  struct MsgPort   *inputMP;

  BYTE type = GPCT_NOCONTROLLER;

  if(!(PotgoBase=(struct PotgoBase *)OpenResource("potgo.resource")))
  {
    printf("couldn't alloc "potgo.resource"");
    return 10;
  }

  if(inputMP = CreateMsgPort())
  {
    if(inputIO=(struct IOStdReq *)CreateExtIO(inputMP, sizeof(struct IOStdReq)))
    {
      if(!OpenDevice("input.device", 0, (struct IORequest*)inputIO, 0))
      {
        inputIO->io_Command = IND_SETMTYPE;
        inputIO->io_Data    = &type;
        inputIO->io_Length  = 1;
        DoIO((struct IORequest*)inputIO);
        if(inputIO->io_Error)
            printf("nIND_SETMTYPE failed %dn",inputIO->io_Error);
        else
        {
          potbits=AllocPotBits(OUTRY|DATRY|OUTRX|DATRX|OUTLY|DATLY|OUTLX|DATLX);

          /* Get the bits for the right and middle mouse buttons on the
           * alternate mouse port. */
          if(potbits != (OUTRY|DATRY|OUTRX|DATRX|OUTLY|DATLY|OUTLX|DATLX))
          {
            printf("Pot bits are already allocated! %lxn",potbits);
            FreePotBits(potbits);
            return 5;
          }

          /* Set all ones in the register (masked by potbits) */
          WritePotgo(0xFFFFFFFFL, potbits);

          printf("nPlug a mouse into the second port.  This program will indicate whenn");
          printf("the right or middle button (if the mouse is so equipped) is pressed.n");
          printf("Stop the program with Control-C. Press return now to begin.n");

          getchar();

          while(!(SIGBREAKF_CTRL_C & SetSignal(0L,0L)))
          /* until CTRL-C is pressed */
          {
            /* Read word at $DFF016 */
            value = custom.potinp;

            /* Show what was read (restricted to our allocated bits) */
            printf("POTINP = $%lxn",value & potbits);
          }

          FreePotBits(potbits);

          type = GPCT_MOUSE; /* Besser wäre natürlich vorher alten Typ abfragen */
          inputIO->io_Command = IND_SETMTYPE;
          inputIO->io_Data    = &type;
          inputIO->io_Length  = 1;
          DoIO((struct IORequest *)inputIO);
          if(inputIO->io_Error)
              printf("n(setting back) IND_SETMTYPE failed %dn",inputIO->io_Error);
        }

        CloseDevice((struct IORequest *)inputIO);
      }
      else printf("Error: Could not open input.devicen");

      DeleteExtIO((struct IORequest *)inputIO);
    }
    else printf("Error: Could not create I/O requestn");

    DeletePort(inputMP);
  }
  else printf("Error: Could not create message portn");
}

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
Du verwirrst mich.

---

Tut mir Leid, das war nicht meine Absicht. Deine Aussagen haben mich verwirrt und ich habe nur versucht, meine Verwirrung zu beseitigen.

Zitat:

---

Solange ich keine Ausgänge brauche gehen
die Eingänge vollständig. Lasse ich das input.device wie es
ist kann ich die Ausgänge in einem Loop LOW setzten, input setzt
es ständig wieder hight. Sage ich input das die Maus am Joyport
ist, gehen die 2. und 3. Taste nicht mehr am Joyport.
Sage ich input das ein Joystik am Mausport hängt und nirgens
eine Maus, gehen die Ausgänge(Mausport) gar nicht mehr auch wenn
ich diese im Loop beschreibe.

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
> WritePotgo(0xFFFFFFFFL, potbits);
Also nur Taste 2 oder nur Taste 3, diese F's sind etwas undurchsichtig.

---

Benutz einfach die Konstanten:

#define OUTRY (1L<<15)
#define DATRY (1L<<14)
#define OUTRX (1L<<13)
#define DATRX (1L<<12)

#define OUTLY (1L<<11)
#define DATLY (1L<<10)
#define OUTLX (1L<< 9)
#define DATLX (1L<< 8 )

Dabei kannst Du mit dem 2. Parameter bestimmen, welche Bits Du verändern willst, also
WritePotgo(OUTRY|OUTRX, OUTRY|OUTRX);
setzt beide Bits des einen Ports auf Ausgang, ohne den anderen Port oder die Datenbits zu beeinflussen. Mit
WritePotgo(0, OUTRY|OUTRX);
löschst Du sie dann. Entsprechend kanns Du sie auch kombinieren, wenn Du z.B. Taste 2 und Taste 3 des einen Ports auf Ausgang und gleichzeitig die des anderen auf Eingang setzen willst:
WritePotgo(OUTRY|OUTRX, OUTRY|OUTRX|OUTLY|OUTLX);

Genauso kannst Du natürlich auch die Datenbits setzen, ohne den In/Out Status zu verändern:
WritePotgo(DATRY, DATRY);//setzt nur dieses eine Bit und läßt alle anderen in Ruhe


Genug verwirrt?

mfg

--
Good coders do not comment. What was hard to write should be hard to read too.

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
Ich glaub das mit den Maskieren hab ich noch nicht richtig kapiert.

---

basic code:

---

VAL=1<<BitNo
IF set POKEx ADR, PEEKx(ADR) OR VAL     : REM set
ELSE   POKEx ADR, PEEKx(ADR) AND NOT VAL: REM clear

---

basic code:

---

VAL=1<<BitNo
MASK=NOT VAL
IF NOT set VAL=0 :REM clear
POKEx ADR, (PEEKx(ADR) AND MASK) OR VAL : REM change, either set or clear

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
Also Binär->Dec->HEX kann ich besser als mein Lehrer damals...
Ist vielleicht eher das Shiften und AND OR XOR.
Oder der Kaliummangel :-)

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Holger:

C code:

---

potbits=AllocPotBits(OUTRY|DATRY|OUTRX|DATRX|OUTLY|DATLY|OUTLX|DATLX);

---

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
10 Klasse Mathe, das war kein Studium.

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von MaikG:
Na weiter oben im Programm geht es ja, mit den gleichen offsets,
die sehen unter Basic etwas anders aus, bei C definiert man
ja die größe einer Variablen am Anfang bei Basic ist das halt
mit &, %, ! usw.

---

[ - Antworten - Zitieren - Direktlink - ]