XProfan

22.09.2006 ▲

- Seite 3 -

GDL

Ok, jetzt wirds zu hoch für mich.Dann läufts mit Xprofan halt nen bisschen langsamer.

War aber zum Reinschnüffeln recht interessant.

Servus
Georg

Windows7 Xprofan 8,9,10 [...]

Frank
Abbing

[quote:25c1edbc3a]Kann ich aus einer ASM .dell oder dll überhaupt eine andere Procedure im Hauptprogramm aufrufen und in die dll zurückkehren oder muss alles in derselben dll stehen.
Kann man überhaupt in einer dll mehrere procs haben und dazwischen rumspringen?[/quote:25c1edbc3a]
Ich denke, ich weiss, worauf du hinaus möchtest. Du kannst von Profan aus Variablen und Texte an die Dll übergeben, und genauso kann auch die Dll Variablen und Texte zurück geben. Die Dll kann mehrere Funktionen besitzen und du kannst auch eine Funktion in einer anderen Funktion aufrufen. Du kannst sogar aus der Dll eine Profan-Prozedure aufrufen.

Vielleicht bekommst du ja noch mal Lust, weiter zu schnüffeln

GDL

Ich kann mit dem Begriff Funktion in diesem Zusammenhang nichts anfangen.
Kann da eine Funktion auch ein Proc sein.Also nicht ein einzelner Befehl, sondern ein ganzes Unterprogramm was im Hauptprogramm in einem Proc läuft.
Ich tue mich meistens immer recht schwer, was ihr mit einer Funktion meint.

Servus
Georg

Windows7 Xprofan 8,9,10 [...]

Michael
Dell

Die Funktionen einer Dll sind im Prinzip das gleiche wie eine Proc in Profan und besteht aus beliebig vielen Befehlen!

Nachtrag: Der Unterschied liegt darin das bei Dll- Funtionen nur Werte & String- Adressen übergeben und zurückgegeben werden! Deshalb sind Strukturierte Bereiche so wichtig!

Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht!

GDL

@Frank,

wenn ich es momentan auch nicht auf die Reihe bekomme muss ich aber trotzdem weitermachen.Bei unserer Vereinsgrossanlage dauerte die Datensammlung,Auswertung und Übertragung bei 100 Loks, 50 Weichen und 80 Signale je Kommponente ca. 15 sec.Dies ist für den Betrachter einer Anlage zu langsam.

Gott sei Dank haben nicht alle solche Anlagen.

Servus
Georg

Windows7 Xprofan 8,9,10 [...]

GDL

das ganze tue ich mir desswegen an :

Softlok z.B. ist ein reines DOS Programm.

Dauer einer typischen Softlokkette auf dem gleichen PC

DOS Ver. 6.1 0,01 bis 0,04 sec
WinME 0,08 bis 0,6 sec
auf meinem Rechner mit 5 facher Taktfrequenz unter WinXP
satte 1,3 bis 1,5 sec.

Dies ist aber ein Schrittkettenprogramm ohne grosser Anlagenauswertung.
Wenn jedes Windows doch nen Schalter zum Abschalten der 20 ms Abfrage hätte.

Servus
Georg

Windows7 Xprofan 8,9,10 [...]

Frank
Abbing

Das ist genau der Grund, warum mir Profan als Programmsprache alleine nicht reicht. Meine Programme bestehen darum in der Regel aus über 95 Prozent Profancode, aber den Rest (alles zeitintensive) mache ich mit Assembler.
Dieser simple XPIA-Democode demonstriert schön die Zeitersparniss in nur einer einzigen Schleife:
Kompilieren Markieren Separieren

!{$iq}
Declare x&,y&,z&
Cls
x&=37

AsmStart Funktionsname1(x&)

    mov eax,0
    mov ebx,para1
    mov ecx,999999    ;ecx als Schleifen-Zähler einsetzen

    .while ecx!=0     ;Schleife so lange wiederholen, bis ecx gleich Null ist

        add eax,ebx
        dec ecx         ;Wert von ecx um eins subtrahieren

    .endw

    ;Diese Assemblerroutine macht das gleiche wie:
    ;
    ;x&=0
    ;Whileloop 999999
    ;  x&=x&+37
    ;EndWhile
    ;
    ;Eine Schleife, die eine Millionen mal einen Wert addiert
    ;Dauer: XProfan = 18 Sekunden / XPIA = 1 Millisekunde

AsmEnd (z&)

Print "Addiere 999999 mal 37 = "+Str$(z&)
WaitInput
End

Nachtrag: Die Assemblerschleife könnte man auch so lösen:
Kompilieren Markieren Separieren

mov eax,0
mov ecx,0         ;ecx als Schleifen-Zähler einsetzen

.repeat

    add eax,37
    inc ecx         ;Wert von ecx um eins erhöhen

.until ecx==999999

Hier nochmal die gleiche Schleife in Profan:
Kompilieren Markieren Separieren

x&=0

Whileloop 999999

    x&=x&+37

EndWhile

GDL

habe XPSE und XPIA geupdatet Komme aber nur bis hierhin.

xpia.jpg	450 kB

Hochgeladen:	11.10.2006

Ladeanzahl:
		Herunterladen

Windows7 Xprofan 8,9,10 [...]

Was Anderes Georg - ich sehe Du kombinierst die Schalter derart das kompilier und gelinkt wird, startest dann aber den Interpreter, dabei könntest Du doch besser ein E statt ein I nehmen was die EXE ausführt statt den lahmen Interpreter.

Frank
Abbing

So sollte die erste Zeile in deinem Code aussehen: {$iq}
Zum Testen reicht ja der Interpreter.

GDL

Hallo,

egal was ich eingebe und egal welches Beispielprog ich nehme, es geht nur soweit wie auf dem screenshoot sichtbar.

Servus
Georg

Windows7 Xprofan 8,9,10 [...]