Script

TR_m7_HH_GM_hla_teleamulet_scr

TR_Mainland.esm

Variables 3

Local Variables

button

messageOn

OnPCEquip

Source

  
    Begin TR_m7_HH_GM_hla_teleamulet_scr
  
    short button
  
    short messageOn
  
    short OnPCEquip
  
    if ( OnPCEquip == 1 )
  
    	if ( T_Glob_GetTeleportingDisabled )
  
    		MessageBox "The amulet's teleportation magic fizzles out."
  
    	else
  
    		MessageBox "Would you like to return to Narsis?" "Yes" "No"
  
    		set messageOn to 1
  
    	endif
  
    	Set OnPCEquip to 0
  
    endif
  
    if ( messageOn == 0 )
  
    	return
  
    endif
  
    set button to GetButtonPressed
  
    if ( button >= 0 )
  
    	set messageOn to 0
  
    endif
  
    ; return to Narsis or cancel
  
    if ( button == 0 )
  
    	Player->PositionCell 9044 4500 12102 217 "Narsis, Second Family Manor" ; TR_m7_MARK_HH_TELE
  
    endif
  
    End