home bbs files messages ]

Just a sample of the Echomail archive

Cooperative anarchy at its finest, still active today. Darkrealms is the Zone 1 Hub.

   MYSTIC      Mystic support echo      16,010 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 13,264 of 16,010   
   Black Panther to G00r00   
   Mystic Suggestions   
   29 Mar 21 12:43:00   
   
   MSGID: 1:317/3 34329dab   
   TZUTC: -0600   
   TID: hpt/lnx 1.9.0-cur 2019-01-08   
   Hi g00r00,   
      
   I hope you and your family are doing well.    
      
   I've got a couple of suggestions for additions to Mystic, particularly in the   
   MPL end of things.    
      
   1. Would be possible to add a function in MPL similar to the IsNumber function   
   in FreePascal?   
      
   For now, I have written a function that does something close to what I need.   
   If I'm going to be taking user input and will need to Str2Int, I want to make   
   sure it's an actual number. ;)   
      
   Here is what I've put together. It's untested, so there may be issues with it.   
      
   Function IsNumber(str:String):Boolean   
   Var   
     c   : Byte   
     a   : Array[1..10] of Boolean   
   Begin   
     IsNumber:=True   
     For c:=1 to Length(str) Do   
       If Ord(str[c])<48 Or Ord(str[c])>58 Then   
         a[c]:=False   
       Else a[c]:=True   
     For c:=1 to Length(str) Do   
       If a[c]=False Then IsNumber:=False   
   End   
      
   2. Not sure about how possible this is, but could a text box, such as the   
   vertical, horizontal, etc, be used to ask a user a question and have them type   
   in a response? Such as:   
      
                       Enter your BBS Name   
                  [                           ]   
      
   And be able to save the response as a string?   
      
   I've been having fun putting these in different places within Castle Rock, and   
   think this would be a great addition.   
      
   Thanks for all of your hard work and effort you put into Mystic. It is greatly   
   appreciated!   
      
      
   ---   
      
   Black Panther(RCS)   
   aka Dan Richter   
   Castle Rock BBS   
   telnet://bbs.castlerockbbs.com   
   http://www.castlerockbbs.com   
   http://github.com/DRPanther   
   The sparrows are flying again...   
      
   --- Mystic BBS v1.12 A47 2021/01/14 (Linux/64)   
    * Origin: Castle Rock BBS - bbs.castlerockbbs.com (1:317/3)   
   SEEN-BY: 1/123 90/1 105/81 114/705 120/340 123/120 131 129/305 226/30   
   SEEN-BY: 227/114 702 229/101 424 426 452 550 664 700 981 1016 1017   
   SEEN-BY: 240/5832 249/206 307 317 400 282/1038 292/854 298/25 305/3   
   SEEN-BY: 317/3 322/757 342/200 633/280   
   PATH: 317/3 229/426   
      

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca