Economy part 1

Economy part 1

code/__DEFINES/subsystems.dm

@@ -64,6 +64,7 @@
 #define INIT_ORDER_TICKER			9
 #define INIT_ORDER_MAPPING			8
 #define INIT_ORDER_NETWORKS			7
+#define INIT_ORDER_ECONOMY			21
 #define INIT_ORDER_ATOMS			6
 #define INIT_ORDER_LANGUAGE			5
 #define INIT_ORDER_MACHINES			4

code/controllers/subsystem/job.dm

@@ -442,6 +442,11 @@ SUBSYSTEM_DEF(job)
 		if(CONFIG_GET(number/minimal_access_threshold))
 			to_chat(M, "<span class='notice'><B>As this station was initially staffed with a [CONFIG_GET(flag/jobs_have_minimal_access) ? "full crew, only your job's necessities" : "skeleton crew, additional access may"] have been added to your ID card.</B></span>")
 
+	if(ishuman(H))
+		var/mob/living/carbon/human/wageslave = H
+		to_chat(M, "<b><span class = 'big'>Your account ID is [wageslave.account_id].</span></b>")
+		H.add_memory("Your account ID is [wageslave.account_id].")
+
 	if(job && H)
 		if(job.dresscodecompliant)// CIT CHANGE - dress code compliance
 			equip_loadout(N, H) // CIT CHANGE - allows players to spawn with loadout items

code/game/objects/items/cards_ids.dm

@@ -170,7 +170,7 @@
 	var/registered_name = null // The name registered_name on the card
 	var/assignment = null
 	var/access_txt // mapping aid
-
+	var/datum/bank_account/registered_account
 
 
 /obj/item/card/id/Initialize(mapload)

code/game/objects/items/stacks/cash.dm

@@ -19,7 +19,7 @@
 
 /obj/item/stack/spacecash/proc/update_desc()
 	var/total_worth = amount*value
-	desc = "It's worth [total_worth] credit[( total_worth > 1 ) ? "s" : ""]"
+	desc = "A outdated form of currency, It's worth [total_worth] credit[( total_worth > 1 ) ? "s" : ""]"
 
 
 /obj/item/stack/spacecash/merge(obj/item/stack/S)

code/modules/jobs/job_types/job.dm

@@ -58,7 +58,7 @@
 	var/list/mind_traits // Traits added to the mind of the mob assigned this job
 
 	var/list/blacklisted_quirks		//list of quirk typepaths blacklisted.
-	
+
 	var/list/alt_titles = list()
 
 //Only override this proc
@@ -90,6 +90,13 @@
 	if(!H)
 		return FALSE
 
+	if(!visualsOnly)
+		var/datum/bank_account/bank_account = new(H.real_name, src)
+		bank_account.account_holder = H.real_name
+		bank_account.account_job = src
+		bank_account.account_id = rand(111111,999999)
+		H.account_id = bank_account.account_id
+
 	if(CONFIG_GET(flag/enforce_human_authority) && (title in GLOB.command_positions))
 		if(H.dna.species.id != "human")
 			H.set_species(/datum/species/human)
@@ -230,6 +237,13 @@
 			C.update_label(C.registered_name, preference_source.prefs.alt_titles_preferences[J.title])
 		else
 			C.update_label()
+
+		for(var/A in SSeconomy.bank_accounts)
+			var/datum/bank_account/B = A
+			if(B.account_id == H.account_id)
+				C.registered_account = B
+				B.bank_cards += C
+				break
 		H.sec_hud_set_ID()
 
 	var/obj/item/pda/PDA = H.get_item_by_slot(pda_slot)

code/modules/mob/living/carbon/human/human_defines.dm

@@ -68,5 +68,5 @@
 	var/static/list/can_ride_typecache = typecacheof(list(/mob/living/carbon/human, /mob/living/simple_animal/slime, /mob/living/simple_animal/parrot))
 	var/lastpuke = 0
 	var/last_fire_update
-
+	var/account_id
 	can_be_held = "micro"

code/modules/mob/living/carbon/human/human_helpers.dm

@@ -132,6 +132,7 @@
 			to_chat(src, "<span class='warning'>Use of ranged weaponry would bring dishonor to the clan.</span>")
 			return FALSE
 
+
 /mob/living/carbon/human/can_see_reagents()
 	. = ..()
 	if(.) //No need to run through all of this if it's already true.