SCENE 6002 wiseman, SCENE, "Marva's Home"
LOCK 1
COMPARE #<num.peopleInScene>, "1"
IF>,@toomanypeople
STRCMP #<str.soul>, "Soul 1544"
IF=, @maydesign
ACTOR 0, "Marva", ronnie, 1,25,60
ACTOR 1, "Heart Bed", beds, 5,20,80
ACTOR 2, "Normal Radio", radio, 2,30,60
SET homeitem1activate, bed
SET homeitem2activate, player
SET maydesign6002, 0
MUSIC homemarva
0: Hi %2, how are you doing today?
0: Say, would you like to play a game?
0: I have blackjack; I guarantee you, it's fun!
GAME 4
0: Go ahead and use any furniture you'd like to!
END

@toomanypeople
ACTOR 0, "Marva", ronnie, 1,25,60
0: Oh, I'm sorry, but my house is too small for all of you.
0: Could you please come back when you're alone?
END

@maydesign
SET maydesign6002, 1
ACTOR 0, "Designer", ronnie, 1,25,60
GOTO @candesign#<numberofitems>
END

@candesign
@candesign0
@candesignready
MUSIC #<homeitemradio>
BGKND #<homewallpaper>
H: Let's get to work!
END

@candesign1
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
GOTO @candesignready
END

@candesign2
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
GOTO @candesignready
END

@candesign3
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
GOTO @candesignready
END

@candesign4
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
GOTO @candesignready
END

@candesign5
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
GOTO @candesignready
END

@candesign6
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
GOTO @candesignready
END

@candesign7
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
GOTO @candesignready
END

@candesign8
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
GOTO @candesignready
END

@candesign9
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
GOTO @candesignready
END

@candesign10
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
GOTO @candesignready
END

@candesign11
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
GOTO @candesignready
END

@candesign12
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
GOTO @candesignready
END

@candesign13
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
GOTO @candesignready
END

@candesign14
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
GOTO @candesignready
END

@candesign15
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
ACTOR 15, #<homeitem15name>, #<homeitem15skin>, #<homeitem15grame>,#<homeitem15x>,#<homeitem15y>
GOTO @candesignready
END

;-------------------------------------
;
; This part is for putting stuff ONTO THE SCENE
;
;-------------------------------------

@eventactorgive0
COMPARE #<maydesign6002>, 1
IF= @placeitem
0: Thank you, but I can't accept that.
0: Here, you may have this #<item.name> back.
GIVE I#<item.id>
END

@eventactorclick0
COMPARE #<maydesign6002>, 1
IF< @end
IF> @end
0: What can I help you with?
MENU "Set New Wallpaper=@wallpaper","Cancel=@end"
END

@end
END

@wallpaper
0: Changing your wallpaper costs 5000G.
COMPARE #<num.hostgp>, 5000
IF< @cantaffordwallpaper
0: Go into your SCENES folder. (Most likely at c:\WoS\Worlds\Master_of_Reality\scenes)
0: Please specify the name of the image you would like to be the wallpaper.
ASK 9999
SET homewallpaper, #<lastask>
BKGND #<homewallpaper>
0: You'd like this to be your wallpaper?
ASK 9999
IF Qn, @wallpaper
TAKE G5000
0: Confirmed. This will be your wallpaper until you change it.
END

@cantaffordwallpaper
0: Sorry, but you're a little short on gold!
END

@placeitem
; All items will be between the numbers 530 and 599
COMPARE #<item.id>, 530
IF< @notfurniture
COMPARE #<item.id>, 599
IF> @notfurniture
SET currentitem, #<item.id>
COMPARE #<numberofitems>, 15
IF= @toomanyitems
IF> @toomanyitems
@placeitem2
ADD numberofitems, 1
0: Please stand where you would like me to put this item. Say anything when you are done.
ASK 9999
SET homeitem#<numberofitems>, #<item.id>
SET homeitem#<numberofitems>name, #<item.name>
SET homeitem#<numberofitems>x, #<num.hostX>
SET homeitem#<numberofitems>y, #<num.hostY>
; Here is, when we have some of the items done, it will set the attributes based on the item id.
GOTO @setitem#<item.id>
END

;---------------------------------------------
;
; Here's the list of items to be CHECKED
;
;---------------------------------------------
;
;
;
;------------------------------------------
; BEDS
;------------------------------------------

