1;;---------------------------------------------------------------------------- 2;; Sprites 3;;---------------------------------------------------------------------------- 4;; 's_some_sprite ss_some_sprite_set num_tiles tile_number wave_sprite facing_value 5;; 6;; facing_value is the sum of all facings provided by this sprite. 7;; The value is determined by adding: 8;; 1 NorthWest 9;; 2 North 10;; 4 NorthEast 11;; 8 West 12;; 16 Here 13;; 32 East 14;; 64 SouthWest 15;; 128 South 16;; 256 SouthEast 17;; 512 Up 18;; 1024 Down 19;; 20;; Common values include: 21;; 0 Default facing (only 1 facing, used for all directions) 22;; 40 WE facing 23;; 170 NSEW facing 24;;---------------------------------------------------------------------------- 25 26;(kern-mk-sprite 's_deep ss_u4_shapes 1 0 #t 0 ) 27;(kern-mk-sprite 's_shallow ss_u4_shapes 1 1 #t 0 ) 28;(kern-mk-sprite 's_shoals ss_u4_shapes 1 2 #t 0 ) 29(kern-mk-sprite 's_bog ss_u4_shapes 1 3 #f 0 ) 30(kern-mk-sprite 's_grass ss_u4_shapes 1 4 #f 0 ) 31 32;(kern-mk-sprite 's_trees ss_u4_shapes 1 5 #f 0 ) 33;(kern-mk-sprite 's_forest ss_u4_shapes 1 6 #f 0 ) 34;(kern-mk-sprite 's_hills ss_u4_shapes 1 7 #f 0 ) 35;(kern-mk-sprite 's_mountains ss_u4_shapes 1 8 #f 0 ) 36;(kern-mk-sprite 's_dungeon ss_u4_shapes 1 9 #f 0 ) 37(kern-mk-sprite 's_town ss_u4_shapes 1 10 #f 0 ) 38(kern-mk-sprite 's_keep ss_u4_shapes 1 11 #f 0 ) 39(kern-mk-sprite 's_hamlet ss_u4_shapes 1 12 #f 0 ) 40(kern-mk-sprite 's_leftwing ss_u4_shapes 1 13 #f 0 ) 41(kern-mk-sprite 's_castle ss_u4_shapes 1 14 #f 0 ) 42(kern-mk-sprite 's_rightwing ss_u4_shapes 1 15 #f 0 ) 43(kern-mk-sprite 's_cobblestone ss_u4_shapes 1 22 #f 0 ) 44(kern-mk-sprite 's_ew_bridge ss_u4_shapes 1 23 #f 0 ) 45(kern-mk-sprite 's_ballon ss_u4_shapes 1 24 #f 0 ) 46(kern-mk-sprite 's_bridge_top ss_u4_shapes 1 25 #f 0 ) 47(kern-mk-sprite 's_bridge_bottom ss_u4_shapes 1 26 #f 0 ) 48(kern-mk-sprite 's_ladder_up ss_u4_shapes 1 27 #f 0 ) 49(kern-mk-sprite 's_ladder_down ss_u4_shapes 1 28 #f 0 ) 50(kern-mk-sprite 's_ruin ss_u4_shapes 1 29 #f 0 ) 51(kern-mk-sprite 's_shrine ss_u4_shapes 1 30 #f 0 ) 52 53(kern-mk-sprite 's_pillar ss_u4_shapes 1 48 #f 0 ) 54(kern-mk-sprite 's_wall_b ss_u4_shapes 1 49 #f 0 ) 55(kern-mk-sprite 's_wall_a ss_u4_shapes 1 50 #f 0 ) 56(kern-mk-sprite 's_wall_c ss_u4_shapes 1 51 #f 0 ) 57(kern-mk-sprite 's_wall_d ss_u4_shapes 1 52 #f 0 ) 58(kern-mk-sprite 's_mast ss_u4_shapes 1 53 #f 0 ) 59(kern-mk-sprite 's_ships_wheel ss_u4_shapes 1 54 #f 0 ) 60;(kern-mk-sprite 's_boulder ss_u4_shapes 1 55 #f 0 ) 61;(kern-mk-sprite 's_asleep ss_u4_shapes 1 56 #f 0 ) 62;(kern-mk-sprite 's_wall_rock ss_u4_shapes 1 57 #f 0 ) 63(kern-mk-sprite 's_door_locked ss_u4_shapes 1 58 #f 0 ) 64(kern-mk-sprite 's_door ss_u4_shapes 1 59 #f 0 ) 65;(kern-mk-sprite 's_chest ss_u4_shapes 1 60 #f 0 ) 66(kern-mk-sprite 's_ankh ss_u4_shapes 1 61 #f 0 ) 67(kern-mk-sprite 's_flagstone ss_u4_shapes 1 62 #f 0 ) 68(kern-mk-sprite 's_deck ss_u4_shapes 1 63 #f 0 ) 69 70(kern-mk-sprite 's_moongate_quarter ss_u4_shapes 1 64 #f 0 ) 71(kern-mk-sprite 's_moongate_half ss_u4_shapes 1 65 #f 0 ) 72(kern-mk-sprite 's_moongate_three_quarters ss_u4_shapes 1 66 #f 0 ) 73(kern-mk-sprite 's_moongate_full ss_u4_shapes 1 67 #f 0 ) 74 75(kern-mk-sprite 's_field_poison ss_u4_shapes 1 68 #t 0 ) 76(kern-mk-sprite 's_field_energy ss_u4_shapes 1 69 #t 0 ) 77(kern-mk-sprite 's_field_fire ss_u4_shapes 1 70 #t 0 ) 78(kern-mk-sprite 's_field_sleep ss_u4_shapes 1 71 #t 0 ) 79(kern-mk-sprite 's_wall ss_u4_shapes 1 72 #f 0 ) 80(kern-mk-sprite 's_secret_door ss_u4_shapes 1 73 #f 0 ) 81(kern-mk-sprite 's_altar_obj ss_u4_shapes 1 74 #f 0 ) 82(kern-mk-sprite 's_lava ss_u4_shapes 1 76 #t 0 ) 83(kern-mk-sprite 's_projectile ss_u4_shapes 1 77 #f 0 ) 84(kern-mk-sprite 's_magic ss_u4_shapes 1 78 #f 0 ) 85;;(kern-mk-sprite 's_hit ss_u4_shapes 1 79 #f 0 ) 86;;(kern-mk-sprite 's_guard ss_u4_shapes 2 80 #f 0 ) 87;;(kern-mk-sprite 's_townsman ss_u4_shapes 2 82 #f 0 ) 88;;(kern-mk-sprite 's_bard ss_u4_shapes 2 84 #f 0 ) 89;;(kern-mk-sprite 's_jester ss_u4_shapes 2 86 #f 0 ) 90;;(kern-mk-sprite 's_beggar ss_u4_shapes 2 88 #f 0 ) 91;;(kern-mk-sprite 's_child ss_u4_shapes 2 90 #f 0 ) 92(kern-mk-sprite 's_bull ss_u4_shapes 2 92 #f 0 ) 93(kern-mk-sprite 's_lord ss_u4_shapes 2 94 #f 0 ) 94 95(kern-mk-sprite 's_A ss_u4_shapes 1 96 #f 0 ) 96(kern-mk-sprite 's_B ss_u4_shapes 1 97 #f 0 ) 97(kern-mk-sprite 's_C ss_u4_shapes 1 98 #f 0 ) 98(kern-mk-sprite 's_D ss_u4_shapes 1 99 #f 0 ) 99(kern-mk-sprite 's_E ss_u4_shapes 1 100 #f 0 ) 100(kern-mk-sprite 's_F ss_u4_shapes 1 101 #f 0 ) 101(kern-mk-sprite 's_G ss_u4_shapes 1 102 #f 0 ) 102(kern-mk-sprite 's_H ss_u4_shapes 1 103 #f 0 ) 103(kern-mk-sprite 's_I ss_u4_shapes 1 104 #f 0 ) 104(kern-mk-sprite 's_J ss_u4_shapes 1 105 #f 0 ) 105(kern-mk-sprite 's_K ss_u4_shapes 1 106 #f 0 ) 106(kern-mk-sprite 's_L ss_u4_shapes 1 107 #f 0 ) 107(kern-mk-sprite 's_M ss_u4_shapes 1 108 #f 0 ) 108(kern-mk-sprite 's_N ss_u4_shapes 1 109 #f 0 ) 109(kern-mk-sprite 's_O ss_u4_shapes 1 110 #f 0 ) 110(kern-mk-sprite 's_P ss_u4_shapes 1 111 #f 0 ) 111(kern-mk-sprite 's_Q ss_u4_shapes 1 112 #f 0 ) 112(kern-mk-sprite 's_R ss_u4_shapes 1 113 #f 0 ) 113(kern-mk-sprite 's_S ss_u4_shapes 1 114 #f 0 ) 114(kern-mk-sprite 's_T ss_u4_shapes 1 115 #f 0 ) 115(kern-mk-sprite 's_U ss_u4_shapes 1 116 #f 0 ) 116(kern-mk-sprite 's_V ss_u4_shapes 1 117 #f 0 ) 117(kern-mk-sprite 's_W ss_u4_shapes 1 118 #f 0 ) 118(kern-mk-sprite 's_X ss_u4_shapes 1 119 #f 0 ) 119(kern-mk-sprite 's_Y ss_u4_shapes 1 120 #f 0 ) 120(kern-mk-sprite 's_Z ss_u4_shapes 1 121 #f 0 ) 121 122(kern-mk-sprite 's_counter_2x1_c ss_u4_shapes 1 122 #f 0 ) 123(kern-mk-sprite 's_counter_2x1_e ss_u4_shapes 1 123 #f 0 ) 124(kern-mk-sprite 's_counter_2x1_w ss_u4_shapes 1 124 #f 0 ) 125(kern-mk-sprite 's_counter_1x1 ss_u4_shapes 1 125 #f 0 ) 126 127(kern-mk-sprite 's_blank ss_u4_shapes 1 126 #f 0 ) 128(kern-mk-sprite 's_null ss_u4_shapes 1 126 #f 0 ) 129(kern-mk-sprite 's_wall_stone ss_u4_shapes 1 127 #f 0 ) 130 131(kern-mk-sprite 's_pirate_left ss_u4_shapes 1 128 #f 0 ) 132(kern-mk-sprite 's_pirate_front ss_u4_shapes 1 129 #f 0 ) 133(kern-mk-sprite 's_pirate_right ss_u4_shapes 1 130 #f 0 ) 134(kern-mk-sprite 's_pirate_back ss_u4_shapes 1 131 #f 0 ) 135 136;;(kern-mk-sprite 's_nixie ss_u4_shapes 2 132 #f 0 ) 137(kern-mk-sprite 's_kraken ss_u4_shapes 2 134 #f 0 ) 138(kern-mk-sprite 's_sea_serpent ss_u4_shapes 2 136 #f 0 ) 139(kern-mk-sprite 's_sea_horse ss_u4_shapes 2 138 #f 0 ) 140(kern-mk-sprite 's_whirlpool ss_u4_shapes 2 140 #f 0 ) 141(kern-mk-sprite 's_tornado ss_u4_shapes 2 142 #f 0 ) 142 143(kern-mk-sprite 's_rat ss_u4_shapes 4 144 #f 0 ) 144(kern-mk-sprite 's_bat ss_u4_shapes 4 148 #f 0 ) 145(kern-mk-sprite 's_spider ss_u4_shapes 4 152 #f 0 ) 146(kern-mk-sprite 's_ghost ss_u4_shapes 4 156 #f 0 ) 147(kern-mk-sprite 's_slime ss_u4_shapes 4 160 #f 0 ) 148(kern-mk-sprite 's_slime_asleep ss_u4_shapes 1 160 #f 0 ) 149;;(kern-mk-sprite 's_troll ss_u4_shapes 4 164 #f 0 ) 150(kern-mk-sprite 's_gremlin ss_u4_shapes 4 168 #f 0 ) 151(kern-mk-sprite 's_mimic ss_u4_shapes 4 172 #f 0 ) 152(kern-mk-sprite 's_reaper ss_u4_shapes 4 176 #f 0 ) 153(kern-mk-sprite 's_insects ss_u4_shapes 4 180 #f 0 ) 154;;(kern-mk-sprite 's_gazer ss_u4_shapes 4 184 #f 0 ) 155(kern-mk-sprite 's_deathknight ss_u4_shapes 4 188 #f 0 ) 156(kern-mk-sprite 's_orc ss_u4_shapes 4 192 #f 0 ) 157;;(kern-mk-sprite 's_skeleton ss_u4_shapes 4 196 #f 0 ) 158;;(kern-mk-sprite 's_brigand ss_u4_shapes 4 200 #f 0 ) 159(kern-mk-sprite 's_snake ss_u4_shapes 4 204 #f 0 ) 160;;(kern-mk-sprite 's_ettin ss_u4_shapes 4 208 #f 0 ) 161;;(kern-mk-sprite 's_headless ss_u4_shapes 4 212 #f 0 ) 162(kern-mk-sprite 's_cyclops ss_u4_shapes 4 216 #f 0 ) 163(kern-mk-sprite 's_wisp ss_u4_shapes 4 220 #f 0 ) 164;;(kern-mk-sprite 's_wizard ss_u4_shapes 4 224 #f 0 ) 165;;(kern-mk-sprite 's_lich ss_u4_shapes 4 228 #f 0 ) 166(kern-mk-sprite 's_drake ss_u4_shapes 4 232 #f 0 ) 167(kern-mk-sprite 's_zorn ss_u4_shapes 4 236 #f 0 ) 168;;(kern-mk-sprite 's_demon ss_u4_shapes 4 240 #f 0 ) 169(kern-mk-sprite 's_hydra ss_u4_shapes 4 244 #f 0 ) 170;;(kern-mk-sprite 's_dragon ss_u4_shapes 4 248 #f 0 ) 171;;(kern-mk-sprite 's_balron ss_u4_shapes 4 252 #f 0 ) 172 173(kern-mk-sprite 's_frame_ulc ss_frame 1 0 #f 0 ) 174(kern-mk-sprite 's_frame_td ss_frame 1 1 #f 0 ) 175(kern-mk-sprite 's_frame_urc ss_frame 1 2 #f 0 ) 176(kern-mk-sprite 's_frame_endu ss_frame 1 3 #f 0 ) ; top of vertical bar, currently unused 177(kern-mk-sprite 's_frame_tr ss_frame 1 4 #f 0 ) 178(kern-mk-sprite 's_frame_plus ss_frame 1 5 #f 0 ) ; center crosspiece, currently unused 179(kern-mk-sprite 's_frame_tl ss_frame 1 6 #f 0 ) 180(kern-mk-sprite 's_frame_vert ss_frame 1 7 #f 0 ) 181(kern-mk-sprite 's_frame_llc ss_frame 1 8 #f 0 ) 182(kern-mk-sprite 's_frame_tu ss_frame 1 9 #f 0 ) 183(kern-mk-sprite 's_frame_lrc ss_frame 1 10 #f 0 ) 184(kern-mk-sprite 's_frame_endb ss_frame 1 11 #f 0 ) ; bottom of vertical bar, currently unused 185(kern-mk-sprite 's_frame_endl ss_frame 1 12 #f 0 ) 186(kern-mk-sprite 's_frame_horz ss_frame 1 13 #f 0 ) 187(kern-mk-sprite 's_frame_endr ss_frame 1 14 #f 0 ) 188(kern-mk-sprite 's_frame_dot ss_frame 1 15 #f 0 ) ; disconnected disk, currently unused 189 190(kern-mk-sprite 'ls_ankh ss_u4_charset 1 0 #f 0 ) 191(kern-mk-sprite 'ls_shield ss_u4_charset 1 1 #f 0 ) 192(kern-mk-sprite 'ls_holey_wall ss_u4_charset 1 2 #f 0 ) 193(kern-mk-sprite 'ls_wall ss_u4_charset 1 3 #f 0 ) 194(kern-mk-sprite 'ls_updown_arrow ss_u4_charset 1 4 #f 0 ) 195(kern-mk-sprite 'ls_down_arrow ss_u4_charset 1 5 #f 0 ) 196(kern-mk-sprite 'ls_up_arrow ss_u4_charset 1 6 #f 0 ) 197(kern-mk-sprite 'ls_holey_ankh ss_u4_charset 1 7 #f 0 ) 198(kern-mk-sprite 'ls_white_ball ss_u4_charset 1 8 #f 0 ) 199(kern-mk-sprite 'ls_copyright ss_u4_charset 1 9 #f 0 ) 200(kern-mk-sprite 'ls_trademark ss_u4_charset 1 10 #f 0 ) 201(kern-mk-sprite 'ls_male ss_u4_charset 1 11 #f 0 ) 202(kern-mk-sprite 'ls_female ss_u4_charset 1 12 #f 0 ) 203(kern-mk-sprite 'ls_hbar ss_u4_charset 1 13 #f 0 ) 204(kern-mk-sprite 'ls_vbar ss_u4_charset 1 13 #f 0 ) 205(kern-mk-sprite 'ls_square ss_u4_charset 1 14 #f 0 ) 206(kern-mk-sprite 'ls_blue_ball ss_u4_charset 1 15 #f 0 ) 207(kern-mk-sprite 'ls_hbar_right ss_u4_charset 1 16 #f 0 ) 208(kern-mk-sprite 'ls_hbar_left ss_u4_charset 1 17 #f 0 ) 209(kern-mk-sprite 'ls_vbar_top ss_u4_charset 1 16 #f 0 ) 210(kern-mk-sprite 'ls_vbar_bottom ss_u4_charset 1 17 #f 0 ) 211(kern-mk-sprite 'ls_blank_one ss_u4_charset 1 18 #f 0 ) 212(kern-mk-sprite 'ls_dot_dot_dot ss_u4_charset 1 19 #f 0 ) 213(kern-mk-sprite 'ls_whirlpool ss_u4_charset 4 28 #f 0 ) 214(kern-mk-sprite 'ls_blank_three ss_u4_charset 1 32 #f 0 ) 215 216(kern-mk-sprite 's_rune_A ss_rune 1 0 #f 0 ) 217(kern-mk-sprite 's_rune_B ss_rune 1 1 #f 0 ) 218(kern-mk-sprite 's_rune_C ss_rune 1 2 #f 0 ) 219(kern-mk-sprite 's_rune_D ss_rune 1 3 #f 0 ) 220(kern-mk-sprite 's_rune_E ss_rune 1 4 #f 0 ) 221(kern-mk-sprite 's_rune_F ss_rune 1 5 #f 0 ) 222(kern-mk-sprite 's_rune_G ss_rune 1 6 #f 0 ) 223(kern-mk-sprite 's_rune_H ss_rune 1 7 #f 0 ) 224(kern-mk-sprite 's_rune_I ss_rune 1 8 #f 0 ) 225(kern-mk-sprite 's_rune_J ss_rune 1 9 #f 0 ) 226(kern-mk-sprite 's_rune_K ss_rune 1 10 #f 0 ) 227(kern-mk-sprite 's_rune_L ss_rune 1 11 #f 0 ) 228(kern-mk-sprite 's_rune_M ss_rune 1 12 #f 0 ) 229(kern-mk-sprite 's_rune_N ss_rune 1 13 #f 0 ) 230(kern-mk-sprite 's_rune_O ss_rune 1 14 #f 0 ) 231(kern-mk-sprite 's_rune_P ss_rune 1 15 #f 0 ) 232(kern-mk-sprite 's_rune_Q ss_rune 1 16 #f 0 ) 233(kern-mk-sprite 's_rune_R ss_rune 1 17 #f 0 ) 234(kern-mk-sprite 's_rune_S ss_rune 1 18 #f 0 ) 235(kern-mk-sprite 's_rune_T ss_rune 1 19 #f 0 ) 236(kern-mk-sprite 's_rune_U ss_rune 1 20 #f 0 ) 237(kern-mk-sprite 's_rune_V ss_rune 1 21 #f 0 ) 238(kern-mk-sprite 's_rune_W ss_rune 1 22 #f 0 ) 239(kern-mk-sprite 's_rune_X ss_rune 1 23 #f 0 ) 240(kern-mk-sprite 's_rune_Y ss_rune 1 24 #f 0 ) 241(kern-mk-sprite 's_rune_Z ss_rune 1 25 #f 0 ) 242(kern-mk-sprite 's_rune_TH ss_rune 1 26 #f 0 ) 243(kern-mk-sprite 's_rune_EE ss_rune 1 27 #f 0 ) 244(kern-mk-sprite 's_rune_NG ss_rune 1 28 #f 0 ) 245(kern-mk-sprite 's_rune_EA ss_rune 1 29 #f 0 ) 246(kern-mk-sprite 's_rune_ST ss_rune 1 30 #f 0 ) 247(kern-mk-sprite 's_rune_DOTSEP ss_rune 1 31 #f 0 ) 248 249(kern-mk-sprite 's_crosshair ss_addon 1 0 #f 0 ) 250(kern-mk-sprite 's_blackgate_quarter ss_addon 1 1 #f 0 ) 251(kern-mk-sprite 's_blackgate_half ss_addon 1 2 #f 0 ) 252(kern-mk-sprite 's_blackgate_three_quarters ss_addon 1 3 #f 0 ) 253(kern-mk-sprite 's_blackgate_full ss_addon 1 4 #f 0 ) 254(kern-mk-sprite 's_horse ss_addon 1 5 #f 40 ) 255(kern-mk-sprite 's_happy_monster_face ss_addon 1 7 #f 0 ) 256(kern-mk-sprite 's_ship ss_addon 1 8 #f 170 ) 257(kern-mk-sprite 's_queen_spider ss_addon 4 12 #f 0 ) 258(kern-mk-sprite 's_hdoor ss_addon 1 19 #f 0 ) 259(kern-mk-sprite 's_hdoor_locked ss_addon 1 20 #f 0 ) 260(kern-mk-sprite 's_portcullis_down ss_addon 1 21 #f 0 ) 261(kern-mk-sprite 's_portcullis_up ss_addon 1 22 #f 0 ) 262(kern-mk-sprite 's_forest_yellow ss_addon 1 23 #f 0 ) 263(kern-mk-sprite 's_L_lever_up ss_addon 1 24 #f 0 ) 264(kern-mk-sprite 's_L_lever_down ss_addon 1 25 #f 0 ) 265(kern-mk-sprite 's_R_lever_up ss_addon 1 26 #f 0 ) 266(kern-mk-sprite 's_R_lever_down ss_addon 1 27 #f 0 ) 267(kern-mk-sprite 's_floor_plate ss_addon 1 28 #f 0 ) 268(kern-mk-sprite 's_ns_bridge ss_addon 1 29 #f 0 ) 269(kern-mk-sprite 's_forest_purple ss_addon 1 30 #f 0 ) 270(kern-mk-sprite 's_forest_red ss_addon 1 31 #f 0 ) 271(kern-mk-sprite 's_trees_orange ss_addon 1 32 #f 0 ) 272(kern-mk-sprite 's_trees_yellow ss_addon 1 33 #f 0 ) 273(kern-mk-sprite 's_trees_purple ss_addon 1 34 #f 0 ) 274(kern-mk-sprite 's_trees_red ss_addon 1 35 #f 0 ) 275(kern-mk-sprite 's_bed ss_addon 1 36 #f 0 ) 276(kern-mk-sprite 's_fireplace ss_addon 2 37 #f 0 ) 277;;(kern-mk-sprite 's_gwen ss_addon 2 40 #f 0 ) 278(kern-mk-sprite 's_yellow_slime ss_addon 4 42 #f 0 ) 279(kern-mk-sprite 's_yellow_slime_asleep ss_addon 1 42 #f 0 ) 280(kern-mk-sprite 's_wall_torch ss_addon 2 46 #f 0 ) 281(kern-mk-sprite 's_water_elemental ss_addon 1 48 #t 0 ) 282(kern-mk-sprite 's_toy_horse ss_addon 1 55 #f 0 ) 283;;(kern-mk-sprite 's_closed_solid_wood_door_in_stone ss_addon 1 49 #f 0 ) 284;;(kern-mk-sprite 's_open_door_in_stone ss_addon 1 50 #f 0 ) 285;;(kern-mk-sprite 's_locked_solid_wood_door_in_stone ss_addon 1 51 #f 0 ) 286;;(kern-mk-sprite 's_magically_locked_solid_wood_door_in_stone ss_addon 3 52 #f 0 ) 287(kern-mk-sprite 's_rock_arch ss_addon 1 49 #f 0 ) 288(kern-mk-sprite 's_stone_arch ss_addon 1 50 #f 0 ) 289(kern-mk-sprite 's_door_wood ss_addon 1 51 #f 0 ) 290(kern-mk-sprite 's_door_lock ss_addon 1 52 #f 0 ) 291(kern-mk-sprite 's_door_windowed ss_addon 1 53 #f 0 ) 292(kern-mk-sprite 's_door_magiclock ss_addon 3 59 #f 0 ) 293;;(kern-mk-sprite 's_closed_solid_wood_door_in_rock ss_addon 1 56 #f 0 ) 294;;(kern-mk-sprite 's_open_door_in_rock ss_addon 1 57 #f 0 ) 295;;(kern-mk-sprite 's_locked_solid_wood_door_in_rock ss_addon 1 58 #f 0 ) 296;;(kern-mk-sprite 's_magically_locked_solid_wood_door_in_rock ss_addon 3 59 #f 0 ) 297;;(kern-mk-sprite 's_closed_windowed_wood_door_in_rock ss_addon 1 68 #f 0 ) 298;;(kern-mk-sprite 's_locked_windowed_wood_door_in_rock ss_addon 1 69 #f 0 ) 299(kern-mk-sprite 's_smoke ss_addon 2 68 #f 0) 300(kern-mk-sprite 's_spider_web ss_addon 1 70 #f 0) 301(kern-mk-sprite 's_corpse ss_addon 1 71 #f 0) 302;;(kern-mk-sprite 's_magically_locked_windowed_wood_door_in_rock ss_addon 3 76 #f 0 ) 303(kern-mk-sprite 's_deep_lava ss_addon 1 79 #t 0) 304(kern-mk-sprite 's_golden_skeleton_key ss_addon 1 77 #f 0) 305(kern-mk-sprite 's_arrow_slit ss_addon 1 62 #f 0 ) 306(kern-mk-sprite 's_window_in_stone ss_addon 1 63 #f 0 ) 307(kern-mk-sprite 's_trail_0 ss_addon 1 64 #f 0 ) 308(kern-mk-sprite 's_trail_1 ss_addon 1 65 #f 0 ) 309(kern-mk-sprite 's_trail_2 ss_addon 1 66 #f 0 ) 310(kern-mk-sprite 's_trail_3 ss_addon 1 67 #f 0 ) 311(kern-mk-sprite 's_trail_4 ss_addon 1 72 #f 0 ) 312(kern-mk-sprite 's_trail_5 ss_addon 1 73 #f 0 ) 313(kern-mk-sprite 's_trail_6 ss_addon 1 74 #f 0 ) 314(kern-mk-sprite 's_trail_7 ss_addon 1 75 #f 0 ) 315(kern-mk-sprite 's_trail_8 ss_addon 1 80 #f 0 ) 316(kern-mk-sprite 's_trail_9 ss_addon 1 81 #f 0 ) 317(kern-mk-sprite 's_trail_a ss_addon 1 82 #f 0 ) 318(kern-mk-sprite 's_trail_b ss_addon 1 83 #f 0 ) 319;;(kern-mk-sprite 's_chanticleer ss_addon 2 84 #f 0) 320(kern-mk-sprite 's_stars ss_addon 2 86 #f 0) 321(kern-mk-sprite 's_trail_c ss_addon 1 88 #f 0 ) 322(kern-mk-sprite 's_trail_d ss_addon 1 89 #f 0 ) 323(kern-mk-sprite 's_trail_e ss_addon 1 90 #f 0 ) 324(kern-mk-sprite 's_trail_f ss_addon 1 91 #f 0 ) 325(kern-mk-sprite 's_townswoman ss_addon 2 92 #f 0) 326;;(kern-mk-sprite 's_fat_townswoman ss_addon 2 97 #f 0) 327;;(kern-mk-sprite 's_lady ss_addon 2 99 #f 0) 328;;(kern-mk-sprite 's_doorway ss_addon 1 101 #f 0) 329(kern-mk-sprite 's_goblin_child ss_addon 2 102 #f 0) 330(kern-mk-sprite 's_purple_spider ss_addon 4 104 #f 0) 331;;(kern-mk-sprite 's_brigandess ss_addon 4 108 #f 0) 332(kern-mk-sprite 's_wolf ss_addon 4 112 #f 0) 333(kern-mk-sprite 's_void_ship ss_addon 1 116 #f 170) 334;;(kern-mk-sprite 's_human_knight ss_addon 4 120 #f 0 ) 335(kern-mk-sprite 's_red_slime ss_addon 4 124 #f 0) 336(kern-mk-sprite 's_red_slime_asleep ss_addon 1 124 #f 0) 337(kern-mk-sprite 's_active_altar_obj ss_addon 4 128 #f 0) 338(kern-mk-sprite 's_tentacle ss_addon 4 132 #f 0) 339(kern-mk-sprite 's_sludge ss_addon 1 136 #t 0) 340(kern-mk-sprite 's_dirt ss_addon 1 137 #f 0) 341(kern-mk-sprite 's_gravel ss_addon 1 138 #f 0) 342(kern-mk-sprite 's_great_kraken ss_addon 2 139 #f 0) 343(kern-mk-sprite 's_shallow_sludge ss_addon 1 143 #t 0) 344(kern-mk-sprite 's_weather_vane ss_addon 1 144 #f 170) 345(kern-mk-sprite 's_mouse ss_addon 2 148 #f 0) 346(kern-mk-sprite 's_eye_closed ss_addon 1 150 #f 0) 347(kern-mk-sprite 's_eye_open ss_addon 1 151 #f 0) 348 349(kern-mk-sprite 's_full_moon ss_moons 1 0 #f 0 ) 350(kern-mk-sprite 's_wane_three_quarter_moon ss_moons 1 1 #f 0 ) 351(kern-mk-sprite 's_wane_half_moon ss_moons 1 2 #f 0 ) 352(kern-mk-sprite 's_wane_quarter_moon ss_moons 1 3 #f 0 ) 353(kern-mk-sprite 's_new_moon ss_moons 1 4 #f 0 ) 354(kern-mk-sprite 's_wax_quarter_moon ss_moons 1 5 #f 0 ) 355(kern-mk-sprite 's_wax_half_moon ss_moons 1 6 #f 0 ) 356(kern-mk-sprite 's_wax_three_quarter_moon ss_moons 1 7 #f 0 ) 357 358(kern-mk-sprite 's_yellow_full_moon ss_moons 1 8 #f 0 ) 359(kern-mk-sprite 's_yellow_wane_three_quarter_moon ss_moons 1 9 #f 0 ) 360(kern-mk-sprite 's_yellow_wane_half_moon ss_moons 1 10 #f 0 ) 361(kern-mk-sprite 's_yellow_wane_quarter_moon ss_moons 1 11 #f 0 ) 362(kern-mk-sprite 's_yellow_new_moon ss_moons 1 12 #f 0 ) 363(kern-mk-sprite 's_yellow_wax_quarter_moon ss_moons 1 13 #f 0 ) 364(kern-mk-sprite 's_yellow_wax_half_moon ss_moons 1 14 #f 0 ) 365(kern-mk-sprite 's_yellow_wax_three_quarter_moon ss_moons 1 15 #f 0 ) 366 367(kern-mk-sprite 's_blue_full_moon ss_moons 1 16 #f 0 ) 368(kern-mk-sprite 's_blue_wane_three_quarter_moon ss_moons 1 17 #f 0 ) 369(kern-mk-sprite 's_blue_wane_half_moon ss_moons 1 18 #f 0 ) 370(kern-mk-sprite 's_blue_wane_quarter_moon ss_moons 1 19 #f 0 ) 371(kern-mk-sprite 's_blue_new_moon ss_moons 1 20 #f 0 ) 372(kern-mk-sprite 's_blue_wax_quarter_moon ss_moons 1 21 #f 0 ) 373(kern-mk-sprite 's_blue_wax_half_moon ss_moons 1 22 #f 0 ) 374(kern-mk-sprite 's_blue_wax_three_quarter_moon ss_moons 1 23 #f 0 ) 375 376(kern-mk-sprite 's_sun ss_moons 1 24 #f 0 ) 377 378(kern-mk-sprite 's_torch_sign ss_signs 1 0 #f 0) 379(kern-mk-sprite 's_shield_sign ss_signs 1 1 #f 0) 380(kern-mk-sprite 's_ankh_sign ss_signs 1 2 #f 0) 381(kern-mk-sprite 's_beer_sign ss_signs 1 3 #f 0) 382(kern-mk-sprite 's_bed_sign ss_signs 1 4 #f 0) 383(kern-mk-sprite 's_potion_sign ss_signs 1 5 #f 0) 384(kern-mk-sprite 's_mushroom_sign ss_signs 1 6 #f 0) 385(kern-mk-sprite 's_axe_sign ss_signs 1 8 #f 0) 386(kern-mk-sprite 's_key_sign ss_signs 1 9 #f 0) 387(kern-mk-sprite 's_book_sign ss_signs 1 10 #f 0) 388 389(define (mk-sprite tag offset) 390 (kern-mk-sprite tag ss_runestones 1 offset #f 0)) 391(mk-sprite 's_runestone_a 0) 392(mk-sprite 's_runestone_b 1) 393(mk-sprite 's_runestone_c 2) 394(mk-sprite 's_runestone_d 3) 395(mk-sprite 's_runestone_e 4) 396(mk-sprite 's_runestone_f 5) 397(mk-sprite 's_runestone_g 6) 398(mk-sprite 's_runestone_h 7) 399(mk-sprite 's_runestone_i 8) 400(mk-sprite 's_runestone_j 9) 401(mk-sprite 's_runestone_k 10) 402(mk-sprite 's_runestone_l 11) 403(mk-sprite 's_runestone_m 12) 404(mk-sprite 's_runestone_n 13) 405(mk-sprite 's_runestone_o 14) 406(mk-sprite 's_runestone_p 15) 407(mk-sprite 's_runestone_q 16) 408(mk-sprite 's_runestone_r 17) 409(mk-sprite 's_runestone_s 18) 410(mk-sprite 's_runestone_t 19) 411(mk-sprite 's_runestone_u 20) 412(mk-sprite 's_runestone_v 21) 413(mk-sprite 's_runestone_w 22) 414(mk-sprite 's_runestone_x 23) 415(mk-sprite 's_runestone_y 24) 416(mk-sprite 's_runestone_z 25) 417(mk-sprite 's_runestone_group 26) 418(mk-sprite 's_runestone_ankh 31) 419 420(kern-mk-sprite 's_fgob_stalker ss_humanoids 4 0 #f 0 ) 421(kern-mk-sprite 's_fgob_archer ss_humanoids 4 8 #f 0 ) 422(kern-mk-sprite 's_fgob_civilian ss_humanoids 4 16 #f 0 ) 423(kern-mk-sprite 's_fgob_shaman ss_humanoids 4 24 #f 0 ) 424(kern-mk-sprite 's_cgob_berserk ss_humanoids 4 4 #f 0 ) 425(kern-mk-sprite 's_cgob_slinger ss_humanoids 4 12 #f 0 ) 426(kern-mk-sprite 's_cgob_civilian ss_humanoids 4 20 #f 0 ) 427(kern-mk-sprite 's_cgob_shaman ss_humanoids 4 28 #f 0 ) 428(kern-mk-sprite 's_gint_party ss_humanoids 4 32 #f 0 ) 429(kern-mk-sprite 's_deathknight ss_humanoids 4 36 #f 0 ) 430(kern-mk-sprite 's_gint_mage_party ss_humanoids 4 40 #f 0 ) 431(kern-mk-sprite 's_troll ss_humanoids 4 48 #f 0 ) 432(kern-mk-sprite 's_troll_geomancer ss_humanoids 4 44 #f 0 ) 433(kern-mk-sprite 's_headless ss_humanoids 4 52 #f 0 ) 434(kern-mk-sprite 's_demon ss_humanoids 4 56 #f 0 ) 435(kern-mk-sprite 's_ratling ss_humanoids 4 64 #f 0) 436(kern-mk-sprite 's_ratling_sorcerer ss_humanoids 4 68 #f 0) 437(kern-mk-sprite 's_deatharcher ss_humanoids 4 72 #f 0 ) 438(kern-mk-sprite 's_skeleton ss_humanoids 4 76 #f 0 ) 439(kern-mk-sprite 's_spearskeleton ss_humanoids 4 80 #f 0 ) 440(kern-mk-sprite 's_skeletonarcher ss_humanoids 4 84 #f 0 ) 441(kern-mk-sprite 's_lich ss_humanoids 4 88 #f 0 ) 442(kern-mk-sprite 's_nixie_civilian ss_humanoids 4 92 #f 0 ) 443(kern-mk-sprite 's_nixie_spear ss_humanoids 4 96 #f 0 ) 444(kern-mk-sprite 's_nixie_sword ss_humanoids 4 100 #f 0 ) 445 446(kern-mk-sprite 's_gint ss_bigobjects 4 0 #f 0 ) 447(kern-mk-sprite 's_gint_mage ss_bigobjects 4 4 #f 0 ) 448(kern-mk-sprite 's_balron ss_bigobjects 4 8 #f 0 ) 449(kern-mk-sprite 's_dex_statue ss_bigobjects 1 12 #f 0 ) 450(kern-mk-sprite 's_str_statue ss_bigobjects 1 13 #f 0 ) 451(kern-mk-sprite 's_int_statue ss_bigobjects 1 14 #f 0 ) 452(kern-mk-sprite 's_towertown_ruin ss_bigobjects 1 15 #f 0 ) 453(kern-mk-sprite 's_dragon ss_bigobjects 4 16 #f 0 ) 454(kern-mk-sprite 's_dragon_asleep ss_bigobjects 1 20 #f 0 ) 455(kern-mk-sprite 's_tower ss_bigobjects 2 22 #f 0 ) 456(kern-mk-sprite 's_towertown ss_bigobjects 2 24 #f 0 ) 457 458 459;;---------------------------------------------------------------------------- 460;;;; (kern-mk-sprite 's_wanderer ss_addon 2 94 #f 0) 461;;;; (kern-mk-sprite 's_avatar ss_u4_shapes 1 31 #f 0 ) 462;;;; (kern-mk-sprite 's_companion_wizard ss_u4_shapes 2 32 #f 0 ) 463;;;; (kern-mk-sprite 's_companion_bard ss_u4_shapes 2 34 #f 0 ) 464;;;; (kern-mk-sprite 's_companion_fighter ss_u4_shapes 2 36 #f 0 ) 465;;;; (kern-mk-sprite 's_companion_druid ss_u4_shapes 2 38 #f 0 ) 466;;;; (kern-mk-sprite 's_companion_tinker ss_u4_shapes 2 40 #f 0 ) 467;;;; (kern-mk-sprite 's_companion_paladin ss_u4_shapes 2 42 #f 0 ) 468;;;; (kern-mk-sprite 's_companion_ranger ss_u4_shapes 2 44 #f 0 ) 469;;;; (kern-mk-sprite 's_companion_shepherd ss_u4_shapes 2 46 #f 0 ) 470 471(kern-mk-sprite 's_wanderer ss_people 4 0 #f 0 ) 472(kern-mk-sprite 's_avatar ss_people 4 4 #f 0 ) 473(kern-mk-sprite 's_companion_wizard ss_people 4 8 #f 0 ) 474(kern-mk-sprite 's_companion_bard ss_people 4 12 #f 0 ) 475(kern-mk-sprite 's_companion_fighter ss_people 4 16 #f 0 ) 476(kern-mk-sprite 's_companion_druid ss_people 4 20 #f 0 ) 477(kern-mk-sprite 's_companion_tinker ss_people 4 24 #f 0 ) 478(kern-mk-sprite 's_companion_paladin ss_people 4 28 #f 0 ) 479(kern-mk-sprite 's_companion_ranger ss_people 4 32 #f 0 ) 480(kern-mk-sprite 's_companion_shepherd ss_people 4 36 #f 0 ) 481(kern-mk-sprite 's_old_mage ss_people 4 40 #f 0 ) 482(kern-mk-sprite 's_black_mage ss_people 4 44 #f 0 ) 483(kern-mk-sprite 's_guard ss_people 4 48 #f 0 ) 484(kern-mk-sprite 's_plain_mage ss_people 4 52 #f 0 ) 485(kern-mk-sprite 's_townsman ss_people 2 56 #f 0 ) 486(kern-mk-sprite 's_townswoman ss_people 2 58 #f 0 ) 487(kern-mk-sprite 's_brigand ss_people 4 60 #f 0 ) 488(kern-mk-sprite 's_red_wizard ss_people 4 64 #f 0 ) 489(kern-mk-sprite 's_xbowguard ss_people 2 68 #f 0 ) 490(kern-mk-sprite 's_lady ss_people 2 70 #f 0 ) 491(kern-mk-sprite 's_cloaked_female ss_people 4 72 #f 0 ) 492(kern-mk-sprite 's_brigandess ss_people 4 76 #f 0 ) 493(kern-mk-sprite 's_fat_townswoman ss_people 4 80 #f 0 ) 494(kern-mk-sprite 's_knight ss_people 4 84 #f 0 ) 495(kern-mk-sprite 's_minstrel ss_people 2 88 #f 0 ) 496(kern-mk-sprite 's_beggar ss_people 2 90 #f 0 ) 497(kern-mk-sprite 's_jester ss_people 4 92 #f 0 ) 498(kern-mk-sprite 's_child ss_people 2 96 #f 0 ) 499(kern-mk-sprite 's_asleep ss_people 1 98 #f 0 ) 500(kern-mk-sprite 's_ranger_captain ss_people 4 104 #f 0) 501(kern-mk-sprite 's_old_ranger ss_people 4 108 #f 0) 502(kern-mk-sprite 's_old_townsman ss_people 4 112 #f 0) 503(kern-mk-sprite 's_fallen_paladin ss_people 4 116 #f 0) 504 505(kern-mk-sprite 's_carabid ss_monsters 4 0 #f 0) 506(kern-mk-sprite 's_carabid_asleep ss_monsters 1 0 #f 0) 507(kern-mk-sprite 's_griffin ss_monsters 4 4 #f 0) 508(kern-mk-sprite 's_griffin_asleep ss_monsters 1 4 #f 0) 509(kern-mk-sprite 's_griffin_chick ss_monsters 4 12 #f 0) 510(kern-mk-sprite 's_griffin_chick_asleep ss_monsters 1 12 #f 0) 511(kern-mk-sprite 's_gazer ss_monsters 4 8 #f 0 ) 512(kern-mk-sprite 's_gazer_asleep ss_monsters 1 16 #f 0 ) 513(kern-mk-sprite 's_dragon_party ss_monsters 4 20 #f 0 ) 514 515(kern-mk-sprite 's_deer ss_creatures 4 0 #f 0) 516(kern-mk-sprite 's_chicken ss_creatures 2 4 #f 0) 517 518;;(kern-mk-sprite 's_tower ss_buildings 2 0 #f 0) 519 520(kern-mk-sprite 's_trees ss_overlays 1 20 #f 0 ) 521(kern-mk-sprite 's_forest ss_overlays 1 21 #f 0 ) 522(kern-mk-sprite 's_hills ss_overlays 1 22 #f 0 ) 523(kern-mk-sprite 's_mountains ss_overlays 1 23 #f 0 ) 524(kern-mk-sprite 's_dungeon ss_overlays 1 24 #f 0 ) 525(kern-mk-sprite 's_statue ss_overlays 1 25 #f 0 ) 526;(kern-mk-sprite 's_secret_rock ss_overlays 1 26 #f 0 ) 527(kern-mk-sprite 's_blank ss_overlays 1 27 #f 0 ) 528(kern-mk-sprite 's_boulder_over ss_overlays 1 68 #f 0 ) 529(kern-mk-sprite 's_boulder ss_overlays 1 69 #f 0 ) 530(kern-mk-sprite 's_wall_rock ss_overlays 1 72 #f 0 ) 531(kern-mk-sprite 's_secret_rock ss_overlays 1 73 #f 0 ) 532(kern-mk-sprite 's_window_in_rock ss_overlays 1 74 #f 0 ) 533(kern-mk-sprite 's_nat_rock ss_overlays 1 75 #f 0 ) 534(kern-mk-sprite 's_nat_rock_s ss_overlays 1 76 #f 0 ) 535(kern-mk-sprite 's_nat_rock_n ss_overlays 1 77 #f 0 ) 536(kern-mk-sprite 's_nat_rock_w ss_overlays 1 78 #f 0 ) 537(kern-mk-sprite 's_nat_rock_e ss_overlays 1 79 #f 0 ) 538(kern-mk-sprite 's_secret_nrock ss_overlays 1 83 #f 0 ) 539(kern-mk-sprite 's_headless_w_sword_statue ss_overlays 1 104 #f 0) 540 541(kern-mk-sprite 's_gold_cobble ss_overlays 1 105 #f 0) 542(kern-mk-sprite 's_cyan_cobble ss_overlays 1 106 #f 0) 543(kern-mk-sprite 's_gray_cobble ss_overlays 1 107 #f 0) 544(kern-mk-sprite 's_blue_cobble ss_overlays 1 108 #f 0) 545(kern-mk-sprite 's_olive_cobble ss_overlays 1 109 #f 0) 546(kern-mk-sprite 's_white_cobble ss_overlays 1 110 #f 0) 547(kern-mk-sprite 's_black_tile ss_overlays 1 111 #f 0) 548(kern-mk-sprite 's_gold_spiral_tile ss_overlays 1 112 #f 0) 549(kern-mk-sprite 's_blue_spiral_tile ss_overlays 1 113 #f 0) 550(kern-mk-sprite 's_tombstone ss_overlays 1 114 #f 0) 551(kern-mk-sprite 's_tombstone2 ss_overlays 1 115 #f 0) 552 553(kern-mk-sprite 's_bulwark_ew ss_ship 1 0 #f 0 ) 554(kern-mk-sprite 's_bulwark_ns ss_ship 1 1 #f 0 ) 555(kern-mk-sprite 's_deck_w ss_ship 1 2 #f 0 ) 556(kern-mk-sprite 's_deck_e ss_ship 1 3 #f 0 ) 557(kern-mk-sprite 's_deck_n ss_ship 1 4 #f 0 ) 558(kern-mk-sprite 's_deck_s ss_ship 1 5 #f 0 ) 559(kern-mk-sprite 's_stair_n ss_ship 1 6 #f 0 ) 560(kern-mk-sprite 's_stair_s ss_ship 1 7 #f 0 ) 561(kern-mk-sprite 's_bulwark_ne ss_ship 1 8 #f 0 ) 562(kern-mk-sprite 's_bulwark_se ss_ship 1 9 #f 0 ) 563(kern-mk-sprite 's_bulwark_nw ss_ship 1 10 #f 0 ) 564(kern-mk-sprite 's_bulwark_sw ss_ship 1 11 #f 0 ) 565(kern-mk-sprite 's_stair_w ss_ship 1 12 #f 0 ) 566(kern-mk-sprite 's_stair_e ss_ship 1 13 #f 0 ) 567(kern-mk-sprite 's_tank_d ss_ship 1 14 #f 0 ) 568(kern-mk-sprite 's_tank_l ss_ship 1 15 #f 0 ) 569(kern-mk-sprite 's_tank_nw ss_ship 1 16 #f 0 ) 570(kern-mk-sprite 's_tank_ne ss_ship 1 17 #f 0 ) 571(kern-mk-sprite 's_tank_sw ss_ship 1 24 #f 0 ) 572(kern-mk-sprite 's_tank_se ss_ship 1 25 #f 0 ) 573(kern-mk-sprite 's_shipswheel ss_ship 1 18 #f 170 ) 574(kern-mk-sprite 's_cannon ss_ship 1 26 #f 170 ) 575 576;(define s_altar (mk-composite-sprite (list s_cobblestone s_altar_obj))) 577;(define s_active_altar (mk-composite-sprite (list s_cobblestone s_active_altar_obj))) 578 579(define s_altar (mk-composite-sprite (list s_grass s_altar_obj))) 580(define s_active_altar (mk-composite-sprite (list s_grass s_active_altar_obj))) 581(define s_overgrown_altar (mk-composite-sprite (list s_trees s_altar_obj))) 582 583 584;;---------------------------------------------------------------------------- 585;; Terrain overlay pieces 586(define (mk-sprite tag offset) 587 (kern-mk-sprite tag ss_overlays 1 offset #f 0)) 588(mk-sprite 's_grass_nw 0) 589(mk-sprite 's_grass_ne 1) 590(mk-sprite 's_grass_se 2) 591(mk-sprite 's_grass_sw 3) 592(mk-sprite 's_grass_n 8) 593(mk-sprite 's_grass_e 9) 594(mk-sprite 's_grass_s 10) 595(mk-sprite 's_grass_w 11) 596 597;;---------------------------------------------------------------------------- 598;; Hill overlay pieces 599(define (mk-sprite tag offset) 600 (kern-mk-sprite tag ss_overlays 1 offset #f 0)) 601(mk-sprite 's_hill_e 12) 602(mk-sprite 's_hill_s 13) 603(mk-sprite 's_hill_w 14) 604(mk-sprite 's_hill_n 15) 605 606;;---------------------------------------------------------------------------- 607;; Trees overlay pieces 608(mk-sprite 's_treesi_nw 28) 609(mk-sprite 's_treesi_ne 29) 610(mk-sprite 's_treesi_se 30) 611(mk-sprite 's_treesi_sw 31) 612(mk-sprite 's_treeso_nw 32) 613(mk-sprite 's_treeso_ne 33) 614(mk-sprite 's_treeso_se 34) 615(mk-sprite 's_treeso_sw 35) 616(mk-sprite 's_grasso_nw 36) 617(mk-sprite 's_grasso_ne 37) 618(mk-sprite 's_grasso_se 38) 619(mk-sprite 's_grasso_sw 39) 620(mk-sprite 's_grassi_c 7) 621(mk-sprite 's_trees_nw 48) 622(mk-sprite 's_trees_ne 49) 623(mk-sprite 's_trees_se 50) 624(mk-sprite 's_trees_sw 51) 625(mk-sprite 's_trees_c 52) 626(mk-sprite 's_hills_c 53) 627(mk-sprite 's_hills_nw 56) 628(mk-sprite 's_hills_ne 57) 629(mk-sprite 's_hills_se 58) 630(mk-sprite 's_hills_sw 59) 631(mk-sprite 's_mount_c 54) 632(mk-sprite 's_mount_nw 60) 633(mk-sprite 's_mount_ne 61) 634(mk-sprite 's_mount_se 62) 635(mk-sprite 's_mount_sw 63) 636(mk-sprite 's_forest_c 55) 637(mk-sprite 's_forest_nw 64) 638(mk-sprite 's_forest_ne 65) 639(mk-sprite 's_forest_se 66) 640(mk-sprite 's_forest_sw 67) 641 642(kern-mk-sprite 's_deep ss_overlays 1 4 #t 0 ) 643(kern-mk-sprite 's_shallow ss_overlays 1 5 #t 0 ) 644(kern-mk-sprite 's_shoals ss_overlays 1 6 #t 0 ) 645 646;; Character effect icons shown in the ztats window 647(kern-mk-sprite 's_torchlight ss_effects 1 0 #f 0 ) 648(kern-mk-sprite 's_light ss_effects 1 1 #f 0 ) 649(kern-mk-sprite 's_poison ss_effects 1 2 #f 0 ) 650(kern-mk-sprite 's_disease ss_effects 1 3 #f 0 ) 651(kern-mk-sprite 's_im_poison ss_effects 1 4 #f 0 ) 652(kern-mk-sprite 's_sleep ss_effects 1 5 #f 0 ) 653(kern-mk-sprite 's_protect ss_effects 1 6 #f 0 ) 654(kern-mk-sprite 's_charm ss_effects 1 7 #f 0 ) 655(kern-mk-sprite 's_invis ss_effects 1 8 #f 0 ) 656(kern-mk-sprite 's_spider_calm ss_effects 1 9 #f 0 ) 657(kern-mk-sprite 's_drunk ss_effects 1 10 #f 0 ) 658(kern-mk-sprite 's_im_disease ss_effects 1 11 #f 0 ) 659(kern-mk-sprite 's_tangle ss_effects 1 12 #f 0 ) 660(kern-mk-sprite 's_im_paralyse ss_effects 1 13 #f 0 ) 661(kern-mk-sprite 's_im_fire ss_effects 1 14 #f 0 ) 662(kern-mk-sprite 's_im_death ss_effects 1 15 #f 0 ) 663(kern-mk-sprite 's_im_charm ss_effects 1 16 #f 0 ) 664(kern-mk-sprite 's_im_sleep ss_effects 1 17 #f 0 ) 665(kern-mk-sprite 's_paralyse ss_effects 1 18 #f 0 ) 666(kern-mk-sprite 's_unrest ss_effects 1 24 #f 0 ) 667 668;; Global effect icons shown in the foogod window 669(kern-mk-sprite 's_time_stop ss_effects 1 19 #f 0) 670(kern-mk-sprite 's_quicken ss_effects 1 20 #f 0) 671(kern-mk-sprite 's_magic_negated ss_effects 1 21 #f 0) 672(kern-mk-sprite 's_reveal ss_effects 1 22 #f 0) 673(kern-mk-sprite 's_xray_vision ss_effects 1 23 #f 0) 674 675 676;; convenient alia 677(define s_shepherd s_companion_shepherd) 678(define s_ranger s_companion_ranger) 679(define s_blue_wizard s_companion_wizard) 680(define s_wizard s_red_wizard) 681(define s_fighter s_companion_fighter) 682(define s_gwen s_cloaked_female) 683(define s_silas s_plain_mage) 684(define s_enchanter s_old_mage) 685(define s_necromancer s_black_mage) 686(define s_chanticleer s_minstrel) 687 688;; Humanoid paper-doll-ready sprites 689(define (mk-sprite tag sprite-set offset n-frames) 690 (kern-mk-sprite tag sprite-set n-frames offset #f 0)) 691(mk-sprite 's_hum_body ss_bodies 0 4) 692 693(mk-sprite 's_hum_beard ss_adornments 0 1) 694(mk-sprite 's_hum_med_hair_gold ss_adornments 4 1) 695(mk-sprite 's_hum_long_hair_gold ss_adornments 5 1) 696 697(mk-sprite 's_hum_pants ss_clothes 0 1) 698(mk-sprite 's_hum_shirt ss_clothes 4 1) 699(mk-sprite 's_hum_robe ss_clothes 8 4) 700(mk-sprite 's_hum_belt ss_clothes 12 1) 701(mk-sprite 's_hum_mantle ss_clothes 16 1) 702 703;;---------------------------------------------------------------------------- 704;; Color conversion matrices - used as parms to the 705;; kern-sprite-apply-matrix. By convention, names are mat_<color>, where 706;; <color> is the target color and the source is assumed to be gray. To 707;; translate other colors, eg from red to blue, use a name like mat_red_blue. 708;; 709(define mat_red '((0 0 2) 710 (0 0 0) 711 (0 0 0) 712 (0 0 0))) 713 714(define mat_green '((0 0 0) 715 (0 2 0) 716 (0 0 0) 717 (0 0 0))) 718 719(define mat_blue '((0 0 0) 720 (0 0 0) 721 (0 0 2) 722 (0 0 0))) 723 724(define mat_white '((3 0 0) 725 (0 3 0) 726 (0 0 3) 727 (0 0 0))) 728 729(define mat_yellow '((3 0 0) 730 (0 3 0) 731 (0 0 0) 732 (0 0 0))) 733 734(define mat_gold_to_midnight '((0 0 0.25) 735 (0 0.25 0) 736 (0.25 0 0) 737 (0 0 0))) 738 739(define mat_blue_to_green '((1 0 0) 740 (0 0 1) 741 (0 1 0) 742 (0 0 0))) 743 744;;---------------------------------------------------------------------------- 745;; Sprites derived from other sprites via color conversion 746(define (mk-sprite tag matrix) 747 (kern-sprite-apply-matrix (kern-sprite-clone s_hum_robe tag) matrix)) 748 749(mk-sprite 's_hum_robe_red mat_red) 750(mk-sprite 's_hum_robe_green mat_green) 751(mk-sprite 's_hum_robe_blue mat_blue) 752(mk-sprite 's_hum_robe_white mat_white) 753(mk-sprite 's_hum_robe_yellow mat_yellow) 754 755(define (mk-sprite tag matrix) 756 (kern-sprite-apply-matrix (kern-sprite-clone s_hum_mantle tag) matrix)) 757 758(mk-sprite 's_hum_mantle_red mat_red) 759(mk-sprite 's_hum_mantle_green mat_green) 760(mk-sprite 's_hum_mantle_blue mat_blue) 761(mk-sprite 's_hum_mantle_white mat_white) 762(mk-sprite 's_hum_mantle_yellow mat_yellow) 763 764(define (mk-sprite tag matrix base) 765 (kern-sprite-apply-matrix (kern-sprite-clone base tag) matrix)) 766 767(mk-sprite 's_hum_med_hair_midnight mat_gold_to_midnight s_hum_med_hair_gold) 768(mk-sprite 's_hum_long_hair_midnight mat_gold_to_midnight s_hum_long_hair_gold) 769 770 771;;-------------------------------------------------------------------------- 772;; 'special effects' 773 774(kern-mk-sprite 's_heart ss_sfx 1 0 #f 0 ) 775(kern-mk-sprite 's_hit ss_sfx 1 1 #f 0 ) 776(kern-mk-sprite 's_magicflash ss_sfx 1 2 #f 0 ) 777(kern-mk-sprite 's_lightning ss_sfx 3 3 #f 495 ) 778(kern-mk-sprite 's_field_energy ss_sfx 1 27 #t 0 ) 779(kern-mk-sprite 's_field_fire ss_sfx 1 28 #t 0 ) 780(kern-mk-sprite 's_field_poison ss_sfx 1 29 #t 0 ) 781(kern-mk-sprite 's_field_sleep ss_sfx 1 30 #t 0 ) 782(kern-mk-sprite 's_field_acid ss_sfx 1 31 #t 0 ) 783 784;;---------------------------------------------------------------------------- 785;; Tools 786(kern-mk-sprite 's_torch ss_tools 1 0 #f 0) 787(kern-mk-sprite 's_picklock ss_tools 1 1 #f 0) 788(kern-mk-sprite 's_gem ss_tools 1 2 #f 0) 789(kern-mk-sprite 's_shovel ss_tools 1 3 #f 0) 790(kern-mk-sprite 's_pick ss_tools 1 4 #f 0) 791(kern-mk-sprite 's_sextant ss_tools 1 5 #f 0) 792(kern-mk-sprite 's_chrono ss_tools 1 6 #f 0) 793(kern-mk-sprite 's_clock_stopped ss_tools 1 7 #f 0) 794(kern-mk-sprite 's_clock_body ss_tools 2 8 #f 0) 795(kern-mk-sprite 's_clock_hand_n ss_tools 1 10 #f 0) 796(kern-mk-sprite 's_clock_hand_ne ss_tools 1 11 #f 0) 797(kern-mk-sprite 's_clock_hand_se ss_tools 1 12 #f 0) 798(kern-mk-sprite 's_clock_hand_s ss_tools 1 13 #f 0) 799(kern-mk-sprite 's_clock_hand_sw ss_tools 1 14 #f 0) 800(kern-mk-sprite 's_clock_hand_nw ss_tools 1 15 #f 0) 801(kern-mk-sprite 's_clock_spin ss_tools 6 10 #f 0) 802(kern-mk-sprite 's_mirror_fg ss_tools 1 16 #f 0) 803(kern-mk-sprite 's_mirror_bg_flagstones ss_tools 1 17 #f 0) 804(kern-mk-sprite 's_mirror_bg ss_tools 1 18 #f 0) 805(kern-mk-sprite 's_bookshelf ss_tools 1 23 #f 0) 806(kern-mk-sprite 's_grease ss_tools 1 24 #f 0) 807(kern-mk-sprite 's_rope_hook ss_tools 1 25 #f 0) 808 809(kern-mk-sprite 's_chest ss_tools 1 32 #f 0) 810(kern-mk-sprite 's_locked_chest ss_tools 1 33 #f 0) 811(kern-mk-sprite 's_magic_chest ss_tools 4 34 #f 0) 812(kern-mk-sprite 's_magic_locked_chest ss_tools 4 38 #f 0) 813 814;;------------------------------------------------ 815;; Quest icons (well, many quests will use stuff already in the game, but whatever) 816 817(kern-mk-sprite 's_quest_start ss_quests 1 0 #f 0 ) 818(kern-mk-sprite 's_quest_wise ss_quests 1 1 #f 0 ) 819