TR_m3_Pub_AT_TS
TR_Mainland.esm
Variables
10
Local Variables
rent
rentDay
rentMonth
setup
cleanup
TR_Map
control
controlQ
T_Local_NPC
NoLore
Source
1begin TR_m3_Pub_AT_TS
2
3;Cell: Almas Thirr, Thirsty Saint Cornerclub
4;Publican: TR_m3_Hlireni Hleran (TR_m3_Yammu Hainnadon)
5;Flag: TR_m3_Rent_AT_TS
6
7;all rooms get rented for one day
8;This guy must be in the map where the room is if you use the locked door cell loading cleanup
9;rename the script for the guy and make a specific door to unlock or flag to set
10;NO actual key is given to player, a global flag is set that removes the ownership on the beds.
11
12;this script fires off when RENT is set true. Rent is set true throuhg the BEDS topic in dialogue, which all Publicans have.
13;Each publican will also have a separate response to buying the bed, so they can give simple directions. There is also a default one.
14
15short rent ;if room is rented, set through dialogue on this NPC
16short rentDay ;the day of the rental
17short rentMonth ;the month of the rental
18short setup ;if setup has been done
19short cleanup ;true if you want to cleanup all the flags, rental is over and can be reset
20;this script also uses a global variable (Rent_Bed_Pelagiad). Make a new one for each rental. You can have as many
21;beds as you want use that variable, it is used through the ownership data on the object reference
22
23if ( rent == 1 )
24
25 if ( setup == 0 )
26 set rentDay to Day
27 set rentMonth to Month
28 set setup to 1
29 set TR_m3_Rent_AT_TS to 1 ;this is the flag for the ownership on the bed
30 "TR_door_rent_Almas_LS"->unlock ;also needed if you have locked the room, use a specific objectRef
31
32 else ;setup is done so check to see if the day is over
33
34 if ( Day != rentDay )
35 set cleanup to 1
36
37 elseif ( Month != rentMonth )
38 set cleanup to 1
39
40 endif
41
42 endif
43
44 if ( CellChanged == 1 ) ;this is only needed if you've done a locked door. If so, you only want to do this on cell change so you don't lock them in the room
45 if ( cleanup == 1 ) ;this gets called when the rental is over and everything can be cleaned up
46 set rent to 0
47 set TR_m3_Rent_AT_TS to 0
48 set setup to 0
49 set rentDay to 0
50 set rentMonth to 0
51 set cleanup to 0
52 "TR_door_rent_Almas_LS"->lock 50
53 endif
54 endif
55
56endif
57
58short TR_Map
59short control
60short controlQ
61short T_Local_NPC
62short NoLore
63
64if ( TR_Map == 3 )
65 return
66endif
67
68set TR_Map to 3
69
70end