Kommentar:
Einfügen von HTML im Kommentar:
Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a>
Bild einfügen: <img src="BILDURL">
Text formatieren: <b>fetter Text</b>  <i>kursiver Text</i> <u>unterstrichener Text</u>
Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b>
C2 Quellcode formatieren: <code>Quellcode</code>
ASM Quellcode formatieren: <asm>Quellcode</asm>
(Innerhalb eines Quellcodeabschnitts ist kein html möglich.)
Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst !  
> Hallo Alle Zusammen > > Ich habe mir ein " Vereinfachtes" SMS Modul geschrieben. > nun Habe ich das Problem das die function hinhaut. > Ich gehe aufgrund der meldungen auf dem LCD davon aus.Aber von 10 veschickten SMS ist nich > eine angekommen. > Den Teil TAPCRC() und loginTAB() habe ich aus dem alten SMS modul kopiert. > Das einzige was ich mir vorstellen kann was nicht klappt ist entweder das ich von D1 nch Eplus > eine SMS schicke .Wäre Dankbar für eine Eplus nummer. > > oder es Probleme mit dem Checksum gibt denn bei diesem Text bekomme ich eine Checksume von > 89: <kein schreibfehler es ist ein : zurück Aner ich finde da kein Problem.... > > ph.Message1="<-TEST ONE->"; > ph.Message2="<-TEST TWO->"; > ph.Message3=""; > ph.Message4=""; > > Also wenn sich jemand Mal die zeit nimmt und sich mein Problem ansieht wäre ich dankbar > Hier die function; > > > // Jumper auf dem Board RTS/CTS Setzen!! > // Funktion für Elsa Mircrolink Basic > > > string Message1,Message2,Message3,Message4,checksum,ClientNumber,Status,SMSCNumber; > byte data2[8],data3[8];string searchfor,test;int timeout; > > function ende() > { > } > > > function getStatus() returns byte > { > searchfor="CO"; > hwcom.receive(data3,8,80000); > if strx.InStr(0,data3,searchfor,8,2)!=-1 > {hwcom.flush(); > return 255;} > else > {hwcom.flush(); > return 0;} > } > function getOK() returns byte > { > searchfor="OK"; > hwcom.receive(data2,8,1200); > if strx.InStr(0,data2,searchfor,8,2)!=-1 > {hwcom.flush(); > return 255;} > else > {hwcom.flush(); > return 0;} > } > //IIIIIIIIIIIIII CALCULATE TAP CHECKSUM IIIIIIIIIIIIIIIIII > function TAPCRC() // Kopiert aus Altem SMS > { > long sum; > byte i; > //-------------- ADDING ALL BYTES ------------------------ > sum=0;checksum=""; > for i=0 ...str.length(ClientNumber) > {sum=sum+(mem.getint(ClientNumber,i)shr 8);} > for i=0 ...str.length(Message1) > {sum=sum+(mem.getint(Message1,i)shr 8);} > for i=0 ...str.length(Message2) > {sum=sum+(mem.getint(Message2,i)shr 8);} > for i=0 ...str.length(Message3) > {sum=sum+(mem.getint(Message3,i)shr 8);} > for i=0 ...str.length(Message4) > {sum=sum+(mem.getint(Message4,i)shr 8);} > //----------- SEPERATING 12 LOWER BITS ------------------- > sum=sum+31;sum=sum and 0x00000fff; > //--------------- MAKE STRING ---------------------------- > i=(sum and 0xf00)shr 8; > str.putchar(checksum,i+0x30); > i=(sum and 0x0f0)shr 4; > str.putchar(checksum,i+0x30); > i=(sum and 0x00f); > str.putchar(checksum,i+0x30); > } > function loginTAP() // Kopiert aus Altem SMS > { > byte data; > //--------------- GET ID REQUEST "ID=" ------------------------- > hwcom.put(13); > wait hwcom.rxd(); > do > {data=hwcom.get();} > while data!='='; > //-------------- SEND ID PG1 (<ESC>PG1<CR> ------------------ > hwcom.put(27); > hwcom.print("PG1\13"); > //------------------ GET ANSWER ---------------------------- > wait hwcom.rxd(); > do > {data=hwcom.get();} > while data!='[';//waiting for [p<cr> > data=hwcom.get();data=hwcom.get(); > //------ SEND SMS-CLIENT NUMBER (<STX>CLIENT NUMBER<CR>)-------- > hwcom.put(2); > hwcom.print("01782021387"); > lcdext.line(1); > lcdext.print("Clientnummer");//Zum testen > sleep 100; > hwcom.put(13); > sleep 100; > //------ SEND SMS MESSAGE (THE ENTIRE MESSAGE <CR>) --------- > hwcom.print(Message1);sleep 200; > lcdext.line(2); > lcdext.print("text1");//Zum testen > hwcom.print(Message2);sleep 200; > lcdext.line(2); > lcdext.print("text2");//Zum testen > hwcom.print(Message3);sleep 200; > lcdext.line(2); > lcdext.print("text3");//Zum testen > hwcom.print(Message4); > lcdext.line(2); > lcdext.print("text4");///Zum testen > hwcom.put(13); > string checksume; > //--------------SEND CHECKSUM <ETX>CHECKSUM<CR> ---------------- > hwcom.put(3); > hwcom.print(checksum);sleep 100; > hwcom.put(13);sleep 100; > lcdext.line(3); > lcdext.print(checksum);//Zum testen > //--------------------- GET ANSWER ---------------------------- > wait hwcom.rxd(); > do > { > data=hwcom.get(); > if data==6{ > lcdext.line(4); > lcdext.print("sent");}//zum testen > } > while data!=4;//waiting for EOT > data=hwcom.get();//get CR > lcdext.line(3); > lcdext.print("Waiting CR");//Zum Testen > //---------------SEND END OF TRANSMISSION <EOT><CR> ------------- > hwcom.put(4); > sleep 100; > hwcom.put(13); > lcdext.delline(3); > lcdext.line(3); > lcdext.print("PUT");//Zum Testen > sleep 1000; > hwcom.print("ATZ\13\10"); > sleep 100; > hwcom.print("ATZ\13\10"); > lcdext.line(4); > lcdext.print("Auflegen");//Zumtesten > sleep 100; > lcdext.delline(4); > lcdext.line(4); > lcdext.print("ende");//Zum Testen > sleep 3000; > lcdext.init(); > } > > > function sms2() > { > string antwort,vergleich;byte buchstabe; > TAPCRC(); > hwcom.init(); > hwcom.setspeed(8); > hwcom.flush(); > lcdext.init(); > lcdext.line(1); > lcdext.print("sending SMS..."); > hwcom.print("ATZ\13\10"); //Modem reset > getOK(); > if getOK()==255 > {lcdext.line(2); > lcdext.print("Modem gefunden"); > sleep 1000; > } > else > { lcdext.delline(2); > lcdext.line(2); > lcdext.print("kein Modem"); > sleep 1000; > ende(); > } > hwcom.print("ATS7=90\13\10");// Register S7 warten auf Träger > sleep 1000; > hwcom.print("ATS8=2\13\10"); // Register S8 Pausenlänge > sleep 1000; > hwcom.print("ATH1\13\10"); //Abnehmen warten auf Wählton > sleep 1000; > hwcom.flush(); > hwcom.print("ATDT01712521002\13\10'");//D=Verbindung T=Tonwahl D1 Nummer01712521002 > lcdext.line(2); > lcdext.print("Waehle........"); > int s; > getStatus(); > if getStatus()==255 > { lcdext.clear(); > lcdext.line(1); > lcdext.print("verbunden"); > loginTAP(); > } > else > { > > lcdext.clear(); > lcdext.line(1); > lcdext.print("nicht verbunden"); > hwcom.print("ATHZ\13\10"); > hwcom.print("ATHZ\13\10"); > sleep 5000; > lcdext.init(); > ende(); > } > > } > > Ich weiß nicht mehr weiter Wer ne Idee??? > > Danke für eure müheruß Thomas L > > Gruß Thomas L >

Dateianhang: (.gif, .png., .jpg, .zip, .rar)

max. 256kB

max. 256kB