annotate state_task.cc @ 64:07bc996c8e49

fix t_dandy on ps3.
author koba <koba@cr.ie.u-ryukyu.ac.jp>
date Fri, 11 Feb 2011 18:20:30 +0900
parents e66cab264350
children f27a6af6514c
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 #include <stdio.h>
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
2 #include <stdlib.h>
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 #include <SDL.h>
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 #include "SDL_opengl.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 #include "object.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 #include "Character.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
7 #include "Character_state.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
8 #include "tokuten.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 #include "collision.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 #include "bom.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 #include "count2.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 #include "sgoex.h"
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
13 #include "sankaku.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
14 #include "tama.h"
10
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 #include "TaskManager.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 #include "Func.h"
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 #include "property.h"
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
18 #include "ObjectType.h"
51
2e123c4bf5ca print object name and id.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 43
diff changeset
19 #include "debug_db.h"
52
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 51
diff changeset
20 #include "StateList.h"
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
21 #include "collision_task.h"
52
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 51
diff changeset
22
10
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
23
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
24 extern SpriteTable sptable[DEFOBJ];
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
25 extern TaskManager *tmanager;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
26
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
27 CHARACTER *kyeenemyno = NULL;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
28 CHARACTER *tekino0 = NULL;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
29 CHARACTER *enemy_part1 = NULL;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
30 CHARACTER *enemy_part2 = NULL;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
31 CHARACTER *enemy_part3 = NULL;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
32 CHARACTER *enemy_part4 = NULL;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
33 CHARACTER *enemy_part5 = NULL;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
34
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
35 HTaskPtr state_next;
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
36
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
37 //int tekino0;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
38 int rinkx = 0;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
39 int rinky = 0;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
40 int rinkf1 = 0, rinkf2 = 0;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
41 CHARACTER *asteroiddt[200];
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
42
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
43 int enemyfaste = 0;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
44 int fastebos = 0;
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
45 int asteroidi = 0;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
46
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
47 static int cpu_counter = SPE_1;
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
48
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
49 HTaskPtr
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
50 create_next()
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
51 {
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
52 state_next = tmanager->create_task(Dummy);
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
53
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
54 return state_next;
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
55 }
56
a80422eb44a9 bug fix.TODO:print delete message on videoNONE mode.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 54
diff changeset
56
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
57 static CPU_TYPE
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
58 get_cpunum()
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
59 {
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
60 cpu_counter += 1;
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
61 if ((cpu_counter % SPE_5) == 1) {
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
62 cpu_counter = SPE_1;
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
63 }
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
64
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
65 return (CPU_TYPE)cpu_counter;
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
66 }
36
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
67
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
68 static int
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
69 power_of_two(int input)
36
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
70 {
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
71 int value = 1;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
72
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
73 while ( value < input ) {
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
74 value <<= 1;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
75 }
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
76 return value;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
77 }
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
78
52
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 51
diff changeset
79
36
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
80 static void
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
81 ReDefSprite(int number, float w, float h, int color)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
82 {
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
83 SpriteTable *m = &sptable[number];
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
84 m->w = w;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
85 m->h = h;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
86 m->color = (color & 32);
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
87 m->mx = w / 2;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
88 m->my = h / 2;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
89 m->tex_w = power_of_two(m->w);
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
90 m->tex_h = power_of_two(m->h);
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
91 }
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
92
59
cd05eee90279 fix code.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 58
diff changeset
93 void
cd05eee90279 fix code.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 58
diff changeset
94 printState(SchedTask *s, void *chara, void *arg)
cd05eee90279 fix code.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 58
diff changeset
95 {
cd05eee90279 fix code.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 58
diff changeset
96 CHARACTER *p = (CHARACTER*)chara;
64
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
97 printf("[ID]%d [COORD]x= %f y= %f vx= %f vy= %f\n",
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
98 p->chara_id, p->x, p->y, p->vx, p->vy);
59
cd05eee90279 fix code.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 58
diff changeset
99
cd05eee90279 fix code.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 58
diff changeset
100 state_check(p);
cd05eee90279 fix code.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 58
diff changeset
101 }
36
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
102
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
103 void
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
104 updateState(SchedTask *s, void *chara, void *arg)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
105 {
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
106 CHARACTER *p = (CHARACTER*)chara;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
107
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
108 state_check(p);
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
109 }
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
110
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
111
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
112 void
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
113 freeObject(SchedTask *s, void *chara, void *obj)
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
114 {
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
115 free(obj);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
116
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
117 CHARACTER *p = (CHARACTER*)chara;
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
118
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
119 state_check(p);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
120 }
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
121
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
122
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
123 void
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
124 checkContainer(SchedTask *s, void *chara, void *obj)
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
125 {
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
126 CHARACTER *p = (CHARACTER*)chara;
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
127 ObjContainer *new_obj = (ObjContainerPtr)obj;
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
128
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
129 if (new_obj->flag == true) {
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
130 int length = new_obj->length;
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
131
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
132 for (int i=0; i < length; i++) {
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
133 ObjDataPtr obj_data = &new_obj->data[i];
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
134 int type = obj_data->type;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
135
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
136 switch (type) {
37
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 36
diff changeset
137 case Boms:
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 36
diff changeset
138 Bom(obj_data->x, obj_data->y);
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 36
diff changeset
139 break;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
140 case Tama:
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
141 Puttama(obj_data->tama_type, obj_data->x, obj_data->y);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
142 break;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
143 case Enemy: {
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
144 int task_num = GetStateNum(obj_data->task);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
145 Putenemy(obj_data->charano, obj_data->x, obj_data->y,
53
b31bed246abd fix code and add log.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 52
diff changeset
146 obj_data->vx, obj_data->vy, state_list[task_num].state);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
147 break;
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
148 }
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
149 case Def:
36
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
150 ReDefSprite(obj_data->number, obj_data->w, obj_data->h, obj_data->color);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
151 break;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
152 case DefEx:
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
153 DefSpriteEx(obj_data->number, obj_data->middlex, obj_data->middley);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
154 break;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
155 case Put:
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
156 PutSprite(obj_data->zorder, obj_data->x, obj_data->y, obj_data->number);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
157 break;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
158 case PutEx:
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
159 PutSpriteEx(obj_data->number, obj_data->x, obj_data->y,
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
160 obj_data->scalex, obj_data->scaley, obj_data->angle);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
161 break;
36
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 35
diff changeset
162 }
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
163 }
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
164 }
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
165
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
166 state_check(p);
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
167 free(new_obj);
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
168 }
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
169
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
170
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
171 CHARACTER*
10
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
172 SimpleStateTask(CHARACTER *p)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
173 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
174 int task_num = p->state_task;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
175 HTaskPtr state_task = tmanager->create_task(task_num);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
176
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
177 state_task->set_inData(0, p, sizeof(CHARACTER));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
178
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
179 state_task->set_outData(0, p, sizeof(CHARACTER));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
180
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
181 state_task->set_post(updateState, (void*)p, NULL);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
182
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
183 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
184 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
185 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
186 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
187 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
188
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
189 state_next->wait_for(state_task);
10
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
190 state_task->spawn();
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
191
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
192 return p;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
193 }
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
194
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
195
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
196 CHARACTER*
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
197 sendRandomTask(CHARACTER *p)
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
198 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
199 int task_num = p->state_task;
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
200 HTaskPtr state_task = tmanager->create_task(task_num);
64
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
201
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
202 uint32 rand1 = random();
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
203 uint32 rand2 = random();
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
204 uint32 rand3 = random();
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
205 uint32 rand4 = random();
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
206
64
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
207 state_task->set_param(0, (memaddr)rand1);
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
208 state_task->set_param(1, (memaddr)rand2);
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
209 state_task->set_param(2, (memaddr)rand3);
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
210 state_task->set_param(3, (memaddr)rand4);
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
211
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
212 state_task->set_inData(0, p, sizeof(CHARACTER));
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
213
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
214 state_task->set_outData(0, p, sizeof(CHARACTER));
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
215
64
07bc996c8e49 fix t_dandy on ps3.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 61
diff changeset
216 state_task->set_post(updateState, (void*)p, NULL);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
217
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
218 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
219 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
220 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
221 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
222 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
223
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
224 state_next->wait_for(state_task);
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
225 state_task->spawn();
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
226
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
227 return p;
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
228 }
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
229
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
230
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
231 CHARACTER*
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
232 withJikiTask(CHARACTER *p)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
233 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
234 int task_num = p->state_task;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
235 HTaskPtr state_task = tmanager->create_task(task_num);
25
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
236
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
237 state_task->set_inData(0, p, sizeof(CHARACTER));
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
238 state_task->set_inData(1, &jiki, sizeof(player));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
239
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
240 state_task->set_outData(0, p, sizeof(CHARACTER));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
241
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
242 state_task->set_post(updateState, (void*)p, NULL);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
243
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
244 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
245 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
246 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
247 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
248 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
249
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
250 state_next->wait_for(state_task);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
251 state_task->spawn();
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
252
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
253 return p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
254 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
255
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
256
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
257 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
258 sendContainerTask(CHARACTER *p)
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
259 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
260 int task_num = p->state_task;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
261 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
262 HTaskPtr state_task = tmanager->create_task(task_num);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
263 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
264 obj->flag = false;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
265 obj->length = 0;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
266
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
267 state_task->set_inData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
268
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
269 state_task->set_outData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
270 state_task->set_outData(1, obj, 0);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
271
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
272 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
273
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
274 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
275 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
276 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
277 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
278 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
279
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
280 state_next->wait_for(state_task);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
281 state_task->spawn();
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
282
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
283 return p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
284 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
285
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
286
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
287 CHARACTER*
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
288 JikiContainerTask(CHARACTER *p)
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
289 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
290 int task_num = p->state_task;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
291 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
292 HTaskPtr state_task = tmanager->create_task(task_num);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
293 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
294 obj->flag = false;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
295 obj->length = 0;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
296
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
297 state_task->set_inData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
298 state_task->set_inData(1, &jiki, sizeof(player));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
299
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
300 state_task->set_outData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
301 state_task->set_outData(1, obj, 0);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
302
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
303 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
304
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
305 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
306 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
307 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
308 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
309 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
310
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
311 state_next->wait_for(state_task);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
312 state_task->spawn();
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
313
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
314 return p;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
315 }
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
316
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
317
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
318 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
319 AsteroidTask(CHARACTER *p)
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
320 {
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
321 asteroiddt[asteroidi] = p;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
322
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
323 int task_num = ASTEROID_TASK;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
324 HTaskPtr state_task = tmanager->create_task(task_num);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
325
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
326 state_task->set_param(0, (memaddr)asteroidi);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
327
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
328 state_task->set_inData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
329
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
330 state_task->set_outData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
331
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
332 int array_size = sizeof(CHARACTER)*asteroidi;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
333 if (array_size > 0) {
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
334 CHARACTER *asteroid_array = (CHARACTER*)tmanager->allocate(array_size);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
335 for (int i = 0; i < asteroidi; i++) {
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
336 asteroid_array[i] = *asteroiddt[i];
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
337 }
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
338 state_task->set_inData(1, asteroid_array, array_size);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
339 state_task->set_post(freeObject, (void*)p, (void*)asteroid_array);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
340 } else {
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
341 state_task->set_post(updateState, (void*)p, NULL);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
342 }
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
343
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
344 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
345 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
346 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
347 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
348 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
349
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
350 state_next->wait_for(state_task);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
351 state_task->spawn();
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
352
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
353 asteroidi++;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
354 return p;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
355 }
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
356
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
357
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
358 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
359 Boss1Task1(CHARACTER *p)
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
360 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
361 int task_num = p->state_task;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
362 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
363 HTaskPtr state_task = tmanager->create_task(task_num);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
364 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
365 obj->flag = false;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
366 obj->length = 0;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
367
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
368 state_task->set_inData(0, p, sizeof(CHARACTER));
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
369 state_task->set_inData(1, &count, sizeof(int));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
370
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
371 state_task->set_outData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
372 state_task->set_outData(1, &count, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
373 state_task->set_outData(2, obj, 0);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
374
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
375 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
376
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
377 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
378 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
379 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
380 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
381 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
382
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
383 state_next->wait_for(state_task);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
384 state_task->spawn();
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
385
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
386 return p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
387 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
388
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
389
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
390 CHARACTER*
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
391 Boss1Task2(CHARACTER *p)
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
392 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
393 int task_num = p->state_task;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
394 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
395 HTaskPtr state_task = tmanager->create_task(task_num);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
396 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
397 obj->flag = false;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
398 obj->length = 0;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
399
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
400 state_task->set_inData(0, p, sizeof(CHARACTER));
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
401 state_task->set_inData(1, &count, sizeof(int));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
402
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
403 state_task->set_outData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
404 state_task->set_outData(1, &count, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
405 state_task->set_outData(2, &rinkx, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
406 state_task->set_outData(3, &rinky, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
407 state_task->set_outData(4, obj, 0);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
408
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
409 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
410
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
411 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
412 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
413 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
414 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
415 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
416
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
417 state_next->wait_for(state_task);
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
418 state_task->spawn();
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
419
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
420 return p;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
421 }
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
422
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
423
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
424 CHARACTER*
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
425 Boss1Task3(CHARACTER *p)
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
426 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
427 int task_num = p->state_task;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
428 HTaskPtr state_task = tmanager->create_task(task_num);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
429
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
430 state_task->set_param(0, (memaddr)rinkx);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
431 state_task->set_param(1, (memaddr)rinky);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
432
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
433 state_task->set_inData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
434
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
435 state_task->set_outData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
436 state_task->set_outData(1, &rinkf1, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
437
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
438 state_task->set_post(updateState, (void*)p, NULL);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
439
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
440 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
441 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
442 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
443 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
444 #endif
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
445
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
446
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
447 state_next->wait_for(state_task);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
448 state_task->spawn();
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
449
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
450 return p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
451 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
452
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
453
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
454 CHARACTER*
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
455 Boss1Task4(CHARACTER *p)
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
456 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
457 int task_num = p->state_task;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
458 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
459 HTaskPtr state_task = tmanager->create_task(task_num);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
460 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
461 obj->flag = false;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
462 obj->length = 0;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
463
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
464 state_task->set_param(0, (memaddr)rinkf1);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
465 state_task->set_param(1, (memaddr)count);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
466
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
467 state_task->set_inData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
468
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
469 state_task->set_outData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
470 state_task->set_outData(1, &count, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
471 state_task->set_outData(2, obj, 0);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
472
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
473 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
474
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
475 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
476 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
477 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
478 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
479 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
480
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
481 state_next->wait_for(state_task);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
482 state_task->spawn();
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
483
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
484 return p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
485 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
486
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
487
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
488 CHARACTER*
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
489 Boss1Task5(CHARACTER *p)
25
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
490 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
491 int task_num = p->state_task;
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
492 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
25
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
493 HTaskPtr state_task = tmanager->create_task(task_num);
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
494 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
495 obj->flag = false;
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
496 obj->length = 0;
25
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
497
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
498 state_task->set_param(0, (memaddr)fastebos);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
499 state_task->set_param(1, (memaddr)count);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
500 state_task->set_param(2, (memaddr)rinkx);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
501 state_task->set_param(3, (memaddr)rinky);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
502
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
503 state_task->set_inData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
504 state_task->set_inData(1, &jiki, sizeof(player));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
505
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
506 state_task->set_outData(0, p, sizeof(CHARACTER));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
507 state_task->set_outData(1, &count, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
508 state_task->set_outData(2, &fastebos, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
509 state_task->set_outData(3, &rinkx, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
510 state_task->set_outData(4, &rinky, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
511 state_task->set_outData(5, &rinkf2, sizeof(int));
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
512 state_task->set_outData(6, obj, 0);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
513
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
514 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
515
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
516 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
517 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
518 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
519 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
520 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
521
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
522 state_next->wait_for(state_task);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
523 state_task->spawn();
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
524
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
525 return p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
526 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
527
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
528
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
529 CHARACTER*
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
530 Boss1Task6(CHARACTER *p)
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
531 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
532 int task_num = p->state_task;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
533 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
534 HTaskPtr state_task = tmanager->create_task(task_num);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
535 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
536 obj->flag = false;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
537 obj->length = 0;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
538
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
539 state_task->set_param(0, (memaddr)rinkx);
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
540 state_task->set_param(1, (memaddr)rinky);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
541 state_task->set_param(2, (memaddr)filpcount);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
542 state_task->set_param(3, (memaddr)tekino0->f);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
543 state_task->set_param(4, (memaddr)count);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
544
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
545 state_task->set_inData(0, p, sizeof(CHARACTER));
37
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 36
diff changeset
546 state_task->set_inData(1, &rinkf2, sizeof(int));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
547
30
427e1aac0bd7 not run.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
548 state_task->set_outData(0, p, sizeof(CHARACTER));
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
549 state_task->set_outData(1, &count, sizeof(int));
37
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 36
diff changeset
550 state_task->set_outData(2, obj, 0);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
551
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
552 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
553
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
554 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
555 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
556 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
557 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
558 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
559
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
560 state_next->wait_for(state_task);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
561 state_task->spawn();
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
562
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
563 return p;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
564 }
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
565
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
566
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
567 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
568 Boss2Task1(CHARACTER *p)
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
569 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
570 int task_num = p->state_task;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
571 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
572 HTaskPtr state_task = tmanager->create_task(task_num);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
573 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
574 obj->flag = false;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
575 obj->length = 0;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
576
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
577 state_task->set_param(0, (memaddr)enemy_part1->f);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
578 state_task->set_param(1, (memaddr)enemy_part5->f);
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
579 state_task->set_param(2, (memaddr)random());
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
580
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
581 state_task->set_inData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
582 state_task->set_inData(1, &count, sizeof(int));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
583
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
584 state_task->set_outData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
585 state_task->set_outData(1, &count, sizeof(int));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
586 state_task->set_outData(2, &rinkx, sizeof(int));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
587 state_task->set_outData(3, &rinkf1, sizeof(int));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
588 state_task->set_outData(4, obj, 0);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
589
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
590 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
591
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
592 #ifndef PPE_ONLY
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
593 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
594 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
595 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
596 #endif
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
597
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
598 state_next->wait_for(state_task);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
599 state_task->spawn();
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
600
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
601 return p;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
602 }
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
603
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
604
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
605 CHARACTER*
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
606 Boss2Task2(CHARACTER *p)
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
607 {
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
608 int task_num = p->state_task;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
609 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
610 HTaskPtr state_task = tmanager->create_task(task_num);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
611 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
612 obj->flag = false;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
613 obj->length = 0;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
614
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
615 state_task->set_inData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
616 state_task->set_inData(1, &count, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
617 state_task->set_inData(2, &rinkx, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
618 state_task->set_inData(3, &rinkf1, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
619
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
620 state_task->set_outData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
621 state_task->set_outData(1, &count, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
622 state_task->set_outData(2, &rinkx, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
623 state_task->set_outData(3, &rinkf1, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
624 state_task->set_outData(4, obj, 0);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
625
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
626 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
627
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
628 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
629 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
630 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
631 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
632 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
633
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
634 state_next->wait_for(state_task);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
635 state_task->spawn();
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
636
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
637 return p;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
638 }
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
639
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
640 static int myrand = 1;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
641
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
642 CHARACTER*
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
643 Boss2Task3(CHARACTER *p)
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
644 {
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
645 int task_num = p->state_task;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
646 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
647 HTaskPtr state_task = tmanager->create_task(task_num);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
648 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
649 obj->flag = false;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
650 obj->length = 0;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
651
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
652 state_task->set_param(0, (memaddr)myrand);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
653
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
654 state_task->set_inData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
655 state_task->set_inData(1, &count, sizeof(int));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
656
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
657 state_task->set_outData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
658 state_task->set_outData(1, &count, sizeof(int));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
659 state_task->set_outData(2, obj, 0);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
660
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
661 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
662
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
663 #ifndef PPE_ONLY
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
664 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
665 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
666 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
667 #endif
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
668
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
669 state_next->wait_for(state_task);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
670 state_task->spawn();
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
671
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
672 return p;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
673 }
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
674
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
675
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
676 CHARACTER*
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
677 Boss2Task4(CHARACTER *p, int num1, int num2)
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
678 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
679 int task_num = p->state_task;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
680 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
681 HTaskPtr state_task = tmanager->create_task(task_num);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
682 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
683 obj->flag = false;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
684 obj->length = 0;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
685
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
686 state_task->set_param(0, (memaddr)enemy_part1->f);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
687 state_task->set_param(1, (memaddr)enemy_part2->f);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
688 state_task->set_param(2, (memaddr)enemy_part3->f);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
689 state_task->set_param(3, (memaddr)enemy_part4->f);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
690 state_task->set_param(4, (memaddr)enemystate[num1].charano);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
691 state_task->set_param(5, (memaddr)enemystate[num2].charano);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
692
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
693 state_task->set_inData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
694 state_task->set_inData(1, kyeenemyno, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
695 state_task->set_inData(2, &count, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
696 state_task->set_inData(3, &rinkf1, sizeof(int));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
697
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
698 state_task->set_outData(0, p, sizeof(CHARACTER));
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
699 state_task->set_outData(1, &count, sizeof(int));
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
700 state_task->set_outData(2, obj, 0);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
701
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
702 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
703
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
704 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
705 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
706 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
707 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
708 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
709
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
710 state_next->wait_for(state_task);
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
711 state_task->spawn();
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
712
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
713 return p;
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
714 }
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
715
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
716
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
717 CHARACTER*
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
718 Boss2Task5(CHARACTER *p, int num1, int num2)
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
719 {
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
720 int task_num = p->state_task;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
721 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
722 HTaskPtr state_task = tmanager->create_task(task_num);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
723 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
724 obj->flag = false;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
725 obj->length = 0;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
726
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
727 state_task->set_param(0, (memaddr)enemy_part1->f);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
728 state_task->set_param(1, (memaddr)enemy_part2->f);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
729 state_task->set_param(2, (memaddr)enemy_part3->f);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
730 state_task->set_param(3, (memaddr)enemy_part4->f);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
731 state_task->set_param(4, (memaddr)enemystate[num1].charano);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
732 state_task->set_param(5, (memaddr)enemystate[num2].charano);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
733
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
734 state_task->set_inData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
735 state_task->set_inData(1, kyeenemyno, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
736 state_task->set_inData(3, &rinkf2, sizeof(int));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
737
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
738 state_task->set_outData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
739 state_task->set_outData(1, obj, 0);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
740
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
741 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
742
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
743 #ifndef PPE_ONLY
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
744 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
745 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
746 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
747 #endif
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
748
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
749 state_next->wait_for(state_task);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
750 state_task->spawn();
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
751
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
752 return p;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
753 }
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
754
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
755
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
756 CHARACTER*
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
757 Boss4Task(CHARACTER *p)
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
758 {
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
759 kyeenemyno = p;
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
760
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
761 int task_num = p->state_task;
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
762 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
763 HTaskPtr state_task = tmanager->create_task(task_num);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
764 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
765 obj->flag = false;
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
766 obj->length = 0;
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
767
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
768 state_task->set_param(0, (memaddr)myrand);
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
769
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
770 state_task->set_inData(0, p, sizeof(CHARACTER));
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
771 state_task->set_inData(1, &count, sizeof(int));
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
772
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
773 state_task->set_outData(0, p, sizeof(CHARACTER));
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
774 state_task->set_outData(1, &count, sizeof(int));
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
775 state_task->set_outData(2, obj, 0);
25
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
776
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
777 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
778
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
779 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
780 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
781 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
782 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
783 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
784
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
785 state_next->wait_for(state_task);
25
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
786 state_task->spawn();
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
787
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
788 return p;
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
789 }
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
790
31
ccb8d9956a1e add multi container function.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 30
diff changeset
791
25
ee4c488d48a3 add Puttama func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 21
diff changeset
792 CHARACTER*
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
793 Boss5Task1(CHARACTER *p)
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
794 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
795 int task_num = p->state_task;
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
796 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
797 HTaskPtr state_task = tmanager->create_task(task_num);
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
798 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
799 obj->flag = false;
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
800 obj->length = 0;
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
801
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
802 state_task->set_param(0, (memaddr)random());
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
803 state_task->set_param(1, (memaddr)random());
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
804
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
805 state_task->set_inData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
806 state_task->set_inData(1, &jiki, sizeof(player));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
807
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
808 state_task->set_outData(0, p, sizeof(CHARACTER));
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
809 state_task->set_outData(1, obj, 0);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
810
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
811 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
812
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
813 #ifndef PPE_ONLY
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
814 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
815 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
816 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
817 #endif
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
818
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
819 state_next->wait_for(state_task);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
820 state_task->spawn();
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
821
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
822 return p;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
823 }
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
824
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
825
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
826 CHARACTER*
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
827 Boss5Task2(CHARACTER *p)
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
828 {
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
829 int task_num = p->state_task;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
830 int obj_size = sizeof(ObjContainer)+sizeof(ObjData)*DATA_LENGTH;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
831 HTaskPtr state_task = tmanager->create_task(task_num);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
832 ObjContainerPtr obj = (ObjContainerPtr)tmanager->allocate(obj_size);
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
833 obj->flag = false;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
834 obj->length = 0;
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
835
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
836 state_task->set_param(0, (memaddr)random());
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
837 state_task->set_param(1, (memaddr)random());
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
838 state_task->set_param(2, (memaddr)random());
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
839 state_task->set_param(3, (memaddr)random());
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
840
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
841 state_task->set_inData(0, p, sizeof(CHARACTER));
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
842 state_task->set_inData(1, &jiki, sizeof(player));
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
843
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
844 state_task->set_outData(0, p, sizeof(CHARACTER));
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
845 state_task->set_outData(1, obj, 0);
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
846
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
847 state_task->set_post(checkContainer, (void*)p, (void*)obj);
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
848
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
849 #ifndef PPE_ONLY
54
3acdeb3dc3e8 collision use global_alloc (not work)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 53
diff changeset
850 state_task->set_cpu(get_cpunum());
61
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
851 #else
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
852 state_task->set_cpu(CPU_PPE);
e66cab264350 RenderingEngine Task is worked on spe, task_dandy Task is worked on ppe
yutaka@localhost.localdomain
parents: 59
diff changeset
853 #endif
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
854
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
855 state_next->wait_for(state_task);
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
856 state_task->spawn();
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
857
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
858 return p;
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
859 }
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
860
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
861
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
862 CHARACTER*
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
863 noaction(CHARACTER *p)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
864 {
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
865 return p;
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
866 }
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
867
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
868
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
869 CHARACTER*
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
870 delete_chara(CHARACTER *p)
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
871 {
53
b31bed246abd fix code and add log.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 52
diff changeset
872 CHARACTER *parent = p;
b31bed246abd fix code and add log.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 52
diff changeset
873 p->f = FALSE;
b31bed246abd fix code and add log.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 52
diff changeset
874 p->state = noaction;
b31bed246abd fix code and add log.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 52
diff changeset
875 p->collision = noaction;
b31bed246abd fix code and add log.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 52
diff changeset
876 return parent;
10
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
877 }
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
878
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
879
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
880 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
881 chara_state0(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
882 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
883 p->state_task = STATE0;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
884 return SimpleStateTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
885 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
886
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
887
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
888 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
889 chara_state1(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
890 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
891 p->state_task = STATE1;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
892 return SimpleStateTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
893 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
894
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
895
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
896 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
897 chara_state2(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
898 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
899 p->state_task = STATE2;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
900 return SimpleStateTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
901 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
902
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
903
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
904 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
905 chara_state3(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
906 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
907 p->state_task = STATE3;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
908 return sendContainerTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
909 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
910
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
911
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
912 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
913 chara_state4(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
914 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
915 p->state_task = STATE4;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
916 return withJikiTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
917 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
918
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
919
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
920 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
921 chara_state5(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
922 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
923 p->state_task = STATE5;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
924 return withJikiTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
925 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
926
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
927
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
928 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
929 chara_state6(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
930 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
931 p->state_task = STATE6;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
932 return withJikiTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
933 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
934
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
935
26
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
936 CHARACTER*
c4210c1053e8 add state7.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
937 chara_state7(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
938 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
939 p->state_task = STATE7;
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
940 return sendContainerTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
941 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
942
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
943
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
944 // state1 boss patern
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
945 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
946 chara_state8(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
947 {
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
948 tekino0 = p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
949 kyeenemyno = p;
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
950
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
951 p->state_task = STATE8;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
952 return Boss1Task1(p);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
953 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
954
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
955
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
956 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
957 chara_state9(CHARACTER *p)
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
958 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
959 p->state_task = STATE9;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
960 return Boss1Task2(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
961 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
962
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
963
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
964 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
965 chara_state10(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
966 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
967 p->state_task =STATE10;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
968 return Boss1Task3(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
969 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
970
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
971
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
972 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
973 chara_state11(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
974 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
975 p->state_task = STATE11;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
976 return Boss1Task4(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
977 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
978
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
979
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
980 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
981 chara_state12(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
982 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
983 p->state_task = STATE12;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
984 return Boss1Task5(p);
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
985 }
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
986
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
987
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
988 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
989 chara_state13(CHARACTER *p)
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
990 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
991 p->state_task = STATE13;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
992 return Boss1Task6(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
993 }
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
994
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
995
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
996 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
997 chara_state20(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
998 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
999 p->state_task = STATE20;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
1000 return SimpleStateTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1001 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1002
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
1003
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
1004 CHARACTER*
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
1005 chara_state21(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1006 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1007 p->state_task = STATE21;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
1008 return SimpleStateTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1009 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1010 //ここまでgetate boss
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1011
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1012
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1013 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1014 chara_state22(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1015 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1016 p->state_task = STATE22;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1017 return sendRandomTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1018 }
27
871f7d9a2f35 running.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 26
diff changeset
1019
871f7d9a2f35 running.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 26
diff changeset
1020
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1021 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1022 chara_state23(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1023 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1024 p->state_task = STATE23;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1025 return AsteroidTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1026 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1027
33
39e643fc4f90 moving stage1.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 32
diff changeset
1028
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1029 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1030 chara_state24(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1031 {
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1032 kyeenemyno = p;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1033 tekino0 = 0;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1034 enemy_part1 = p->next;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1035 enemy_part2 = enemy_part1->next;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1036 enemy_part3 = enemy_part2->next;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1037 enemy_part4 = enemy_part3->next;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1038 enemy_part5 = enemy_part4->next;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1039 rinkx = 0;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1040 rinky = 0;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1041 rinkf1 = 0;
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1042 rinkf2 = 0;
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1043 p->state_task = STATE25;
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1044
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1045 state_check(p);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1046 return p;
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1047 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1048
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1049 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1050 chara_state25(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1051 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1052 p->state_task = STATE25;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1053 return Boss2Task1(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1054 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1055
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1056 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1057 chara_state26(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1058 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1059 p->state_task = STATE26;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1060 return Boss2Task2(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1061 }
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1062
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1063 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1064 chara_state27(CHARACTER *p) //rocket punch
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1065 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1066 p->state_task = STATE27;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1067 return Boss2Task2(p);
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1068 }
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1069 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1070 chara_state28(CHARACTER *p)
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1071 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1072 p->state_task = STATE28;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1073 //if many rand
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1074 return Boss2Task3(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1075 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1076
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1077
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1078 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1079 chara_state29(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1080 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1081 p->state_task = STATE29;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1082 return sendContainerTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1083 }
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1084
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1085
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1086 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1087 chara_state30(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1088 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1089 p->state_task = STATE30;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
1090 return SimpleStateTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1091 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1092
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1093
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1094 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1095 chara_state31(CHARACTER *p) //right hand
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1096 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1097 p->state_task = STATE31;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1098 return Boss2Task4(p, 0, 0);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1099 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1100
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1101
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1102 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1103 chara_state32(CHARACTER *p) //left hand
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1104 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1105 p->state_task = STATE32;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1106 return Boss2Task4(p, 14, 20);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1107 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1108
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1109
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1110
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1111 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1112 chara_state33(CHARACTER *p) // right shoulder
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1113 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1114 p->state_task = STATE33;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1115 return Boss2Task4(p, 11, 19);
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1116 }
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1117
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1118
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1119 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1120 chara_state34(CHARACTER *p) //left shoulder
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1121 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1122 p->state_task = STATE34;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1123 return Boss2Task4(p, 12, 21);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1124 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1125
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1126
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1127 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1128 chara_state35(CHARACTER *p) // bust
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1129 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1130 p->state_task = STATE35;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1131 return Boss2Task4(p, 15, 16);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1132 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1133
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1134
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1135
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1136 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1137 chara_state40(CHARACTER *p) //arm vulkan
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1138 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1139 p->state_task = STATE40;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1140 return Boss2Task4(p, 0, 0);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1141 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1142
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1143
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1144 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1145 chara_state41(CHARACTER *p) //left arm up arm vulkan
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1146 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1147 p->state_task = STATE41;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1148 //if rand
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1149 return Boss2Task5(p, 0, 0);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1150 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1151
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1152
38
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
1153 CHARACTER*
6626e451a09d fix random number.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 37
diff changeset
1154 chara_state400(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1155 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1156 p->state_task = STATE400;
19
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 18
diff changeset
1157 return SimpleStateTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1158 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1159
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1160
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1161 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1162 chara_state401(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1163 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1164 p->state_task = STATE401;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1165 return JikiContainerTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1166 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1167
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1168
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1169 CHARACTER*
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1170 chara_state402(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1171 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1172 p->state_task = STATE402;
34
7aaaaf5dde40 add new task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 33
diff changeset
1173 return JikiContainerTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1174 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1175
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1176
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1177 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1178 chara_state410(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1179 {
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1180 kyeenemyno = p;
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1181 p->state_task = STATE411;
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1182
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1183 state_check(p);
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1184 return p;
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1185 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1186
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1187
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1188 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1189 chara_state411(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1190 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1191 p->state_task = STATE411;
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1192 return JikiContainerTask(p);
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1193 }
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1194
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1195
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1196 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1197 chara_state500(CHARACTER *p)
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1198 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1199 p->state_task = STATE500;
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1200 return Boss4Task(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1201 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1202
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1203
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1204 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1205 chara_state501(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1206 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1207 p->state_task = STATE501;
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1208 return sendContainerTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1209 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1210
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1211
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1212 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1213 chara_state600(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1214 {
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1215 kyeenemyno = p;
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1216 p->state_task = STATE600;
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1217 return sendContainerTask(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1218 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1219
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1220
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1221 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1222 chara_state601(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1223 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1224 p->state_task = STATE601;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1225 return Boss5Task1(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1226 }
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1227
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1228
35
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1229 CHARACTER*
c122e3d2302e add all state task.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 34
diff changeset
1230 chara_state602(CHARACTER *p)
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1231 {
57
978097c6427a bug fix.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 56
diff changeset
1232 p->state_task = STATE602;
58
e0018f39f7e1 fix random func.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 57
diff changeset
1233 return Boss5Task2(p);
18
c330ded6d728 add task file.
koba <koba@cr.ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
1234 }