home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / W / DEVBBS.ZIP / SYSOPME.C < prev    next >
Text File  |  1992-07-20  |  3KB  |  142 lines
  1.   int done;
  2.  
  3.   done=0;
  4.   do {
  5.   tleft(1);
  6.   npr("e[fTime lefte] 1- f%s\r\n",ctim(nsl()));
  7.   outstr("7() 1The Devil's Doorknob Sysop Menu 7(> ");
  8.   ch=onek("ABCDEFGHIJKLMNOPQRSTUVWXYZ");
  9.   switch(ch) {
  10.     case 'A':
  11.       sysoplog("@ Ran Boardedit");
  12.       boardedit();
  13.       break;
  14.     case 'B':
  15.       sysoplog("@ Ran Diredit");
  16.       dlboardedit();
  17.       break;
  18.     case 'C':
  19.       sysoplog("@ Ran Chainedit");
  20.       chainedit();
  21.       break;
  22.     case 'D':
  23.       sysoplog("@ Ran Gfileedit");
  24.       gfileedit();
  25.       break;
  26.     case 'E':
  27.       nl();
  28.       prt(2,"PW: ");
  29.       echo=0;
  30.       input(s,20);
  31.       echo=1;
  32.       if (strcmp(s,("GOAT"))==0) {
  33.     sysoplog("@ Molested DOS");
  34.     shrink_out(getenv("COMSPEC"),1,1,1,0);
  35.     topscreen();
  36.       }
  37.       break;
  38.     case 'F':
  39.       reset_files();
  40.       break;
  41.     case 'G':
  42.       dtr(0);
  43.       sysoplog("@ Reset the computer");
  44.       logoff();
  45.       sl1(1,"");
  46.       if (ok_modem_stuff)
  47.         closeport();
  48.       setvect(INT_SAVE_21,(void interrupt (*) ()) MK_FP(0xffff,0x0000));
  49.       geninterrupt(INT_SAVE_21);
  50.       break;
  51.     case 'H':
  52.       read_new_stuff();
  53.       break;
  54.     case 'I':
  55.       nl();
  56.       prt(1,"What is the filename? ");
  57.       input(s1,50);
  58.       if (s1[0]) {
  59.         if ((okansi()) && (thisuser.defed))
  60.           external_edit(s1,"",thisuser.defed-1,500);
  61.         else
  62.           tedit(s1);
  63.       }
  64.       break;
  65.     case 'J':
  66.       nl();
  67.       prt(1,"What is the filename? ");
  68.       input(s1,50);
  69.       if (s1[0]) {
  70.         nl();
  71.     prt(5,"eAllow editing? ");
  72.     if (yn()) {
  73.       nl();
  74.       load_workspace(s1,0);
  75.     } else {
  76.       nl();
  77.       load_workspace(s1,1);
  78.     }
  79.       }
  80.       break;
  81.     case 'K':
  82.       chuser();
  83.       break;
  84.     case 'L':
  85.       nl();
  86.       npr("eStack sizef: e%d\r\n",_stklen);
  87.       npr("eHeap free f: e%dk\r\n", (int) (farcoreleft()/1024));
  88.       nl();
  89.       break;
  90.     case 'M':
  91.       sysoplog("@ Read all mail");
  92.       mailr();
  93.       break;
  94.     case 'N':
  95.       nl();
  96.       pl(((*(char far *)0x00000417L ^= 0x10) & 0x10) ?
  97.                "fStimpy is now available" :
  98.                "fStimpy is now unavailable");
  99.       sysoplog("@ Changed sysop avail status");
  100.       topscreen();
  101.       break;
  102.     case 'O':
  103.       prstatus();
  104.       break;
  105.     case 'P':
  106.       sysoplog("@ Ran Ivotes");
  107.       ivotes();
  108.       break;
  109.     case 'Q':
  110.       done=1;
  111.       break;
  112.     case 'R':
  113.       sl1(3,s1);
  114.       printfile(s1);
  115.       break;
  116.     case 'S':
  117.       sysoplog("@ Ran Tedit");
  118.       text_edit();
  119.       break;
  120.     case 'T':
  121.       printfile(status.log1);
  122.       break;
  123.     case 'U':
  124.       sysoplog("@ Ran Uedit");
  125.       uedit(usernum,0);
  126.       break;
  127.     case 'V':
  128.       zlog();
  129.       break;
  130.     case 'W':
  131.       voteprint();
  132.       break;
  133.     }
  134.   } while ((!done) && (!hangup));
  135.  
  136.  
  137.  
  138.  
  139.  
  140.  
  141.  
  142.