export40208_0	= StockObjInitter1

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_178f	; "Chalice"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_178f	; "Chalice"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c44a		; -15286
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_063e
		ret

code_063e:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$b		; 11, inRight
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1797	; "Spring"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1797	; "Spring"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$f488		; -2936
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push0
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_06b7
		ret

code_06b7:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_179e	; "HollowTree"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17a9	; "Hollow Tree"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$f00a		; -4086
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$410		; 1040, pInvisibleClut
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0718
		ret

code_0718:	pushi	$387		; 903, addBase
		push1
		class	BOpenable
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BEntry
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17b5	; "FireA"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17bb	; "Fire"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ecb8		; -4936
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0790
		ret

code_0790:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17c0	; "Fire1"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17bb	; "Fire"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ecb8		; -4936
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_080d
		ret

code_080d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17c6	; "FireB"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17bb	; "Fire"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ecea		; -4886
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_088a
		ret

code_088a:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17cc	; "Fire2"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17bb	; "Fire"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ecea		; -4886
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0907
		ret

code_0907:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17d2	; "Embers"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17d2	; "Embers"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ed4e		; -4786
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0984
		ret

code_0984:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17d9	; "SmokeA"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17e0	; "Smoke"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ed80		; -4736
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		pushi	$3f4		; 1012, pPolygon
		push1
		pushi	$ff		; 255, asInteger
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0a07
		ret

code_0a07:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17e6	; "Smoke1"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17e0	; "Smoke"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ed80		; -4736
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0a84
		ret

code_0a84:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17ed	; "SmokeB"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17e0	; "Smoke"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$edb2		; -4686
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		pushi	$3f4		; 1012, pPolygon
		push1
		pushi	$ff		; 255, asInteger
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0b07
		ret

code_0b07:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17f4	; "Smoke2"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17e0	; "Smoke"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$edb2		; -4686
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0b84
		ret

code_0b84:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_17fb	; "SmokeC"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17e0	; "Smoke"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ede4		; -4636
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		pushi	$3f4		; 1012, pPolygon
		push1
		pushi	$ff		; 255, asInteger
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0c07
		ret

code_0c07:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1802	; "Smoke3"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17e0	; "Smoke"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ede4		; -4636
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0c84
		ret

code_0c84:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1809	; "FireC"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17bb	; "Fire"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ed1c		; -4836
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0d01
		ret

code_0d01:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_180f	; "Fire3"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_17bb	; "Fire"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$ed1c		; -4836
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		pushi	$20		; 32, ' ', name
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0d7e
		ret

code_0d7e:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4fc		; 1276, pCycleSpeed
		push1
		pushi	$6		; maxScale
		pushi	$4fb		; 1275, pCycleType
		push1
		push0
		pushi	$45		; 69, 'E', doit
		push0
		pushi	$387		; 903, addBase
		push1
		class	BCycle
		push
		lap	param[$1]
		send	$6
		bnot
		send	$10
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1815	; "SpellComponent"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1824	; "Spell Component"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e1c8		; -7736
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0dfa
		ret

code_0dfa:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1834	; "Tooth"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1834	; "Tooth"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e1c8		; -7736
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0e73
		ret

code_0e73:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push1
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_183a	; "DaemonTooth"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1846	; "Daemon Tooth"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e1c8		; -7736
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0eeb
		ret

code_0eeb:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$8		; fixPriority
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1853	; "Finger"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1853	; "Finger"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e1fa		; -7686
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0f64
		ret

code_0f64:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_185a	; "ZombieFinger"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1867	; "Zombie Finger"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e1fa		; -7686
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_0fdd
		ret

code_0fdd:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1875	; "Nugget"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1875	; "Nugget"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c706		; -14586
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1056
		ret

code_1056:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_187c	; "GoldNugget"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1887	; "Gold Nugget"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c706		; -14586
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_10cf
		ret

code_10cf:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1893	; "Guano"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1899	; "Ball of Guano"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e196		; -7786
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$49		; 73, 'I', replay
		pushi	$330		; 816, pColor
		push1
		pushi	$49		; 73, 'I', replay
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_114a
		ret

code_114a:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_18a7	; "ImpGuano"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_18b0	; "Imp Guano"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e196		; -7786
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$49		; 73, 'I', replay
		pushi	$330		; 816, pColor
		push1
		pushi	$3a		; 58, ':', b_i1
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_11c5
		ret

code_11c5:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_18ba	; "RatGuano"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_18c3	; "Rat Guano"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e196		; -7786
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$49		; 73, 'I', replay
		pushi	$330		; 816, pColor
		push1
		pushi	$62		; 98, 'b', vol
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1240
		ret

code_1240:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_18cd	; "DaemonGuano"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_18d9	; "Daemon Guano"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e196		; -7786
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$49		; 73, 'I', replay
		pushi	$330		; 816, pColor
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_12bb
		ret

code_12bb:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_18e6	; "JawBone"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_18ee	; "Jaw Bone"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e22c		; -7636
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1334
		ret

code_1334:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_18f7	; "Eyeball"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_18ff	; "Eye"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e25e		; -7586
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_13ad
		ret

code_13ad:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1903	; "KilrogEyeball"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1911	; "Eye of Kilrog"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e25e		; -7586
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$3a		; 58, ':', b_i1
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1427
		ret

code_1427:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_191f	; "OgreEyeball"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_192b	; "Ogre Eye"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e25e		; -7586
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$3a		; 58, ':', b_i1
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_14a1
		ret

code_14a1:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1934	; "Rock"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1939	; "Pebble"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e290		; -7536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$30		; 48, '0', who
		pushi	$330		; 816, pColor
		push1
		pushi	$30		; 48, '0', who
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_151c
		ret

code_151c:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1940	; "Leaf"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1945	; "Oak Leaf"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2c2		; -7486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1596
		ret

code_1596:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push1
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_194e	; "Clump"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1954	; "Clump of Grass"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2f4		; -7436
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1610
		ret

code_1610:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1963	; "AmberRod"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_196c	; "Amber Rod"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c8c8		; -14136
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1688
		ret

code_1688:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1976	; "ObsidianDust"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1983	; "Bag of Obsidian Dust"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c512		; -15086
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1701
		ret

code_1701:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1998	; "Silvergrass"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1998	; "Silvergrass"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2f4		; -7436
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$64		; 100, 'd', moveDone
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_177c
		ret

code_177c:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_19a4	; "Goldenberries"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_19a4	; "Goldenberries"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2f4		; -7436
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$3f		; 63, '?', xStep
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_17f6
		ret

code_17f6:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_19b2	; "Pigweed"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_19b2	; "Pigweed"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2f4		; -7436
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$6a		; 106, 'j', scaleSignal
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1870
		ret

code_1870:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_19ba	; "Devilweed"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_19ba	; "Devilweed"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2f4		; -7436
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$3a		; 58, ':', b_i1
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_18ea
		ret

code_18ea:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_19c4	; "Corbalite"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_19ce	; "Corbalite Rock"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e290		; -7536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$30		; 48, '0', who
		pushi	$330		; 816, pColor
		push1
		pushi	$35		; 53, '5', nodePtr
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1964
		ret

code_1964:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_19dd	; "Basalt"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_19e4	; "Basalt Rock"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e290		; -7536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$30		; 48, '0', who
		pushi	$330		; 816, pColor
		push1
		pushi	$62		; 98, 'b', vol
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_19de
		ret

code_19de:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_19f0	; "Sulfur"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_19f7	; "Sulfur Rock"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e290		; -7536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$30		; 48, '0', who
		pushi	$330		; 816, pColor
		push1
		pushi	$3f		; 63, '?', xStep
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1a58
		ret

code_1a58:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1a03	; "Marble"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1a0a	; "Chip of Marble"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e290		; -7536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$30		; 48, '0', who
		pushi	$330		; 816, pColor
		push1
		pushi	$64		; 100, 'd', moveDone
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1ad2
		ret

code_1ad2:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1a19	; "ElderOak"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1a22	; "Elder Oak Leaf"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2c2		; -7486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$3a		; 58, ':', b_i1
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1b4c
		ret

code_1b4c:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push1
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1a31	; "Silverthorn"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1a3d	; "Silverthorn Leaf"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2c2		; -7486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$64		; 100, 'd', moveDone
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1bc6
		ret

code_1bc6:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push1
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1a4e	; "Tobac"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1a54	; "Tobac Leaf"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e2c2		; -7486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$68		; 104, 'h', restart
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1c40
		ret

code_1c40:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push1
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1a5f	; "PerfectRose"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1a6b	; "Perfect Rose"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$d516		; -10986
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1cb8
		ret

code_1cb8:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push1
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$66		; 102, 'f', flags
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1a78	; "DespothesScepter"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1a89	; "Despothes' Scepter"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$dea8		; -8536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1d4f
		ret

code_1d4f:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$32		; 50, '2', edit
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1a9c	; "DuachsCrystal"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1aaa	; "Duach's Crystal"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$df0c		; -8436
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1de7
		ret

code_1de7:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$7c		; 124, '|', titleBack
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1aba	; "MabonsStaff"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ac6	; "Mabon's Staff"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$e038		; -8136
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		push0
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1e7f
		ret

code_1e7f:	pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$5		; scaleY
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$48		; 72, 'H', modifiers
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1f19
		ret

code_1f19:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1adb	; "sPaper"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1ae2	; "Scroll of Paper"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_1fba
		ret

code_1fba:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1af2	; "sDamnation"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1afd	; "Scroll of Damnation"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_205b
		ret

code_205b:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1b11	; "sDisguise"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1b1b	; "Scroll of Disguise"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_20fc
		ret

code_20fc:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1b2e	; "sEscape"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1b36	; "Scroll of Escape"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_219d
		ret

code_219d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1b47	; "sGreaterIdentify"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1b58	; "Scroll of Greater Identify"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_223e
		ret

code_223e:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$84		; 132, pitch
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1b73	; "sGreaterShield"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1b82	; "Scroll of Greater Shield"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_22e0
		ret

code_22e0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$5d		; 93, ']', dataInc
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1b9b	; "sIdentify"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1ba5	; "Scroll of Identify"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2381
		ret

code_2381:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$39		; 57, '9', b_moveCnt
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1bb8	; "sImmolation"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1bc4	; "Scroll of Immolation"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2422
		ret

code_2422:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$1f		; 31, brBottom
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1bd9	; "sLostThought"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1be6	; "Scroll of Lost Thought"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_24c3
		ret

code_24c3:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$37		; 55, '7', dx
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1bfd	; "sMissileResistance"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1c10	; "Scroll of Missile Resistance"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2564
		ret

code_2564:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$50		; 80, 'P', claimed
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1c2d	; "sMonsterSummoningI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1c40	; "Scroll of Monster Summoning I"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2605
		ret

code_2605:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$85		; 133, roll
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1c5e	; "sMonsterSummoningII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1c72	; "Scroll of Monster Summoning II"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_26a7
		ret

code_26a7:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$86		; 134, yaw
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1c91	; "sMonsterSummoningIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1ca6	; "Scroll of Monster Summoning III"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2749
		ret

code_2749:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$87		; 135, left
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1cc6	; "sResistCold"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1cd2	; "Scroll of Resist Cold"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_27eb
		ret

code_27eb:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$60		; 96, '`', sec
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1ce8	; "sResistFire"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1cf4	; "Scroll of Resist Fire"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_288c
		ret

code_288c:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$5f		; 95, '_', min
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1d0a	; "sResistLightning"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1d1b	; "Scroll of Resist Lightning"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_292d
		ret

code_292d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$61		; 97, 'a', frame
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1d36	; "sRusting"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1d3f	; "Scroll of Rusting"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_29ce
		ret

code_29ce:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$12		; 18, nsLeft
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1d51	; "sShield"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1d59	; "Scroll of Shielding"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2a6f
		ret

code_2a6f:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$5c		; 92, '\', palette
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1d6d	; "sWraithform"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1ad4	; "Scroll"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1d79	; "Scroll of Defenslessness"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2b10
		ret

code_2b10:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$13		; 19, nsTop
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1d92	; "OneAcademyDiploma"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1da4	; "One Academy Diploma"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c738		; -14536
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$6b		; 107, 'k', vanishingX
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2ba9
		ret

code_2ba9:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		push2
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2c22
		ret

code_2c22:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2ca4
		ret

code_2ca4:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1dc2	; "tBook"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1dc8	; "Book of Tales"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2d45
		ret

code_2d45:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1dd6	; "tDivineInspiration"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1de9	; "Tome of Divine Inspiration"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2de6
		ret

code_2de6:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1e04	; "tEvilDeeds"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1e0f	; "Tome of Evil Deeds"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2e87
		ret

code_2e87:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1e22	; "tForgetfulness"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1e31	; "Tome of Forgetfulness"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2f28
		ret

code_2f28:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1e47	; "tGreaterWorks"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1e55	; "Tome of Greater Works"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_2fc9
		ret

code_2fc9:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1e6b	; "tUnderstanding"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1e7a	; "Tome of Understanding"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$48		; 72, 'H', modifiers
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_306a
		ret

code_306a:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1e90	; "SpellBook"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$35e		; 862, pIDName
		push1
		lofsa	string_1dbd	; "Tome"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$4a		; 74, 'J', setPri
		lap	param[$1]
		send	$3c
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_310b
		ret

code_310b:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$500		; 1280, pVerb
		push1
		push0
		pushi	$454		; 1108, pSpell
		push1
		pushi	$ff		; 255, asInteger
		pushi	$501		; 1281, pTheurgism
		push1
		push0
		pushi	$387		; 903, addBase
		push1
		class	BUse
		push
		lap	param[$1]
		send	$6
		bnot
		send	$12
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1e9a	; "Skillbook"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_31b2
		ret

code_31b2:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1ea4	; "skbBasketWeaving"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1eb5	; "The Basics of Basketweaving"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3239
		ret

code_3239:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1ed1	; "skbPsychology"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1edf	; "Psychology of a Realm Player"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_32b3
		ret

code_32b3:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1efc	; "skbFriends"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1f07	; "Making Friends and Being Polite in the Realm"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c76a		; -14486
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		push0
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$40		; 64, '@', yStep
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_332d
		ret

code_332d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1f34	; "skbShortSword"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_33a8
		ret

code_33a8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1f42	; "skbShortSwordI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1f51	; "Familiarity with Short Swords"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3430
		ret

code_3430:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1f6f	; "skbShortSwordII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1f7f	; "Short Sword Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_34b8
		ret

code_34b8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1f97	; "skbShortSwordIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1fa8	; "Short Sword Expertise"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3540
		ret

code_3540:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1fbe	; "skbShortSwordIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1fce	; "The Master's Book of Short Swords"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_35c8
		ret

code_35c8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_1ff0	; "skbShortSwordV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1fff	; "Short Sword Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3650
		ret

code_3650:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2019	; "skbLongSword"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_36d8
		ret

code_36d8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2026	; "skbLongSwordI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2034	; "Familiarity with Long Swords"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3760
		ret

code_3760:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2051	; "skbLongSwordII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2060	; "Long Sword Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_37e8
		ret

code_37e8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2077	; "skbLongSwordIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2087	; "Expertise with Long Swords"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3870
		ret

code_3870:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_20a2	; "skbLongSwordIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_20b1	; "Long Sword Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_38f8
		ret

code_38f8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_20c4	; "skbLongSwordV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_20d2	; "Long Sword Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3980
		ret

code_3980:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_20eb	; "skbTwoHandedSword"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3a08
		ret

code_3a08:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_20fd	; "skbTwoHandedSwordI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2110	; "Familiarity with Two-Handed Swords"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3a90
		ret

code_3a90:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2133	; "skbTwoHandedSwordII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2147	; "Two-Handed Sword Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3b18
		ret

code_3b18:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2164	; "skbTwoHandedSwordIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2179	; "Expertise with Two-Handed Swords"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3ba0
		ret

code_3ba0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_219a	; "skbTwoHandedSwordIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_21ae	; "Two-Handed Sword Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3c28
		ret

code_3c28:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_21c7	; "skbTwoHandedSwordV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_21da	; "Two-Handed Sword Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3cb0
		ret

code_3cb0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_21f9	; "skbDagger"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3d38
		ret

code_3d38:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2203	; "skbDaggerI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_220e	; "Familiarity with Daggers"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3dc0
		ret

code_3dc0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2227	; "skbDaggerII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2233	; "Dagger Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3e48
		ret

code_3e48:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2246	; "skbDaggerIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2253	; "Expertise with Daggers"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3ed0
		ret

code_3ed0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_226a	; "skbDaggerIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2276	; "Dagger Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3f58
		ret

code_3f58:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2285	; "skbDaggerV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2290	; "Dagger Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_3fe0
		ret

code_3fe0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_22a5	; "skbAxe"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4068
		ret

code_4068:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_22ac	; "skbAxeI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_22b4	; "Familiarity with Axes"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_40f0
		ret

code_40f0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_22ca	; "skbAxeII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_22d3	; "Axe Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4178
		ret

code_4178:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_22e3	; "skbAxeIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_22ed	; "Expertise with Axes"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4200
		ret

code_4200:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2301	; "skbAxeIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_230a	; "Axe Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4288
		ret

code_4288:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2316	; "skbAxeV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_231e	; "Axe Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4310
		ret

code_4310:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2330	; "skbClub"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4398
		ret

code_4398:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2338	; "skbClubI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2341	; "Familiarity with Clubs"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4420
		ret

code_4420:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2358	; "skbClubII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2362	; "Club Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_44a8
		ret

code_44a8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2373	; "skbClubIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_237e	; "Expertise with Clubs"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4530
		ret

code_4530:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2393	; "skbClubIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_239d	; "Club Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_45b8
		ret

code_45b8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_23aa	; "skbClubV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_23b3	; "Club Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4640
		ret

code_4640:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_23c6	; "skbMace"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_46c8
		ret

code_46c8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_23ce	; "skbMaceI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_23d7	; "Familiarity with Maces"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4750
		ret

code_4750:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_23ee	; "skbMaceII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_23f8	; "Mace Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_47d8
		ret

code_47d8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2409	; "skbMaceIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2414	; "Expertise with Maces"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4860
		ret

code_4860:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2429	; "skbMaceIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2433	; "Mace Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_48e8
		ret

code_48e8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2440	; "skbMaceV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2449	; "Mace Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4970
		ret

code_4970:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_245c	; "skbUnarmedCombat"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_49f8
		ret

code_49f8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_246d	; "skbUnarmedCombatI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_247f	; "Familiarity with Unarmed Combat"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4a81
		ret

code_4a81:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_249f	; "skbUnarmedCombatII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_24b2	; "Unarmed Combat Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4b0a
		ret

code_4b0a:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_24cd	; "skbUnarmedCombatIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_24e1	; "Expertise with Unarmed Combat"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4b93
		ret

code_4b93:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_24ff	; "skbUnarmedCombatIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2512	; "Unarmed Combat Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4c1c
		ret

code_4c1c:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2529	; "skbUnarmedCombatV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_253b	; "Unarmed Combat Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4ca5
		ret

code_4ca5:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2558	; "skbThrowingWeapon"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4d2e
		ret

code_4d2e:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_256a	; "skbThrowingWeaponI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_257d	; "Familiarity with Throwing Weapons"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4db7
		ret

code_4db7:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_259f	; "skbThrowingWeaponII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_25b3	; "Throwing Weapon Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4e40
		ret

code_4e40:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_25cf	; "skbThrowingWeaponIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_25e4	; "Expertise with Throwing Weapons"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4ec9
		ret

code_4ec9:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2604	; "skbThrowingWeaponIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2618	; "Throwing Weapon Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4f52
		ret

code_4f52:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2630	; "skbThrowingWeaponV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2643	; "Throwing Weapon Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_4fdb
		ret

code_4fdb:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2661	; "skbAcrobatic"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5064
		ret

code_5064:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_266e	; "skbAcrobaticI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_267c	; "Familiarity with Acrobatics"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_50ed
		ret

code_50ed:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2698	; "skbAcrobaticII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_26a7	; "Acrobatic Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5176
		ret

code_5176:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_26bd	; "skbAcrobaticIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_26cd	; "Expertise with Acrobatics"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_51ff
		ret

code_51ff:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_26e7	; "skbAcrobaticIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_26f6	; "Acrobatic Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5288
		ret

code_5288:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2708	; "skbAcrobaticV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2716	; "Acrobatic Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5311
		ret

code_5311:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_272e	; "skbMaul"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_539a
		ret

code_539a:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2736	; "skbMaulI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_273f	; "Familiarity with Mauls"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5423
		ret

code_5423:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2756	; "skbMaulII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2760	; "Maul Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_54ac
		ret

code_54ac:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2771	; "skbMaulIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_277c	; "Expertise with Mauls"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5535
		ret

code_5535:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2791	; "skbMaulIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_279b	; "Maul Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_55be
		ret

code_55be:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_27a8	; "skbMaulV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_27b1	; "Maul Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5647
		ret

code_5647:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_27c4	; "skbSorcery"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_56d0
		ret

code_56d0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_27cf	; "skbSorceryI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_27db	; "Familiar Sorceries"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5759
		ret

code_5759:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_27ee	; "skbSorceryII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_27fb	; "Sorcery Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_57e2
		ret

code_57e2:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2811	; "skbSorceryIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_281f	; "Expert Sorceries"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_586b
		ret

code_586b:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2830	; "skbSorceryIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_283d	; "Sorcery Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_58f4
		ret

code_58f4:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_284d	; "skbSorceryV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2859	; "Sorcery Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_597d
		ret

code_597d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_286f	; "skbElementalism"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5a06
		ret

code_5a06:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_287f	; "skbElementalismI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2890	; "Familiar Elemental Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5a8f
		ret

code_5a8f:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_28aa	; "skbElementalismII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_28bc	; "Elementalism Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5b18
		ret

code_5b18:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_28d7	; "skbElementalismIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_28ea	; "Expert Elemental Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5ba1
		ret

code_5ba1:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2902	; "skbElementalismIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2914	; "Elementalism Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5c2a
		ret

code_5c2a:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2929	; "skbElementalismV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_293a	; "Elementalism Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5cb3
		ret

code_5cb3:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2955	; "skbMysticism"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5d3c
		ret

code_5d3c:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2962	; "skbMysticismI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2970	; "Familiar Mystic Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5dc5
		ret

code_5dc5:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2987	; "skbMysticismII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2996	; "Mysticism Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5e4e
		ret

code_5e4e:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_29ae	; "skbMysticismIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_29be	; "Expert Mystic Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5ed7
		ret

code_5ed7:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_29d3	; "skbMysticismIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_29e2	; "Mysticism Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5f60
		ret

code_5f60:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_29f4	; "skbMysticismV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2a02	; "Mysticism Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_5fe9
		ret

code_5fe9:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2a1a	; "skbThaumaturgy"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6072
		ret

code_6072:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2a29	; "skbThaumaturgyI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2a39	; "Familiar Thaumaturgical Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_60fb
		ret

code_60fb:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2a58	; "skbThaumaturgyII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2a69	; "Thaumaturgy Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6184
		ret

code_6184:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2a83	; "skbThaumaturgyIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2a95	; "Expert Thaumaturgical Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_620d
		ret

code_620d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2ab2	; "skbThaumaturgyIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2ac3	; "Thaumaturgy Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6296
		ret

code_6296:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2ad7	; "skbThaumaturgyV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2ae7	; "Thaumaturgy Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_631f
		ret

code_631f:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2b01	; "skbNecromancy"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_63a8
		ret

code_63a8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2b0f	; "skbNecromancyI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2b1e	; "Familiar Necromancy Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6431
		ret

code_6431:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2b39	; "skbNecromancyII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2b49	; "Necromancy Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_64ba
		ret

code_64ba:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2b62	; "skbNecromancyIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2b73	; "Expert Necromancy Spells"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6543
		ret

code_6543:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2b8c	; "skbNecromancyIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2b9c	; "Necromancy Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_65cc
		ret

code_65cc:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2baf	; "skbNecromancyV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2bbe	; "Necromancy Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6655
		ret

code_6655:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2bd7	; "skbTheurgism"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_66de
		ret

code_66de:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2be4	; "skbTheurgismI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2bf2	; "Familiar Theurgism"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6767
		ret

code_6767:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2c05	; "skbTheurgismII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2c14	; "Theurgism Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_67f0
		ret

code_67f0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2c2c	; "skbTheurgismIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2c3c	; "Theurgism Expertise"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6879
		ret

code_6879:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2c50	; "skbTheurgismIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2c5f	; "Theurgism Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6902
		ret

code_6902:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2c71	; "skbTheurgismV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2c7f	; "Theurgism Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_698b
		ret

code_698b:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2c97	; "skbAlchemy"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6a14
		ret

code_6a14:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2ca2	; "skbAlchemyI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2cae	; "Familiar Alchemy"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6a9d
		ret

code_6a9d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2cbf	; "skbAlchemyII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2ccc	; "Alchemy Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6b26
		ret

code_6b26:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2ce2	; "skbAlchemyIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2cf0	; "Alchemy Expertise"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6baf
		ret

code_6baf:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2d02	; "skbAlchemyIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2d0f	; "Alchemy Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6c38
		ret

code_6c38:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2d1f	; "skbAlchemyV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2d2b	; "Alchemy Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6cc1
		ret

code_6cc1:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2d41	; "skbWeaponsmithing"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6d4a
		ret

code_6d4a:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2d53	; "skbWeaponsmithingI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2d66	; "Familiar Weaponsmithing"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6dd3
		ret

code_6dd3:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2d7e	; "skbWeaponsmithingII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2d92	; "Weaponsmithing Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6e5c
		ret

code_6e5c:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2daf	; "skbWeaponsmithingIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2dc4	; "Expert Weaponsmithing"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6ee5
		ret

code_6ee5:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2dda	; "skbWeaponsmithingIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2dee	; "Weaponsmithing Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6f6e
		ret

code_6f6e:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2e05	; "skbWeaponsmithingV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2e18	; "Weaponsmithing Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_6ff7
		ret

code_6ff7:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2e35	; "skbArmorcrafting"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7080
		ret

code_7080:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2e46	; "skbArmorcraftingI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2e58	; "Familiar Armorcrafting"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7109
		ret

code_7109:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2e6f	; "skbArmorcraftingII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2e82	; "Armorcrafting Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7192
		ret

code_7192:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2e9e	; "skbArmorcraftingIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2eb2	; "Expert Armorcrafting"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_721b
		ret

code_721b:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2ec7	; "skbArmorcraftingIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2eda	; "Armorcrafting Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_72a4
		ret

code_72a4:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2ef0	; "skbArmorcraftingV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2f02	; "Armorcrafting Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_732d
		ret

code_732d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2f1e	; "skbTracking"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_73b6
		ret

code_73b6:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2f2a	; "skbTrackingI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2f37	; "Familiar Tracking"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_743f
		ret

code_743f:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2f49	; "skbTrackingII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2f57	; "Tracking Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_74c8
		ret

code_74c8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2f6e	; "skbTrackingIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2f7d	; "Tracking Expertise"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7551
		ret

code_7551:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2f90	; "skbTrackingIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2f9e	; "Tracking Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_75da
		ret

code_75da:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2faf	; "skbTrackingV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2fbc	; "Tracking Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7663
		ret

code_7663:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2fd3	; "skbHealing"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_76ec
		ret

code_76ec:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2fde	; "skbHealingI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_2fea	; "Familiar Healing"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7775
		ret

code_7775:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_2ffb	; "skbHealingII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3008	; "Healing Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_77fe
		ret

code_77fe:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_301e	; "skbHealingIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_302c	; "Healing Expertise"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7887
		ret

code_7887:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_303e	; "skbHealingIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_304b	; "Healing Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7910
		ret

code_7910:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_305b	; "skbHealingV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3067	; "Healing Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7999
		ret

code_7999:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_307d	; "skbPickpocketing"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7a22
		ret

code_7a22:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_308e	; "skbPickpocketingI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_30a0	; "Familiar Pickpocketing"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7aab
		ret

code_7aab:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_30b7	; "skbPickpocketingII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_30ca	; "Pickpocketing Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7b34
		ret

code_7b34:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_30e6	; "skbPickpocketingIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_30fa	; "Pickpocketing Expertise"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7bbd
		ret

code_7bbd:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3112	; "skbPickpocketingIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3125	; "Pickpocketing Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7c46
		ret

code_7c46:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_313b	; "skbPickpocketingV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_314d	; "Pickpocketing Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7ccf
		ret

code_7ccf:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3169	; "skbTraps"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7d58
		ret

code_7d58:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3172	; "skbTrapsI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_317c	; "Basics of Trap Detection and Disarming"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7de1
		ret

code_7de1:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_31a3	; "skbTrapsII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_31ae	; "Proficient Trap Manipulation"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7e6a
		ret

code_7e6a:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_31cb	; "skbTrapsIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_31d7	; "Expert Discourse on Traps"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7ef3
		ret

code_7ef3:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_31f1	; "skbTrapsIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_31fc	; "Mastery of Traps"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_7f7c
		ret

code_7f7c:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_320d	; "skbTrapsV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3217	; "Disarming Traps: A Grand-Master Treatment"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8005
		ret

code_8005:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3241	; "skbLockpicking"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_808e
		ret

code_808e:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3250	; "skbLockpickingI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3260	; "Basics of Lockpicking"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8117
		ret

code_8117:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3276	; "skbLockpickingII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3287	; "Lockpicking Proficiency"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_81a0
		ret

code_81a0:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_329f	; "skbLockpickingIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_32b1	; "Expert Lockpicking"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8229
		ret

code_8229:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_32c4	; "skbLockpickingIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_32d5	; "Picking Masterful Locks"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_82b2
		ret

code_82b2:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_32ed	; "skbLockpickingV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_32fd	; "Lockpicking Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_833b
		ret

code_833b:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3317	; "skbMeditation"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_83c4
		ret

code_83c4:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3325	; "skbMeditationI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3334	; "The Basics of Meditation"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_844d
		ret

code_844d:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_334d	; "skbMeditationII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_335d	; "Becoming Proficient in Meditation"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_84d6
		ret

code_84d6:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_337f	; "skbMeditationIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3390	; "Meditation: Revelations of an Expert"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_855f
		ret

code_855f:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_33b5	; "skbMeditationIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_33c5	; "Mastering Meditation"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_85e8
		ret

code_85e8:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_33da	; "skbMeditationV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_33e9	; "Meditation Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8671
		ret

code_8671:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3402	; "skbCriticalStriking"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_86fa
		ret

code_86fa:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3416	; "skbCriticalStrikingI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_342b	; "The Basics of Critical Striking"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8783
		ret

code_8783:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_344b	; "skbCriticalStrikingII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3461	; "Critical Striking Proficiencies"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_880c
		ret

code_880c:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3481	; "skbCriticalStrikingIII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3498	; "Critical Striking: An Expert Discourse"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8895
		ret

code_8895:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_34bf	; "skbCriticalStrikingIV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_34d5	; "Mastery of Critical Striking"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_891e
		ret

code_891e:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_34f2	; "skbCriticalStrikingV"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3507	; "Critical Striking Grand-Mastery"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_89a7
		ret

code_89a7:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3527	; "skbShieldUse"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_1db8	; "Book"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8a30
		ret

code_8a30:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_3534	; "skbShieldUseI"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_3542	; "The Basics of Shield Usage"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8ab9
		ret

code_8ab9:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

::doit:
		pushi	$20		; 32, ' ', name
		push1
		lofsa	string_355d	; "skbShieldUseII"
		push
		pushi	$315		; 789, pName
		push1
		lofsa	string_356c	; "Proficiencies in Shield Usage"
		push
		pushi	$f		; 15, loop
		push1
		push0
		pushi	$3ed		; 1005, pBaseView
		push1
		pushi	$c7ce		; -14386
		pushi	$3ec		; 1004, pAction
		push1
		pushi	$1d		; 29, brTop
		pushi	$3ea		; 1002, pClutStart
		push1
		pushi	$53		; 83, 'S', restore
		pushi	$330		; 816, pColor
		push1
		pushi	$ff		; 255, asInteger
		pushi	$415		; 1045, pBaseBitsLo
		push1
		push1
		pushi	$416		; 1046, pBaseBitsHi
		push1
		pushi	$42		; 66, 'B', cantBeHere
		lap	param[$1]
		send	$36
		bnot
		pushi	$373		; 883, setAction
		push1
		pushi	$3ec		; 1004, pAction
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		lag	global[$f3]
		bnt	code_8b42
		ret

code_8b42:	pushi	$387		; 903, addBase
		push1
		class	BDescribed
		push
		lap	param[$1]
		send	$6
		bnot
		pushi	$4c1		; 1217, pBulk
		push1
		push0
		pushi	$4c2		; 1218, pWeight
		push1
		pushi	$a		; 10, inTop
		pushi	$387		; 903, addBase
		push1
		class	BCarryable
		push
		lap	param[$1]
		send	$6
		bnot
		send	$c
		bnot
		pushi	$387		; 903, addBase
		push1
		class	BScroll
		push
		lap	param[$1]
		send	$6
		bnot
		ret

StockObjInitter1::doit:
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		pushi	$9f		; 159, add
		push1
		lofsa	
		push
		push2
		pushi	$9cb6		; -25418
		push0
		callk	kernel_2, $4
		bnot
		send	$6
		bnot
		ret

