| … | |
… | |
| 1139 | |
1139 | |
| 1140 | return retval; |
1140 | return retval; |
| 1141 | } |
1141 | } |
| 1142 | |
1142 | |
| 1143 | maptile * |
1143 | maptile * |
| 1144 | find_style (const_utf8_string dirname, const_utf8_string stylename, int difficulty) |
1144 | find_style (const_utf8_string dirname, const_utf8_string stylename, int difficulty, bool recurse) |
| 1145 | { |
1145 | { |
| 1146 | CALL_BEGIN (3); |
1146 | CALL_BEGIN (4); |
| 1147 | CALL_ARG (dirname); |
1147 | CALL_ARG (dirname); |
| 1148 | CALL_ARG (stylename); |
1148 | CALL_ARG (stylename); |
| 1149 | CALL_ARG (difficulty); |
1149 | CALL_ARG (difficulty); |
|
|
1150 | CALL_ARG (recurse); |
| 1150 | CALL_CALL ("ext::map_random::find_style", G_SCALAR); |
1151 | CALL_CALL ("ext::map_random::find_style", G_SCALAR); |
| 1151 | |
1152 | |
| 1152 | maptile *retval = 0; |
1153 | maptile *retval = 0; |
| 1153 | if (count) sv_to (POPs, retval); |
1154 | if (count) sv_to (POPs, retval); |
| 1154 | |
1155 | |
| … | |
… | |
| 1664 | switch (items) |
1665 | switch (items) |
| 1665 | { |
1666 | { |
| 1666 | case 0: RETVAL = gen (); break; |
1667 | case 0: RETVAL = gen (); break; |
| 1667 | case 1: RETVAL = gen (SvUV (ST (0))); break; |
1668 | case 1: RETVAL = gen (SvUV (ST (0))); break; |
| 1668 | case 2: RETVAL = gen (SvIV (ST (0)), SvIV (ST (1))); break; |
1669 | case 2: RETVAL = gen (SvIV (ST (0)), SvIV (ST (1))); break; |
| 1669 | default: croak ("cf::rndm requires none, one or two parameters."); break; |
1670 | default: croak ("cf::rndm requires zero, one or two parameters."); break; |
| 1670 | } |
1671 | } |
| 1671 | } |
1672 | } |
| 1672 | OUTPUT: |
1673 | OUTPUT: |
| 1673 | RETVAL |
1674 | RETVAL |
| 1674 | |
1675 | |
| … | |
… | |
| 2807 | while (!RETVAL); // crude way to leave index 0 |
2808 | while (!RETVAL); // crude way to leave index 0 |
| 2808 | |
2809 | |
| 2809 | faces [RETVAL].name = name; |
2810 | faces [RETVAL].name = name; |
| 2810 | facehash.insert (std::make_pair (faces [RETVAL].name, RETVAL)); |
2811 | facehash.insert (std::make_pair (faces [RETVAL].name, RETVAL)); |
| 2811 | |
2812 | |
| 2812 | if (!strcmp (name, BLANK_FACE_NAME)) blank_face = RETVAL; |
2813 | if (!strcmp (name, BLANK_FACE_NAME )) blank_face = RETVAL; |
| 2813 | if (!strcmp (name, EMPTY_FACE_NAME)) empty_face = RETVAL; |
2814 | if (!strcmp (name, EMPTY_FACE_NAME )) empty_face = RETVAL; |
|
|
2815 | if (!strcmp (name, MAGICMOUTH_FACE_NAME)) magicmouth_face = RETVAL; |
| 2814 | } |
2816 | } |
| 2815 | OUTPUT: RETVAL |
2817 | OUTPUT: RETVAL |
| 2816 | |
2818 | |
| 2817 | void set_type (faceidx idx, int value) |
2819 | void set_type (faceidx idx, int value) |
| 2818 | ALIAS: |
2820 | ALIAS: |
