Hi All,

It's your friendly neighborhood pain the a$$! ;)

I just have a couple questions for those of you who have been using MPL.

First of all, is there a list of "Uses" that area available? I've looked through all of the documentation I've been able to find, but haven't found anything. I know that Cfg and User can be used, but are there any others?
I've been playing around with trying to access the callers.dat file, and thought there might be a way to access it directly without having to fAssign it. I've even looked in other MPLs that I have in hopes of finding
something...

Secondly, has anyone been able to get the msgeditset and msgeditget to work?
I was trying to get a simple MPL that will allow the user to add a tagline to
a message entered in Mystic. g00r00 did say that using these two functions would be able to do this, but I haven't had much luck. I can get it to show
the lines of text on the screen, but not save it to the message. I believe
that Pequito was working on getting this to work as well.

If it helps, this is what I've got written for that one:

Uses Cfg
Uses User
Uses MBase
Var
Lines : Integer = 0;
Count : Integer;
Begin
MsgEditSet (1,'RCSTag-v0.01');
MsgEditSet (2,'this is a tagline');
Lines := 2;

For Count := 1 to Lines Do
WriteLn(MsgEditGet(Count));
Pause
End

I have this set to run in the "Saving message..." prompt. It will write the
two lines of text to the screen after hitting ESC and S to save the message, but doesn't save it to the message.


---

Black Panther(RCS)
a.k.a. Dan Richter
Sysop - Castle Rock BBS
telnet://bbs.castlerockbbs.com
http://www.castlerockbbs.com
The sparrows are flying again....

--- Mystic BBS v1.12 A43 2019/03/02 (Linux/64)
* Origin: Castle Rock BBS - bbs.castlerockbbs.com (21:1/186)

others? I've been playing around with trying to access the callers.dat file, and thought there might be a way to access it directly without having to fAssign it. I've even looked in other MPLs that I have in
hopes of finding something...

So, in playing around with accessing the callers.dat file, I did write a very basic last 10 caller MPL. It was actually pretty simple to do. :)

I did use Gryphon's gamestub, although I did delete most of it before I started. I was just too lazy to start from scratch. ;)

It's nothing fancy, but if you'd like to have a look at it, log on to Castle Rock, select 'D' for Doors, then hit 'Z' for the local last 10 callers. I'll work on making it look a little nicer...

Let me know what you think. :)


---

Black Panther(RCS)
a.k.a. Dan Richter
Sysop - Castle Rock BBS
telnet://bbs.castlerockbbs.com
http://www.castlerockbbs.com
The sparrows are flying again....

--- Mystic BBS v1.12 A43 2019/03/02 (Linux/64)
* Origin: Castle Rock BBS - bbs.castlerockbbs.com (21:1/186)

First of all, is there a list of "Uses" that area available? I've looked through all of the documentation I've been able to find, but haven't
found anything. I know that Cfg and User can be used, but are there any

Cfg, User, MBase and MGroup... thats all i know.

others? I've been playing around with trying to access the callers.dat file, and thought there might be a way to access it directly without having to fAssign it. I've even looked in other MPLs that I have in
hopes of finding something...

You could get info for the current user with some variables, but to access
info from previous users, you have to use the file and read the records in it, like you said.

Secondly, has anyone been able to get the msgeditset and msgeditget to work? I was trying to get a simple MPL that will allow the user to add a tagline to a message entered in Mystic. g00r00 did say that using these

I have used them in some of my scripts. I did learn the use of them from one
of Gryphons script :) Check the following scripts of mine: netim, xq-aboard, xq-wp (wordpress cli).

:: XQTR :: Another Droid BBS :: andr01d.zapto.org:9999 :: xqtr@gmx.com

--- Mystic BBS v1.12 A43 2019/03/03 (Raspberry Pi/32)
* Origin: Another Droid BBS # andr01d.zapto.org:9999 (21:1/111)

On 21 May 2019, xqtr said the following...

First of all, is there a list of "Uses" that area available? I've loo

Cfg, User, MBase and MGroup... thats all i know.

