;'Grave Spectre' - NPC script

Cost = 75000

If GetUserFlag(#USERID,34) = 0
	If GetUserSilver(#USERID) < Cost
		SendMessageToUser(#USERID,"The Grave Spectre says, 'My services have a price, and you can't afford it.'",#MSG_SAY)
	Else
		ShowUserDialog(#USERID, 664, "yesno", "Pay the Grave Spectre "+Cost+" silver?")
	EndIf
Else
	SendMessageToUser(#USERID,"The Grave Spectre says, 'I can't be of help to you. Please leave.'",#MSG_SAY)
EndIf

Continue = 1