]> jfr.im git - irc/gameservirc.git/blob - gameserv/c_forest.cpp
Added a couple new directives to the config file
[irc/gameservirc.git] / gameserv / c_forest.cpp
1 #include "sockhelp.h"
2 #include "aClient.h"
3 #include "list.h"
4 #include "extern.h"
5 #include "flags.h"
6 #include <cctype>
7
8 void do_forest(char *u);
9 Monster *getNewMonster(Monster *m);
10 void deleteMonster(Monster *m);
11
12 void forest(char *source, char *buf)
13 {
14 char *cmd = strtok(buf, " ");
15
16 if (cmd[0] == ':')
17 cmd++;
18 if (source[0] == ':')
19 source++;
20
21 if (stricmp(cmd, "SEARCH") == 0)
22 {
23 do_forest(source);
24 } else if (stricmp(cmd, "ATTACK") == 0) {
25 do_attack(source);
26 } else if (stricmp(cmd, "RUN") == 0) {
27 do_run(source);
28 } else if (stricmp(cmd, "HEAL") == 0) {
29 do_heal(source);
30 }
31
32 source--;
33 }
34
35 void do_forest(char *u)
36 {
37 aClient *source;
38
39 int num = rand() % 12;
40
41
42 if (!(source = find(u)))
43 {
44 notice(s_GameServ, u, "Fatal Error in do_forest. Contact a %S admin for help.");
45 return;
46 }
47 else if (!is_playing(source))
48 {
49 notice(s_GameServ, u, "You must be playing the game to search the forest!");
50 return;
51 }
52 Player *p = source->stats;
53
54 if (!isAlive(p))
55 {
56 notice(s_GameServ, u, "You are dead. Wait until tomorrow to search the forest some more.");
57 return;
58 }
59 else
60 {
61 updateTS(source->stats);
62 if (p->forest_fights <= 0)
63 {
64 notice(s_GameServ, u, "You are out of forest fights for the day. Wait "\
65 "till tomorrow!");
66 return;
67 }
68 else if (!is_fighting(u))
69 {
70 int eventnum = rand() % 100;
71 p->forest_fights--;
72
73 notice(s_GameServ, u, "You search the forest for something to kill...");
74
75 // 88% of forest searching turns up a monster
76 if (eventnum >= 12)
77 {
78 p->fight = new Monster(monsters[p->level - 1][num]);
79 notice(s_GameServ, u, "You have found \ 2%s\ 2!", p->fight->name);
80 if (p->fight->hp < p->fight->maxhp)
81 p->fight->hp = p->fight->maxhp;
82
83 p->battle = NULL; // Just to make sure
84 p->master = NULL; // Just to make sure
85 display_monster(u);
86 }
87 else if (eventnum < 12 && eventnum >= 5) // 7% for the fountain
88 {
89 notice(s_GameServ, u, "In your path lies a beautiful fountain from which flows the crystal waters of life.");
90 notice(s_GameServ, u, "You wet your lips on the cool blue waters and feel rejuvenated");
91 p->hp = p->maxhp;
92 }
93 else if (eventnum < 5) // 5 % for the wishing well
94 {
95 notice(s_GameServ, u, "You come upon a pure green emerald studded magic wishing well.");
96 if (p->gold == 0)
97 {
98 notice(s_GameServ, u, "Too bad you're broke. Guess you won't be having any wishes answered today.");
99 return;
100 }
101 notice(s_GameServ, u, "You throw one of your gold pieces into the well and it vanishes into a puff of white smoke.");
102 notice(s_GameServ, u, "In an instant, the puff of smoke materializes into a gnome.");
103 notice(s_GameServ, u, "The gnome is holding something in his hand motioning for you to come closer.");
104 notice(s_GameServ, u, "It is a wand! The gnome is waving it through the air towards you!");
105 // 2% for each wishing well chance except for forest fights
106 if (eventnum < 1) // forest fights
107 {
108 notice(s_GameServ, u, "EXTRA FOREST FIGHTS!!");
109 p->forest_fights += (rand() % 11) + 5;
110 }
111 else if (eventnum < 3)
112 {
113 notice(s_GameServ, u, "A SACK OF GOLD!");
114 p->gold += (rand() % 1000) * (p->level + (rand() % 10));
115 }
116 else
117 {
118 notice(s_GameServ, u, "Time seems to stand still for a moment.");
119 notice(s_GameServ, u, "EXTRA EXPERIENCE POINTS");
120 p->exp += (rand() % 100) * (p->level + rand() % 10);
121 }
122 }
123 }
124 else if (is_fighting(u))
125 {
126 notice(s_GameServ, u, "You want to fight two monsters at once?");
127 }
128 }
129
130 }
131
132 Monster *getNewMonster(Monster *m)
133 {
134 if (!m)
135 return NULL;
136
137 Monster *newguy;
138 newguy = new Monster;
139
140 if (m->name)
141 {
142 newguy->name = new char[strlen(m->name)];
143 strcpy(newguy->name, m->name);
144 }
145 if (m->weapon)
146 {
147 newguy->weapon = new char[strlen(m->weapon)];
148 strcpy(newguy->weapon, m->weapon);
149 }
150 if (m->death)
151 {
152 newguy->death = new char[strlen(m->death)];
153 strcpy(newguy->death, m->death);
154 }
155
156 newguy->strength = m->strength;
157 newguy->gold = m->gold;
158 newguy->exp = m->exp;
159 newguy->hp = m->hp;
160 newguy->maxhp = m->maxhp;
161 return newguy;
162 }