联邦党人文集之赛马

卢森堡的夜幕

以下为我的代码赛马

严禁任何潘德的预言相关mod及其改版使用我的任何代码

使用要求：必须对于作者也就是我，致谢，贡献者，Credit等署名

署名为：夜幕

效果：【骑砍】康城赛马-哔哩哔哩】 https://b23.tv/Xgbv5ko

原理：很简单，用entry point作为导航，为什么用entry point？因为最简单易懂和精准

有任何不懂的地方或bug可以私信和评论告诉我

1. 
   
2.   ("go_to_horse_race",
   
3.       [
   
4.       ],
   
5.       "康 城 赛 马",
   
6.       [
   
7.         (modify_visitors_at_site, "scn_camptown"),
   
8.         (reset_visitors,0),
   
9. 
   
10.         (set_visitor, 1, "trp_player"),
    
11.        (set_visitors, 2, "trp_elite_cavalry",1),
    
12.        (set_visitors, 3, "trp_elite_cavalry",1),
    
13.         (set_visitors, 4, "trp_elite_cavalry",1),
    
14.         (assign, "$g_ym6", 2),#两圈
    
15.         (set_jump_mission, "mt_horse_race"),
    
16.         (jump_to_scene, "scn_camptown"),
    
17.         (assign, "$camptown", 233),
    
18.         (play_track, "track_camptown", 1),
    
19. 
    
20.         (change_screen_mission),
    
21.       ]),
    
22. 
    
23. 
    
24. (ti_before_mission_start, 0, 0,
    
25. [],
    
26. [
    
27.    (assign, "$g_ym", 0),
    
28.    (assign, "$g_ym1", 0),
    
29.    (assign, "$g_ym2", 0),
    
30.    (assign, "$g_ym3", 5),
    
31.    (assign, "$g_ym4", 0),
    
32.    (assign, "$g_ym5", 0),
    
33.    (try_for_range, ":ym_0", 0, 256),
    
34.      (troop_set_slot, "trp_temp_array_a", ":ym_0", 0),
    
35.      (troop_set_slot, "trp_temp_array_b", ":ym_0", 0),
    
36.    (try_end),
    
37.    (display_message, "@赛 马 准 备 中，5 秒 后 开 始！"),
    
38. ]),
    
39. 
    
40. (0, 0, ti_once,
    
41. [
    
42.    (eq, "$g_ym", 0),
    
43.    (eq, "$g_ym5", 0),
    
44.    (this_or_next|key_clicked, key_w),
    
45.    (this_or_next|key_clicked, key_a),
    
46.    (this_or_next|key_clicked, key_s),
    
47.    (key_clicked, key_d),
    
48. ],
    
49. [
    
50.    (assign, "$g_ym5", 1),
    
51.    (get_player_agent_no, ":ym_0"),
    
52.    (try_begin),
    
53.      (ge, ":ym_0", 0),
    
54.      (troop_set_slot, "trp_temp_array_a", ":ym_0", 0),
    
55.      (troop_set_slot, "trp_temp_array_b", ":ym_0", -1),
    
56.    (try_end),
    
57.    (call_script, "script_change_player_honor", -1),
    
58.    (display_message, "@你 在 开 赛 前 移 动（WASD）被 判 定 为 作 弊，已 取 消 参 赛 资 格！", 0xFF3333),
    
59.    (finish_mission, 0),
    
60. ]),
    
61. 
    
62. (ti_on_agent_spawn, 0, 0,
    
63. [],
    
64. [
    
65.    (store_trigger_param_1, ":ym_0"),
    
66.    (set_fixed_point_multiplier, 100),
    
67.    (agent_is_human, ":ym_0"),
    
68.    (agent_get_team, ":ym_1", ":ym_0"),
    
69.    (this_or_next|eq, ":ym_1", 0),
    
70.    (eq, ":ym_1", 1),
    
71.    (troop_set_slot, "trp_temp_array_a", ":ym_0", 1),
    
72.    (troop_set_slot, "trp_temp_array_b", ":ym_0", 0),
    
73.    (agent_set_slot, ":ym_0", slot_slot_ym, 5),
    
74.    (agent_set_slot, ":ym_0", slot_ym1, 0),
    
75.    (agent_set_slot, ":ym_0", slot_ym2, 0),
    
76.    (try_for_range, ":ym_2", 0, 4),
    
77.      (agent_get_wielded_item, ":ym_3", ":ym_0", ":ym_2"),
    
78.      (gt, ":ym_3", 0),
    
79.      (agent_unequip_item, ":ym_0", ":ym_3"),
    
80.    (try_end),
    
81. ]),
    
