English
SDK-aide/ Tools

JRPC new Precompiler for XProfan X4 - JRPC3

 
- Page 1 -



Jens-Arne
Reumschüssel
good evening together,

i'm recent over the trouble stumbled, that XPSE a quite large Quelldatei of I do not More process could. variables get suddenly as not definiert gemeldet and others "erratische" Problems More. I could me present, that this on it lying, that XPSE Keywords in windows-Atoms manages. there's sometime Schluss (with something between 60.000 and 70.000 Piece, where one deliberating must, that XPSE The windows-API with vorhält). Perhaps is But something integrally other, I can Yes not whom "Maschinenraum" of XPSE look.

anyway stayed me, there XPSE not any more taken care of becomes, nothing other spare, as the nachzubauen. the Result is JRPC3.

----- Features:

*reasonable Message of Fehlern
*direct display the Programmablaufes in XProfEd (sofern the under erhältliche aufgebohrte XProfEd is used)
*Umsetzung the middle-aged Profan-Syntax for Operators and old Containerfunktionen
*extreme speedy native fbPROCs, sofern one FreeBasic installs has (free, see Help)
*with fbPROCs can additionally Inline-Assembler too to XProfan X4 realized go
*extreme speedy native pbPROCs, sofern one PureBasic installs has
*Echtzeitverfolgung of Variableninhalten
*simple Zeitmessungen in the Programmablauf
*Profan-Kompilerdirektiven functions finally sensible (z.B. Verschachtelung)
*eingebettete variables functions too with Arrays
*most WIN32-API-functions are already vordefiniert included
*API-Aufrufe over @external(...) go automatically in @call(...)-Aufrufe umgesetzt
*Einrückungsanalyse to that find of vertrackten Verschachtelungsfehlern
*Klammeranalyse to that find of vertrackten Klammerfehlern
*ENUMERATE-Funktionalität
*Assert to Fehlerkontrolle
*it can arbitrary DLLs into XProfan-EXE integrate go, so tappt im dunkeln not delivered go must (see {$WrapDll})
*simple Killen Pixel JRPC3 launched Programs (interprets, .prc launched, .exe launched)
*extreme quick (and therefore naturally not XProfan written, there a interpretierte Language this natural plenty too slow is)
*at Start of JRPC3 already available .prc-Files can to that started and left used go (it'll one Info displayed, that it itself for a altes Compilations deals)
*the Profan-Compiler can to Beschleunigung with high Prozessorpriorität called go
*eingebauter Update-Checker with Download, if it one Update gives (Help --> online to Updates search)
*64- or 32-bit-Version available (simply JRPC3_64.exe or JRPC_32.exe as Interpreter in XProfEd deposit [Options --> general Settings] and JRPC3 with F7 started) - deference, The 64-bit-Version created naturally no 64-bit-XProfan-programs, there XProfan the not can, separate JRPC3 self becomes as 64-bit-Program carryed out
*XProfan X4-Syntax available (möglicherweise not yet everything, I presumably not everything of it use, but I have me circa Vollständigkeit ready - anyway are z.B. HASH-Arrays and QUADINTs thereby)
*Interpreter, PRCs and EXEs can with Kommandozeilenparametern carryed out go
*Interpreter, PRCs, EXEs and XPSE can with Administratorrechten carryed out go
*Procedures, The in the actually Program of course include are, but not uses go, go from the umgesetzten File removes, around the Filesize the Kompilats possible small To hold
*variables, The in the actually Program of course include are, but not uses go, go from the umgesetzten File removes, around the Filesize the Kompilats possible small To hold and the Speicherverbrauch To optimize
*nPROCs from XPSE go automatically with XPE to a DLL umgesetzt and the Aufrufe the nPROCs in the program properly adjusted, sofern XPSE present is
*almost everything from XPSE functions too in JRPC3 ({$NOERR}, {$(PRE)BATCH}, {$PUSHKEYWORD}, Interpreter, Runtime and compiler determine, Shorties, ...)
*XProfEd_JR with View source-AutoComplete
*XProfEd_JR with View source-Memory-function (Markierungen, To them zurückgesprungen go can)

Einschränkungen:
-no XPSE-Inline-Assembler, well but XProfan-Inline-Assembler (therein though no tests on Korrektheit the Codes)
-ABER: one can XPSE from JRPC3 out Call, so these Funktionalität furthermore available is, sofern one XPSE own (new Shorty: {$x})
-variables, The in a procedure not declared are, separate "aus the aufrufenden procedure übernommen werden", are standardmäßig not registered (XProfan allows the, but such a thing is just as mortal How GOTO-instructions). Please any To nutzenden Inputs as Parameter transfer, and if something from the aufrufenden Programmteil changed go must, when calling as Parameter z.B. @addr(x&) use and the procedure parameters x# and LONG x#,0=y& benefit.
If one but absolutely "vererbte" variables benefit would like, can this with the Kompilerdirektive {$Declare...} do.

*as Hommage on XPSE sounds The Endung the Ausgabedatei ".enh3"

an genauere explanation the individual Features is the chm-Helpfile To entnehmen, The in the program under Help --> Helpfile Show or with F1 available is.

----- /Features

Download and install:
JRPC3 can under Downloaded go (setup_jrpc3.exe or as ZIP-File).
as Installationsverzeichnis Please the XProfan-Stammverzeichnis indicate, means the one, in the The Files PROFAN.EXE, PROFCOMP.EXE, PRFRUN32.EXE etc. lying. alternatively can The ZIP-File Downloaded and its Content manually in that XProfan-Stammverzeichnis copies go.

facility:
JRPC3_64.exe or JRPC_32.exe as Interpreter in XProfEd deposit [Options --> general Settings] and JRPC3 with F7 started.

any command are with the commands "h" How "Hilfe" abrufbar and should selbsterklärend his.

for many erweitere Features, The XProfEd concern, How z.B. jenes, The row, in the one Error auftrat, directly in XProfEd Show to, is the mitinstallierte XProfEd_JR necessary. For this must one means XProfEd_JR.exe instead of XProfEd.exe as editor using. as "goody" there moreover, that at On- and Zufalten of Programs one Fortschrittsanzeiger integrate is (the can with large Programs Yes known a little bit last).

it likes his, that not yet everything perfect functions. I Please this circa clemency. my  programs can umsetzen, but the must yet long not hot, that this with Programs another Authors, The eachone so your Eigenheiten having, too functions.

Fehlermeldungen and Verbesserungsvorschläge gladly on jreumsc@web.de or here in the Forum.

best Regards, Jens-Arne

2.584 kB
Bezeichnung:JRPC3
Version:10.29
Kurzbeschreibung: JRPC3-Installer
Hochgeladen:02/15/21
Downloadcounter363
Download
1.699 kB
Bezeichnung:XProfEd_JR
Version:5.2
Kurzbeschreibung: old Version without AutoComplete to safety
Hochgeladen:02/15/21
Downloadcounter224
Download
3.777 kB
Bezeichnung:JRPC3
Version:10.29
Kurzbeschreibung: ZIP-File instead of Installer
Hochgeladen:04/02/21
Downloadcounter291
Download
 
XProfan X4 * Prf2Cpp * XPSE * JRPC3 * Win11 Pro 64bit * PC i7-7700K@4,2GHz, 32 GB RAM
PM: jreumsc@web.de
02/16/21  
 



 
- Page 9 -


« this Posting watts as Solution marked. »

- Page 15 -



Jens-Arne
Reumschüssel
there's a new Version, The differently with the internen Messagehandling bypassing. Please probier The time from. Perhaps is the trouble so fixed.
 
XProfan X4
XProfan X4 * Prf2Cpp * XPSE * JRPC3 * Win11 Pro 64bit * PC i7-7700K@4,2GHz, 32 GB RAM
PM: jreumsc@web.de
09/24/22  
 




funkheld
----------------------------
Author: p. woodpecker (---.nat.highway.telekom.at)
date: 09.01.22 17:44

i'm 2 1/2 months older as Heinz, but vastly verkalkter. The hope on XProfan X5 holds me young
---------------------------

XProfan X5 holds you young.
but here time a little bit with cogitate help How one The site of XProfan4 improve can create You not....... and soar from :
--------------------------
So I soar on this display:
--------------------------
 
01/10/22  
 




RudiB.
means...now must so did i something write....
Profan is Translated "EINFACH"
i think time the Roland so a Grundstock create wished circa Programmierern a light Entry in a simple and withal alledem mighty Programming-Language To give. PROFAN == EINFACH
I know now not, what with PROFAN (now Yes XPROFAN) not release can.
the must now really not any more aufgeblasen go... there can Yes same on C#,C++,Delphi,Java.....or sonstiges transfer, performance due....
or from other Found.
 
Xprofan X4
Rudolf Beske / München

Hardware: NB Intel I9 - 16GByte RAM
01/10/22  
 




RudiB.
then is But not any more so Profan.......simply !!
 
XProfan X4
Xprofan X4
Rudolf Beske / München

Hardware: NB Intel I9 - 16GByte RAM
01/10/22  
 




p.specht

alas Yes, The installed REGEX-Syntax could one too as Own Language werten. and the IDEs How LemonED having your Own MACRO-Syntax. naturally come too yet The Compilerdirektiven moreover.

XProfan-X4 self knows concise 2000 Suchbegriffe in its Help-system. Sorry, More fit not my Hirn. I find, XProfan ought to Fun make and not as Selbstzweck serve. Extra-simply, XProfan hold!
 
Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'...
01/11/22  
 




funkheld

XProfan-X4 self knows concise 2000 Suchbegriffe in its Help-system. Sorry, More fit not my Hirn.


it reicht really XProfanx4 and need no XProfanx5.

one can with XProfanx4 a feinschliff distinguished , so my I Perhaps Proposals reinbauen The a the program relieve and not same with ASM loslegen must.

I likes extensions The jens-arne erfindet.
and this FreeBasic what it now with uses is super. one can means with the Basic crazy speedy extensions make for the XProfanx4
 
01/11/22  
 




funkheld


Hello Jens-Arne.

now goes it with the dib-presentment.
the Image has a size of 700x700x3

stuff mach I am here with 460000 time with the colour blue.

super quick 460000 time...with a wink is the image painted.

one can in the Loop too " FOR Test = 0 TO g -100000 step 3" zb take.

greeting
 {$FBSYNTAX on}
declare dib&,array&,groesse&,hoehe&,ende&,bild&
DEF CreateDIB(2) !"dib","CreateDIB"
DEF FreeDIB(1) !"dib","FreeDIB"
DEF DrawDIB(4) !"dib","DrawDIB"
DEF CloneDIB(1) !"dib","CloneDIB"
dib&=usedll("dib.dll")
fbProc erzeugebild(byval b As Integer, ByVal g As Integer) As Integer export
Dim Test As Integer
FOR Test = 0 TO 1400000 step 3
poke byte,Test+b,&h00
poke byte,Test+b+1,&h00
poke byte,Test+b+2,&hff
next Test
return 0

endproc

fbProc erzeugebildi(byval b As Integer, ByVal g As Integer) As Integer export
Dim Test As Integer
FOR Test = 0 TO 1400000 step 3
poke integer,Test+b,&h0000ff
next Test
return 0

endproc

array&=CreateDIB(700,700)
groesse&=700*700*3
hoehe&=700
Window 20,20-750,780
Cls RGB(255,255,255)
bild&= Long(array&,40)
erzeugebildi(bild&,groesse&)
DrawDIB(%hdc,10,10,array&)
WaitKey
FreeDIB(dib&)
End

29 kB
Hochgeladen:01/11/22
Downloadcounter43
Download
 
01/11/22  
 




funkheld


Hello Jens-Arne.

I have now time with XProfanx4 one Screen of Freebasic opened to that draw and moreover the Profan-windows.
it functions.

becomes tidy to a DLL compiled.

Thank you.
 {$FBSYNTAX on}
fbProc erzeugescreen() As Integer export
dim a as string
Screenres(256,256)
a="Linie"
TextOut(%HDC,50,80,a,len(a))
Line (64,128)-(192,128)
a="Rechteck"
TextOut(%HDC,50,110,a,len(a))
Line (64,64)-(192,192),,B
a="Kreis"
TextOut(%HDC,50,140,a,len(a))
Circle (128,128),91
return 0

endproc

Window 20,20-200,400
Cls RGB(255,255,255)
erzeugescreen()
WaitKey
End

22 kB
Hochgeladen:01/13/22
Downloadcounter48
Download
 
01/13/22  
 




funkheld


FreeBasic graphic with Profan-Button.

greeting
 {$FBSYNTAX on}
Declare lever btn1, btn2,btn3,btn4,btn5
Declare Long end
end = 0
fbProc erzeugescreen() As Integer export
Screenres(256,256)
return 0

endproc

fbProc line() As Integer export
Line (64,128)-(192,128)
return 0

endproc

fbProc rectangle() As Integer export
Line (64,64)-(192,192),,B
return 0

endproc

fbProc circles() As Integer export
Circle (128,128),91
return 0

endproc

fbProc clss() As Integer export
cls
return 0

endproc

Window 300, 400
btn2  = Create("Button", %HWnd, "linie", 10, 35, 80, 25)
btn3   = Create("Button",%HWnd, "rechteck", 10, 60, 80, 25)
btn4   = Create("Button",%HWnd, "circles", 10, 85, 80, 25)
btn5   = Create("Button",%HWnd, "cls", 10, 110, 80, 25)
erzeugescreen()

WhileNot end

WaitInput

If Clicked(btn2)

line()

endif

If Clicked(btn3)

rectangle()

EndIf

If Clicked(btn4)

circles()

EndIf

If Clicked(btn5)

clss()

EndIf

EndWhile

End

23 kB
Hochgeladen:01/13/22
Downloadcounter43
Download
 
01/13/22  
 




funkheld


XProfanX4 likes I because of the graphic everybody can there simply produce can.
If I but Float need in the graphic come I with the Profan under Zeitdruck.
this FreeBasic with Profan together help me super.

Zeitmessung with my Notebook 2,5 GHz :

FreeBasic :
1000000 time : a= sin(b)* 3.145678 / 0.345
Mehrmal gestoppt with ca 43 Millisekunden

greeting
 {$FBSYNTAX on}
Declare lever btn1, btn2,btn3,btn4,btn5
Declare Long end
end = 0
fbProc erzeugescreen() As Integer export
Screenres(400,256)
return 0

endproc

fbProc zeitmessung() As Integer export
DIM AS DOUBLE StartZeit, EndZeit
dim a as single
dim b as integer
StartZeit=TIMER
for  b=0 to 1000000
a=sin(b)* 3.145678 / 0.345
next b
EndZeit=TIMER
PRINT "Das has ";
PRINT USING"#######.###" ;(EndZeit-Startzeit)*1000;
PRINT " Millisekunden gedauert"
return 0

endproc

fbProc clss() As Integer export
cls
return 0

endproc

Window 300, 400
btn2  = Create("Button", %HWnd, "zeit", 10, 35, 80, 25)
btn3   = Create("Button",%HWnd, "", 10, 60, 80, 25)
btn4   = Create("Button",%HWnd, "", 10, 85, 80, 25)
btn5   = Create("Button",%HWnd, "cls", 10, 110, 80, 25)
erzeugescreen()

WhileNot end

WaitInput

If Clicked(btn2)

zeitmessung()

endif

If Clicked(btn3)

EndIf

If Clicked(btn4)

EndIf

If Clicked(btn5)

clss()

EndIf

EndWhile

End

41 kB
Hochgeladen:01/14/22
Downloadcounter37
Download
 
01/14/22  
 




Jens-Arne
Reumschüssel
Hello together,

i want really niemandem suggerieren, XProfan would now through JRPC3 somehow komplizierter or less beautiful useable become. once more: nobody must native Procedures use, weder nProcs To XPSE-times, yet fbProcs now. XProfan remaining XProfan, means simply. If one but once really speed need, does it now integrally simply. went not, should one in a integrally others Language sheer. *the* is the sense of fbProcs. it exists too no menace, that now someone integrally To FreeBasic change could, because so The development whole programs integrally and quite not at all "einfach" is. The simple row "cls" in XProfan would in FreeBasic sure hundred Lines and More require, because a Fensterklasse definiert and a Messagehandling arranged go should, everything "per Hand". fbProcs contact just the Geniale of XProfan (So the "Einfache") and the speed of Languages, The directly in Maschinensprache Translated go. I personally find, that these link invincible is and XProfan even new life einhauchen can (The Examples of Funkheld are beredtes Zeugnis this); in the momentum are we Yes unfortunately not any more so many.

in the newest Version of JRPC3 can now incidentally with "f" directly The row with the first Error in a fbProc showing, whom the FreeBasic-Compiler auswirft, if one itself there verbastelt has.

best Regards, Jens-Arne
 
XProfan X4 * Prf2Cpp * XPSE * JRPC3 * Win11 Pro 64bit * PC i7-7700K@4,2GHz, 32 GB RAM
PM: jreumsc@web.de
01/15/22  
 




funkheld
Hello, thanks for your new Version of jrpc3 .

greeting
 
01/15/22  
 




RudiB.
Hello Jens-Arne,

It's all right here really not against you and your endeavours.
XPSE is really well.
JRPC3 is really well.
however must I in both Make me new Syntax take possession of / add / learn.
I wealth Yes very each endeavour to there gehend XProfan To improve.
Perhaps straight performance due. i don't know whether Roland me there right give would, I faith it wished something "Einfaches"...otherwise had it well mere written ....learn DELPHI.....is faster.

however, no review on your endeavours....mach moreover so. Find I GUT....
however, the must eachone in this Forum for itself self decide
 
XProfan X4
Xprofan X4
Rudolf Beske / München

Hardware: NB Intel I9 - 16GByte RAM
01/15/22  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

no Systemprofil laid out. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Please register circa a Posting To verfassen.
 

Topic-Options

62.403 Views

Themeninformationen



Admins  |  AGB  |  Applications  |  Authors  |  Chat  |  Privacy Policy  |  Download  |  Entrance  |  Help  |  Merchantportal  |  Imprint  |  Mart  |  Interfaces  |  SDK  |  Services  |  Games  |  Search  |  Support

One proposition all XProfan, The there's!


My XProfan
Private Messages
Own Storage Forum
Topics-Remember-List
Own Posts
Own Topics
Clipboard
Log off
 Deutsch English Français Español Italia
Translations

Privacy Policy


we use Cookies only as Session-Cookies because of the technical necessity and with us there no Cookies of Drittanbietern.

If you here on our Website click or navigate, stimmst You ours registration of Information in our Cookies on XProfan.Net To.

further Information To our Cookies and moreover, How You The control above keep, find You in ours nachfolgenden Datenschutzerklärung.


all rightDatenschutzerklärung
i want none Cookie