TTD Forum

Code: Alles auswählen

#include "tap.h"

#define ID_DISPLAY 0xB8023456   

TAP_ID( ID_DISPLAY );
TAP_PROGRAM_NAME("Kom-Test");
TAP_AUTHOR_NAME("Project One");
TAP_DESCRIPTION("Daten via Serieller Verbindung");
TAP_ETCINFO(__DATE__);

int ursender;


dword TAP_EventHandler( word event, dword param1, dword param2 )
{

    TYPE_TapChInfo ChInfo;
    int Typ, Nummer, checksumme, count, a;
    unsigned char sendtext[255];

//	TAP_Channel_GetCurrent( &Typ, &Nummer );
//	 TAP_Channel_GetInfo ( Typ, Nummer, &ChInfo);
//	  TAP_SPrint (sendtext,"%s                                        \0", ChInfo.chName);	
	  
sendtext[0] = 'R';
sendtext[1] = 'T';
sendtext[2] = 'L';
sendtext[3] = ' ';
sendtext[4] = 'T';
sendtext[5] = 'E';
sendtext[6] = 'L';
sendtext[7] = 'E';
sendtext[8] = 'V';
sendtext[9] = 'I';
sendtext[10] = 'S';
sendtext[11] = 'I';
sendtext[12] = 'O';
sendtext[13] = 'N';

for (a = 0; ( sendtext[a] != 0 ) && ( a < 14 ) ; a=a+1) {};// zählen wie viele Stellen der Sendername besitzt

	  checksumme = checksberechnen(sendtext, a); //Berechnung der Checksumme

	if( checksumme == urchecks ) //überprüfung ob umgeschaltet wurde
	{
	 return param1;
	}
	 else
	{
 
                    urchecks = checksumme;
               	     Sendetext (a, sendtext, checksumme); //übergabe der Variablen an die Funktion Sendetext

	}


  return param1;

}

int TAP_Main(void)
{
	return 1; //TSR Modus
}

Code: Alles auswählen

sendtext[0] = 'R';
sendtext[1] = 'T';
sendtext[2] = 'L';
sendtext[3] = ' ';
sendtext[4] = 'T';
sendtext[5] = 'E';
sendtext[6] = 'L';
sendtext[7] = 'E';
sendtext[8] = 'V';
sendtext[9] = 'I';
sendtext[10] = 'S';
sendtext[11] = 'I';
sendtext[12] = 'O';
sendtext[13] = 'N';

Code: Alles auswählen

strcpy(sendtext, "RTL TELEVISION")

Code: Alles auswählen

for (a = 0; ( sendtext[a] != 0 ) && ( a < 14 ) ; a=a+1) {};// zählen wie viele Stellen der Sendername besitzt

Code: Alles auswählen

a = strlen(sendtext)

Code: Alles auswählen

TAPCHECK Version 1.2 by Till Hepke
Projekt.tap   04.12.2007 14:43:34     10.704 bytes     OK

Code: Alles auswählen

Step #1 - Add the HEX value of every byte in the message that precedes the Checksum:
Example - 0xF0 + 0x00 + 0x67 + 0x7C + 0xF1 + 0x0F = 0x02D3

Step #2 - Count the number of bytes which precede the Checksum and convert that value from
DEC to HEX (byte count). Add the byte count in HEX to the previously calculated sum of
bytes:
Example - 0x02D3 + 6 (6 = Decimal value byte count) = 0x02D9

Step #3 - This value is then AND-ed with the HEX value 0x007F (7F is the highest BIN value
for 7 bits = 1111111). The Checksum itself and the End of Message Character are not
included in the calculation. Only the low 7 bits are used so overflow is discarded:
Example - 0x02D9 AND 0x007F = 0x59 = Checksum

Code: Alles auswählen