82. 
    
83. (1, 0, 0,
    
84. [
    
85.    (eq, "$g_ym", 0),
    
86.    (store_mission_timer_a_msec, ":ym_0"),
    
87.    (lt, ":ym_0", 5000),
    
88. ],
    
89. [
    
90.    (store_sub, ":ym_1", 5000, ":ym_0"),
    
91.    (store_add, ":ym_1", ":ym_1", 999),
    
92.    (store_div, reg1, ":ym_1", 1000),
    
93. ]),
    
94. 
    
95. (0, 0, ti_once,
    
96. [
    
97.    (eq, "$g_ym", 0),
    
98.    (store_mission_timer_a_msec, ":ym_0"),
    
99.    (ge, ":ym_0", 5000),
    
100. ],
     
101. [
     
102.    (assign, "$g_ym", 1),
     
103.    (store_mission_timer_a, ":ym_8"),
     
104.    (store_add, "$g_ym4", ":ym_8", 5),
     
105.    (set_fixed_point_multiplier, 100),
     
106.    (try_for_agents, ":ym_1"),
     
107.      (agent_is_alive, ":ym_1"),
     
108.      (troop_slot_eq, "trp_temp_array_a", ":ym_1", 1),
     
109.      (agent_clear_scripted_mode, ":ym_1"),
     
110.    (try_end),
     
111.    (try_begin),
     
112.      (ge, "$g_ym6", 1),
     
113.      (assign, reg2, "$g_ym6"),
     
114.      (display_message, "@开 始 ！赛 道 模 式:共 {reg2}圈"),
     
115.      (agent_set_slot, ":ym_1", slot_slot_ym, 5),
     
116.      (agent_set_slot, ":ym_1", slot_ym1, 0),
     
117.      (agent_set_slot, ":ym_1", slot_ym2, 0),
     
118.    (else_try),
     
119.      (display_message, "@开 始！冲 向 终 点！"),
     
120.    (try_end),
     
121.    (set_fixed_point_multiplier, 100),
     
122.    (get_player_agent_no, ":player_agent"),
     
123.    (agent_is_alive, ":player_agent"),
     
124.    (agent_set_speed_modifier, ":player_agent", 100),
     
125.    (agent_get_horse, ":horse_agent", ":player_agent"),
     
126.    (gt, ":horse_agent", -1),
     
127.    (agent_set_speed_modifier, ":horse_agent", 100),
     
128. ]),
     
129. 
     
130. (1, 0, 0,
     
131. [],
     
132. [
     
133.    (try_begin),
     
134.      (ge,"$camptown",1),
     
135.      (val_sub, "$camptown", 1),
     
136.    (else_try),
     
137.      (le,"$camptown",0),
     
138.      (play_track, "track_camptown", 1),
     
139.      (assign, "$camptown", 233),
     
140.    (try_end),
     
141. ]),
     
142. 
     
