home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / games / volume15 / dinkum2 / part03 / actor.c next >
C/C++ Source or Header  |  1993-01-27  |  19KB  |  632 lines
  1. #define ACTOR
  2. #include "dink_sym.h"
  3. #include "dink_glb.h"
  4.  
  5. void actor(n)
  6. /********************************************************************/
  7. /*                                                                  */
  8. /* Software by Gary A. Allen, Jr. 12 December 1992, Version: Mk 1.3 */
  9. /*           (c) Copyright 1992 by Gary A. Allen, Jr.               */
  10. /*                                                                  */
  11. /********************************************************************/
  12. int n ;
  13. {
  14. #if (PROTOTYPE)
  15. void objector(int) ;
  16. #endif
  17.  
  18. register int i, j ;
  19. int sw_found ;
  20. static int sw_door_kick = FALSE ;
  21.  
  22. switch(n) {
  23.  
  24.     /* mine elevator */
  25.     case R_lift_entr:
  26.         if (room[R_lift_entr][M_rm_status] == S_closed) {
  27. printf("The lift doors are closed and the lift call button ");
  28. printf("is not glowing. It \nseems the electrical power has ");
  29. printf("been turned off at the main switch. \n");
  30.         }
  31.         if (room[R_lift_entr][M_rm_status] == S_flashing) {
  32. printf("The lift doors are closed.  However the call button");
  33. printf(" is flashing. There \nis the sound of electrical equipment ");
  34. printf("humming within the mine lift. \n");
  35.         }
  36.         if (room[R_lift_entr][M_rm_status] == S_open) {
  37. printf("The lift doors are standing open. \n");
  38.         }
  39.         break;
  40.  
  41.     /* office building door */
  42.     case R_office_entr:
  43.         switch(room[R_office_entr][M_rm_status]) {
  44.             case S_open:
  45. printf("      --- The office front door is open. --- \n");
  46.                 break;
  47.             case S_kicked:
  48.                 if (!sw_door_kick) {
  49. printf("The lock of the front door has been shot at several times.\n"); 
  50. printf("The door itself has been kicked in and is broken off at\n") ;
  51. printf("the hinges.  The passage way is free to enter.\n");
  52.                 sw_door_kick = TRUE ;
  53.                 }
  54.                 else {
  55. printf("The front door of the office has been kicked in. \n") ;
  56.                 }
  57.                 break ;
  58.             default:
  59. printf("The office has a front door with a sun faded sign \n"); 
  60. printf("upon which is written:  \"Sorry, We are CLOSED\". \n");
  61. printf("      --- The office door is shut. --- \n");
  62.                 break ;
  63.         }
  64.         break ;
  65.  
  66.     /* Site Managers Office */
  67.     case R_office_mang:
  68.         if (room[R_office_mang][M_rm_status] == S_closed) {
  69. printf("On the wall is a picture of a platypus wearing a hat with");
  70.         printf(" corks \ndangling from the hat's rim.\n");
  71.             break;
  72.         }
  73. if ((room[R_office_mang][M_rm_status] == S_revealed)||
  74.     (room[n][M_rm_status] ==S_dialed)) {
  75. printf("Before you is a picture hinged to the wall that has been ");
  76. printf("swung \nopen revealing a closed combination dial wall safe.\n");
  77.             break;
  78. }
  79.         if (room[n][M_rm_status] == S_open) {
  80. printf("Before you is a picture hinged to the wall that has been");
  81. printf(" swung \nout revealing a wall safe with an open door.\n");
  82.         sw_found = FALSE ;
  83.         for (i = 0; i <= objcnt; i++) {
  84.             if (object[i][J_loc] == B_in_safe) {
  85.                 sw_found = TRUE ;
  86. printf ("You see the following inside the safe: \n");
  87.                 for (j = 0; j <= objcnt; j++) {
  88.                     if (object[j][J_loc] == B_in_safe) {
  89.                         printf ("        ");
  90.                         objector(j) ;
  91.                         printf("\n") ;
  92.                     }
  93.                 }                
  94.                 if (gleep_safe != 0) {
  95.                     printf ("        ");
  96.                     if (gleep_safe == 1) 
  97.                         printf("one gleep\n") ;
  98.                     else
  99.                         printf("%d gleeps\n",gleep_safe) ;
  100.                 }
  101.                 break;
  102.             }
  103.         }
  104.         if (sw_found) break ;
  105.         if (gleep_safe != 0) {
  106. printf("There is nothing in the safe except ") ;
  107.             if (gleep_safe == 1) 
  108.                 printf("a single gleep.\n") ;
  109.             else
  110.                 printf("%d gleeps.\n",gleep_safe) ;
  111.             break ;
  112.         }
  113.         printf("---The safe is empty.--- \n");
  114.         break ;
  115.         } /* end of the "safe open" block */
  116.  
  117.     /* store room */
  118.     case R_store_room:
  119. printf("There is a 1500 Volt circuit breaker box on the wall");
  120.         if (room[n][M_rm_status] == S_off) 
  121. printf(" which has \na switch set in the \"off\" position. \n"); 
  122.         else
  123. printf(" which has \na switch set in the \"on\" position. \n"); 
  124.         break;
  125.  
  126.     /* lift compartment */
  127.     case R_lift_inside:
  128.         if (room[n][M_rm_status] == S_L0) 
  129. printf("The level button with the number zero is flashing. \n"); 
  130.         if (room[n][M_rm_status] == S_L49) 
  131. printf("The level button with the number forty-nine is flashing. \n"); 
  132.         if (room[n][M_rm_status] == S_L67) 
  133. printf("The level button with the number sixty-seven is flashing. \n");
  134.         if (room[n][M_rm_status] == S_L82) 
  135. printf("The level button with the number eighty-two is flashing. \n"); 
  136.         break;
  137.  
  138. } 
  139. } /* --- end of subroutine "actor"--- */
  140.  
  141. void objector(i)
  142. int i ;
  143. {
  144. static char *obj[] = {
  145. "an empty can of Fourex beer",
  146. "a cigarette butt",
  147. "an empty bottle of Black Swan Lager",
  148. "an old doormat with \"ACME Gold Mines Ltd.\" written on it",
  149. "a large brass key",
  150. "a ripped and bent up umbrella",
  151. "a two metre length of fishing tackle without a hook",
  152. "a broken drill bit",
  153. "a very old but detailed map of the ACME Mine",       /*  5  */
  154. "a fragment of a map showing the ACME Mine",
  155. "a sheet of paper with some writing on it",
  156. "a gold bar weighing ten kilograms",
  157. "a hydraulic jack which is rusted solid",
  158. "a large stick of dynamite",
  159. "an M16 ammo clip designed to hold up to 200 rounds",
  160. "a fountain pen which is dried up and useless",
  161. "an orange M16 ammo clip which is glowing a faint pale blue",
  162. "a mechanical pencil without any leads",
  163. "an unloaded, fully automatic M16 infantry rifle",    /*  10 */
  164. "a piece of copper wire",
  165. "a short length of galvanized iron pipe",
  166. "a blasting cap with 20 cm. of fuse attached",
  167. "a box of \"Red Head\" matches",
  168. "a diamond ring with a three carat flawless blue diamond",
  169. "a can opener",
  170. "a bright red ruby the size of an egg",               /*  15 */
  171. "an antique sterling silver teapot with \"N.K.\" engraved on it",
  172. "a silver Syracusian Dekadrachma coin",
  173. "an electrical extension cord",
  174. "a $100 dollar bill",
  175. "an autographed photo of Sir Joh",
  176. "an old folding chair",
  177. "a burned out light bulb",
  178. "a packet containing atropine pills",
  179. "a high quality artificial saphire",
  180. "a huge uncut emerald",
  181. "an oily rag",
  182. "a burned out fluorescent tube",
  183. "a filthy worn out carpet",
  184. "a branch from a gum tree",
  185. "a thick airmail letter, marked \"Postage Due\"",
  186. "a cork from a wine bottle",
  187. "a high intensity battery powered torch",
  188. "an old cockroach trap",
  189. "an empty butane cigarette lighter",
  190. "a small black cube with a blue push button on one side", 
  191. "an ancient and priceless gong clapper made of ivory and gold",
  192. "a Semtex explosive detector with a push button switch",
  193. "a broken shoe lace",
  194. "a dirty old comb",
  195. "a Cornetto ice cream cone wrapper",
  196. "a bald automobile tyre",
  197. "an empty broken egg shell",
  198. "a broken piece of brick",
  199. "a one metre length of rope",
  200. "an empty package of Stradbroke cigarettes",
  201. "a broken automobile fan belt",
  202. "a used automobile oil filter",
  203. "a short piece of string",
  204. "a data recorder having three coloured buttons"
  205. } ;  /* end of the "obj" character string matrix */
  206.  
  207. /* Deal with transformed objects */
  208. if (object[i][J_type] == Z_alias) {
  209.     if (i == O_rifle) {
  210. printf("an M16 infantry rifle with an ammunition clip inserted") ;
  211.         return ;
  212.     }
  213.     if (i == O_dynamite) {
  214. printf("a large stick of dynamite with a fuse type blasting cap") ;
  215.         return ;
  216.     }
  217. }
  218. else printf("%s",obj[i]) ;
  219. } /* --- end of subroutine "objector"--- */
  220.  
  221. void killer(n)
  222. /********************************************************************/
  223. /*                                                                  */
  224. /*  Software by Gary A. Allen, Jr. 22 January 1989  Version: Mk 1.3 */
  225. /*           (c) Copyright 1989 by Gary A. Allen, Jr.               */
  226. /*                                                                  */
  227. /********************************************************************/
  228. int n ;
  229. {
  230. register int i, j ;
  231.  
  232. int hits, j_point, i_10, i_fract ;
  233. int sw_kill, target_k_flag, sw_see, sw_other_object ;
  234. static int sw_hurt = FALSE ;
  235.  
  236. struct monster_struct *mnstr ; 
  237.  
  238. #if (PROTOTYPE)
  239. void ender(int) ;
  240. #endif
  241.  
  242. if (tag[V_VERB_ONLY]&&(verb == V_kill)) {
  243. printf("It may be obvious to you, but you are going to have to tell\n");
  244. printf("me exactly what it is you want to have killed, and \n") ;
  245. printf("with what sort of weapon. \n") ;
  246.     return;
  247. }
  248.  
  249. /* set the subroutine local flags */
  250. if (verb == V_kill) sw_kill = FALSE ;
  251. if (verb == V_shoot) sw_kill = TRUE;
  252. target_k_flag = V_NULL ;
  253. sw_see =  FALSE ;
  254. sw_other_object = FALSE ;
  255.  
  256. if (tag[V_ned]) {
  257.     if (Ned->Location == B_destroyed) {
  258. printf("Forget it, you drongo!! Ned Kelly is already dead!\n") ;
  259.         return ;
  260.     }
  261.     if (Ned->Status == F_asleep) {
  262. printf("There is no Ned Kelly here for me to kill! \n") ;
  263.         return ;
  264.     }
  265.     j_point = 0 ; 
  266.     sw_see =  TRUE ;
  267.     target_k_flag = V_ned ;
  268. }
  269.  
  270. if (tag[V_bear]) {
  271.     for (j = 2; j <= 5; j++) {
  272.         mnstr = (monster_start + j) ;  /* point to the monster */
  273.         if (mnstr->Status != F_asleep) {
  274.             j_point = j ; 
  275.             sw_see =  TRUE ;
  276.             target_k_flag = V_bear ;
  277.             break ;
  278.         }
  279.     }
  280.     if (j > 5) {
  281.         printf("I see no drop bear for me to kill! \n") ;
  282.         return ;
  283.     }
  284. }
  285.  
  286. if (tag[V_wombat]) {
  287.     if (Wombat->Status == F_asleep) {
  288.         printf("I see no wombat for me to kill!\n");
  289.         return ;
  290.     }
  291.     j_point = N_wombat ; 
  292.     sw_see =  TRUE ;
  293.     target_k_flag = V_wombat ;
  294. }
  295.  
  296. if (tag[V_snake]) {
  297.     for (j = 6; j <= 13; j++) {
  298.         mnstr = (monster_start + j) ;  /* point to the monster */
  299.         if (mnstr->Status != F_asleep) {
  300.             j_point = j ; 
  301.             sw_see =  TRUE ;
  302.             target_k_flag = V_snake ;
  303.             break ;
  304.         }
  305.     }
  306.     if (j > 13) {
  307.         printf("I see no hoop snake for me to kill! \n") ;
  308.         return ;
  309.     }
  310. }
  311.  
  312. if (tag[V_rifle]) sw_kill = TRUE ;
  313.  
  314. /* see if the safe is being shot at */
  315. if (tag[V_safe]&&(n == R_office_mang)) {
  316. printf("The safe is made out of harden steel.  You'll only waste ") ;
  317. printf("ammunition \nshooting at it.  Try to open it instead. \n") ;
  318. return ;
  319. }
  320.  
  321. /* see if the target is in the room or holding it */
  322. for (j=0; j <= objcnt; j++) {
  323.     if (tag[object[j][J_parse_id]]){
  324.          if (object[j][J_parse_id] == V_rifle) continue ;
  325.         sw_other_object = TRUE ;
  326.         if (object[j][J_loc] == n) {
  327.             sw_see =  TRUE ;
  328.             target_k_flag = object[j][J_parse_id] ;
  329.             break ;
  330.         }
  331.         if (object[j][J_loc] == B_have) {
  332. printf("I will ***NOT*** shoot at something that I'm holding!!\n");
  333.             return ;
  334.         }
  335.     }
  336. }
  337.  
  338. if (tag[V_rifle] && (!sw_other_object)) tag[V_VERB_ONLY] = TRUE ;
  339.  
  340. if ((!tag[V_VERB_ONLY]) && (!tag[V_DIRECTION])) {
  341.     if (!sw_see) {
  342.         printf("I don't see it here to shoot at it. \n") ;
  343.         return; 
  344.     }
  345.  
  346.     if (target_k_flag == V_NULL) {
  347. printf("It may be obvious to you, but you are going to have to tell\n");
  348. printf("me exactly what it is you want to have killed.\n");
  349.         return ;
  350.     }
  351. }
  352.  
  353. /* resolve killing errors */
  354. if (!sw_kill) {
  355.     printf("What weapon am I suppose to use? \n") ;
  356.     return ;
  357. }
  358.  
  359. if (object[O_rifle][J_loc] != B_have) {
  360. printf("I would do that.  Only there is one small problem.... \n") ;
  361.     printf("You don't have a rifle in your possesion! \n") ;
  362.     return ;
  363. }
  364.  
  365. /* Shoot the gun (or at least try to) */
  366. printf("You pull the trigger... \n\n") ;
  367.  
  368. if (clip_flag == F_no_clip) {
  369. printf("Nothing happens!  \n") ;
  370. printf("Your rifle doesn't have an ammunition clip in it.\n") ;
  371.     return ;
  372. }
  373.  
  374. if (object[O_rifle][J_property] <= 0) {
  375.     printf("Nothing happens!  The ammo clip is out of bullets.\n") ;
  376.     return ;
  377. }
  378.  
  379. switch(rifle_flag) {
  380. case F_safety:
  381.     printf("Nothing happens!  The rifle's safety is still on.\n");
  382.     return ;
  383.             
  384. case F_single:
  385.     printf("Bam! \n\n") ;
  386.     --object[O_rifle][J_property] ;
  387.     if (clip_flag == F_normal_clip) hits = 1;
  388.         else hits = 100 ;
  389.     break ;
  390.  
  391. case F_triple:
  392.     if (object[O_rifle][J_property] >= 3) {
  393.         printf("Bam! Bam! Bam! \n\n") ;
  394.         object[O_rifle][J_property] -= 3 ;
  395.         if (clip_flag == F_normal_clip) hits = 3;
  396.             else hits = 300 ;
  397.     }
  398.     else {
  399.         for (i = 1; i <= object[O_rifle][J_property]; i++) 
  400.             printf("Bam! ") ;
  401.             printf("\n\nYou've run out of bullets. \n\n") ;
  402.         if (clip_flag == F_normal_clip) 
  403.             hits = object[O_rifle][J_property];
  404.             else hits = object[O_rifle][J_property]*100 ;
  405.         object[O_rifle][J_property] = 0 ;
  406.     }
  407.     break ;
  408.  
  409. case F_auto:
  410.     if (object[O_rifle][J_property] >= 30) {
  411.         for (i = 1; i <= 3; i++) 
  412. printf("Bam! Bam! Bam! Bam! Bam! Bam! Bam! Bam! Bam! Bam! \n") ;
  413.         object[O_rifle][J_property] -= 30 ;
  414.         hits = 30;
  415.     }
  416.     else {
  417.         i_10 = object[O_rifle][J_property]/10 ;
  418.         i_fract = object[O_rifle][J_property]-(i_10*10) ;
  419.         for (i = 1; i <= i_10; i++) 
  420. printf("Bam! Bam! Bam! Bam! Bam! Bam! Bam! Bam! Bam! Bam! \n") ;
  421.         for (i = 1; i <= i_fract; i++) 
  422.             printf("Bam! ") ;
  423.             printf("\n\nYou've run out of bullets. \n") ;
  424.         if (clip_flag == F_normal_clip) 
  425.             hits = object[O_rifle][J_property];
  426.             else hits = object[O_rifle][J_property]*100 ;
  427.         object[O_rifle][J_property] = 0 ;
  428.     }
  429.     printf("\n") ;
  430.     break ;
  431. }
  432.  
  433.  
  434. /* Target Seen block */
  435. if (sw_see) {
  436.     /* Toggle the hurt switch if this is the first hit */
  437.     mnstr = (monster_start + j_point) ;  /* point to the monster */
  438.     if (mnstr->Hits == 0)  sw_hurt = FALSE ;
  439.     mnstr->Hits += hits ;
  440.  
  441.     switch(target_k_flag) {
  442.     case V_ned:
  443. printf("Ned Kelly keels over dead.  His body suddenly glows a bright ");
  444. printf("orange like it\nis being consummed by a heatless flame ");
  445. printf("and then the late Ned Kelly disappears\ninto a puff of ") ;
  446. printf("blue smoke. \n\n") ;
  447. printf("By the way, the recently deceased bushranger ***was*** ");
  448. printf("wearing iron body\narmour.  However thin sheets of iron ");
  449. printf("would just barely work against nineteenth\ncentury firearms ");
  450. printf("at long range.  Against a modern infantry rifle, Ned's\n");
  451. printf("armour offered about as much protection as a dunny paper ");
  452. printf("bandage. \n") ;
  453.         Ned->Location = B_destroyed ;
  454.         Ned->Status = F_asleep ;
  455.         monster_flag = F_no_monster ;
  456.         room[R_hideout][M_monster] = 0 ;
  457.     
  458.         /* create Ned Kelly's silver teapot */
  459.         ++room[R_hideout][M_obj_cnt] ;
  460.         object[O_teapot][J_loc] = R_hideout ;
  461.         return ;
  462.  
  463.     /* shoot the drop bear */
  464.     case V_bear:
  465.         if (mnstr->Hits < 30) {
  466.             /* Bear freaks out from being shot too much */
  467.             if (sw_hurt && (mnstr->Hits >= 10)) {
  468. printf("The drop bear has been shot at so many times, that it ");
  469. printf("has gone mad\n") ;
  470. printf("with rage.  It leaps three metres and rips out your ") ;
  471. printf("throat with a\n");
  472. printf("single swish of its claws.  You die instantly. \n") ;
  473.                 ender(F_died) ;
  474.             }
  475.  
  476.             if (mnstr->Hits == 1) {
  477. printf("Your bullet hit the drop bear causing it to howl in ");
  478. printf("anguish.  However drop\n");
  479. printf("bears are pretty tough and just one bullet isn't ");
  480. printf("going to kill it.\n") ;
  481.             }
  482.             else {
  483.                 if (!sw_hurt) {
  484. printf("You've hit the drop bear and it is bleeding fairly ");
  485. printf("heavily.\n");
  486. printf("Unfortunately it is still alive and kicking and wants ") ;
  487. printf("your blood \n");
  488. printf("in payment for its.\n") ;
  489.                     sw_hurt = TRUE ;
  490.                 }
  491.                 else {
  492. printf("You've hit the drop bear again.  It is weakening but still ");
  493. printf("alive.\n");
  494.                 }
  495.             }
  496.             monster_flag = F_wounded ;
  497.             return ;
  498.         }
  499.  
  500.         if (rifle_flag == F_single) {
  501. printf("That last bullet was the straw which broke the drop ") ;
  502. printf("bear's back.\n") ;
  503. printf("The blasted thing is finally dead! \n") ;
  504.         }
  505.         else {
  506. printf("The bullets riddled the drop bear with holes, killing it ") ;
  507. printf("instantly. \n") ; 
  508.         }
  509. printf("Suddenly the drop bear's corpse turns into a cloud of greasy ");
  510. printf("blue smoke,\n") ;
  511. printf("which floats away without a trace.\n") ;
  512.         sw_hurt = FALSE ;
  513.         mnstr->Location = B_destroyed ;
  514.         mnstr->Status = F_asleep ;
  515.         monster_flag = F_no_monster ;
  516.         room[n][M_monster] = 0 ;
  517.         return ;
  518.  
  519.         /* shoot the mutant wombat */
  520.     case V_wombat:
  521.         if (Wombat->Hits < 300) {
  522.             if (Wombat->Hits == 1) {
  523. printf("Your bullet hit the wombat causing it some minor discomfort.");
  524. printf("  Judging from its \n");
  525. printf("behavior, killing this beast is going to be tough! \n") ;
  526.             }
  527.             else {
  528.                 if (!sw_hurt) {
  529. printf("You've hit the wombat and got its attention ") ;
  530. printf("but you've not\n");
  531. printf("seriously wounded it.  In fact, you've made it more fierce ");
  532. printf("than before.\n");
  533.                     sw_hurt = TRUE ;
  534.                 }
  535.                 else {
  536. printf("You've hit the wombat again, but it is still going ");
  537. printf("strong.\n");
  538.                 }
  539.             }
  540.             monster_flag = F_wounded ;
  541.             return ;
  542.         }
  543.  
  544.         if (rifle_flag == F_single) {
  545. printf("That last bullet was the straw which broke the ") ;
  546. printf("wombat's back.\n") ;
  547. printf("The blasted thing is finally dead!\n\n") ;
  548.         }
  549.         else {
  550. printf("The bullets did the trick on the wretched thing.  It's ") ;
  551. printf("dead as a doornail.\n\n") ;
  552.         }
  553. printf("Suddenly the wombat's corpse starts to glow with an intense");
  554. printf(" white light.\n") ;
  555. printf("There is then a crackling sound as its body starts to burn.");
  556. printf("  You can\n");
  557. printf("smell the stench of burning hair.  Then the white light");
  558. printf(" begins to dim,\n");
  559. printf("leaving no trace left of the once formidable monster.\n");
  560.         sw_hurt = FALSE ;
  561.         Wombat->Location = B_destroyed ;
  562.         Wombat->Status = F_asleep ;
  563.         monster_flag = F_no_monster ;
  564.         room[n][M_monster] = 0 ;
  565.         return ;
  566.  
  567.     /* shoot the hoop snake */
  568.     case V_snake:
  569.         if ((rifle_flag == F_single)&&
  570.             (mnstr->Hits < 3)) {
  571.             if (mnstr->Hits == 1) {
  572. printf("Your bullet hit the hoop snake.  However the hoop snake's ");
  573. printf("thick scales \n");
  574. printf("slowed the bullet down.  The hoop snake is now hissing ");
  575. printf("furiously. \n") ;
  576.             }
  577.             else {
  578. printf("You've hit the hoop snake again, and it's hurting.  However ");
  579. printf("it is still \n");
  580. printf("alive and full of venom. \n") ;
  581.             }
  582.             monster_flag = F_wounded ;
  583.             return ;
  584.         }
  585.  
  586.         if (rifle_flag == F_single) {
  587. printf("The bullet hit the hoop snake finishing the horrible ") ;
  588. printf("creature off. \n") ;
  589.         }
  590.         else {
  591. printf("The bullets hit the hoop snake splatting it into a mass of ") ;
  592. printf("mince meat. \n") ; 
  593.         }
  594. printf("Suddenly the bullet holed snake glows red and whooshes ");
  595. printf("into a cloud \n") ;
  596. printf("steam, leaving no traces behind.\n\n") ;
  597.         mnstr->Location = B_destroyed ;
  598.         mnstr->Status = F_asleep ;
  599.         monster_flag = F_no_monster ;
  600.         room[n][M_monster] = 0 ;
  601.         return ;
  602.  
  603.     case V_can:
  604.     case V_beer:
  605.     case V_fourex:
  606.     case V_Fourex:
  607. printf("The can is hit by a bullet and flies off out of sight.\n");
  608.         object[O_can][J_loc] = B_destroyed ;
  609.         return;
  610.  
  611.  
  612.     case V_bottle:
  613.     case V_lager:
  614. printf("It is hit by a bullet and shatters into a million pieces.\n");
  615.         object[O_bottle][J_loc] = B_destroyed ;
  616.         return;
  617.  
  618.     } /* end of target switch group */
  619. } /* end of the "target seen" block */
  620.  
  621. /* There was no target specified so the shot was wasted */
  622. if (tag[V_VERB_ONLY]) { 
  623. printf("You didn't specify a target. So the rifle was pointed\n") ;
  624. printf("in a random direction and the ammunition wasted.\n") ;
  625. }
  626. else 
  627. printf("Except for wasting ammunition, nothing much happened.\n") ;
  628. return ;
  629.  
  630. } /* --- end of the 'killer' subroutine --- */
  631.  
  632.