Command Counter Script: How Many Commands does the MPR have?

Moderator: MVogt

Post Reply
User avatar
Theo_Gottwald
Posts: 367
Joined: 03. Oct 2009, 08:57
Location: Herrenstr.11 * 76706 Dettenheim
Contact:

Command Counter Script: How Many Commands does the MPR have?

Post by Theo_Gottwald » 04. May 2018, 10:57

So the answer is, there are not 400 ... no 500 ... no 600 and no 700 ... it's ... more.
If you want to know the answer exactly, you can run this script here yourself.
After a short runtime, it reports the exact number of commands of the installed version.

Code: Select all

' +++ main_Command-Counter.rem +++
' Counts commands of the installed MPR version and displays the result in a message box.
'
'========================
GEP\.rem
VAR\$$rea=$v1$
BLB\$$rea>$$rem
VAR\$$ret=$$rem\remhelp\1031\remedit.txt
NEF\$$ret
   SBT\5|MPR is not registered.
   END\
EEF\

VAR\$$rem=$v2$
IEF\$$ret
   VAR\$$hlp=$$remremhelp
ELSE
   GOTO enx
EEF\
VAR\$$cnt=0
DED\1
FEL\$$ret|doit|$$lin
DED\
'DVV\1
CFI\$$rem\remedit.ini|light|light>$$lin
GSL\$$lin
VAR\$$len=$v1$+1
CAL\$$len=$$len\4
CAL\$$len=$$cnt-$$len
MBX\Commands: $$cnt
@

:doit
STT\$$lin
GFS\4,2>$$xxx
IVV\$$xxx=$sp$$sp$
   STT\$$lin
   GFS\2,1>$$yyy
   IVN\$$yyy
      GOTO ende
   EVN\
   VIC\$$cnt
EVV\
:ende
@

:enx
END\

Post Reply

Return to “Package Robot”

Who is online

Users browsing this forum: No registered users and 1 guest