int checksberechnen(char * Sendername)
{

int x , y , Temp ,z;
int bin[13];

//------------------------------------------------------------------
//Umrechnung des Sendernamens in eine Dezimale Zahl
//------------------------------------------------------------------

Temp = 0;
y = 0;

for (x = 0; ( Sendername[x] != 0 ) && ( x < 14 ) ; x=x+1) {};

for(y=0; y-x ; y=y+1)
{
 Temp=Temp+(int)Sendername[y];
}

Temp = Temp + x;

//------------------------------------------------------------------
//Umrechnung der Dezimalen Zahl in eine binäre Zahl
//------------------------------------------------------------------

x = 0;
y = 4096;
z = 0;

while ( y > 1 )
{
 y = y / 2;

 if (Temp >= y)
 {
  Temp = Temp - y;
  bin[z] = 1;
  z=z+1;
 }
 else
 {
  bin[z] = 0;
  z=z+1;
 }

}

//------------------------------------------------------------------
//Umrechnung der ersten (von rechts) 7 Stellen der Binären Zahl
//------------------------------------------------------------------

z = 5;
Temp = 0;
y = 128;

while ( z < 12 )
{

 y = y/2;

  if (bin[z] == 1)
  {
   Temp = Temp + y;
  }

 z=z+1;
}


//------------------------------------------------------------------
//Übergabe des errechneten Wertes an die übergeordnete Funktion
//------------------------------------------------------------------

return Temp;

}

Code: Alles auswählen

checksumme = checksberechnen(sendtext, a); //Berechnung der Checksumme

Code: Alles auswählen

Sendetext (a, sendtext, checksumme); //übergabe der Variablen an die Funktion Sendetext

Code: Alles auswählen

int checksberechnen(char * Sendername)

Code: Alles auswählen

void SendeHex (int anzahl, char * Sendername, int cheks)

Code: Alles auswählen

#include "tap.h"

#define ID_DISPLAY 0xB8023456   

TAP_ID( ID_DISPLAY );
TAP_PROGRAM_NAME("Kom-Test RNet");
TAP_AUTHOR_NAME("Project One");
TAP_DESCRIPTION("Daten via Serieller Verbindung");
TAP_ETCINFO(__DATE__);


int urchecks;

void SendeHex (int anzahl, char * Sendername, int check)
{

//------------------------------------------------------------
//Ausgabe verschiedener Hex Zahlen. Die Beschreibung der jew. Hex Zahl steht als komentar hinter dem Sendebefehl.
//------------------------------------------------------------

	TAP_Print( "%c" , 0xF0 );//Start of Message
	TAP_Print( "%c" , 0x23 );//Target Controller Id
	TAP_Print( "%c" , 0x23 );//Target Zone Id
	TAP_Print( "%c" , 0x23 );//Target keypad Id
	TAP_Print( "%c" , 0x23 );//Source Controller Id
	TAP_Print( "%c" , 0x23 );//Source Zone Id
	TAP_Print( "%c" , 0x23 );//Source Keypad Id
	TAP_Print( "%c" , 0x23 );//Message Type
	TAP_Print( "%c" , 0x23 );//Target Path, Num Levels
	TAP_Print( "%c" , 0x23 );//Target Path, Level 1
	TAP_Print( "%c" , 0x23 );//Target Path, Level 2
	TAP_Print( "%c" , 0x23 );//Source Path, Num Levels
	TAP_Print( "%c" , 0x23 );//Packet Num Lo Byte
	TAP_Print( "%c" , 0x23 );//Packet Num Hi Byte
	TAP_Print( "%c" , 0x23 );//Num Packets Lo Byte
	TAP_Print( "%c" , 0x23 );//Num Packets Hi Byte
	TAP_Print( "%c" , 0x23 );//Num Data Bytes Lo Byte
	TAP_Print( "%c" , 0x23 );//Num Data Bytes Hi Byte
	TAP_Print( "%c" , 0x23 );//Data Byte 1 - alignment
	TAP_Print( "%c" , 0x23 );//Data Byte 2 - Flash Time

//------------------------------------------------------------
//Ausgabe des Sendernamens
//------------------------------------------------------------

	TAP_Print( "%s" , Sendername );

//------------------------------------------------------------
//Ausgabe der Checksumme
//------------------------------------------------------------

	TAP_Print( "%i" , check );

//------------------------------------------------------------
//Ausgabe des Stringendes
//------------------------------------------------------------

	TAP_Print( "%c" , 0xF7 );

}