@setitem530
SET homeitem#<numberofitems>activate, "bed"
SET homeitem#<numberofitems>skin, "beds"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Purple Bed", beds, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem531
SET homeitem#<numberofitems>activate, "bed"
SET homeitem#<numberofitems>skin, "beds"
SET homeitem#<numberofitems>frame, "2"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Green Bed", beds, 2,#<actorx>,#<actory>
0: Item placed.
END

@setitem532
SET homeitem#<numberofitems>activate, "bed"
SET homeitem#<numberofitems>skin, "beds"
SET homeitem#<numberofitems>frame, "3"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Red Bed", beds, 3,#<actorx>,#<actory>
0: Item placed.
END

@setitem533
SET homeitem#<numberofitems>activate, "bed"
SET homeitem#<numberofitems>skin, "beds"
SET homeitem#<numberofitems>frame, "4"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Blue Bed", beds, 4,#<actorx>,#<actory>
0: Item placed.
END




;------------------------------------------
; TELEVISIONS
;------------------------------------------

@setitem560
SET homeitem#<numberofitems>activate, "tv"
SET homeitem#<numberofitems>skin, "tv2"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Black TV", tv2, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem561
SET homeitem#<numberofitems>activate, "tv"
SET homeitem#<numberofitems>skin, "tv1"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Retro TV", tv1, 1,#<actorx>,#<actory>
0: Item placed.
END




;------------------------------------------
; RADIOS
;------------------------------------------

@setitem555
SET homeitem#<numberofitems>activate, "radio"
SET homeitem#<numberofitems>skin, "radio"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Normal Radio", radio, 1,#<actorx>,#<actory>
0: Item placed.
END


;------------------------------------------
; FIGURINES
;------------------------------------------

@setitem545
SET homeitem#<numberofitems>activate, "beggar"
SET homeitem#<numberofitems>skin, "beggar"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Beggar Figurine", beggar, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem546
SET homeitem#<numberofitems>activate, "axl"
SET homeitem#<numberofitems>skin, "axl"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Axl Figurine", axl, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem547
SET homeitem#<numberofitems>activate, "rose"
SET homeitem#<numberofitems>skin, "rose"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Rose Figurine", rose, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem548
SET homeitem#<numberofitems>activate, "danner"
SET homeitem#<numberofitems>skin, "danner"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Mr. Danner Figurine", danner, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem549
SET homeitem#<numberofitems>activate, "mayor"
SET homeitem#<numberofitems>skin, "ronnie"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Mayor Figurine", ronnie, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem550
SET homeitem#<numberofitems>activate, "kingjoe"
SET homeitem#<numberofitems>skin, "kingjoe"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "King Joe Figurine", kingjoe, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem551
SET homeitem#<numberofitems>activate, "yoda"
SET homeitem#<numberofitems>skin, "adoy"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Yoda Figurine", adoy, 1,#<actorx>,#<actory>
0: Item placed.
END

;----------------------------------------
; BOSS ARENA FIGURINES
;----------------------------------------

@setitem578
SET homeitem#<numberofitems>activate, "alpha"
SET homeitem#<numberofitems>skin, "alpha"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Alpha Figurine", alpha, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem579
SET homeitem#<numberofitems>activate, "delta"
SET homeitem#<numberofitems>skin, "darkwanderer"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Delta Figurine", darkwanderer, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem580
SET homeitem#<numberofitems>activate, "wompas"
SET homeitem#<numberofitems>skin, "danMisc"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Wompas Cat Figurine", wompas, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem581
SET homeitem#<numberofitems>activate, "danner"
SET homeitem#<numberofitems>skin, "newdanner"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Mr. Danner Figurine", newdanner, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem582
SET homeitem#<numberofitems>activate, "gnome"
SET homeitem#<numberofitems>skin, "gardengnome"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Garden Gnome Figurine", gardengnome, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem583
SET homeitem#<numberofitems>activate, "rose"
SET homeitem#<numberofitems>skin, "rose"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Rose Figurine", rose, 1,#<actorx>,#<actory>
0: Item placed.
END

@setitem584
SET homeitem#<numberofitems>activate, "daemon"
SET homeitem#<numberofitems>skin, "daemon"
SET homeitem#<numberofitems>frame, "1"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Daemon Figurine", daemon, 1,#<actorx>,#<actory>
0: Item placed.
END


;----------------------------------------
; VALINTINE'S DAY
;----------------------------------------

