Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum
Re: Operationsgeschwindigkeit Kategorie: CC-Pro Unit & Appl.Board (von PeterS - 23.11.2005 19:55)
Als Antwort auf Re: Operationsgeschwindigkeit von starke - 23.11.2005 16:13

Ahh,

ich hatte den Zusatz "höchste Baudrate" übersehen. Damit lie�e sich dann folgendes Schreiben:

Sub main()
    Dim adret As Word
    Dim str(20) As Char

    ADC_Set(ADC_VREF_VCC,0)
    Serial_Init(0,SR_8BIT Or SR_1STOP Or SR_NO_PAR,SR_BD230400)

    For i=1 To 30000
        adret=ADC_Read()
        Str_WriteWord(12345,10,str,0,0)  ' konvertiert Word in String mit Basis 10 und Offfset 0
        '  Str_WriteWord(0,10,str,0,0)
        Serial_WriteText(0,str)   ' gibt den String aus
    Next
End Sub

Dauer -  Mega128: 5 Zeichen - 17530ms, 1 Zeichen - 9170ms

Für die Tests habe ich alternativ mit den Ausgabewerten "12345" und "0" gearbeitet.

Der sendet dann mit 230K Baud, und vielleicht lä�t sich bei der Stringkonvertierung noch was optimieren.


Gruss Peter

> Hallo Peter,
> vielen Dank fuer Deine schnelle Reaktion.
> Hier der Quellcode fuer 3 Tests im CC1 Basic Code, bin echt gespannt wie schnell der µC wirklich ist.
> Rainald
>
> Testprogramm fuer Port Ausgabefolgen
> '******* DIO Speed
> define OBit1 port[1]
> define OBit2 port[2]
> define coun1 byte
> '******* Main
> print "Start D"
> FOR coun1=1 TO 10000
> OBit1=0:OBit2=1
> OBit1=1:OBit2=0
> NEXT
> beep 100,2,0
> print "Stop D"
> END
>
>
>
> '******* ADC RS232 speed
> define adc1 ad[1]
> define coun1 byte
> define result_8 byte
> define result_10 word
> '******* Main
> print "Start AS"
> FOR coun1=1 TO 10000
> result_8=adc1
> print result_8
> NEXT
> beep 100,2,0
> print "Stop AS"
> END
>
>
>
> '******* ADC Speed
> define adc1 ad[1]
> define coun1 byte
> define result_8 byte
> define result_10 word
>
> '******* Main
> print "Start A"
> FOR coun1=1 TO 10000
> result_8=adc1
> NEXT
> beep 100,2,0
> print "Stop A"
> END
>
>
>

    Antwort schreiben

Antworten:

Re: Operationsgeschwindigkeit (von starke - 24.11.2005 14:20)
    Re: Operationsgeschwindigkeit (von PeterS - 24.11.2005 15:08)
        Re: Operationsgeschwindigkeit (von Gerhard - 24.11.2005 16:06)