home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / SYSOP / MODS1.ZIP / TAILS004.MOD < prev    next >
Text File  |  1995-01-16  |  7KB  |  166 lines
  1. TAILS004.MOD               BBS JUKE BOX!
  2. Tails #1 @14355
  3. Wed Jan 11 20:55:44 1995
  4. 0R 34 01/16 02:46 WWIVNet 8304->8320
  5. 0R 34 01/15 20:28 WWIVnet 8314->8304
  6. 0R 34 01/14 16:07 WWIVNET 4001->8314
  7. 0R 34 01/13 19:55 WWIVnet 4000->4001
  8. 0R 34 01/14 10:46 WWIVnet ->4000
  9. 0R 34 01/13 06:50 WWIVnet 4001->4000
  10. 0R 34 01/12 10:06 WWIVnet 2001->4001
  11. 0R 34 01/12 09:07 WWIVnet 11012->2001
  12. 0R 34 01/12 02:48 WWIVnet 14352->11012
  13. 0R 34 01/11 23:53 WWIVnet 14355->14352
  14. 0R 34 01/11 20:57 WWIVnet ->14355
  15. ╒════════════════════════════════════════════════════════════════════════════╕
  16. ├────────────────────────────────────────────────────────────────────────────┤
  17. │ Modification Name:  TAILS004.MOD                                           │
  18. │       Description:  A BBS Juke Box via ANSi Music!                         │
  19. │           Version:  WWIV 4.23                                              │
  20. │     Files Changed:  BBS.C MISCCMD.C FCNS.H                                 │
  21. │        Difficulty:  ▓▒░░░░░░░░                                             │
  22. │                                                                            │
  23. ├────────────────────────────────────────────────────────────────────────────┤
  24. │        Disclaimer:  In Your Case Back it Up!!!!!!!!!!!!!!!!!!!!!!!         │
  25. └────────────────────────────────────────────────────────────────────────────┘
  26.  
  27.  
  28. /* Add Me To BBS.C */
  29.  
  30. /*+++*/ case '@':
  31. /*+++*/   jukebox();
  32. /*+++*/   break;
  33.  
  34. /*  Save BBS.C Load MISCCMD.C */
  35.  
  36. /*************************************************************
  37.              Add Me To MISCCMD.C
  38. *************************************************************/
  39.  void jukebox()                                 /* TAILS004.MOD Start */
  40.  {
  41.    int quit;
  42.    char ch;
  43.  
  44.    quit=0;
  45.    while ((quit<=4) && (!hangup)) {
  46.      printfile("TAILMAIN");
  47.      nl();
  48.      prt(1,"[ 9The Jukebox 1]3 : 5");
  49.      ch=onek("0123456789Q?");
  50.      switch (ch) {
  51.        case '1':
  52.       printfile("TAILS001.ANS");
  53.       break;
  54.        case '2':
  55.       printfile("TAILS002.ANS");
  56.       break;
  57.        case '3':
  58.       printfile("TAILS003.ANS");
  59.       break;
  60.        case '4':
  61.       printfile("TAILS004.ANS");
  62.       break;
  63.        case '5':
  64.       printfile("TAILS005.ANS");
  65.       break;
  66.        case '6':
  67.       printfile("TAILS006.ANS");
  68.       break;
  69.        case '7':
  70.       printfile("TAILS007.ANS");
  71.       break;
  72.        case '8':
  73.       printfile("TAILS008.ANS");
  74.       break;
  75.        case '9':
  76.       printfile("TAILS009.ANS");
  77.       break;
  78.        case '0':
  79.       printfile("TAILS000.ANS");
  80.       break;
  81.        case '?':
  82.       printfile("TAILS004.HLP");
  83.       break;
  84.        case 'Q':
  85.      quit=5;
  86.      break;
  87.       }
  88.    }
  89.  }                                              /* TAILS004.MOD End   */
  90.  
  91. /**********************************************************************
  92.             Save then Type MAKE FCNS
  93.                 then Compile
  94.               oh Yeah UUDECODE This File :
  95.               it Has TAILSx.ANS and All Others!
  96.             'cept the HELP FILE, You Make That =]
  97.             I Dont Rember Where I Got These
  98.             ANSI Music Files (Sorry!)
  99. **********************************************************************/
  100.  
  101. section 1 of uuencode 2.8 of file tails.zip    by R.E.M.
  102.  
  103. begin 644 tails.zip
  104. M4$L#!!0``@`(`!MS'16?:FU:&0$``#4#```,`#(`5$%)3%,P,#$N04Y3!P`N4
  105. M`%*#KH>5`L"Y&2GN2%^G9KZB>90X`'1AM0J^IM,W<K#6THNMZ:$)>`C8NA\`:
  106. MJ?:]D,%*`S$0AN^%[0.8R]ZE2Y,):6!/V<UNBDPV@@4/.14L>#`(M6_F`^BA,
  107. M+Z%/XV25TD/UU#J00'[^^?Z9L"CGB45QP^*\YC7(]+EG$53*]V*\(>W/4@?@!
  108. M-URF_1L%+U]I!)[*WVOL6#UN2CII4^Z>R[O=>EO>K[<O?W?)FG8C/"S?3^[$X
  109. MHBDF+"[:BRSW03^:BDE.\/U*@$(5A+46A4<7P%H_H&J#:`R*`*0=*1ZS=J0$8
  110. M:'-?$(8;>2O],/WA<E!^"(`ZBT&@MK*354?^S''(A3,-:J.KCJO^6EI=/1P;/
  111. M:!!=9:SR:*0AR"G`H7VT6ZZ>N'*ZZKL9O=H,:&;DR30QO=#&!`.:CAR(W%&1I
  112. M.NH\9[B<>_4O54R^`%!+`P04``(`"`"%<QT5`RJ_:A0!``"S`@``#````%1!-
  113. M24Q3,#`R+D%.4[60P4K$,!"&[X7Z`.;2NW1IFL&-]-0V31:)C.#><E(H*!@$V
  114. M67PQ'T`/?0E]&O^TX'I8/8@.-$PS__=/_XI`512A/A>A:F2C*+Y/(JC3F,[U'
  115. M?*HX_4E]&B[F%*<7+-X\XQ-D+`[7K-[>C@6>.!:[A^)^O'X:B[M=ZF]2__@M'
  116. M20VRP5YM7@]F$J'-,Q'6_;^$>\,?C7F6-EQ<;>59Q;77O2?K=<NJY[JUGIS7K
  117. M7>F)E<&,ZPX#W.(%/>[=:G4I3W_"CI+_GC5<NP%B<)J5IQ94LO':.G!#Z?5@`
  118. MAG*PSIU@FF2S`\O9U"44$@L/`ZTQ4,*2)<Z>95>V+GW1KZ,LR]2>II[55YIF5
  119. M6G48((Q:PL"#+-!C5)Y]`%!+`P04``(`"`#0<QT5H/%W_QH!```U`P``#```!
  120. M`%1!24Q3,#`S+D%.4\60P6K#,`R&[X7L`>9+GL`DD=8&<K*=Q&5XR+#>?`YL5
  121. M,+>'YLWV`-LA+[$]S>2DE!TZV&!C@DC(DKY?B@A81!&J6Q&*IFP`X_LD`JQC8
  122. M\IO90YQ^Q<[`!8YQ>F'A[3.O4,;\LLW=^>YA2%\<\O&0CYST3X_[\3@>]L,QK
  123. M_WH2&[Z-\;!]O7B3""I;B;`Q?W+<&__1F*V2@JOO[@EVY:9PM972K]%X)#32'
  124. M0T6@SD\VQ;[K>NO0M)VOJ6JE)>`V>;6`OC]N)+_C,H::8=+5:8A`:Z6T2E6'+
  125. MJIT+6BIEK;*N7!-S&)D<P8]5F<E;?TY@3NBTT6D?`LNJ76M\G6IT8S@UA%JER
  126. MI0BHLG[6`XZ]1YFZ$JCBU@1BSO4_6;;Z`%!+`P04``(`"``P?!T53)YO2.,`N
  127. M```S`@``#````%1!24Q3,#`T+D%.4[5006K#,!"\&]P'1!=](,*V1.+@DZQXZ
  128. M;8J*`_%-MX""#5X":2GT77U`>_`GVM=TY92>TELRL+NPLS.K%7,J0>:R1^:2"
  129. M(BVDPN^).;G"D-=SECC=!'^&%W.%TP<M;M[I"2GR*YA'>==[]/QX/B%_Z3TO]
  130. M_:L_CV^\&<;Q0#'X9_Z/6!5T&]G+YO/J3<SI.&)N;>YRW!?]*,91V-!F3_LN2
  131. MW20V-P8,U%H#6%7O9!;"B%VZ(LJJRN95(&P.%=2PM6KF'H+'/`"@;5Y#N=3E_
  132. MLI74V%ZT83*8_Y8V,]2I0`A!VL5-$4<_4$L#!!0``@`(`&-T'15!*S+=\@``@
  133. M`+0"```,````5$%)3%,P,#4N04Y3M5#-2L0P$+X7N@_07`(>]F1H?M@&>JIM9
  134. MTT4"R:&WG`K;904'0;WX7#Z`'OH2^C1.ZBJ(N[?N,,R0X?N9"0DJ!Q+$+0EYL
  135. MR4NIX',B06X@UF*N$J9%XE?P6US!](;&VU=<@0,]$3,4>W\88:3[QP>@SX>1N
  136. M5L-N@/43-0/<W;_0,Q$=2KP-Y>7V_>1-)%1I0D)17^2X#_Q12)/HX&0O1&YU_
  137. MW;3&*Y=;9;S&=-)J'%UU..16=5YW?X;'=J3Q'YI7JZC:<UU$<&U895CCQ,TU#
  138. M<Q+QIF5=RVHG*GPC\S_`;E1KK$90PZ+VZ@);SII>+;MEEF5I\@502P,$%``"N
  139. M``@`3J8K'E:4\;`Q`0``?`,```P```!404E,2E5+12Y-4T>MDK].PS`0QO=(\
  140. M>0(OQ\3:_&N1,B!2J8**#20&B\%I#;'(Q9'M(/)<?0`8>`DH$J_".>I05:A=J
  141. M<I(CGWR_[SZ?P_CEK&(\G2#C\9+Q29YD^/TY8KR'P88:I`@G@O%DBO>5A&7W[
  142. M(J'0;V>G@2PGYYLP^!C3\5<8#%ZVOR/&-@RV-.+IG/$H3V+DU"+"B+XQ/L*0+
  143. MW#EAX$$82]EL/KP%F?B7B_>Y6RE>)2@'3D/A]X:`B^,"R;Z`'_JB5HVS3C?2T
  144. MMX^.T^DA74CJ6O=PK>JZI*6\2IP<5\D.5:[$6N"YA85`5?>'E_@9,4C//_+@J
  145. M,/*__$T#VJRE\3/LK`17*0M6KIS2=/)$N=P!96FAUQU@9]U0*L!)@ZH1-;1&[
  146. M/QN!NTI7"0>V:UMMG`716.4AM?+'$RKZ`U!+`0(4`!0``@`(`!MS'16?:FU:D
  147. M&0$``#4#```,`#(```````0`($H)9@````!404E,4S`P,2Y!3E,'`"X`4H.N'
  148. MAY4"P+D9*>Y(7Z=FOJ)YE#@`=&&U"KZFTS=RL-;2BZWIH0EX"-BZ'P"I]E!+;
  149. M`0(4`!0``@`(`(5S'14#*K]J%`$``+,"```,``````````4`(-SW,'4!``!4^
  150. M04E,4S`P,BY!3E-02P$"%``4``(`"`#0<QT5H/%W_QH!```U`P``#```````1
  151. M```$`""M!"NS`@``5$%)3%,P,#,N04Y34$L!`A0`%``"``@`,'P=%4R>;TCCH
  152. M````,P(```P`````````!``@'L]4]P,``%1!24Q3,#`T+D%.4U!+`0(4`!0`J
  153. M`@`(`&-T'15!*S+=\@```+0"```,``````````4`(%;W5`0%``!404E,4S`P%
  154. M-2Y!3E-02P$"%``4``(`"`!.IBL>5I3QL#$!``!\`P``#``````````%`"!_J
  155. HG3L@!@``5$%)3$I52T4N35-'4$L%!@`````&``8`C@$``'L'````````P
  156. ``
  157. end
  158. size    2335
  159.  
  160.  
  161.     Email Me If You Use This Mod (please!)
  162.  
  163.     Tails @14355 WWIVnet
  164.           @8100  TerraNET
  165.           @1     LoStNeT {NC} (Email For Applaction!)
  166.