home *** CD-ROM | disk | FTP | other *** search
/ The Arcade BBS / arcadebbs.zip / arcadebbs / bbstools / MODS / ALLMODS.ZIP / JIFF-01.ZIP / JIFF-01.MOD < prev   
Encoding:
Text File  |  1995-06-17  |  3.1 KB  |  86 lines
  1. ``Jiff`` IceNET #4 AT 7668
  2. Mon Jun 12 17:35:42 1995
  3. ┌───────────────────────────────────────────┬────────────Cow Header (Moo)───┐
  4. │ Mod Name: JIFF-01.MOD    The Author: Jiff │ 4@7668 IceNET  1@7604 Penguin │
  5. │ Difficulty: █▒▒▒▒▒▒▒▒▒                    │ 1@1 CowLink    1@7666 GoldNET │
  6. │ WWIV Version: v4.24      Date: 06/12/95   │ 1@7669 ZeppNET 1@7666 RoadNET │
  7. │ Files Affected: DIREDIT.C                 │                1@52 AstralNET │
  8. │ Description: Colourful boxed diredit.     │                               │
  9. └───────────────────────────────────────────┴───────────────────────────────┘
  10.  
  11.     This mod doesn't do much, except make //DE look nicer...  I like it,
  12. (which is why I am releasing it) and it's easy...  =)  I was going to make
  13. the strings extrnal, but it really isn't worth the work, since this way it
  14. will be easier to upgrade to any changes in newer versions of WWIV.
  15.  
  16. ─═[Step 1]═─
  17.     Open DIREDIT.C and go to void modify_dir, and look for this:
  18.  
  19.     outstr(get_string(62)); pl(r.name);
  20.     outstr(get_string(63)); pl(r.filename);
  21.     outstr(get_string(135)); pl(r.path);
  22.  
  23. Comment out down to here:
  24.  
  25.     }
  26.     nl();
  27.     prt(2,get_string(1498));
  28.  
  29. Then block copy this below:
  30.  
  31. /* Start JIFF-01.MOD */
  32.     npr("7╒═[1DirEdit7]═════════╕\r\n");
  33.     npr("7│ 1A9.1 Name           7│ 1");    pl(r.name);
  34.     npr("7│ 1B9.1 Filename       7│ 1");    pl(r.filename);
  35.     npr("7│ 1C9.1 Path           7│ 1");    pl(r.path);
  36.     npr("7│ 1D9.1 D/L Security   7│ 1");    pln(r.dsl);
  37.     npr("7│ 1E9.1 Minimum Age    7│ 1");    pln(r.age);
  38.     npr("7│ 1F9.1 Maximum Files  7│ 1");    pln(r.maxfiles);
  39.     strcpy(s,get_string(5));
  40.     if (r.dar!=0) {
  41.       for (i=0; i<16; i++)
  42.     if ((1 << i) & r.dar)
  43.       s[0]='A'+i;
  44.       s[1]=0;
  45.     }
  46.     npr("7│ 1G9.1 DAR            7│ 1");    pl(s);
  47.     npr("7│ 1H9.1 Require PD     7│ 1");
  48.       pl((r.mask&mask_PD)?str_yes:str_no);
  49.     npr("7│ 1I9.1 Directory Type 7│ 1");    pln(r.type);
  50.     npr("7│ 1J9.1 Uploads        7│ 1");    pl((r.mask & mask_no_uploads) ? get_string(143) : get_string(115));
  51.     npr("7│ 1K9.1 Archives Only  7│ 1");    pl((r.mask & mask_archive) ? str_yes : str_no);
  52.     npr("7│ 1L9.1 Drive Type     7│ 1");
  53.       if (r.mask & mask_cdrom)
  54.     pl(get_string(1154));
  55.       else
  56.     pl(get_string(1155));
  57.     if (r.mask & mask_cdrom) {
  58.       npr("7│ 1M9.1 Available      7│ 1");
  59.     if (r.mask & mask_offline)
  60.       pl(str_no);
  61.     else
  62.       pl(str_yes);
  63.     }
  64.     npr("7╘═══════════════════╛\r\n");
  65.     nl();
  66.     npr("7─═[1Which?7]─[1A9-1M9, 1[9,1]9, 1Q9uit7]═─9 ");
  67. /* End JIFF-01.MOD */
  68.  
  69. And it contiues on...
  70.  
  71.     ch=onek("QABCDEFGHIJKLM[]");
  72.     switch(ch) {
  73.       case 'Q':done=1; break;
  74.       case '[':
  75.  
  76. ─═[Step 2]═─
  77.    Done!  Make your BBS and e-mail me saying you used it, or need help!
  78. Rememeber, I am not responsable if this screws up anything.  You should
  79. know to make backups.  =)
  80.  
  81.             ─═[Jiff]═─
  82.             ─═[Sysop ■ The Cow Pasture]═─
  83.             ─═[Co-Sysop ■ The Pinnacle]═─
  84.  
  85. JIFF-01 .MOD  ■  Boxed DirEdit
  86.