SCENE 6005 axl, SCENE, "Simmen's Home"
LOCK 1
COMPARE #<num.peopleInScene>, "1"
IF>,@toomanypeople
STRCMP #<str.soul>, "Soul 1387"
IF=, @maydesign
ACTOR 0, "Simmen Stenil", ss, 1,25,60
ACTOR 1, "Blue Bed", beds, 4,15,75
ACTOR 2, "Normal Radio", radio, 2,40,80
ACTOR 3, "Mr. Danner Figurine", newdanner, 1,70,75
ACTOR 4, "Black TV", tv2, 1,65,40
SET homeitem1activate, bed
SET homeitem2activate, player
SET homeitem3activate, danner
SET homeitem4activate, tv
SET maydesign6005, 0
MUSIC anime8
0: Welcome to my home!
H: Wait... but weren't you at the Masters' Camp?
0: Umm, well...
H: AND Hot or Cold?
0: True, yes, but...
H: Then HOW did you get here?
0: Well, I could answer that, but wouldn't it just be better of we all just forgot about this and played some Quadris?
GAME 8
H: ... No, it wouldn't be...
0: Oh well!
END

@toomanypeople
ACTOR 0, "Simmen Stenil", ss, 1,25,60
0: Sorry dudes, but I can only show the house to one person at a time!
0: Come back when you're along, alright?
END

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

@candesign
@candesign0
@candesignready
MUSIC #<homeitemradio>
BKGND #<homewallpaper>
H: Design time!
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 #<maydesign6005>, 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 #<maydesign6005>, 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

@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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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 #<maydesign6005>, 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, 6005
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 #<maydesign6005>, 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