index
:
advtrains.git
atcjit
doc
l10n
luaatcdebug
master
new-ks
new-ks-orwell
profiler
route_prog_rework
techage
tracy
trainhud
trainhud-unifont
Advtrains mod for minetest.
orwell
about
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
advtrains_signals_ks
/
models
Mode
Name
Size
-rw-r--r--
advtrains_signals_ks_head_dist.obj
6709
log
plain
-rw-r--r--
advtrains_signals_ks_head_main.obj
7058
log
plain
-rw-r--r--
advtrains_signals_ks_lamps_dist.obj
62142
log
plain
-rw-r--r--
advtrains_signals_ks_lamps_main.obj
86593
plain
-rw-r--r--
advtrains_signals_ks_sht_smr60.obj
84167
log
plain
-rw-r--r--
advtrains_signals_ks_sign_hfs_smr0.obj
6977
log
plain
-rw-r--r--
advtrains_signals_ks_sign_hfs_smr30.obj
6982
log
plain
-rw-r--r--
advtrains_signals_ks_sign_hfs_smr45.obj
6970
log
plain
-rw-r--r--
advtrains_signals_ks_sign_hfs_smr60.obj
6958
log
plain
-rw-r--r--
advtrains_signals_ks_sign_smr0.obj
3497
log
plain
-rw-r--r--
advtrains_signals_ks_sign_smr30.obj
3512
log
plain
-rw-r--r--
advtrains_signals_ks_sign_smr45.obj
3510
log
plain
-rw-r--r--
advtrains_signals_ks_sign_smr60.obj
3510
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs10_smr0.obj
6081
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs10_smr30.obj
6124
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs10_smr45.obj
6122
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs10_smr60.obj
6121
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs3_smr0.obj
3325
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs3_smr30.obj
3349
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs3_smr45.obj
3347
log
plain
-rw-r--r--
advtrains_signals_ks_sign_zs3_smr60.obj
3344
log
plain
-rw-r--r--
advtrains_signals_ks_zs_bottom_smr0.obj
27249
log
plain
-rw-r--r--
advtrains_signals_ks_zs_bottom_smr30.obj
27161
log
plain
-rw-r--r--
advtrains_signals_ks_zs_bottom_smr45.obj
27161
log
plain
-rw-r--r--
advtrains_signals_ks_zs_bottom_smr60.obj
27160
log
plain
-rw-r--r--
advtrains_signals_ks_zs_top_smr0.obj
22182
log
plain
-rw-r--r--
advtrains_signals_ks_zs_top_smr30.obj
22115
log
plain
-rw-r--r--
advtrains_signals_ks_zs_top_smr45.obj
22114
log
plain
-rw-r--r--
advtrains_signals_ks_zs_top_smr60.obj
22114
log
plain
![plain](/advtrains.git/log/advtrains_signals_ks/models<span class="hl slc">-- tool.lua</span>
<span class="hl slc">-- Interlocking tool</span>
<span class="hl kwa">local</span> ilrs <span class="hl opt">=</span> advtrains<span class="hl opt">.</span>interlocking<span class="hl opt">.</span>route
minetest<span class="hl opt">.</span><span class="hl kwd">register_craftitem</span><span class="hl opt">(</span><span class="hl str">"advtrains_interlocking:tool"</span><span class="hl opt">,{</span>
description <span class="hl opt">=</span> <span class="hl str">"Interlocking tool</span><span class="hl esc">\n</span><span class="hl str">right-click turnouts to inspect route locks"</span><span class="hl opt">,</span>
groups <span class="hl opt">= {</span>cracky<span class="hl opt">=</span><span class="hl num">1</span><span class="hl opt">},</span> <span class="hl slc">-- key=name, value=rating; rating=1..3.</span>
inventory_image <span class="hl opt">=</span> <span class="hl str">"at_il_tool.png"</span><span class="hl opt">,</span>
wield_image <span class="hl opt">=</span> <span class="hl str">"at_il_tool.png"</span><span class="hl opt">,</span>
stack_max <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">,</span>
on_place <span class="hl opt">=</span> <span class="hl kwa">function</span><span class="hl opt">(</span>itemstack<span class="hl opt">,</span> placer<span class="hl opt">,</span> pointed_thing<span class="hl opt">)</span>
<span class="hl kwa">local</span> pname <span class="hl opt">=</span> placer<span class="hl opt">:</span><span class="hl kwd">get_player_name</span><span class="hl opt">()</span>
<span class="hl kwa">if not</span> pname <span class="hl kwa">then</span>
<span class="hl kwa">return</span>
<span class="hl kwa">end</span>
<span class="hl kwa">if not</span> minetest<span class="hl opt">.</span><span class="hl kwd">check_player_privs</span><span class="hl opt">(</span>pname<span class="hl opt">, {</span>interlocking<span class="hl opt">=</span><span class="hl kwa">true</span><span class="hl opt">})</span> <span class="hl kwa">then</span>
minetest<span class="hl opt">.</span><span class="hl kwd">chat_send_player</span><span class="hl opt">(</span>pname<span class="hl opt">,</span> <span class="hl str">"Insufficient privileges to use this!"</span><span class="hl opt">)</span>
<span class="hl kwa">return</span>
<span class="hl kwa">end</span>
<span class="hl kwa">if</span> pointed_thing<span class="hl opt">.</span><span class="hl kwb">type</span><span class="hl opt">==</span><span class="hl str">"node"</span> <span class="hl kwa">then</span>
<span class="hl kwa">local</span> pos<span class="hl opt">=</span>pointed_thing<span class="hl opt">.</span>under
<span class="hl kwa">if</span> advtrains<span class="hl opt">.</span><span class="hl kwd">is_passive</span><span class="hl opt">(</span>pos<span class="hl opt">)</span> <span class="hl kwa">then</span>
<span class="hl kwa">local</span> form <span class="hl opt">=</span> <span class="hl str">"size[7,5]label[0.5,0.5;Route lock inspector]"</span>
<span class="hl kwa">local</span> pts <span class="hl opt">=</span> minetest<span class="hl opt">.</span><span class="hl kwd">pos_to_string</span><span class="hl opt">(</span>pos<span class="hl opt">)</span>
<span class="hl kwa">local</span> rtl <span class="hl opt">=</span> ilrs<span class="hl opt">.</span><span class="hl kwd">has_route_lock</span><span class="hl opt">(</span>pts<span class="hl opt">)</span>
<span class="hl kwa">if</span> rtl <span class="hl kwa">then</span>
form <span class="hl opt">=</span> form<span class="hl opt">..</span><span class="hl str">"label[0.5,1;Route locks currently put:</span><span class="hl esc">\n</span><span class="hl str">"</span><span class="hl opt">..</span>rtl<span class="hl opt">..</span><span class="hl str">"]"</span>
form <span class="hl opt">=</span> form<span class="hl opt">..</span><span class="hl str">"button_exit[0.5,3.5; 5,1;clear;Clear]"</span>
<span class="hl kwa">else</span>
form <span class="hl opt">=</span> form<span class="hl opt">..</span><span class="hl str">"label[0.5,1;No route locks set]"</span>
form <span class="hl opt">=</span> form<span class="hl opt">..</span><span class="hl str">"button_exit[0.5,3.5; 5,1;emplace;Emplace manual lock]"</span>
<span class="hl kwa">end</span>
minetest<span class="hl opt">.</span><span class="hl kwd">show_formspec</span><span class="hl opt">(</span>pname<span class="hl opt">,</span> <span class="hl str">"at_il_rtool_"</span><span class="hl opt">..</span>pts<span class="hl opt">,</span> form<span class="hl opt">)</span>
<span class="hl kwa">else</span>
minetest<span class="hl opt">.</span><span class="hl kwd">chat_send_player</span><span class="hl opt">(</span>pname<span class="hl opt">,</span> <span class="hl str">"Cannot use this here."</span><span class="hl opt">)</span>
<span class="hl kwa">return</span>
<span class="hl kwa">end</span>
<span class="hl kwa">end</span>
<span class="hl kwa">end</span><span class="hl opt">,</span>
<span class="hl opt">})</span>
minetest<span class="hl opt">.</span><span class="hl kwd">register_on_player_receive_fields</span><span class="hl opt">(</span><span class="hl kwa">function</span><span class="hl opt">(</span>player<span class="hl opt">,</span> formname<span class="hl opt">,</span> fields<span class="hl opt">)</span>
<span class="hl kwa">local</span> pname <span class="hl opt">=</span> player<span class="hl opt">:</span><span class="hl kwd">get_player_name</span><span class="hl opt">()</span>
<span class="hl kwa">if not</span> minetest<span class="hl opt">.</span><span class="hl kwd">check_player_privs</span><span class="hl opt">(</span>pname<span class="hl opt">,</span> <span class="hl str">"interlocking"</span><span class="hl opt">)</span> <span class="hl kwa">then</span>
<span class="hl kwa">return</span>
<span class="hl kwa">end</span>
<span class="hl kwa">local</span> pos
<span class="hl kwa">local</span> pts <span class="hl opt">=</span> <span class="hl kwb">string</span><span class="hl opt">.</span><span class="hl kwd">match</span><span class="hl opt">(</span>formname<span class="hl opt">,</span> <span class="hl str">"^at_il_rtool_(.+)$"</span><span class="hl opt">)</span>
<span class="hl kwa">if</span> pts <span class="hl kwa">then</span>
pos <span class="hl opt">=</span> minetest<span class="hl opt">.</span><span class="hl kwd">string_to_pos</span><span class="hl opt">(</span>pts<span class="hl opt">)</span>
<span class="hl kwa">end</span>
<span class="hl kwa">if</span> pos <span class="hl kwa">then</span>
<span class="hl kwa">if</span> advtrains<span class="hl opt">.</span><span class="hl kwd">is_passive</span><span class="hl opt">(</span>pos<span class="hl opt">)</span> <span class="hl kwa">then</span>
<span class="hl kwa">if</span> fields<span class="hl opt">.</span>clear <span class="hl kwa">then</span>
ilrs<span class="hl opt">.</span><span class="hl kwd">remove_route_locks</span><span class="hl opt">(</span>pts<span class="hl opt">)</span>
<span class="hl kwa">end</span>
<span class="hl kwa">if</span> fields<span class="hl opt">.</span>emplace <span class="hl kwa">then</span>
ilrs<span class="hl opt">.</span><span class="hl kwd">add_manual_route_lock</span><span class="hl opt">(</span>pts<span class="hl opt">,</span> <span class="hl str">"Manual lock ("</span><span class="hl opt">..</span>pname<span class="hl opt">..</span><span class="hl str">")"</span><span class="hl opt">)</span>
<span class="hl kwa">end</span>
<span class="hl kwa">end</span>
<span class="hl kwa">end</span>
<span class="hl kwa">end</span><span class="hl opt">)</span>
?h=tracy&id=890369090e64379ac1c175ff3ae8eeec99435f90){kind=link}