028-1,98,37,0	script	Exit	NPC400,0,0,{
    mes "[Exit]";
    mes "Would you like to leave this place?";
    menu
        "Yes.", L_Leave,
        "No.", L_close;

L_Leave:
    warp getsavepoint(0), getsavepoint(1), getsavepoint(2);
    goto L_close;

L_close:
    close;
}