@setitem576
SET homeitem#<numberofitems>activate, "bed"
SET homeitem#<numberofitems>skin, "beds"
SET homeitem#<numberofitems>frame, "5"
SET currentactorsetx, "homeitem#<numberofitems>x"
SET actorx, *#<currentactorsetx>
SET currentactorsety, "homeitem#<numberofitems>y"
SET actory, *#<currentactorsety>
ACTOR #<numberofitems>, "Heart Bed", beds, 5,#<actorx>,#<actory>
0: Item placed.
END


;----------------------------------------

@toomanyitems
0: I'm sorry, but you have too many items already out.
0: Please put some away before you put any more out.
0: Here is your #<item.name> back.
GIVE I#<item.id>
END

@notfurniture
0: That's not a peice of furnitue, and thus ususable here.
0: Please give me furniture if you wish to decorate.
0: Here is your #<item.name> back.
GIVE I#<item.id>
END

;---------------------------------------
;
; This part is for PUTTING UP STUFF
;
;---------------------------------------

@eventactorattack1
SET currentactor, 1
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem1activate>
GIVE I#<homeitem1>
SET cipickup, 1
SET nipickup, 2
GOTO @actorpickup
END

@eventactorclick1pickupactors
ACTOR 1, #<homeitem1name>, #<homeitem1skin>, #<homeitem1frame>,#<homeitem1x>,#<homeitem1y>
COMPARE #<numberofitems>, 2
IF= @eventactorclick1pickupover
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
COMPARE #<numberofitems>, 3
IF= @eventactorclick1pickupover
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
COMPARE #<numberofitems>, 4
IF= @eventactorclick1pickupover
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
COMPARE #<numberofitems>, 5
IF= @eventactorclick1pickupover
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
COMPARE #<numberofitems>, 6
IF= @eventactorclick1pickupover
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
COMPARE #<numberofitems>, 7
IF= @eventactorclick1pickupover
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
COMPARE #<numberofitems>, 8
IF= @eventactorclick1pickupover
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick1pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick1pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick1pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick1pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick1pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick1pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick1pickupover
END


@eventactorclick1pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack2
SET currentactor, 2
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem2activate>
GIVE I#<homeitem2>
SET cipickup, 2
SET nipickup, 3
GOTO @actorpickup
END

@eventactorclick2pickupactors
ACTOR 2, #<homeitem2name>, #<homeitem2skin>, #<homeitem2frame>,#<homeitem2x>,#<homeitem2y>
COMPARE #<numberofitems>, 3
IF= @eventactorclick2pickupover
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
COMPARE #<numberofitems>, 4
IF= @eventactorclick2pickupover
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
COMPARE #<numberofitems>, 5
IF= @eventactorclick2pickupover
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
COMPARE #<numberofitems>, 6
IF= @eventactorclick2pickupover
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
COMPARE #<numberofitems>, 7
IF= @eventactorclick2pickupover
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
COMPARE #<numberofitems>, 8
IF= @eventactorclick2pickupover
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick2pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick2pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick2pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick2pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick2pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick2pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick2pickupover
END

@eventactorclick2pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack3
SET currentactor, 3
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem3activate>
GIVE I#<homeitem3>
SET cipickup, 3
SET nipickup, 4
GOTO @actorpickup
END

@eventactorclick3pickupactors
ACTOR 3, #<homeitem3name>, #<homeitem3skin>, #<homeitem3frame>,#<homeitem3x>,#<homeitem3y>
COMPARE #<numberofitems>, 4
IF= @eventactorclick3pickupover
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
COMPARE #<numberofitems>, 5
IF= @eventactorclick3pickupover
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
COMPARE #<numberofitems>, 6
IF= @eventactorclick3pickupover
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
COMPARE #<numberofitems>, 7
IF= @eventactorclick3pickupover
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
COMPARE #<numberofitems>, 8
IF= @eventactorclick3pickupover
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick3pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick3pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick3pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick3pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick3pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick3pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick3pickupover
END

@eventactorclick3pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack4
SET currentactor, 4
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem4activate>
GIVE I#<homeitem4>
SET cipickup, 4
SET nipickup, 5
GOTO @actorpickup
END

@eventactorclick4pickupactors
ACTOR 4, #<homeitem4name>, #<homeitem4skin>, #<homeitem4frame>,#<homeitem4x>,#<homeitem4y>
COMPARE #<numberofitems>, 5
IF= @eventactorclick4pickupover
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
COMPARE #<numberofitems>, 6
IF= @eventactorclick4pickupover
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
COMPARE #<numberofitems>, 7
IF= @eventactorclick4pickupover
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
COMPARE #<numberofitems>, 8
IF= @eventactorclick4pickupover
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick4pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick4pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick4pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick4pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick4pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick4pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick4pickupover
END

@eventactorclick4pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack5
SET currentactor, 5
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem5activate>
GIVE I#<homeitem5>
SET cipickup, 5
SET nipickup, 6
GOTO @actorpickup
END

@eventactorclick5pickupactors
ACTOR 5, #<homeitem5name>, #<homeitem5skin>, #<homeitem5frame>,#<homeitem5x>,#<homeitem5y>
COMPARE #<numberofitems>, 6
IF= @eventactorclick5pickupover
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
COMPARE #<numberofitems>, 7
IF= @eventactorclick5pickupover
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
COMPARE #<numberofitems>, 8
IF= @eventactorclick5pickupover
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick5pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick5pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick5pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick5pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick5pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick5pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick5pickupover
END

@eventactorclick5pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack6
SET currentactor, 6
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem6activate>
GIVE I#<homeitem6>
SET cipickup, 6
SET nipickup, 7
GOTO @actorpickup
END

@eventactorclick6pickupactors
ACTOR 6, #<homeitem6name>, #<homeitem6skin>, #<homeitem6frame>,#<homeitem6x>,#<homeitem6y>
COMPARE #<numberofitems>, 7
IF= @eventactorclick6pickupover
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
COMPARE #<numberofitems>, 8
IF= @eventactorclick6pickupover
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick6pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick6pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick6pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick6pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick6pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick6pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick6pickupover
END

@eventactorclick6pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack7
SET currentactor, 7
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem7activate>
GIVE I#<homeitem7>
SET cipickup, 7
SET nipickup, 8
GOTO @actorpickup
END

@eventactorclick7pickupactors
ACTOR 7, #<homeitem7name>, #<homeitem7skin>, #<homeitem7frame>,#<homeitem7x>,#<homeitem7y>
COMPARE #<numberofitems>, 8
IF= @eventactorclick7pickupover
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick7pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick7pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick7pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick7pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick7pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick7pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick7pickupover
END

@eventactorclick7pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END


;-------------------------------------

@eventactorattack8
SET currentactor, 8
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem8activate>
GIVE I#<homeitem8>
SET cipickup, 8
SET nipickup, 9
GOTO @actorpickup
END

@eventactorclick8pickupactors
ACTOR 8, #<homeitem8name>, #<homeitem8skin>, #<homeitem8frame>,#<homeitem8x>,#<homeitem8y>
COMPARE #<numberofitems>, 9
IF= @eventactorclick8pickupover
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick8pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick8pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick8pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick8pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick8pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick8pickupover
END

@eventactorclick8pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack9
SET currentactor, 9
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem9activate>
GIVE I#<homeitem9>
SET cipickup, 9
SET nipickup, 10
GOTO @actorpickup
END

@eventactorclick9pickupactors
ACTOR 9, #<homeitem9name>, #<homeitem9skin>, #<homeitem9frame>,#<homeitem9x>,#<homeitem9y>
COMPARE #<numberofitems>, 10
IF= @eventactorclick9pickupover
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick9pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick9pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick9pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick9pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick9pickupover
END

@eventactorclick9pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack10
SET currentactor, 10
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem10activate>
GIVE I#<homeitem10>
SET cipickup, 10
SET nipickup, 11
GOTO @actorpickup
END

@eventactorclick10pickupactors
ACTOR 10, #<homeitem10name>, #<homeitem10skin>, #<homeitem10frame>,#<homeitem10x>,#<homeitem10y>
COMPARE #<numberofitems>, 11
IF= @eventactorclick10pickupover
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick10pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick10pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick10pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick10pickupover
END

@eventactorclick10pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack11
SET currentactor, 11
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem11activate>
GIVE I#<homeitem11>
SET cipickup, 11
SET nipickup, 12
GOTO @actorpickup
END

@eventactorclick11pickupactors
ACTOR 11, #<homeitem11name>, #<homeitem11skin>, #<homeitem11frame>,#<homeitem11x>,#<homeitem11y>
COMPARE #<numberofitems>, 12
IF= @eventactorclick11pickupover
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick11pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick11pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick11pickupover
END

@eventactorclick11pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack12
SET currentactor, 12
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem12activate>
GIVE I#<homeitem12>
SET cipickup, 12
SET nipickup, 13
GOTO @actorpickup
END

@eventactorclick12pickupactors
ACTOR 12, #<homeitem12name>, #<homeitem12skin>, #<homeitem12frame>,#<homeitem12x>,#<homeitem12y>
COMPARE #<numberofitems>, 13
IF= @eventactorclick12pickupover
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick12pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick12pickupover
END

@eventactorclick12pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack13
SET currentactor, 13
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem13activate>
GIVE I#<homeitem13>
SET cipickup, 13
SET nipickup, 14
GOTO @actorpickup
END

@eventactorclick13pickupactors
ACTOR 13, #<homeitem13name>, #<homeitem13skin>, #<homeitem13frame>,#<homeitem13x>,#<homeitem13y>
COMPARE #<numberofitems>, 14
IF= @eventactorclick13pickupover
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick13pickupover
END

@eventactorclick13pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;-------------------------------------

@eventactorattack14
SET currentactor, 14
COMPARE #<maydesign6002>, 0
IF=, @activate#<homeitem14activate>
GIVE I#<homeitem14>
SET cipickup, 14
SET nipickup, 15
GOTO @actorpickup
END

@eventactorclick14pickupactors
ACTOR 14, #<homeitem14name>, #<homeitem14skin>, #<homeitem14frame>,#<homeitem14x>,#<homeitem14y>
COMPARE #<numberofitems>, 15
IF= @eventactorclick14pickupover
END

@eventactorclick14pickupover
MOVE #<numberofitems>,-100,-100,1
SUB numberofitems, 1
N: Item has been picked up.
END

;------------------------------------

@eventactorattack15
COMPARE #<maydesign6002>, 0
IF=, @activate
; There is no actor subtracting for this actor
SUB numberofitems, 1
GIVE I#<homeitem15>
MOVE 15,-100,-100,1
N: Item has been picked up.
END

;------------------------------------------------------------

@actorpickup
COMPARE #<currentactor>, #<numberofitems>
IF= @eventactorclick#<currentactor>pickupover
@actorpickup2
COMPARE #<numberofitems>, #<cipickup>
IF= @eventactorclick#<currentactor>pickupactors
SET hi, "homeitem#<nipickup>"
SET hiskin, "homeitem#<nipickup>skin"
SET hiframe, "homeitem#<nipickup>frame"
SET hiname, "homeitem#<nipickup>name"
SET hix, "homeitem#<nipickup>x"
SET hiy, "homeitem#<nipickup>y"
SET hiactivate, "homeitem#<nipickup>activate"
SET homeitem#<cipickup>, *#<hi>
SET homeitem#<cipickup>skin, *#<hiskin>
SET homeitem#<cipickup>frame, *#<hiframe>
SET homeitem#<cipickup>name, *#<hiname>
SET homeitem#<cipickup>x, *#<hix>
SET homeitem#<cipickup>y, *#<hiy>
SET homeitem#<cipickup>activate, *#<hiactivate>
ADD cipickup, 1
ADD nipickup, 1
GOTO @actorpickup2

;-----------------------------------------------------
;
; This section is for INTERACTING WITH ITEMS
;
;-----------------------------------------------------

@eventactorclick1
SET currentactor, 1
GOTO @activate#<homeitem1activate>
END

@eventactorclick2
SET currentactor,2
GOTO @activate#<homeitem2activate>
END

@eventactorclick3
SET currentactor,3
GOTO @activate#<homeitem3activate>
END

@eventactorclick4
SET currentactor,4
GOTO @activate#<homeitem4activate>
END

@eventactorclick5
SET currentactor,5
GOTO @activate#<homeitem5activate>
END

@eventactorclick6
SET currentactor,6
GOTO @activate#<homeitem6activate>
END

@eventactorclick7
SET currentactor,7
GOTO @activate#<homeitem7activate>
END

@eventactorclick8
SET currentactor,8
GOTO @activate#<homeitem8activate>
END

@eventactorclick9
SET currentactor,9
GOTO @activate#<homeitem9activate>
END

@eventactorclick10
SET currentactor,10
GOTO @activate#<homeitem10activate>
END

@eventactorclick11
SET currentactor,11
GOTO @activate#<homeitem11activate>
END

@eventactorclick12
SET currentactor,12
GOTO @activate#<homeitem12activate>
END

@eventactorclick13
SET currentactor,13
GOTO @activate#<homeitem13activate>
END

@eventactorclick14
SET currentactor,14
GOTO @activate#<homeitem14activate>
END

@eventactorclick15
SET currentactor,15
GOTO @activate#<homeitem15activate>
END

@activate
0: Sorry, but only the one who owns the house can use the items!
END

;-------------------
; Appliances
;-------------------

@activatebed
MENU "Sleep=@activatebed1","Don't Sleep=@activatebed2"
END
@activatebed1
SET homenumber, 6001
GOTO SCENE 157
END
@activatebed2
END

;-------------------
; Figurines
;-------------------

@activatebeggar
IF R33, @activatebeggar1
IF R50, @activatebeggar2
@activatebeggar3
SOUND soj2.wav
END
@activatebeggar1
SOUND sowplz.wav
END
@activatebeggar2
SOUND soj.wav
END

@activateaxl
SOUND axl1.wav
END

@activaterose
SOUND die1.wav
END

@activatedanner
IF R25, @activatedanner1
IF R33, @activatedanner2
IF R50, @activatedanner3
SOUND danner4.wav
END
@activatedanner1
SOUND danner1.wav
END
@activatedanner2
SOUND danner2.wav
END
@activatedanner3
SOUND danner3.wav
END

@activatemayor
IF R50, @activatemayor1
SOUND sitae2.wav
END
@activatemayor1
SOUND sitae1.wav
END

@activatekingjoe
SOUND joe.wav
END

@activateyoda
SOUND yodapain.wav
END

@activatealpha
SOUND alpha1.wav
END

@activatedelta
END

@activatewompas
SOUND meow.wav
END

@activategnome
END

@activaterose
END

@activatedaemon
END

;--------------------------------
; TV AND CHANNELS
;--------------------------------

@activateTV
COMPARE #<maydesign6002>, 0
IF= @activateTVplay
MENU "#<TVchoice1>=@activateTV#<TVchoice1label>","#<TVchoice2>=@activateTV#<TVchoice2label>","Turn Off=@activateTVoff","Add a channel=@activateTVadd"
END

@activateTVplay
MENU "Mor' News=@activateTVnews","Supa' Sports=@activateTVsports","Turn Off=@activateTVoff"
END

@activateTVoff
SEL #<currentactor>
POSE 1
END

@activateTVadd
IF I565, @activateTVaddsscheck
@activateTVadd2
IF I566, @activateTVaddmncheck
@activateTVaddover
0: You have no more channels to add!
END

@activateTVaddsscheck
COMPARE #<TVssgiven>, 1
IF= @activateTVadd2
0: Would you like to add "Supa' Sports?"
ASK 9999
IF Qn, @activateTVadd2
SET TVssgiven, 1
ADD TVchannels, 1
SET TVchoice#<TVchannels>, "Supa' Sports"
SET TVchoice#<TVchannels>label, "sports"
GOTO @activateTVadd2
END

@activateTVaddmncheck
COMPARE #<TVmngiven>, 1
IF= @activateTVaddover
0: Would you like to add "Mor' News?"
ASK 9999
IF Qn, @activateTVaddover
SET TVmngiven, 1
ADD TVchannels, 1
SET TVchoice#<TVchannels>, "Mor' News"
SET TVchoice#<TVchannels>label, "news"
GOTO @activateTVaddover
END

@activateTVnews
SEL #<currentactor>
POSE 2
H: Hmm... I see...
H: It says that there is no problem with anything today.
H: Looks like another peaceful day in Master of Reality!
END

@activateTVsports
SEL #<currentactor>
POSE 3,4
H: Wahoo! Look at 'em go!
END

;--------------------------------
; RADIO
;--------------------------------

@activateradio
0: Please specify the name of the midi you would like to play.
0: You may find the name by going into the midi folder.
ASK 9999
MUSIC #<lastAsk>
0: You would like to play this song?
SET homeitemradio, #<lastask>
ASK 9999
IF Qn, @activateradio
0: Very well. This song will play whenever you enter the scene.
END

@activateplayer
END