Mercurial > hg > batmud > ggrtf

annotate gm-tgtcast.tf @ 1686:db1a3e72c1d1 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update to match in-game changes ('help item conditions').
author Matti Hamalainen <ccr@tnsp.org>
date Sat, 18 May 2024 21:25:57 +0300
parents 356c3c26aee6
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1033
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
1 ;;
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
2 ;; GgrTF::TargettedCast - Numpad controlled targetting
1655
356c3c26aee6 Get rid of ISO-8859-1 in copyrights.
Matti Hamalainen <ccr@tnsp.org>
parents: 1586
diff changeset
3 ;; (C) Copyright 2006-2015 Matti Hamalainen (Ggr)
1033
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
4 ;;
1454
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
5 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
6 ;;
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
7 ;; This program is free software; you can redistribute it and/or
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
8 ;; modify it under the terms of the GNU General Public License
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
9 ;; version 2 as published by the Free Software Foundation.
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
10 ;;
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
11 ;; This program is distributed in the hope that it will be useful,
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
12 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
13 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
14 ;; file "COPYING.txt" for more details.
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
15 ;;
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
16 ;; You should have received a copy of the GNU General Public License
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
17 ;; along with this program; if not, write to the Free Software
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
18 ;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
19 ;; MA 02110-1301 USA.
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
20 ;;
113c9a66eaf1 Add a better/more proper GPL license header in files.
Matti Hamalainen <ccr@tnsp.org>
parents: 1287
diff changeset
21 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1033
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
22 ;;
1276
51c340df904a Update copyrights, version requirements.
Matti Hamalainen <ccr@tnsp.org>
parents: 1037
diff changeset
23 ;; NOTICE! This file requires GgrTF (version 0.6.15 or later) to be loaded.
1033
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
24 ;;
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
25 /loaded GgrTF::TargettedCast
1035
c10f8a59a2e3 Use module depencies for checking required parent modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 1033
diff changeset
26 /test prdefmodule("TargettedCast", "PSSMangle", "Magical")
1033
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
27
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
28 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
29 ;; Initialization
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
30 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
31 /test prlist_insert("set_move_s", "cast")
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
32 /set ncast_tgt=
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
33 /set ncast_spell=
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
34
1037
3ce10de3f7d8 Improvements in variable saving.
Matti Hamalainen <ccr@tnsp.org>
parents: 1035
diff changeset
35 /prdeftoggle -p -n"keybinds" -d"Keyboard numpad cast bindings"
1035
c10f8a59a2e3 Use module depencies for checking required parent modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 1033
diff changeset
36
1033
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
37
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
38 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
39 ;; Numpad-targetted spellcasting
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
40 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
41 ;; Cast spell without target
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
42 /def -i prcastn =\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
43 /if (spell_st!~"on" | {*}!~ncast_spell)\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
44 /set ncast_tgt=%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
45 /set ncast_spell=%{*}%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
46 @@cast '%{*}'%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
47 /endif
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
48
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
49 ;; Cast a spell at current target
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
50 /def -i prcast =\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
51 /if (cast_target!~"")\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
52 /if (spell_st!~"on" | cast_target!~ncast_tgt | {*}!~ncast_spell)\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
53 /set ncast_tgt=%{cast_target}%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
54 /set ncast_spell=%{*}%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
55 @@cast '%{*}' %{cast_target}%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
56 /endif%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
57 /else \
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
58 /msq @{BCred}No target set!@{n}%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
59 /endif
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
60
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
61
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
62 ;; When "/move cast" mode is selected, /prmove macro is redirected
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
63 ;; to this macro, which translates directions (assumed to be 3x3 matrix
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
64 ;; like the normal PC keyboard numpad is) into party places for
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
65 ;; targetting of spells.
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
66
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
67 /def -i prmove_cast =\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
68 /if ({1}=~"nw") /let _t=1_1%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
69 /elseif ({1}=~"n") /let _t=1_2%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
70 /elseif ({1}=~"ne") /let _t=1_3%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
71 /elseif ({1}=~"w") /let _t=2_1%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
72 /elseif ({1}=~"X") /let _t=2_2%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
73 /elseif ({1}=~"e") /let _t=2_3%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
74 /elseif ({1}=~"sw") /let _t=3_1%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
75 /elseif ({1}=~"s") /let _t=3_2%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
76 /elseif ({1}=~"se") /let _t=3_3%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
77 /else /set cast_target=%;/break%;/endif%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
78 /set cast_target=$[prgetval(strcat("gparty_",_t,"_s"))]%;\
feb7ba87806c Added new module, gm-tgtcast GgrTF::TargettedCast for numpad-targetted spellcasts.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
79 /msq @{Cyellow}Cast Target@{n} -> @{BCwhite}%{cast_target}@{n}