Upload files to "Heap"

Heap/Heap40022.txt

@@ -0,0 +1,17 @@
+subclass BConsume of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $d		; 13, seenRect
+	pEffect         = $0
+	pState          = $0
+
+	buildVerbList()
+}
+
+string_0028	= "Unknown consumable state of %d"
+string_0047	= "BConsume"
+

Heap/Heap40025.txt

@@ -0,0 +1,110 @@
+local[$3] =
+{
+	$0, $0, $0
+}
+
+subclass BPassword of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $0
+
+	buildVerbList()
+}
+
+instance myGetPassword of ScriptPrompt
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pMax            = $0
+	pPrint          = $0
+	pStr            = $0
+	pPrompt         = $0
+	pClient         = $0
+
+	doit()
+}
+
+instance rePrompt of ScriptPrompt
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pMax            = $0
+	pPrint          = $0
+	pStr            = $0
+	pPrompt         = $0
+	pClient         = $0
+
+	doit()
+}
+
+instance confirmPrompt of ScriptPrompt
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pMax            = $0
+	pPrint          = $0
+	pStr            = $0
+	pPrompt         = $0
+	pClient         = $0
+
+	doit()
+}
+
+subclass WANetNewPassScript of WANetScript
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	client          = $0
+	state           = $ffff		; -1
+	start           = $0
+	timer           = $0
+	cycles          = $0
+	seconds         = $0
+	lastSeconds     = $0
+	ticks           = $0
+	lastTicks       = $0
+	register        = $0
+	script          = $0
+	caller          = $0
+	next            = $0
+	number          = $0
+	pRoom           = $0
+	pDirectObject   = $0
+	pIndirectObject = $0
+	pMovieCmd       = $0
+	pClient         = $0
+	pDoAnimation    = $0
+	pDone           = $0
+	pHandsOff       = $0
+	pMutex          = $0
+	x               = $0
+	y               = $0
+
+	init()
+	dispose()
+	handleError()
+	changeState()
+}
+
+string_00da	= "BPassword"
+string_00e4	= " OK "
+string_00e9	= "Cancel"
+string_00f0	= "myGetPassword"
+string_00fe	= "rePrompt"
+string_0107	= "confirmPrompt"
+string_0115	= "Error"
+string_011b	= "Ok"
+string_011e	= ""
+string_011f	= "Your login password has been changed! Please remember to write down your new password so that you don't forget it. Also be aware that your Strong Box and House Door passwords are not being changed. You must go to them and change them to keep them the same as your login password."
+string_0237	= "The password for the %s has been changed! Please remember to write down the new password so that you don't forget it."
+string_02ad	= "Password change."
+string_02be	= "WANetNewPassScript"
+

Heap/Heap40026.txt

@@ -0,0 +1,14 @@
+subclass BGatekeeper of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $f		; 15, loop
+
+	buildVerbList()
+}
+
+string_0024	= "BGatekeeper"
+

Heap/Heap40027.txt

@@ -0,0 +1,15 @@
+subclass BSit of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $10		; 16, cel
+	pOwner          = $0
+
+	buildVerbList()
+}
+
+string_0026	= "BSit"
+

Heap/Heap40028.txt

@@ -0,0 +1,14 @@
+subclass BScroll of WorldObjectBase
+{
+	scratch         = $0
+	pModule         = $ffff		; -1
+	pLine           = $ffff		; -1
+	pName           = $0
+	pSelf           = $0
+	pType           = $11		; 17, bitmap
+
+	buildVerbList()
+}
+
+string_0024	= "BScroll"
+