Added "D-9341's badge" to SCP-1162, inventory icons for both badges

Items.bb

@@ -290,14 +290,17 @@ Function InitItemTemplates()
 	;new Items in SCP:CB 1.3 - ENDSHN
 	it = CreateItemTemplate("SCP-1499","scp1499","GFX\items\SCP-1499.3ds","GFX\items\INVscp1499.jpg", "", 0.023,"GFX\items\SCP-1499.jpg") : it\sound = 2
 	it = CreateItemTemplate("Document SCP-1162", "paper", "GFX\items\paper.x", "GFX\items\INVpaper.jpg", "GFX\items\doc1162.jpg", 0.003) : it\sound = 0
-	CreateItemTemplate("Emily Ross's Badge", "badge", "GFX\items\badge.x", "GFX\items\INVpaper.jpg", "GFX\items\badge1.jpg", 0.0001, "GFX\items\badge1_tex.jpg")
+	it = CreateItemTemplate("Emily Ross's Badge", "badge", "GFX\items\badge.x", "GFX\items\INVpaper.jpg", "GFX\items\badge1.jpg", 0.0001, "GFX\items\badge1_tex.jpg") : it\sound = 0
 	it = CreateItemTemplate("Lost Key", "key", "GFX\items\key.b3d", "GFX\items\INV1162_1.jpg", "", 0.001, "GFX\items\key2.png","","",0,1+2+8) : it\sound = 3
 	it = CreateItemTemplate("Disciplinary Hearing DH-S-4137-17092", "oldpaper", "GFX\items\paper.x", "GFX\items\INVpaper.jpg", "GFX\items\dh.s", 0.003) : it\sound = 0
 
 	it = CreateItemTemplate("Coin", "coin", "GFX\items\key.b3d", "GFX\items\INVcoin.jpg", "", 0.0005, "GFX\items\coin.png","","",0,1+2+8) : it\sound = 3
 
 	it = CreateItemTemplate("Movie Ticket", "ticket", "GFX\items\key.b3d", "GFX\items\INVticket.jpg", "GFX\items\ticket.png", 0.002, "GFX\items\tickettexture.png","","",0,1+2+8) : it\sound = 0
 
+	it = CreateItemTemplate("Old Badge", "badge", "GFX\items\badge.x", "GFX\items\INVpaper.jpg", "GFX\items\badge2.png", 0.0001, "GFX\items\badge2_tex.png","","",0,1+2+8) : it\sound = 0
+
+
 	For it = Each ItemTemplates
 		If (it\tex<>0) Then
 			If (it\texpath<>"") Then

Main.bb

@@ -5006,30 +5006,31 @@ Function DrawGUI()
 				Case "badge"
 					If SelectedItem\itemtemplate\img=0 Then
 						SelectedItem\itemtemplate\img=LoadImage_Strict(SelectedItem\itemtemplate\imgpath)	
-						SelectedItem\itemtemplate\img = ResizeImage2(SelectedItem\itemtemplate\img, ImageWidth(SelectedItem\itemtemplate\img) * MenuScale, ImageHeight(SelectedItem\itemtemplate\img) * MenuScale)
+						;SelectedItem\itemtemplate\img = ResizeImage2(SelectedItem\itemtemplate\img, ImageWidth(SelectedItem\itemtemplate\img) * MenuScale, ImageHeight(SelectedItem\itemtemplate\img) * MenuScale)
 
 						MaskImage(SelectedItem\itemtemplate\img, 255, 0, 255)
 					EndIf
 
 					DrawImage(SelectedItem\itemtemplate\img, GraphicWidth / 2 - ImageWidth(SelectedItem\itemtemplate\img) / 2, GraphicHeight / 2 - ImageHeight(SelectedItem\itemtemplate\img) / 2)
 
-					If SelectedItem\state = 0
-						Msg = "New info learned: "
+					If SelectedItem\state = 0 Then
+						PlaySound_Strict LoadTempSound("SFX\1162\bf2_"+Rand(1,5)+".ogg")
 						Select SelectedItem\itemtemplate\name
-							Case "Emily Ross's Badge"
-								Msg = Msg+"Assistant researcher "+Chr(34)+"Emily Sharon Ross"+Chr(34)
+							Case "Old Badge"
+								Msg = "Huh? This guy looks just like me!"
+								MsgTimer = 70*10
 						End Select
-						MsgTimer = 70*10
+
 						SelectedItem\state = 1
 					EndIf
 				Case "key"
-					If SelectedItem\state = 0
+					If SelectedItem\state = 0 Then
 						PlaySound_Strict LoadTempSound("SFX\1162\bf2_"+Rand(1,5)+".ogg")
+
+						Msg = "Isn't this the key to that old shack? The one where I... No, it can't be."
+						MsgTimer = 70*10						
 					EndIf
 
-					Msg = "Isn't this the key to that old shack? The one where I... No, it can't be."
-					MsgTimer = 70*10
-
 					SelectedItem\state = 1
 					SelectedItem = Null
 				Case "oldpaper"

UpdateEvents.bb

@@ -7971,19 +7971,21 @@ Function UpdateEvents()
 										e\EventState3 = 3.0
 									EndIf
 
-									e\EventState = Rand(1,4)
+									e\EventState = Rand(1,5)
 
 									;Checking if the selected nostalgia item already exists or not
 									Local itemName$ = ""
 									Select (e\EventState)
 										Case 1
-											itemName = "key"
+											itemName = "Lost Key"
 										Case 2
-											itemName = "oldpaper"
+											itemName = "Disciplinary Hearing DH-S-4137-17092"
 										Case 3
-											itemName = "coin"
+											itemName = "Coin"
 										Case 4
-											itemName = "ticket"
+											itemName = "Movie Ticket"
+										Case 5
+											itemName = "Old Badge"
 									End Select
 
 									Local itemExists% = False
@@ -8134,6 +8136,8 @@ Function UpdateEvents()
 								it = CreateItem("Coin","coin",EntityX(pp,True),EntityY(pp,True),EntityZ(pp,True))
 							Case 4
 								it = CreateItem("Movie Ticket","ticket",EntityX(pp,True),EntityY(pp,True),EntityZ(pp,True))
+							Case 5
+								it = CreateItem("Old Badge","badge",EntityX(pp,True),EntityY(pp,True),EntityZ(pp,True))
 						End Select
 						EntityType(it\obj, HIT_ITEM)
 						GiveAchievement(Achv1162)

changelist.txt

@@ -11,19 +11,20 @@ v1.3
 	- new key card textures by Anon4743
 - expanded SCP-[REDACTED] area
 - some new sounds
+- some clues about D-9341s past
 - Map Creator improvements
 - options can be accessed from the pause menu
 - optimization to sound loading by juanjpro
 - getting Key Card Omni is slightly harder now (depending on the difficulty)
 - more SCP-096 spawns
 - 096 model with lower polycount
-- more SCP-049 spawns
 - MTF improvements
 	- AI bugfixes and optimization
 	- more reactions to SCPs
 	- cameras are now a threat if the MTF Units have spawned
 - fixed Class D step sounds 
 - removed SCP-1074
+- more SCP-049 spawns
 - improved SCP-049 AI
 - door buttons can't be accidentally clicked by closing the pause menu anymore
 - fixed checkpoints occasionally leading into "nothingness"