home *** CD-ROM | disk | FTP | other *** search
- Johnny Five #26 @15301
- Fri Jul 07 13:06:50 1995
- ╒NI Header (c)══════════════════════════════════════════════════════════════╕
- │ N O V A I N D U S T R I E S B B S 9 0 4 - 2 6 0 - 2 3 9 4 │
- ╞═══════════════════════════════════════════════════════════════════════════╡
- │ Mod Name : NI-005.424 Author: Johnny Five 1 @1 ExcelNet │
- │ 1 @15333 WWIVnet │
- │ Difficulty: Can you pick your nose? 1 @9411 TFAlink │
- │ 1 @4000 COWBOYnet │
- │ Version : 4.24 Date: 06-04-95 and many others │
- │ │
- │ Files Affected: MSGBASE1.C │
- │ │
- │ Description: Users can download messages from read message prompt │
- │ when they type 'E' │
- ╘═══════════════════════════════════════════════════════════════════════════╛
-
- This Mod was originally by Darrell Mobley for v4.20
- Thanx goes to WhiteHeart for pointing out a little bug
-
-
- = Already there
- + add
- - Remove
- * change
-
-
- Step 1: B(ack).U(p).Y(our).S(ource).
-
-
- Step 2: load up MSGBASE1.C and look for "case 'E':". Replace your entire case
- 'E' with this one:
-
- case 'E':
- if (so()) {
- if ((msgnum>0) && (msgnum<=nummsgs)) {
- b=readfile(&(get_post(msgnum)->msg),(subboards[curlsub].filename),&len);
- extract_out(b,len, get_post(msgnum)->title);
- }
- } else {
- if ((msgnum>0) && (msgnum<=nummsgs)) {
- b=readfile(&(get_post(msgnum)->msg),(subboards[curlsub].filename),&len);
- nl();
- pl("Download message.");
- nl();
- prt(2,"Filename: ");
- input(s1,12);
- if(!okfn(s1))
- break;
- sprintf(s,"%s%s",syscfg.tempdir,s1);
- unlink(s);
- i=open(s,O_RDWR | O_BINARY | O_CREAT, S_IREAD | S_IWRITE);
- write(i,(void *)b,len);
- close(i);
- farfree(b);
- send_file(s,&i,&i1,0,s,-1,len);
- nl();
- if(i){
- pl("Message download successful.");
- sysoplog("Downloaded Message");
- } else
- pl("Message download aborted.");
- }
- }
- break;
-
- SAVE AND COMPILE!
-
-