That about all I've seen as well... I think there is the FBase and FGroup as well, but haven't tried yet.

others? I've been playing around with trying to access the callers.da file, and thought there might be a way to access it directly without having to fAssign it. I've even looked in other MPLs that I have in

You could get info for the current user with some variables, but to
access info from previous users, you have to use the file and read the records in it, like you said.

That's what I ended up doing. I wrote a simple Last 10 Callers MPL last
night. :)

Secondly, has anyone been able to get the msgeditset and msgeditget t

I have used them in some of my scripts. I did learn the use of them from one of Gryphons script :) Check the following scripts of mine: netim, xq-aboard, xq-wp (wordpress cli).

Hmmm, I'll have to take a look. The only info that I had found was a bit lean and didn't explain much. Thank you.

It always seems like when I have any programming questions, you seem to run
in to 'save the day'! ;) Thank you.


---

Black Panther(RCS)
a.k.a. Dan Richter
Sysop - Castle Rock BBS
telnet://bbs.castlerockbbs.com
http://www.castlerockbbs.com
The sparrows are flying again....

--- Mystic BBS v1.12 A43 2019/03/02 (Linux/64)
* Origin: Castle Rock BBS - bbs.castlerockbbs.com (21:1/186)

That about all I've seen as well... I think there is the FBase and
FGroup as well, but haven't tried yet.

Yes... i haven't used them for a loooong time! I remember that in some point there was some strange behavior with some functions that process bases and to fix the problem, i used to access the .dat files instead of the built in functions,

:: XQTR :: Another Droid BBS :: andr01d.zapto.org:9999 :: xqtr@gmx.com

--- Mystic BBS v1.12 A43 2019/03/03 (Raspberry Pi/32)
* Origin: Another Droid BBS # andr01d.zapto.org:9999 (21:1/111)

On 22 May 2019, xqtr said the following...

Yes... i haven't used them for a loooong time! I remember that in some point there was some strange behavior with some functions that process bases and to fix the problem, i used to access the .dat files instead of the built in functions,

Sounds reasonable. :)

When I was trying to figure out MPL a couple years ago, I was lost. I think stepping back and (re)learning Pascal really helped me. Now, when I'm working with MPL, it's all making sense.

The only thing I'm running into, is functions that I would have used in Lazarus/FP aren't available in MPL... So, I need to find ways to work around them with the functions I do have. :)


---

Black Panther(RCS)
a.k.a. Dan Richter
Sysop - Castle Rock BBS
telnet://bbs.castlerockbbs.com
http://www.castlerockbbs.com
The sparrows are flying again....

--- Mystic BBS v1.12 A43 2019/03/02 (Linux/64)
* Origin: Castle Rock BBS - bbs.castlerockbbs.com (21:1/186)

When I was trying to figure out MPL a couple years ago, I was lost. I think stepping back and (re)learning Pascal really helped me. Now, when I'm working with MPL, it's all making sense.

this is a tip for life too. a step back always gives a new perspective ;)

The only thing I'm running into, is functions that I would have used in Lazarus/FP aren't available in MPL... So, I need to find ways to work around them with the functions I do have. :)

yes. mpk is not freepascal :( but you can always use external programs ;)

:: XQTR :: Another Droid BBS :: andr01d.zapto.org:9999 :: xqtr@gmx.com

--- Mystic BBS v1.12 A43 2019/03/03 (Raspberry Pi/32)
* Origin: Another Droid BBS # andr01d.zapto.org:9999 (21:1/111)

On 20 May 2019 &4, Black Panther said the following...

Hi All,

It's your friendly neighborhood pain the a$$! ;)

I just have a couple questions for those of you who have been using MPL.

First of all, is there a list of "Uses" that area available? I've looked through all of the documentation I've been able to find, but haven't
found anything. I know that Cfg and User can be used, but are there any others? I've been playing around with trying to access the callers.dat file, and thought there might be a way to access it directly without having to fAssign it. I've even looked in other MPLs that I have in
hopes of finding something...

Try this:

Function GETUSER (N: Integer) : Boolean

