Upload files to "Heap"

2026-04-27 01:19:39 +00:00 · 2026-04-27 01:19:39 +00:00 · 4ad32675ff
parent d8dad8633d
commit 4ad32675ff
5 changed files with 100 additions and 0 deletions
--- a/Heap/Heap40017.txt
+++ b/Heap/Heap40017.txt
@ -0,0 +1,16 @@
+subclass BCycle of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $5		; scaleY
+	pCycleType      = $0
+	pCycleSpeed     = $6		; maxScale
+
+	doit()
+}
+
+string_0028	= "BCycle"
+
--- a/Heap/Heap40018.txt
+++ b/Heap/Heap40018.txt
@ -0,0 +1,17 @@
+subclass BEntry of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $a		; 10, inTop
+	pDest           = $ffff		; -1
+
+	dispose()
+	buildVerbList()
+	fromPacket()
+}
+
+string_0026	= "BEntry"
+
--- a/Heap/Heap40019.txt
+++ b/Heap/Heap40019.txt
@ -0,0 +1,38 @@
+subclass BCharacter of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $6		; maxScale
+	pProfession     = $0
+	pExperience     = $0
+	pRace           = $0
+	pSex            = $0
+	pBuildPoints    = $0
+	pHomeTown       = $0
+	pSkillArray     = $0
+	pSpellArray     = $0
+	pProperName     = $0
+	pTitle          = $0
+	pBiography      = $0
+	pStealingCount  = $0
+	pStealingUnserved= $0
+	pKillingCount   = $0
+	pKillingUnserved= $0
+	pPeaceful       = $0
+
+	init()
+	dispose()
+	buildVerbList()
+	fromPacket()
+	setProperName()
+	setTitle()
+	setBiography()
+	fromFullPacket()
+}
+
+string_0044	= ""
+string_0045	= "BCharacter"
+
--- a/Heap/Heap40020.txt
+++ b/Heap/Heap40020.txt
@ -0,0 +1,15 @@
+subclass BShop of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $b		; 11, inRight
+	pCurrency       = $0
+
+	buildVerbList()
+}
+
+string_0026	= "BShop"
+
--- a/Heap/Heap40021.txt
+++ b/Heap/Heap40021.txt
@ -0,0 +1,14 @@
+subclass BNPC of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $c		; 12, inBottom
+
+	init()
+}
+
+string_0024	= "BNPC"
+