18 lines
623 B
Plaintext
18 lines
623 B
Plaintext
// rh_ex_courtesan - Do Courtesan services
|
|
|
|
void main()
|
|
{
|
|
object oMe=OBJECT_SELF;
|
|
object oPC=GetPCSpeaker();
|
|
object oSound;
|
|
string sRR="sound_holder";
|
|
AssignCommand(oMe,TakeGoldFromCreature(5,oPC));
|
|
SendMessageToPC(oPC,GetName(oMe)+" takes you into the bedroom, turns out the light, and the rest of the experience was bliss.");
|
|
FadeToBlack(oPC);
|
|
oSound=CreateObject(OBJECT_TYPE_PLACEABLE,sRR,GetLocation(oPC));
|
|
SetLocalInt(oSound,"nCount",2);
|
|
AssignCommand(oSound,PlaySound("as_pl_ailingf2"));
|
|
DelayCommand(8.0,DestroyObject(oSound));
|
|
DelayCommand(9.0,FadeFromBlack(oPC));
|
|
}
|