This procedure will read user data into the USER variables. The
supplied N is the record number to read. The function returns
true if the record was read, or false if a record was not read.
The following USER variables will be set when a record is read:

Variable Name Type Description
-------------------------------------------------------------------
USERDELETED Boolean Is the user marked as deleted?
USERNAME String User's real name.
USERALIAS String User's BBS alias.
USERPASSWORD String User's password.
USERADDRESS String User's street address.
USERCITY String User's City/State.
USERBIRTHDAY String User's birth date.
USERSEX Char User's gender (M = Male, F = FeMale).
USERSEC Byte User's security level (0-255).
USERFIRSTON LongInt User's date/time of first call to the BBS.
This is stored in the packed date format
so in order to display the date & time,
the functions of DATESTR and TIMESTR need
to be used.
USERLASTON LongInt User's date/time of the last call to the
BBS. This is also stored in a packed date
format, so the same rules for USERFIRST
apply to this.
-------------------------------------------------------------------

Example:

Var A Integer

A := 1
While GetUser(A) Do
Begin
WriteLn ('User Alias: ', UserAlias)
A := A + 1
End

The above example will list all user accounts on the BBS system.

Secondly, has anyone been able to get the msgeditset and msgeditget to work? I was trying to get a simple MPL that will allow the user to add a

I've never gotten those to work. I've tried pretty hard and nothing worked. I remember talking to g00r00 about it, but I don't think anything came of it.

--- Mystic BBS v1.12 A43 2019/03/02 (Linux/64)
* Origin: Cyberia BBS | cyberiabbs.zapto.org | San Jose, CA (21:1/120)

On 21 May 2019 &4, xqtr said the following...

First of all, is there a list of "Uses" that area available? I've loo through all of the documentation I've been able to find, but haven't found anything. I know that Cfg and User can be used, but are there a

Cfg, User, MBase and MGroup... thats all i know.

others? I've been playing around with trying to access the callers.da file, and thought there might be a way to access it directly without having to fAssign it. I've even looked in other MPLs that I have in hopes of finding something...

You could get info for the current user with some variables, but to
access info from previous users, you have to use the file and read the records in it, like you said.

Secondly, has anyone been able to get the msgeditset and msgeditget t work? I was trying to get a simple MPL that will allow the user to ad tagline to a message entered in Mystic. g00r00 did say that using the

I have used them in some of my scripts. I did learn the use of them from one of Gryphons script :) Check the following scripts of mine: netim, xq-aboard, xq-wp (wordpress cli).

I just remembered, I do have a userlist mpl if anybody wants to take a look.

http://cyberiabbs.zapto.org/free/mpl/userlist.mps

--- Mystic BBS v1.12 A43 2019/03/02 (Linux/64)
* Origin: Cyberia BBS | cyberiabbs.zapto.org | San Jose, CA (21:1/120)

On 30 May 2019, Gryphon said the following...

The above example will list all user accounts on the BBS system.

That has been very handy, being able to access that information. I was just wondering if it was just USER, CFG, MBASE and FBASE that were available under the USES.

Secondly, has anyone been able to get the msgeditset and msgeditget t work? I was trying to get a simple MPL that will allow the user to ad

I've never gotten those to work. I've tried pretty hard and nothing worked. I remember talking to g00r00 about it, but I don't think
anything came of it.

I know that xqtr said he used those functions, but it looks as though he was writing the information to a file. While inserting a tagline, for example, would be adding text to the information already in memory... Not real sure
how that would work...

I did want to thank you for making the gamestub a few years back. I've used that to start a few MPLs that I've written. Partly because I'm too lazy to write that out myself, and I get started in the interesting parts sooner... :)

I've also been studying xqtr and your MPLs on how certain things are done,
and to find better ways of doing some things.


---

Black Panther(RCS)
a.k.a. Dan Richter
Sysop - Castle Rock BBS
telnet://bbs.castlerockbbs.com
http://www.castlerockbbs.com
The sparrows are flying again....

--- Mystic BBS v1.12 A43 2019/03/02 (Linux/64)
* Origin: Castle Rock BBS - bbs.castlerockbbs.com (21:1/186)