Constructions from []

/* Stack type objects! * Contains: * Stacks * Recipe datum */ /* * Stacks */ /obj/item/stack origin_tech = "materials=1" var/list/datum/stack_recipe/recipes var/singular_name var/amount = 1 var/max_amount //also see stack recipes initialisation, param "max_res_amount" must be equal to this max_amount /obj/item/stack/New(var/loc, var/amount=null) ..() if (amount) src.amount=amount return /obj/item/stack/Del() if (src && usr && usr.machine==src) usr << browse(null, "window=stack") ..() /obj/item/stack/examine() set src in view(1) ..() usr << "There are [src.amount] [src.singular_name]\s in the stack." return /obj/item/stack/attack_self(mob/user as mob) interact(user) /obj/item/stack/interact(mob/user as mob) if (!recipes) return if (!src || amount<=0) user << browse(null, "window=stack") user.set_machine(src) //for correct work of onclose var/t1 = text("Constructions from []Amount Left: [] ", src, src.amount) for(var/i=1;i<=recipes.len,i++) var/datum/stack_recipe/R = recipes[i] if (isnull(R)) t1 += "" continue if (i>1 && !isnull(recipes[i-1])) t1+=" " var/max_multiplier = round(src.amount / R.req_amount) var/title as text var/can_build = 1 can_build = can_build && (max_multiplier>0) /* if (R.one_per_turf) can_build = can_build && !(locate(R.result_type) in usr.loc) if (R.on_floor) can_build = can_build && istype(usr.loc, /turf/simulated/floor) */ if (R.res_amount>1) title+= "[R.res_amount]x [R.title]\s" else title+= "[R.title]" title+= " ([R.req_amount] [src.singular_name]\s)" if (can_build) t1 += text("[] ", src, i, title) else t1 += text("[]", title) continue if (R.max_res_amount>1 && max_multiplier>1) max_multiplier = min(max_multiplier, round(R.max_res_amount/R.res_amount)) t1 += " |" var/list/multipliers = list(5,10,25) for (var/n in multipliers) if (max_multiplier>=n) t1 += " [n*R.res_amount]x" if (!(max_multiplier in multipliers)) t1 += " [max_multiplier*R.res_amount]x" t1 += "" user << browse(t1, "window=stack") onclose(user, "stack") return /obj/item/stack/Topic(href, href_list) ..() if ((usr.restrained() || usr.stat || usr.get_active_hand() != src)) return if (href_list["make"]) if (src.amount < 1) del(src) //Never should happen var/datum/stack_recipe/R = recipes[text2num(href_list["make"])] var/multiplier = text2num(href_list["multiplier"]) if (!multiplier) multiplier = 1 if (src.amount < R.req_amount*multiplier) if (R.req_amount*multiplier>1) usr << "\red You haven't got enough [src] to build \the [R.req_amount*multiplier] [R.title]\s!" else usr << "\red You haven't got enough [src] to build \the [R.title]!" return if (R.one_per_turf && (locate(R.result_type) in usr.loc)) usr << "\red There is another [R.title] here!" return if (R.on_floor && !istype(usr.loc, /turf/simulated/floor)) usr << "\red \The [R.title] must be constructed on the floor!" return if (R.time) usr << "\blue Building [R.title] ..." if (!do_after(usr, R.time)) return if (src.amount < R.req_amount*multiplier) return var/atom/O = new R.result_type( usr.loc ) O.dir = usr.dir if (R.max_res_amount>1) var/obj/item/stack/new_item = O new_item.amount = R.res_amount*multiplier //new_item.add_to_stacks(usr) src.amount-=R.req_amount*multiplier if (src.amount<=0) var/oldsrc = src src = null //dont kill proc after del() usr.before_take_item(oldsrc) del(oldsrc) if (istype(O,/obj/item)) usr.put_in_hands(O) O.add_fingerprint(usr) //BubbleWrap - so newly formed boxes are empty if ( istype(O, /obj/item/weapon/storage) ) for (var/obj/item/I in O) del(I) //BubbleWrap END if (src && usr.machine==src) //do not reopen closed window spawn( 0 ) src.interact(usr) return return /obj/item/stack/proc/use(var/amount) src.amount-=amount if (src.amount<=0) var/oldsrc = src src = null //dont kill proc after del() if(usr) usr.before_take_item(oldsrc) del(oldsrc) return /obj/item/stack/proc/add_to_stacks(mob/usr as mob) var/obj/item/stack/oldsrc = src src = null for (var/obj/item/stack/item in usr.loc) if (item==oldsrc) continue if (!istype(item, oldsrc.type)) continue if (item.amount>=item.max_amount) continue oldsrc.attackby(item, usr) usr << "You add new [item.singular_name] to the stack. It now contains [item.amount] [item.singular_name]\s." if(!oldsrc) break /obj/item/stack/attack_hand(mob/user as mob) if (user.get_inactive_hand() == src) var/obj/item/stack/F = new src.type( user, amount=1) F.copy_evidences(src) user.put_in_hands(F) src.add_fingerprint(user) F.add_fingerprint(user) use(1) if (src && usr.machine==src) spawn(0) src.interact(usr) else ..() return /obj/item/stack/attackby(obj/item/W as obj, mob/user as mob) ..() if (istype(W, src.type)) var/obj/item/stack/S = W if (S.amount >= max_amount) return 1 var/to_transfer as num if (user.get_inactive_hand()==src) to_transfer = 1 else to_transfer = min(src.amount, S.max_amount-S.amount) S.amount+=to_transfer if (S && usr.machine==S) spawn(0) S.interact(usr) src.use(to_transfer) if (src && usr.machine==src) spawn(0) src.interact(usr) else return ..() /obj/item/stack/proc/copy_evidences(obj/item/stack/from as obj) src.blood_DNA = from.blood_DNA src.fingerprints = from.fingerprints src.fingerprintshidden = from.fingerprintshidden src.fingerprintslast = from.fingerprintslast //TODO bloody overlay /* * Recipe datum */ /datum/stack_recipe var/title = "ERROR" var/result_type var/req_amount = 1 var/res_amount = 1 var/max_res_amount = 1 var/time = 0 var/one_per_turf = 0 var/on_floor = 0 New(title, result_type, req_amount = 1, res_amount = 1, max_res_amount = 1, time = 0, one_per_turf = 0, on_floor = 0) src.title = title src.result_type = result_type src.req_amount = req_amount src.res_amount = res_amount src.max_res_amount = max_res_amount src.time = time src.one_per_turf = one_per_turf src.on_floor = on_floor