143. (0, 0, 0,
     
144. [
     
145.    (eq, "$g_ym", 1),
     
146.    (eq, "$g_ym1", 0),
     
147. ],
     
148. [
     
149.    (try_for_agents, ":ym_0"),
     
150.      (agent_is_alive, ":ym_0"),
     
151.      (troop_slot_eq, "trp_temp_array_a", ":ym_0", 1),
     
152.      (agent_get_slot, ":ym_1", ":ym_0", slot_slot_ym),
     
153.      (entry_point_get_position, pos13, ":ym_1"),
     
154.      (agent_get_position, pos11, ":ym_0"),
     
155.      (position_transform_position_to_local, pos12, pos13, pos11),
     
156.      (position_get_x, ":ym_4", pos12),
     
157.      (assign, ":ym_7", 0),
     
158.      (assign, ":ym_12", 1),
     
159.      (scene_prop_get_num_instances, ":ym_8", "spr_crude_fence"),
     
160.      (try_for_range, ":ym_9", 0, ":ym_8"),
     
161.        (scene_prop_get_instance, ":ym_10", "spr_crude_fence", ":ym_9"),
     
162.        (prop_instance_get_position, pos15, ":ym_10"),
     
163.        (get_distance_between_positions, ":ym_11", pos11, pos15),
     
164.        (try_begin),
     
165.          (lt, ":ym_11", 280),
     
166.          (assign, ":ym_7", 2),
     
167.        (else_try),
     
168.          (lt, ":ym_11", 360),
     
169.          (lt, ":ym_7", 1),
     
170.          (assign, ":ym_7", 1),
     
171.        (try_end),
     
172.      (try_end),
     
173.      (scene_prop_get_num_instances, ":ym_8", "spr_obstacle_fence_1"),
     
174.      (try_for_range, ":ym_9", 0, ":ym_8"),
     
175.        (scene_prop_get_instance, ":ym_10", "spr_obstacle_fence_1", ":ym_9"),
     
176.        (prop_instance_get_position, pos15, ":ym_10"),
     
177.        (get_distance_between_positions, ":ym_11", pos11, pos15),
     
178.        (try_begin),
     
179.          (lt, ":ym_11", 180),
     
180.          (assign, ":ym_7", 2),
     
181.        (else_try),
     
182.          (lt, ":ym_11", 360),
     
183.          (lt, ":ym_7", 1),
     
184.          (assign, ":ym_7", 1),
     
185.        (try_end),
     
186.      (try_end),
     
187.      (try_begin),
     
188.        (eq, ":ym_7", 2),
     
189.        (assign, ":ym_12", 0),
     
190.        (try_begin),
     
191.          (lt, ":ym_4", 0),
     
192.          (store_random_in_range, ":ym_3", 1100, 1450),
     
193.          (position_move_x, pos13, ":ym_3"),
     
194.        (else_try),
     
195.          (store_random_in_range, ":ym_3", -1450, -1100),
     
196.          (position_move_x, pos13, ":ym_3"),
     
197.        (try_end),
     
198.        (position_move_y, pos13, 220),
     
199.      (else_try),
     
200.        (eq, ":ym_7", 1),
     
201.        (try_begin),
     
202.          (lt, ":ym_4", 0),
     
203.          (store_random_in_range, ":ym_3", 860, 1060),
     
204.          (position_move_x, pos13, ":ym_3"),
     
205.        (else_try),
     
206.          (store_random_in_range, ":ym_3", -1060, -860),
     
207.          (position_move_x, pos13, ":ym_3"),
     
208.        (try_end),
     
209.        (position_move_y, pos13, 120),
     
210.      (else_try),
     
211.        (lt, ":ym_4", -1300),
     
212.        (store_random_in_range, ":ym_3", 220, 520),
     
213.        (position_move_x, pos13, ":ym_3"),
     
214.      (else_try),
     
215.        (gt, ":ym_4", 1300),
     
216.        (store_random_in_range, ":ym_3", -520, -220),
     
217.        (position_move_x, pos13, ":ym_3"),
     
218.      (else_try),
     
219.        (store_random_in_range, ":ym_3", -90, 91),
     
220.        (position_move_x, pos13, ":ym_3"),
     
221.      (try_end),
     
222.      (agent_set_scripted_destination, ":ym_0", pos13, ":ym_12"),
     
223.    (try_end),
     
224. ]),
     
225. 
     
