/q delete warrenord.town.wagon
/q create warrenord.town.wagon
/q e n Warrenord Coach
/q e ToFind OnClickNPC Henrick
/q e ToFind IfInWorld warrenord
/q e ToFind IfPremium
/q e Visible False
/q e OnFind DoFind warrenord.town.wagon.greeting
/q e OnFind DoHearSound VILLAGER_YES

/q delete warrenord.town.wagon.greeting
/q create warrenord.town.wagon.greeting
/q e n Step Into the Wagon
/q e d ‘’Who’s there? Ah, welcome. Aye, climb in. Let me lend a hand if you’ll have it.’’
/q e OnFind DoFind warrenord.town.wagon.null
/q e OnFind DoUnfind warrenord.town.wagon.greeting
/q e OnFind DoUnfind warrenord.town.wagon.transport
/q e OnFind DoUnfind warrenord.town.wagon

/q delete warrenord.town.wagon.null
/q create warrenord.town.wagon.null
/q e Visible False

/q delete warrenord.town.wagon.transport
/q create warrenord.town.wagon.transport
/q e ToFind OnEnterRegion warrenord.wagonmain
/q e ToFind IfInWorld
/q e ToFind IfPremium
/q e Visible false
/q e OnFind DoFind warrenord.town.wagon.transport.message
/q e OnFind DoUnFind warrenord.town.wagon.transport.message
/q e OnFind DoFind warrenord.town.wagon.transport.list
/q e OnFind DoFind warrenord.town.wagon.transport.destination.noblemanor
/q e OnFind DoHearSound HORSE_IDLE
/q e OnComplete DoUnFind warrenord.town.wagon.transport.list
/q e OnComplete DoUnFind warrenord.town.wagon.transport.destination.noblemanor

/q delete warrenord.town.wagon.transport.message
/q create warrenord.town.wagon.transport.message
/q e n Ready to ride?
/q e d The aging coachman affectionately pats the horses and hoists himself up into the wagon. “Now, where shall we wander?” Just type <c>destinations<i> for a list of locations around Warrenord. Already know where you’re heading? Just type the destination name.
/q e Times 0

/q delete warrenord.town.wagon.transport.list
/q create warrenord.town.wagon.transport.list
/q e ToAdvance OnChat destinations
/q e ToAdvance IfInRegion warrenord.wagonmain
/q e Visible False
/q e OnComplete DoFind warrenord.town.wagon.transport.list.message

/q delete warrenord.town.wagon.transport.list.message
/q create warrenord.town.wagon.transport.list.message
/q e n Destination List
/q e d Fare is <c>20 Regals<i> for these destinations and is non-refundable. Type any of the following while in the wagon to travel: <c>Noble Manor<i>, <c>Noble Summer House<i>, <c>Alchemist<i>, <c>Mine<i>, <c>Watermill<i>, <c>Rowan Farm<i>.
/q e Times 0
/q e OnFind DoUnFind warrenord.town.wagon.transport.list
/q e OnFind DoUnFind warrenord.town.wagon.transport.list.message
/q e OnFind DoFind warrenord.town.wagon.transport.list

/q delete warrenord.town.wagon.transport.destination.noblemanor
/q create warrenord.town.wagon.transport.destination.noblemanor
/q e Visible False
/q e ToAdvance OnChat noble manor
/q e ToAdvance IfInRegion warrenord.wagonmain
/q e OnComplete DoHearSound HORSE_GALLOP
/q e OnComplete DoTeleport warrenord 1431 79 1381
/q e OnComplete DoLoseMoney 20
/q e OnComplete DoComplete warrenord.town.wagon.transport
/q e OnComplete DoUnfind warrenord.town.wagon.transport