int checksberechnen(char * Sendername)
{

int x , y , Temp ,z;
int bin[13];

//------------------------------------------------------------------
//Umrechnung des Sendernamens in eine Dezimale Zahl
//------------------------------------------------------------------

Temp = 0;
y = 0;

for (x = 0; ( Sendername[x] != 0 ) && ( x < 14 ) ; x=x+1) {};

for(y=0; y-x ; y=y+1)
{
 Temp=Temp+(int)Sendername[y];
}

Temp = Temp + x;

//------------------------------------------------------------------
//Umrechnung der Dezimalen Zahl in eine binäre Zahl
//------------------------------------------------------------------

x = 0;
y = 4096;
z = 0;

while ( y > 1 )
{
 y = y / 2;

 if (Temp >= y)
 {
  Temp = Temp - y;
  bin[z] = 1;
  z=z+1;
 }
 else
 {
  bin[z] = 0;
  z=z+1;
 }

}

//------------------------------------------------------------------
//Umrechnung der ersten (von rechts) 7 Stellen der Binären Zahl
//------------------------------------------------------------------

z = 5;
Temp = 0;
y = 128;

while ( z < 12 )
{

 y = y/2;

  if (bin[z] == 1)
  {
   Temp = Temp + y;
  }

 z=z+1;
}


//------------------------------------------------------------------
//Übergabe des errechneten Wertes an die übergeordnete Funktion
//------------------------------------------------------------------

return Temp;

}

dword TAP_EventHandler( word event, dword param1, dword param2 )
{

    TYPE_TapChInfo ChInfo;
    int Typ, Nummer, checksumme, a;
    unsigned char sendtext[255];

	TAP_Channel_GetCurrent( &Typ, &Nummer );
	 TAP_Channel_GetInfo ( Typ, Nummer, &ChInfo);
	  TAP_SPrint (sendtext,"%s                                        \0", ChInfo.chName);	

        for (a = 0; ( sendtext[a] != 0 ) && ( a < 14 ) ; a=a+1) {};// zählen wie viele Stellen der Sendername besitzt	  	  

	checksumme = checksberechnen(sendtext);

	if( checksumme == urchecks )
	{
	 return param1;
	}
	 else
	{
	  urchecks = checksumme;  
	  SendeHex (a, sendtext, checksumme);
	}

  return param1;

}

int TAP_Main(void)
{
	return 1;
}

Code: Alles auswählen

$sp=803ba160
$at=821c2b10    $v0=821c022c    $v1=80180be0    $a0=80180b30
$a1=80188f30    $a2=80188fcc    $a3=80189058    $t0=80188c74
$t1=80188d08    $t2=80188d9c    $t3=801808dc    $t4=80188e28
$t5=80180838    $t6=801890c8    $t7=80181070    $t8=821c0000
$t9=0000279a    $s0=80180dc0    $s1=80180ea4    $s2=80180fac
$s3=00000000    $s4=00001293    $s5=80180724    $s6=80180524
$s7=821c279a    $s8=821c1950    $ra=821c1978    $t0=00002bc2
$t1=00000000    $gp=821c279a    $k1=821c1a00


<<< Unexpected Exception >>>
CAUSE   = 00000414
  EPC = 821c1a00
 *EPC   = ac25ffff
   SR   = 10000403
badVAddr = 821c2b0f
 task = 0
_runCount=1
lastTask(0) = 0
memory monitor
cmd number = 10
>

Code: Alles auswählen

TAP_Print( "%i" , check );

Code: Alles auswählen

TAP_SPrint (sendtext,"%s                                        \0", ChInfo.chName);