Mercurial > hg > Members > kono > tree_dandy2

annotate Dandy.cc @ 29:606bdb2f721d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
not working scale...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sat, 25 Dec 2010 18:52:11 +0900
parents 789e845ea192
children 00ef8386edd6
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 #include "Dandy.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
2 #include <stdio.h>
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 #include <stdlib.h>
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 #include <string.h>
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 #include <ctype.h>
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 #include <math.h>
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
7 #include <time.h>
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
8 #include <SDL.h>
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 #include "SDL_opengl.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 #include "object.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 #include "tree_controll.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 #include "xml.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
13 #include "profile.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 #include "syokika.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 #include "sankaku.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 #include "sgoex.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 #include "sound.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 #include "bool.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
19 #include "bom.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
20 #include "count2.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
21 #include "tokuten.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
22 #include "schedule.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
23 #include "tama.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
24 #include "debug.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
25 #include "trace.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
26 #include "LoadSprite.h"
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
27 #include <SDL_mixer.h>
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
28 #include "error.h"
19
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
29 #include "matrix_calc.h"
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
30
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
31 #include "Character.h"
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
32 #include "Character_state.h"
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
33
23
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
34 static int use_keybord = 0;
25
6754fbb63ac7 64bit and sys.c removal
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 23
diff changeset
35 // static int cdp[20] = { 16, 16, 16, 17, 18, 0 };
6754fbb63ac7 64bit and sys.c removal
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 23
diff changeset
36 static int i;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
37
23
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
38 static int rswait = 0;
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
39 static int cf = 0;
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
40 static int cc = 0;
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
41
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
42 static int test_mode = 0;
25
6754fbb63ac7 64bit and sys.c removal
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 23
diff changeset
43 static const char *test_object = "" ;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
44
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
45 //static SDL_Surface *screen;
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
46 // static Uint32 background;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
47 // static char *pad_trace_file;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
48
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
49 extern void schedule();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
50 extern void tokuten();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
51 extern void Pad();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
52 extern void keybord();
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
53 static int gamesyokika(int gamef);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
54 static int game_pause(int);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
55 //static char *pad_trace_file;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
56
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
57 /**
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
58 * runmode:
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
59 * 0 - normal game
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
60 * 1 - capture mode
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
61 * program will capture all pad traces on a play and
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
62 * dump it into a file
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
63 * 2 - trace mode
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
64 * program will run with a trace file which is generated
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
65 * by capture-mode
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
66 */
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
67 int runmode;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
68
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
69 SDL_Joystick *joy;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
70
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
71
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
72
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
73 const char *usr_help_str = "Usage: ./twice [-length data_length] [-count task_num]\n\
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
74 -length Number of data (default DATA_NUM (Func.h))\n\
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
75 -count Number of task (default 1)\n";
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
76
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
77 static Viewer *sgroot;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
78
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
79 static int screen_w;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
80 static int screen_h;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
81
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
82 MainLoopPtr
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
83 Dandy::init(Viewer *sgroot_, int w, int h)
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
84 {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
85 screen_w = w;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
86 screen_h = h;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
87 sgroot = sgroot_;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
88 return sgroot;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
89 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
90
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
91 Application *
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
92 application() {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
93 return new Dandy();
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
94 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
95
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
96
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
97 static int opening(int gamef);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
98 static int dandy_closing(int gamef);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
99 static int dandy_main_loop(int gamef);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
100 static int dandy_main_init(int gamef);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
101 extern int init(TaskManager *manager, int argc, char *argv[]);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
102 extern void task_initialize();
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
103 static void TMend(TaskManager *manager);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
104
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
105 bool
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
106 Dandy::app_loop(Viewer *viewer){
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
107 // don't use allExecute
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
108 return 0;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
109 };
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
110
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
111 static int gamef = 0;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
112
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
113 HTaskPtr
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
114 Dandy::application_task(HTaskPtr next, Viewer* viewer){
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
115 // printf("gamef = %d\n",gamef);
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
116 switch (gamef) {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
117 case 0: gamef= dandy_main_init(gamef); break;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
118 case 1: gamef= gamesyokika(gamef); break;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
119 case 2: gamef= opening(gamef); break;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
120 case 3: gamef= dandy_main_loop(gamef); break;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
121 case 4: gamef= dandy_closing(gamef); break;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
122 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
123 return next;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
124 };
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
125
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
126
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
127
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
128
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
129 static void
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
130 task_init()
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
131 {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
132 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
133
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
134 int
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
135 TMmain(TaskManager *manager,int argc, char *argv[])
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
136 {
23
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
137 for(int i = 1; i<argc ; i++) {
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
138 if (strcmp(argv[i],"-t")) {
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
139 test_mode=1;
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
140 if (i+1<argc && argv[i+1]) {
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
141 i++;
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
142 test_object=argv[i];
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
143 }
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
144 }
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
145 }
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
146
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
147 task_init();
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
148 task_initialize();
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
149 manager->set_TMend(TMend);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
150
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
151 return init(manager,argc, argv);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
152 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
153
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
154 void
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
155 TMend(TaskManager *manager)
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
156 {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
157 printf("game end\n");
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
158 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
159
25
6754fbb63ac7 64bit and sys.c removal
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 23
diff changeset
160 static int light_sysswitch = 0;
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
161 static int light_num = 4;
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
162
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
163 static void
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
164 LightSysSwitch(Viewer *sgroot) {
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
165 if (light_sysswitch == 1) {
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
166 sgroot->OnLightSysSwitch();
19
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
167 for (int i = 0; i < light_num; i++) {
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
168 SceneGraphPtr light = sgroot->getLight(i);
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
169 sgroot->OnLightSwitch(i);
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
170 light->xyz[0] = screen_w / 2;
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
171 light->xyz[1] = screen_h / 2;
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
172 light->xyz[2] = -100;
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
173 }
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
174 } else if (light_sysswitch == 0) {
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
175 sgroot->OffLightSysSwitch();
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
176 }
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
177 }
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
178
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
179
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
180 static int
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
181 dandy_main_init(int gamef)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
182 {
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
183 //Timeprof timeprof_move;
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
184 //timeprof_move = timeprof_new();
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
185 dbg_init("/dev/stdout");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
186
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
187 /**
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
188 * timeprof があるんだけどね
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
189 */
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
190
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
191 sgroot->createFromXMLfile("xml/character.xml");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
192 sgroot->createFromXMLfile("xml/font.xml");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
193 sgroot->createFromXMLfile("xml/effect.xml");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
194 sgroot->createFromXMLfile("xml/boss.xml");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
195
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
196 LightSysSwitch(sgroot);
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
197
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
198
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
199 init_sprite(0,0,0,0);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
200
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
201 __debug("syokikaが呼びだされました\n");
10
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
202 joy=SDL_JoystickOpen(0);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
203 if(!joy) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
204 fprintf(stderr,"failed to open joystick 0\n");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
205 use_keybord = 1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
206 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
207
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
208 /**
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
209 * sound.c に移しました
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
210 * 代わりに InitSdlMixer(void); を使います。
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
211 * まあ中身一緒なんだけどね
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
212 */
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
213 /**
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
214 if (Mix_OpenAudio(MIX_DEFAULT_FREQUENCY,MIX_DEFAULT_FORMAT,2,1024) < 0) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
215 fprintf(stderr,"failed to initialize SDL_mixer.\n");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
216 SDL_Quit();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
217 exit(-1);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
218 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
219 */
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
220
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
221 // SDL_mixer とかいろいろ初期化
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
222 // もし Init に失敗したら
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
223 // 以後の Mixer 関連の関数を呼び出しても
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
224 // 中では何も行われないとかいう小細工を入れました。
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
225 InitSdlMixer();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
226
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
227 // 音楽ファイルの読み込み
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
228 LoadSdlMixer();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
229
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
230 // ボリューム調整
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
231 InitVolume();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
232
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
233 // 音出しテスト
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
234 PlaySdlMixer(-1, BGM);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
235
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
236 if(!(init_chara_list(1024))){
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
237 __debug("failed to init_chara_list\n");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
238 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
239
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
240 __debug("finished init_chara_list\n");
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
241
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
242 return 1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
243 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
244
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
245 SceneGraphPtr root;
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
246
19
bdc882acda58 get_matrix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 15
diff changeset
247 // extern void get_matrix(float *matrix, float *rxyz, float *txyz, float *scale, float *stack);
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
248
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
249 static void
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
250 flip()
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
251 {
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
252 CameraPtr camera = sgroot->sgroot->getCamera();
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
253
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
254 sgroot->sgroot->flip();
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
255 sgroot->sgroot->lightCalc();
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
256
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
257 root = sgroot->createSceneGraph();
28
789e845ea192 change root xyz
Yutaka_Kinjyo
parents: 27
diff changeset
258 //root->xyz[0] = screen_w/2;
789e845ea192 change root xyz
Yutaka_Kinjyo
parents: 27
diff changeset
259 //root->xyz[1] = screen_h/2;;
789e845ea192 change root xyz
Yutaka_Kinjyo
parents: 27
diff changeset
260 root->xyz[0] = 0;
789e845ea192 change root xyz
Yutaka_Kinjyo
parents: 27
diff changeset
261 root->xyz[1] = 0;
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
262 root->xyz[2] = 30.0f;
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
263
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
264 /*親の回転、座標から、子の回転、座標を算出*/
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
265 get_matrix(root->matrix, root->angle, root->xyz, camera->matrix);
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
266 /*法線用の行列。Cameraの行列を抜いている(Cameraのコンストラクタで、単位行列にしている)*/
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
267 get_matrix(root->real_matrix, root->angle, root->xyz, camera->real_matrix);
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
268
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
269 sgroot->setSceneData(root);
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
270 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
271
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
272
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
273 static int
8
5c405fb3b164 main routine for Cerium
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 7
diff changeset
274 dandy_main_loop(int gamef)
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
275 {
7
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
276
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
277
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
278 if ((pad[0].l1 != 0) && (pad[0].r1 != 0) &&
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
279 (pad[0].l2 != 0) && (pad[0].r2 != 0)) {
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
280 gamef = gamesyokika(gamef);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
281 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
282
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
283 if (pad[0].quit != 0) {
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
284 gamef = 4;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
285 }
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
286 flip();
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
287
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
288 //SDL_FillRect(screen, NULL, background);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
289
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
290 schedule();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
291 enemyfaste = count;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
292
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
293 // timeprof_begin(timeprof_move);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
294 //Move(); //enemy move
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
295 collision_detect();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
296 outofwindow();
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
297 // timeprof_end(timeprof_move);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
298 state_update();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
299 asteroidi = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
300 //charpatern();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
301 //bosguage();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
302
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
303 if (jiki.bf == TRUE) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
304 Player(0);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
305 count++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
306 PutSprite(count, jiki.x, jiki.y, jiki.ch);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
307 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
308
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
309 Putbom();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
310 tokuten();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
311
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
312 count++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
313 //PutSprite(count, 0, 960 - 96, 10);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
314 /*インフレゲージ */
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
315 count++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
316 //PutSprite(count, 0, 0, 48);
7
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
317
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
318 obj_draw();
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
319 gamef = game_pause(gamef);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
320
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
321 if (use_keybord) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
322 keybord();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
323 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
324 Pad(joy);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
325 }
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
326 filpcount++;
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
327 count = 0;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
328
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
329 return gamef;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
330 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
331
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
332 static int
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
333 dandy_closing(int gamef)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
334 {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
335
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
336 //_______________________________________________
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
337 // SDL_mixerの後始末
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
338 Mix_CloseAudio();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
339 Mix_HaltMusic();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
340 FreeSdlMixer() ;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
341 //_______________________________________________
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
342 return 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
343 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
344
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
345
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
346 static int
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
347 gamesyokika(int gamef)
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
348 {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
349 laser_lv3[0].r = 62;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
350 laser_lv3[0].r = 62;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
351 for (i = 0; i < 3; i++) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
352 tlv3[i].y = -1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
353 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
354 filpcount = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
355 stage = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
356 //for (i = 0; i < 300; i++)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
357 //enemy[i].f = FALSE;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
358 jiki.zanki = 3;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
359 jiki.x = 60;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
360 jiki.y = 200;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
361 jiki.ch = 3;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
362 jiki.point = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
363 jiki.bf = FALSE;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
364 jiki.muteki = 120;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
365 enemycount = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
366 lg.stg = 4096;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
367 pg.stg = 4096;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
368 infg.stg = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
369 infg_level = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
370 //kyeenemyno = -1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
371 fastebos = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
372 jiki.ccount = 99;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
373 p_extend = 200000;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
374 pad[0].up=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
375 pad[0].down=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
376 pad[0].right=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
377 pad[0].left=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
378 pad[0].st=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
379 pad[0].se=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
380
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
381 SoundStop();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
382 SoundPlay(7);
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
383 gamef = 2;
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
384 flip();
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
385 return gamef;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
386 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
387
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
388 static int
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
389 opening(int gamef)
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
390 {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
391 if(use_keybord == 1) {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
392 keybord();
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
393 } else {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
394 Pad(joy);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
395 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
396
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
397 count = 1;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
398
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
399 PutSprite(count, 700, 480, 53); // put `push start' string on screen.
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
400 count++;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
401 PutSprite(count, 224, 776, 119); // put `super dandy'
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
402 count++;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
403 // PutSprite(count, 200, 64, 190);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
404 // PutSpriteEx(count, 8192, 8192, 0);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
405 PutSpriteEx(190, 800, 264, 2, 2, 5);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
406 count++;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
407 PutSprite(count, 396, 432, 191);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
408 //PutSpriteEx(count, 8192, 8192, 0);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
409 count++;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
410 PutSprite(count, 640, 640, 192);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
411 //PutSpriteEx(count, 8192, 8192, 0);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
412
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
413 if (pad[0].st > 1) {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
414 jiki.bf = TRUE;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
415
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
416 //CdPlay(1,&cdp[0],0);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
417 SoundStop();
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
418 SoundPlay(0);
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
419
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
420 gamef = 3;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
421 pad[0].st = 1;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
422 } else if ((pad[0].se > 0) && (pad[0].st > 0)) {
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
423 gamef = 2;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
424 }
12
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
425 flip();
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
426 return gamef;
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
427 }
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
428
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
429 static int
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
430 game_pause(int gamef)
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
431 {
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
432 gamef = 3;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
433 if (jiki.zanki != 0 && jiki.bf != FALSE) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
434 if (pad[0].se == 1) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
435 //Mix_Pause(BGM);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
436 PauseSdlMixer(BGM);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
437 while(1){
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
438 if(use_keybord == 1) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
439 keybord();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
440 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
441 Pad(joy);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
442 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
443 if(pad[0].st == 0)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
444 continue;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
445 pad[0].up=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
446 pad[0].down=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
447 pad[0].right=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
448 pad[0].left=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
449 pad[0].se=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
450 pad[0].st=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
451 //Mix_Resume(BGM);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
452 ResumeSdlMixer(BGM);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
453 break;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
454 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
455 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
456 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
457 if (jiki.zanki == 0) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
458 // RECT *recp;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
459 if ((jiki.ccount > 0) && (cf == 0)) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
460 cf = 1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
461 count++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
462 //cgcg(2);
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
463 PutSprite(count, 480, 480, 110);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
464 count++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
465 //cgcg(1);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
466 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
467 if ((jiki.ccount > 0) && (cf == 1)) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
468 while (1) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
469 if (pad[0].st > 0) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
470 cf = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
471 jiki.ccount--;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
472 jiki.zanki = 3;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
473 enemycount++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
474 cc = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
475 for (i = 0; i < 4; i++) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
476 clear_result[i] = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
477 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
478 goto f;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
479 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
480 cc++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
481 if (29 - cc / 60 < 20) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
482 cc = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
483 cf = 3;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
484 break;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
485 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
486 SDL_Delay(100);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
487 PutSprite(1, 640, 640, 29 - cc / 60);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
488 // PutSpriteEx(1, 409 * ((cc % 60) + 1), 409 * ((cc % 60) + 1), 0);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
489
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
490 Pad(joy);
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
491 flip(); // this is not correct
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
492 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
493 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
494 if (rswait > 60 * 6) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
495 cf = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
496 rswait = 0;
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
497 gamef = gamesyokika(gamef);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
498 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
499 rswait++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
500 count++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
501 //cgcg(1);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
502 PutSprite(1, 480, 480, 19);
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
503 return gamef;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
504 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
505 if (jiki.bf == FALSE) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
506 f:
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
507 if (rswait < 80) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
508 rswait++;
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
509 return gamef;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
510 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
511 rswait = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
512 jiki.x = 60;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
513 jiki.y = 200;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
514 jiki.bf = TRUE;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
515
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
516 pad[0].st = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
517 lg.stg = 4096;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
518 pg.stg = 4096;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
519 laser_lv3[0].r = 62;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
520 tlv3[0].r = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
521 tlv3[0].y = -1;
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
522 return gamef;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
523 // sb_size = -1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
524 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
525 }
11
5d2d9369052a minor fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 10
diff changeset
526 return gamef;
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
527 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
528
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
529
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
530 SpriteTable sptable[DEFOBJ];
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
531
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
532
10
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
533 void
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
534 DefSpriteEx(int number, short middlex, short middley)
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
535 {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
536 sptable[number].mx = middlex;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
537 sptable[number].my = middley;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
538 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
539
7
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
540
10
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
541 void
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
542 DefSprite(int number, const char *name, float w, float h, int color, OBJECT *obj)
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
543 {
7
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
544 SpriteTable *m = &sptable[number];
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
545 m->w = w;
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
546 m->h = h;
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
547 m->color = (color & 32);
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
548 m->mx = w / 2;
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
549 m->my = h / 2;
27
8b80f670cf1c cordinate fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
550 m->tex_w = power_of_two(m->w);
8b80f670cf1c cordinate fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
551 m->tex_h = power_of_two(m->h);
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
552 m->texture = (int *)name;
7
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
553
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
554 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
555
25
6754fbb63ac7 64bit and sys.c removal
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 23
diff changeset
556 static float my_scale = 5;
23
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
557
10
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
558 void
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
559 PutSprite(int zorder, short x, short y, int number)
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
560 {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
561 SpriteTable *m = &sptable[number];
7
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
562 char *name = (char *) m->texture;
12
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
563 if (!name) {
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
564 printf("PutSprite %d unknown\n",number);
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
565 return;
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
566 }
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
567 SceneGraphPtr object = sgroot->createSceneGraph(name);
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
568 object->xyz[0] = x; // - object->c_xyz[0] * my_scale;
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
569 object->xyz[1] = y; // - object->c_xyz[1] * my_scale;
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
570 object->xyz[2] = zorder * 0.01;
27
8b80f670cf1c cordinate fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
571 //object->c_xyz[0] = m->mx;
8b80f670cf1c cordinate fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
572 //object->c_xyz[1] = m->my;
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
573 root->addChild(object);
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
574
23
cd5768022d2b 64bit trying..
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 19
diff changeset
575 float scale[] = {my_scale,my_scale,1};
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
576 /*親の回転、座標から、子の回転、座標を算出*/
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
577 scale_matrix(object->matrix, root->matrix, scale, object->c_xyz);
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
578 get_matrix(object->matrix, object->angle, object->xyz, object->matrix);
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
579 /*法線用の行列。Cameraの行列を抜いている(Cameraのコンストラクタで、単位行列にしている)*/
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
580 get_matrix(object->real_matrix, object->angle, object->xyz, root->real_matrix);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
581 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
582
10
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
583 void
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 9
diff changeset
584 PutSpriteEx(int number, int x, int y, float scalex, float scaley, float angle)
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
585 {
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
586 if (1) {
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
587 PutSprite(1, x, y, number);
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
588 return;
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
589 }
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
590
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
591 SpriteTable *m = &sptable[number];
7
972a7f233b23 g++ compile
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 6
diff changeset
592 char *name = (char *) m->texture;
12
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
593 if (!name) {
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
594 printf("PutSpriteEx %d unknown\n",number);
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
595 return;
4c9c5cbd47c5 add p1 font
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 11
diff changeset
596 }
9
c88a4f98b5ef no compile errors
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 8
diff changeset
597 SceneGraphPtr object = sgroot->createSceneGraph(name);
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
598 object->xyz[0] = x ; // - object->c_xyz[0] * my_scale*scalex;
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
599 object->xyz[1] = y ; // - object->c_xyz[1] * my_scale*scaley;
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
600 object->xyz[2] = number * 0.01;
27
8b80f670cf1c cordinate fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
601 //object->c_xyz[0] = m->mx;
8b80f670cf1c cordinate fix
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 25
diff changeset
602 //object->c_xyz[1] = m->my;
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
603 object->angle[3] = angle * (3.1415926*2/4096);
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
604 root->addChild(object);
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
605
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
606 float scale[] = {my_scale*scalex*4,my_scale*scaley*4,1};
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
607 /*親の回転、座標から、子の回転、座標を算出*/
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
608 scale_matrix(object->matrix, root->matrix, scale, object->c_xyz);
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
609 get_matrix(object->matrix, object->angle, object->xyz, object->matrix);
13
9f2eb8b9d23a First working version.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 12
diff changeset
610 /*法線用の行列。Cameraの行列を抜いている(Cameraのコンストラクタで、単位行列にしている)*/
29
606bdb2f721d not working scale...
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 28
diff changeset
611 get_matrix(object->real_matrix, object->angle, object->xyz, root->real_matrix);
6
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
612 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
613
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
614
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
615 struct SGO_PAD pad[2];
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
616
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
617
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
618 /* コントローラ状態の読み込み */
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
619 void Pad(SDL_Joystick *joy)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
620 {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
621 Sint16 axis;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
622
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
623 SDL_JoystickUpdate();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
624
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
625 if(SDL_JoystickGetButton(joy,PS2_CROSS)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
626 pad[0].k0++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
627 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
628 pad[0].k0=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
629
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
630 if(SDL_JoystickGetButton(joy,PS2_CIRCLE)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
631 pad[0].k1++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
632 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
633 pad[0].k1=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
634
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
635 if(SDL_JoystickGetButton(joy,PS2_SQUARE)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
636 pad[0].k3++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
637 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
638 pad[0].k3=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
639
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
640 if(SDL_JoystickGetButton(joy,PS2_TRIANGLE)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
641 pad[0].k4++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
642 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
643 pad[0].k4=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
644
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
645 if(SDL_JoystickGetButton(joy,PS2_L1)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
646 pad[0].l1++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
647 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
648 pad[0].l1=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
649
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
650 if(SDL_JoystickGetButton(joy,PS2_R1)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
651 pad[0].r1++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
652 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
653 pad[0].r1=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
654
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
655 if(SDL_JoystickGetButton(joy,PS2_L2)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
656 pad[0].l2++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
657 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
658 pad[0].l2=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
659
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
660 if(SDL_JoystickGetButton(joy,PS2_R2)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
661 pad[0].r2++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
662 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
663 pad[0].r2=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
664
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
665 if(SDL_JoystickGetButton(joy,PS2_START)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
666 pad[0].st++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
667 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
668 pad[0].st=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
669
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
670 if(SDL_JoystickGetButton(joy,PS2_SELECT)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
671 pad[0].se++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
672 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
673 pad[0].se=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
674
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
675 if(SDL_JoystickGetButton(joy,PS2_L3)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
676 pad[0].l3++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
677 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
678 pad[0].l3=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
679
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
680 if(SDL_JoystickGetButton(joy,PS2_R3)==SDL_PRESSED)
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
681 pad[0].r3++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
682 else
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
683 pad[0].r3=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
684 //x
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
685 axis=SDL_JoystickGetAxis(joy,0);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
686 if(axis>=3200){
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
687 pad[0].left=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
688 pad[0].right++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
689 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
690 else if(axis<=-3200){
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
691 pad[0].right=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
692 pad[0].left++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
693 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
694 else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
695 pad[0].right=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
696 pad[0].left=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
697 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
698 //y
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
699 axis=SDL_JoystickGetAxis(joy,1);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
700 if(axis>=3200){
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
701 pad[0].up=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
702 pad[0].down++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
703 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
704 else if(axis<=-3200){
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
705 pad[0].down=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
706 pad[0].up++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
707 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
708 else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
709 pad[0].down=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
710 pad[0].up=0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
711 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
712
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
713 if ((pad[0].l1 != 0) && (pad[0].r1 != 0) &&
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
714 (pad[0].l2 != 0) && (pad[0].r2 != 0) &&
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
715 (pad[0].st != 0) && (pad[0].se != 0)) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
716 pad[0].quit = 1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
717 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
718 pad[0].quit = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
719 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
720
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
721 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
722
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
723
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
724 void keybord()
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
725 {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
726 SDL_PumpEvents();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
727 Uint8 *keys = SDL_GetKeyState(NULL);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
728
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
729 if (keys[SDLK_UP]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
730 pad[0].up++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
731 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
732 pad[0].up = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
733 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
734 if (keys[SDLK_DOWN]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
735 pad[0].down++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
736 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
737 pad[0].down = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
738 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
739
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
740 if (keys[SDLK_RIGHT]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
741 pad[0].right++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
742 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
743 pad[0].right = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
744 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
745
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
746 if (keys[SDLK_LEFT]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
747 pad[0].left++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
748 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
749 pad[0].left = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
750 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
751
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
752 if (keys[SDLK_a]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
753 pad[0].k0++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
754 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
755 pad[0].k0 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
756 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
757
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
758 if (keys[SDLK_z]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
759 pad[0].k1++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
760 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
761 pad[0].k1 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
762 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
763
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
764 if (keys[SDLK_s]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
765 pad[0].k3++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
766 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
767 pad[0].k3 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
768 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
769
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
770 if (keys[SDLK_x]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
771 pad[0].k4++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
772 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
773 pad[0].k4 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
774 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
775
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
776 if (keys[SDLK_r]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
777 pad[0].r2++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
778 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
779 pad[0].r2 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
780 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
781
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
782 if (keys[SDLK_e]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
783 pad[0].r1++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
784 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
785 pad[0].r1 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
786 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
787
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
788 if (keys[SDLK_w]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
789 pad[0].l1++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
790 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
791 pad[0].l1 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
792 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
793
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
794 if (keys[SDLK_q]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
795 pad[0].l2++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
796 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
797 pad[0].l2 = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
798 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
799
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
800 // START ボタンは Return が似合う気がする
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
801 //if(keys[SDLK_1])
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
802 if (keys[SDLK_RETURN]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
803 pad[0].st++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
804 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
805 pad[0].st = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
806 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
807
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
808 if (keys[SDLK_2]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
809 pad[0].se++;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
810 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
811 pad[0].se = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
812 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
813
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
814 if (keys[SDLK_ESCAPE]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
815 SDL_Quit();
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
816 exit(1);
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
817 //pad[0].st = 1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
818 //pad[0].se = 1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
819 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
820
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
821 if (keys[SDLK_0]) {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
822 pad[0].quit = 1;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
823 } else {
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
824 pad[0].quit = 0;
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
825 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
826 }
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
827
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
828
6541f0bebb81 cerium redering engine main routine.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
829 /* end */