226. (0, 0, 0,
     
227. [
     
228.    (eq, "$g_ym", 1),
     
229.    (eq, "$g_ym1", 0),
     
230.    (ge, "$g_ym6", 1),
     
231. ],
     
232. [
     
233.    (get_player_agent_no, ":ym_9"),
     
234.    (try_for_agents, ":ym_0"),
     
235.      (agent_is_alive, ":ym_0"),
     
236.      (troop_slot_eq, "trp_temp_array_a", ":ym_0", 1),
     
237.      (troop_slot_eq, "trp_temp_array_b", ":ym_0", 0),
     
238.      (agent_get_slot, ":ym_1", ":ym_0", slot_slot_ym),
     
239.      (assign, ":ym_6", ":ym_1"),
     
240.      (entry_point_get_position, pos14, ":ym_1"),
     
241.      (agent_get_position, pos11, ":ym_0"),
     
242.      (assign, ":ym_5", 0),
     
243.      (get_distance_between_positions, ":ym_2", pos11, pos14),
     
244.      (try_begin),
     
245.        (eq, ":ym_5", 0),
     
246.        (position_transform_position_to_local, pos12, pos14, pos11),
     
247.        (position_get_x, ":ym_3", pos12),
     
248.        (is_between, ":ym_3", -5000, 5000),
     
249.        (position_get_y, ":ym_4", pos12),
     
250.        (is_between, ":ym_4", -1200, 1201),
     
251.        (assign, ":ym_5", 1),
     
252.      (try_end),
     
253.      (eq, ":ym_5", 1),
     
254.      (store_add, ":ym_1", ":ym_1", 1),
     
255.      (try_begin),
     
256.        (ge, ":ym_1", 14),
     
257.        (assign, ":ym_1", 5),
     
258.        (agent_get_slot, ":ym_4", ":ym_0", slot_ym1),
     
259.        (val_add, ":ym_4", 1),
     
260.        (agent_set_slot, ":ym_0", slot_ym1, ":ym_4"),
     
261.        (agent_set_slot, ":ym_0", slot_ym2, 1),
     
262.        (try_begin),
     
263.          (eq, ":ym_0", ":ym_9"),
     
264.          (assign, reg1, ":ym_4"),
     
265.          (display_message, "@你 已 完 成 第 {reg1} 圈！"),
     
266.        (try_end),
     
267.      (try_end),
     
268.      (try_begin),
     
269.        (eq, ":ym_0", ":ym_9"),
     
270.        (assign, reg1, ":ym_6"),
     
271.        (display_message, "@[测 试] 通 过 路 点 {reg1}"),
     
272.      (try_end),
     
273.      (agent_set_slot, ":ym_0", slot_slot_ym, ":ym_1"),
     
274.      (entry_point_get_position, pos14, ":ym_1"),
     
275.      (agent_set_scripted_destination, ":ym_0", pos14, 0),
     
276.    (try_end),
     
277. ]),
     
278. 
     
279. (0, 0, 0,
     
280. [
     
281.    (eq, "$g_ym", 1),
     
282.    (eq, "$g_ym1", 0),
     
283.    (store_mission_timer_a, ":ym_9"),
     
284.    (ge, ":ym_9", "$g_ym4"),
     
285. ],
     
286. [
     
287.    (entry_point_get_position, pos10, 13),
     
288.    (try_for_agents, ":ym_0"),
     
289.      (agent_is_alive, ":ym_0"),
     
290.      (troop_slot_eq, "trp_temp_array_a", ":ym_0", 1),
     
291.      (troop_slot_eq, "trp_temp_array_b", ":ym_0", 0),
     
292.      (agent_get_position, pos11, ":ym_0"),
     
293.      (position_transform_position_to_local, pos12, pos10, pos11),
     
294.      (position_get_x, ":ym_1", pos12),
     
295.      (is_between, ":ym_1", -2000, 2000),
     
296.      (position_get_y, ":ym_2", pos12),
     
297.      (is_between, ":ym_2", -250, 251),
     
298.      (try_begin),
     
299.        (ge, "$g_ym6", 1),
     
300.        (agent_get_slot, ":ym_3", ":ym_0", slot_ym1),
     
301.        (ge, ":ym_3", "$g_ym6"),
     
302.        (val_add, "$g_ym2", 1),
     
303.        (troop_set_slot, "trp_temp_array_b", ":ym_0", "$g_ym2"),
     
304.        (assign, reg1, "$g_ym2"),
     
305.        (str_store_agent_name, s1, ":ym_0"),
     
306.        (display_message, "@第 {reg1}名:{s1}"),
     
307.      (try_end),
     
308.    (try_end),
     
309.    (try_begin),
     
310.      (ge, "$g_ym2", 4),
     
311.      (assign, "$g_ym1", 1),
     
312.      (display_message, "@赛 马 结 束，你 现 在 可 以 离 开 场 景。"),
     
313.    (try_end),
     
314. ]),
     
315. 
     
316. (ti_tab_pressed, 0, 0,
     
317. [
     
318.    (eq, "$g_ym1", 0),
     
319. ],
     
320. [
     
321.    (display_message, "@赛 马 尚 未 结 束，暂 时 不 能 离 开 场 景。", 0xFF3333),
     
322. ]),
     
323. 
     
324. (ti_tab_pressed, 0, 0,
     
325. [
     
326.    (eq, "$g_ym1", 1),
     
327. ],
     
328. [
     
329.    (finish_mission, 0),
     
330. ]),

复制代码