ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/typemap
Revision: 1.23
Committed: Mon Apr 30 04:25:30 2007 UTC (17 years, 1 month ago) by root
Branch: MAIN
CVS Tags: rel-2_1
Changes since 1.22: +0 -1 lines
Log Message:
This is the first rough cut of the skill use system (use the STABLE tag).

Details will likely change, and combat skills do not work very well, but
it works quite well.

Players no longer have a shoottype or range slots, instead, each player
has these members:

   combat_skill/combat_ob  the currently selected skill (and weapon)
                           for direct attacks.
   ranged_skill/ranged_ob  the currently selected ranged skill (and
                           bow/spell/item)
   golem                   the currently-controlled golem, if any.

File Contents

# User Rev Content
1 root 1.20 val64 T_VAL64
2     uint64 T_VAL64
3     sint16 T_INT
4     sint8 T_INT
5     faceidx T_INT
6     animidx T_INT
7    
8     object * T_CF_OBJ
9     partylist * T_CF_OBJ
10     archetype * T_CF_OBJ
11     maptile * T_CF_OBJ
12     struct region * T_CF_OBJ
13     region * T_CF_OBJ
14     client * T_CF_OBJ
15     player * T_CF_OBJ
16     living * T_CF_OBJ
17     attachable * T_CF_OBJ
18 root 1.21 treasurelist * T_CF_OBJ
19 root 1.20 std::string T_CF_OBJ
20     const std::string T_CF_OBJ
21 root 1.7
22 root 1.20 Settings * T_SETTINGS
23 root 1.1
24 root 1.9 object_ornull * T_CF_OBJ_ORNULL
25     mapstruct_ornull * T_CF_OBJ_ORNULL
26 root 1.16 octet_string T_CF_OCTETS
27     utf8_string T_CF_UTF8
28     const_octet_string T_CF_OCTETS
29     const_utf8_string T_CF_UTF8
30 root 1.1
31     INPUT
32    
33     T_VAL64
34     $var = ($type)SvVAL64 ($arg);
35    
36 root 1.7 T_CF_OBJ
37 root 1.4 sv_to ($arg, $var)
38 root 1.7
39 root 1.6 T_SETTINGS
40 root 1.9 $var = &settings
41 root 1.7
42 root 1.9 T_CF_OBJ_ORNULL
43     if (SvOK ($arg))
44     sv_to ($arg, $var);
45     else
46     $var = 0;
47 root 1.1
48 root 1.16 T_CF_OCTETS
49     $var = SvPVbyte_nolen ($arg)
50    
51     T_CF_UTF8
52     $var = SvPVutf8_nolen ($arg)
53    
54 root 1.1 OUTPUT
55    
56     T_VAL64
57     $arg = newSVval64 ($var);
58    
59 root 1.9 T_CF_OBJ_NORNULL
60 root 1.4 $arg = to_sv ($var);
61 root 1.7
62     T_CF_OBJ
63 root 1.4 $arg = to_sv ($var);
64 root 1.1
65 root 1.16 T_CF_OCTETS
66 root 1.17 $arg = $var ? newSVpv ($var, 0) : &PL_sv_undef;
67 root 1.16
68     T_CF_UTF8
69 root 1.17 if ($var)
70     {
71 root 1.18 sv_setpv ($arg, $var);
72 root 1.17 SvUTF8_on ($arg);
73     }
74 root 1.16