XProfan

Deutsch

Georg
Teles

Hallo Forum,

ok, soweit ich verstehe geht das Kompilieren und Linken nur über den Präkompiler XPSE ... sprich der ganze Weg von .PRF zu .EXE geht über

AddString und SendString scheint nProc nicht zu mögen, da steht dann
"Warnung undeklarierte Funktion: SENDSTRING" naja, versuche später es in nProc zu umgehen ...

zurück zum Problem, das ist der Code, der als nProc kompiliert werden soll
Kompilieren Markieren Separieren

nProc cr2

    Parameters File$,fs&

    If fs& MOD 2 = 0

        s% = (fs&\2)-1

    Else

        s% = (fs&\2)

    EndIf

    WhileLoop 0,s%

        p% = p%+word(fs#,&loop*2)

        If p% > 65534

            p% = (p%-65535)

        endif

    EndWhile

    p% = (p%+fs&)
    Return p%

EndProc

Selbstverständlich sind Variablen s%,p%,fs# global deklariert...
... und das ist die Fehlermeldung beim Kompilieren

---
selbst bei kleinen Codes wie diesem bekomme ich eine Fehlermeldung:
Kompilieren Markieren Separieren

 {$cleq}
cls
print rechne(2,4)

nProc rechne

    parameters a&,b&
    a& = a&*b&
    return Str$(a&)

endproc

Waitinput

was mache ich Falsch mit dem XPSE ?

error.jpg

133 kB

Hochgeladen:

15.04.2013

Ladeanzahl:

Herunterladen

error2.jpg Vorschau

39 kB

Hochgeladen:

15.04.2013

Ladeanzahl:

Herunterladen

XProfan 10
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

15.04.2013 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Grüße!

Zunächst mindestens XProfan11 oder FreeProfan nutzen -
das letzte Beispiel von Dir ist fehlerfrei und funzt ganz normal.

Die Proc cr2 jedoch ist fehlerhaft,
auf Anhieb kann ich erkennen das s% nicht lokal deklariert ist und dieser Datentyp mit %
ist in nProcs ohnehin &. Hier nochmal die Datentypen: [...]

Dort auf der Seite steht links auch die Funktionsreferenz,
SendString und SendKey soll man sich danach selbst bauen per SendMessage.
Könnte man dann gleich hier [...]

mit aufnehmen.

fs# ist lokal auch nicht deklariert, es gibt in nProcs aus wichtigen Gründen nur lokale
Variablen und per Parameter übergebene: [...]

,
auf Globale kann man per Global [...]

_lesend_ zurückgreifen -
hier aber nur long. Bereichsvariablen gibt es in nProc nicht weil unnötig,
dort läuft alles direkt per Handle also auch wieder long: [...]

Tip: Ums noch schneller als schnell zu machen unnötige Klammern bei
Rechenoperationen weglassen. So ist s&=fs&\2-1 schneller als s&=(fs&\2)-1 und
noch schneller ist s&=fs&; div s&,2; sub s&,1

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

15.04.2013 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Georg
Teles

guten Morgen,

danke