mirror of
https://github.com/vgstation-coders/vgstation13.git
synced 2025-12-10 10:21:11 +00:00
3517810d11
- Added teleporter datum. do_teleport proc is now just a wrapper for it. - Added damage absorption to mechs. - Added mecha step and turn sounds. - Cleaned effects code a bit. - Metal foam should now block air movement. - Since sd_ lightning library chops areas into pieces, turrets now work with master area. - Tried to optimize DesignHasReqs proc. - Added plasma converter and laser cannon mecha equipment. - Other cosmetic changes. git-svn-id: http://tgstation13.googlecode.com/svn/trunk@2463 316c924e-a436-60f5-8080-3fe189b3f50e
105 lines
2.3 KiB
Plaintext
105 lines
2.3 KiB
Plaintext
#define FORWARD -1
|
|
#define BACKWARD 1
|
|
|
|
/datum/construction
|
|
var/list/steps
|
|
var/atom/holder
|
|
var/result
|
|
var/list/steps_desc
|
|
|
|
New(atom)
|
|
..()
|
|
holder = atom
|
|
if(!holder) //don't want this without a holder
|
|
spawn
|
|
del src
|
|
set_desc(steps.len)
|
|
return
|
|
|
|
proc/next_step()
|
|
steps.len--
|
|
if(!steps.len)
|
|
spawn_result()
|
|
else
|
|
set_desc(steps.len)
|
|
return
|
|
|
|
proc/action(atom/used_atom,mob/user as mob)
|
|
return
|
|
|
|
proc/check_step(atom/used_atom,mob/user as mob) //check last step only
|
|
var/valid_step = is_right_key(used_atom)
|
|
if(valid_step)
|
|
if(custom_action(valid_step, used_atom, user))
|
|
next_step()
|
|
return 1
|
|
return 0
|
|
|
|
proc/is_right_key(atom/used_atom) // returns current step num if used_atom is of the right type.
|
|
var/list/L = steps[steps.len]
|
|
if(istype(used_atom, L["key"]))
|
|
return steps.len
|
|
return 0
|
|
|
|
proc/custom_action(step, used_atom, user)
|
|
return 1
|
|
|
|
proc/check_all_steps(atom/used_atom,mob/user as mob) //check all steps, remove matching one.
|
|
for(var/i=1;i<=steps.len;i++)
|
|
var/list/L = steps[i];
|
|
if(istype(used_atom, L["key"]))
|
|
if(custom_action(i, used_atom, user))
|
|
steps[i]=null;//stupid byond list from list removal...
|
|
listclearnulls(steps);
|
|
if(!steps.len)
|
|
spawn_result()
|
|
return 1
|
|
return 0
|
|
|
|
|
|
proc/spawn_result()
|
|
if(result)
|
|
new result(get_turf(holder))
|
|
spawn()
|
|
del holder
|
|
return
|
|
|
|
proc/set_desc(index as num)
|
|
var/list/step = steps[index]
|
|
holder.desc = step["desc"]
|
|
return
|
|
|
|
/datum/construction/reversible
|
|
var/index
|
|
|
|
New(atom)
|
|
..()
|
|
index = steps.len
|
|
return
|
|
|
|
proc/update_index(diff as num)
|
|
index+=diff
|
|
if(index==0)
|
|
spawn_result()
|
|
else
|
|
set_desc(index)
|
|
return
|
|
|
|
is_right_key(atom/used_atom) // returns index step
|
|
var/list/L = steps[index]
|
|
if(istype(used_atom, L["key"]))
|
|
return FORWARD //to the first step -> forward
|
|
else if(L["backkey"] && istype(used_atom, L["backkey"]))
|
|
return BACKWARD //to the last step -> backwards
|
|
return 0
|
|
|
|
check_step(atom/used_atom,mob/user as mob)
|
|
var/diff = is_right_key(used_atom)
|
|
if(diff)
|
|
if(custom_action(index, diff, used_atom, user))
|
|
update_index(diff)
|
|
return 1
|
|
return 0
|
|
|
|
custom_action(index, diff, used_atom, user)
|
|
return 1 |