home bbs files messages ]

Just a sample of the Echomail archive

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

 Message 15161 
 g00r00 to Mike Fenton 
 Re: Mystic Program Question 
 05 Jan 23 22:21:05 
 
TID: Mystic BBS 1.12 A48
MSGID: 1:129/215 86eb92b8
REPLY: 1:229/310 d5678847
TZUTC: -0500
 MF> I did attempt to write this to a file using appendtext and when I did it
 MF> this way, the information contained in the bat file was also cut off. It
 MF> wasn't passing all the information. Seemed like a limit there too....

Yep AppendText would have the same limit.  Strings in MPL are limited to 255
characters everywhere.

To do it in MPL you have to break it up into small chunks and then write it to
the file.  Here is a quick example I whipped up for you (you could also check
the OSID function and make it create a .sh in Unix and .bat in Windows):

Uses CFG

Var
  F         : File;
  Cmd1      : String;
  Cmd2      : String;
  Cmd3      : String;
  BatchName : String;
Begin
  Cmd1 := 'REM This is the first part of a long command. ';
  Cmd2 := 'And this is part two of a long commmand. ';
  Cmd3 := 'And this is part three of a long command';

  Write   ('Command line: ');
  Write   (Cmd1)
  Write   (Cmd2)
  WriteLn (Cmd3)

  fAssign   (F, CfgTempPath + 'mybat.bat', 66);
  fReWrite  (F);
  fWriteStr (F, Cmd1);
  fWriteStr (F, Cmd2);
  fWriteLn  (F, Cmd3);
  fClose    (F);

  WriteLn ('Batch file created. Press any key to execute and delete: |PN');
  
  MenuCmd('DD', CfgTempPath + 'mybat.bat');

  FileErase (CfgTempPath + 'mybat.bat');
End.

... The dog ate my .REP packet

--- Mystic BBS v1.12 A48 (Windows/64)
 * Origin: Sector 7 * Mystic WHQ (1:129/215)
SEEN-BY: 1/123 15/0 90/1 105/81 106/201 114/705 120/340 616 123/10
SEEN-BY: 123/120 131 129/215 305 153/7715 154/10 30 40 50 700 218/700
SEEN-BY: 218/840 220/70 90 221/6 226/17 18 30 70 100 227/114 201 229/110
SEEN-BY: 229/111 112 113 114 206 275 307 310 317 400 424 426 428 452
SEEN-BY: 229/470 550 664 700 250/5 8 266/512 267/800 280/464 282/1038
SEEN-BY: 292/854 298/25 301/1 305/2 3 317/3 320/219 322/757 342/200
SEEN-BY: 396/45 460/58 633/280 712/848 770/1 2320/105 3634/12
PATH: 129/215 154/10 770/1 317/3 229/426


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

(c) 1994,  bbs@darkrealms.ca