1 //Goblin George
2
main(void)3 void main( void )
4 {
5 int &mcounter;
6 sp_brain(¤t_sprite, 16);
7 sp_speed(¤t_sprite, 1);
8 sp_distance(¤t_sprite, 50);
9 sp_timing(¤t_sprite, 66);
10 sp_exp(¤t_sprite, 50);
11 sp_base_walk(¤t_sprite, 760);
12 sp_defense(¤t_sprite, 2);
13 sp_hitpoints(¤t_sprite, 40);
14 preload_seq(765);
15 preload_seq(761);
16 preload_seq(763);
17 preload_seq(767);
18 preload_seq(769);
19 wait(3500);
20
21 say("`6heeloo, freen. We kan took tegether?", ¤t_sprite);
22 }
23
hit(void)24 void hit( void )
25 {
26 playsound(28, 22050,0,¤t_sprite, 0);
27 &mcounter = random(3, 1);
28 sp_frame_delay(¤t_sprite, 30);
29 sp_timing(¤t_sprite, 0);
30 sp_speed(¤t_sprite, 2);
31 sp_brain(¤t_sprite, 9);
32 if (&mcounter == 1)
33 say("`6osh! Puheaze hooman! We chan bey freens!", ¤t_sprite);
34
35 if (&mcounter == 2)
36 say("`6doon hort meeee!", ¤t_sprite);
37
38 if (&mcounter == 3)
39 say("`6i won oose vilens!", ¤t_sprite);
40
41 }
42
die(void)43 void die( void )
44 {
45 int &hold = sp_editor_num(¤t_sprite);
46 if (&hold != 0)
47 editor_type(&hold, 1);
48 say("Let that be a clear message to his people. Haw!", 1);
49 }
talk(void)50 void talk( void )
51 {
52 freeze(¤t_sprite);
53 freeze(1);
54
55 choice_start()
56 "Ask the Goblin's name"
57 "Ask what he is doing way out here"
58 "Ask about the Goblin Sanctuary"
59 "Leave"
60 choice_end()
61
62 if (&result == 1)
63 {
64 say_stop("What is your name, Goblin?", 1);
65 wait(500);
66 say_stop("`6my nam is george. whe kin bey gud frins?", ¤t_sprite);
67 wait(500);
68 say_stop("I don't understand a thing you're saying.", 1);
69 }
70
71
72 if (&result == 2)
73 {
74 say_stop("Say, why aren't you in the Goblin sanctuary?", 1);
75 wait(500);
76 say_stop("`6i wans tu leaf weth hoomankind.", ¤t_sprite);
77 wait(500);
78 say_stop("Many people are afraid of goblins, you know.", 1);
79 wait(500);
80 say_stop("`6george is hoomankind.", ¤t_sprite);
81 wait(500);
82 say_stop("Ah, I see. Good luck to you.", 1);
83 }
84
85 if (&result == 3)
86 {
87 say_stop("So what's with that Goblin Sanctuary place?", 1);
88 wait(500);
89 say_stop("`6they ar BAD. they can oonly anderstund ONE theng.", ¤t_sprite);
90 wait(500);
91 say_stop("And just what thing is that? I may need to know this.", 1);
92 wait(500);
93 say_stop("`6voilense. too summon mog yoo mus KILL many guuards.", ¤t_sprite);
94 wait(500);
95 say_stop("Ah. I'm not entirely sure who Mog is but..uh thanks.", 1);
96 }
97
98
99 unfreeze(¤t_sprite);
100 unfreeze(1);
101
102
103
104 }
105
106