gemrb/GUIScripts/pst/GUISTORE.py

   1 # -*-python-*-
   2 # GemRB - Infinity Engine Emulator
   3 # Copyright (C) 2003 The GemRB Project
   4 #
   5 # This program is free software; you can redistribute it and/or
   6 # modify it under the terms of the GNU General Public License
   7 # as published by the Free Software Foundation; either version 2
   8 # of the License, or (at your option) any later version.
   9 #
  10 # This program is distributed in the hope that it will be useful,
  11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 # GNU General Public License for more details.
  14 #
  15 # You should have received a copy of the GNU General Public License
  16 # along with this program; if not, write to the Free Software
  17 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  18 #
  19
  20
  21 # GUISTORE.py - script to open store/inn/temple windows from GUISTORE winpack
  22
  23 ###################################################
  24
  25 import GemRB
  26 import GUICommon
  27 import GUICommonWindows
  28 from GUIDefines import *
  29
  30 StoreWindow = None
  31
  32 StoreShoppingWindow = None
  33 StoreIdentifyWindow = None
  34 StoreStealWindow = None
  35 StoreDonateWindow = None
  36 StoreHealWindow = None
  37 StoreRumourWindow = None
  38 StoreRentWindow = None
  39
  40 HelpStoreRent = None
  41
  42 store_name = ""
  43 pc = 0
  44 character_name = ""
  45 party_gold = 0
  46 store_buttons = {}
  47 store_update_functions = {}
  48
  49 def CloseStoreWindow ():
  50         global StoreWindow
  51
  52         CloseStoreShoppingWindow ()
  53         CloseStoreIdentifyWindow ()
  54         CloseStoreStealWindow ()
  55         CloseStoreDonateWindow ()
  56         CloseStoreHealWindow ()
  57         CloseStoreRumourWindow ()
  58         CloseStoreRentWindow ()
  59
  60         GemRB.SetVar ("OtherWindow", -1)
  61         if StoreWindow:
  62                 StoreWindow.Unload ()
  63         StoreWindow = None
  64         GemRB.LeaveStore ()
  65         GUICommon.GameWindow.SetVisible(WINDOW_VISIBLE) #enabling the game control screen
  66         GemRB.UnhideGUI () #enabling the other windows
  67         GUICommonWindows.SetSelectionChangeHandler (None)
  68
  69
  70 def OpenStoreWindow ():
  71         global StoreWindow, party_gold, store_name, Store
  72
  73         GemRB.HideGUI ()
  74         GUICommon.GameWindow.SetVisible(WINDOW_INVISIBLE) #removing the game control screen
  75
  76         GemRB.LoadWindowPack ("GUISTORE")
  77         StoreWindow = Window = GemRB.LoadWindow (3)
  78         Window.SetVisible (WINDOW_VISIBLE)
  79
  80         Store = GemRB.GetStore ()
  81         # font used for store name has only uppercase chars
  82         store_name = GemRB.GetString (Store['StoreName']).upper ()
  83
  84         # Done
  85         Button = Window.GetControl (0)
  86         Button.SetText (1403)
  87         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, CloseStoreWindow)
  88         Button.SetFlags (IE_GUI_BUTTON_CANCEL, OP_OR)
  89
  90         # buy / sell
  91         Button = Window.GetControl (1)
  92         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, OpenStoreShoppingWindow)
  93         store_buttons['shopping'] = Button
  94         store_update_functions['shopping'] = UpdateStoreShoppingWindow
  95
  96         # identify
  97         Button = Window.GetControl (2)
  98         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, OpenStoreIdentifyWindow)
  99         store_buttons['identify'] = Button
 100         store_update_functions['identify'] = UpdateStoreIdentifyWindow
 101
 102         # steal
 103         Button = Window.GetControl (3)
 104         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, OpenStoreStealWindow)
 105         store_buttons['steal'] = Button
 106         store_update_functions['steal'] = UpdateStoreStealWindow
 107
 108         # donate
 109         Button = Window.GetControl (4)
 110         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, OpenStoreDonateWindow)
 111         store_buttons['donate'] = Button
 112         store_update_functions['donate'] = UpdateStoreDonateWindow
 113
 114         # heal / cure
 115         Button = Window.GetControl (5)
 116         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, OpenStoreHealWindow)
 117         store_buttons['heal'] = Button
 118         store_update_functions['heal'] = UpdateStoreHealWindow
 119
 120         # rumour
 121         Button = Window.GetControl (6)
 122         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, OpenStoreRumourWindow)
 123         store_buttons['rumour'] = Button
 124         store_update_functions['rumour'] = UpdateStoreRumourWindow
 125
 126         # rent room
 127         Button = Window.GetControl (7)
 128         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, OpenStoreRentWindow)
 129         store_buttons['rent'] = Button
 130         store_update_functions['rent'] = UpdateStoreRentWindow
 131
 132         OpenStoreShoppingWindow ()
 133
 134         GemRB.UnhideGUI()
 135
 136 last_store_action = None
 137 def SelectStoreAction (action):
 138         global last_store_action
 139
 140         Window = StoreWindow
 141
 142         if last_store_action != None and action != last_store_action:
 143                 Button = store_buttons[last_store_action]
 144                 Button.SetState (IE_GUI_BUTTON_UNPRESSED)
 145
 146         Button = store_buttons[action]
 147         Button.SetState (IE_GUI_BUTTON_SELECTED)
 148
 149         GUICommonWindows.SetSelectionChangeHandler (store_update_functions[action])
 150
 151         last_store_action = action
 152
 153
 154
 155 def OpenStoreShoppingWindow ():
 156         global StoreShoppingWindow
 157
 158         GemRB.HideGUI ()
 159         SelectStoreAction ('shopping')
 160
 161         if StoreShoppingWindow != None:
 162                 Window = StoreShoppingWindow
 163                 GemRB.SetVar ("OtherWindow", Window.ID)
 164                 UpdateStoreShoppingWindow ()
 165                 GemRB.UnhideGUI ()
 166                 return
 167
 168         StoreShoppingWindow = Window = GemRB.LoadWindow (4)
 169         GemRB.SetVar ("OtherWindow", Window.ID)
 170
 171         # title ...
 172         Label = Window.GetControl (0x10000001)
 173         Label.SetText (store_name)
 174
 175         # buy price ...
 176         Label = Window.GetControl (0x10000003)
 177         Label.SetText (str (666))
 178
 179         # sell price ...
 180         Label = Window.GetControl (0x10000004)
 181         Label.SetText (str (999))
 182
 183
 184         # Buy
 185         Button = Window.GetControl (0)
 186         Button.SetText (45303)
 187
 188         # Sell
 189         Button = Window.GetControl (1)
 190         Button.SetText (45304)
 191
 192         # 45374
 193
 194         # 7 scrollbar
 195         # 8-11, @11 -@14 - slots and their labels
 196         # 16 scrollbar
 197         # 17-20, @20-@23 - slots and labels
 198         # 25 encumbrance button
 199
 200         UpdateStoreShoppingWindow ()
 201         GemRB.UnhideGUI ()
 202
 203
 204 def OpenStoreIdentifyWindow ():
 205         global StoreIdentifyWindow
 206
 207         GemRB.HideGUI ()
 208         SelectStoreAction ('identify')
 209
 210         if StoreIdentifyWindow != None:
 211                 Window = StoreIdentifyWindow
 212                 GemRB.SetVar ("OtherWindow", Window.ID)
 213                 UpdateStoreIdentifyWindow ()
 214                 GemRB.UnhideGUI ()
 215                 return
 216
 217         StoreIdentifyWindow = Window = GemRB.LoadWindow (5)
 218         GemRB.SetVar ("OtherWindow", Window.ID)
 219
 220         # title ...
 221         Label = Window.GetControl (0x0fffffff)
 222         Label.SetText (store_name)
 223
 224         # Identify
 225         Button = Window.GetControl (4)
 226         Button.SetText (44971)
 227
 228         # 14 ta
 229
 230         # price ...
 231         Label = Window.GetControl (0x10000001)
 232         Label.SetText (str (666))
 233
 234         # 6-9 item slots, 0x10000009-c labels
 235
 236         UpdateStoreIdentifyWindow ()
 237         GemRB.UnhideGUI ()
 238
 239
 240 def OpenStoreStealWindow ():
 241         global StoreStealWindow
 242
 243         GemRB.HideGUI ()
 244         SelectStoreAction ('steal')
 245
 246         if StoreStealWindow != None:
 247                 Window = StoreStealWindow
 248                 GemRB.SetVar ("OtherWindow", Window.ID)
 249                 UpdateStoreStealWindow ()
 250                 GemRB.UnhideGUI ()
 251                 return
 252
 253         StoreStealWindow = Window = GemRB.LoadWindow (7)
 254         GemRB.SetVar ("OtherWindow", Window.ID)
 255
 256         # title ...
 257         Label = Window.GetControl (0x10000000)
 258         Label.SetText (store_name)
 259
 260         # Steal
 261         Button = Window.GetControl (0)
 262         Button.SetText (45305)
 263
 264         UpdateStoreStealWindow ()
 265         GemRB.UnhideGUI ()
 266
 267
 268 def OpenStoreDonateWindow ():
 269         global StoreDonateWindow
 270
 271         GemRB.HideGUI ()
 272         SelectStoreAction ('donate')
 273
 274         if StoreDonateWindow != None:
 275                 Window = StoreDonateWindow
 276                 GemRB.SetVar ("OtherWindow", Window.ID)
 277                 UpdateStoreDonateWindow ()
 278                 GemRB.UnhideGUI ()
 279                 return
 280
 281         StoreDonateWindow = Window = GemRB.LoadWindow (10)
 282         GemRB.SetVar ("OtherWindow", Window.ID)
 283
 284         # title ...
 285         Label = Window.GetControl (0x10000005)
 286         Label.SetText (store_name)
 287
 288         # Donate
 289         Button = Window.GetControl (2)
 290         Button.SetText (45307)
 291
 292         # 0 ta
 293         # 3 donation entry
 294         # 4 5 +-
 295
 296         UpdateStoreDonateWindow ()
 297         GemRB.UnhideGUI ()
 298
 299
 300 def OpenStoreHealWindow ():
 301         global StoreHealWindow
 302
 303         GemRB.HideGUI ()
 304         SelectStoreAction ('heal')
 305
 306         if StoreHealWindow != None:
 307                 Window = StoreHealWindow
 308                 GemRB.SetVar ("OtherWindow", Window.ID)
 309                 UpdateStoreHealWindow ()
 310                 GemRB.UnhideGUI ()
 311                 return
 312
 313         StoreHealWindow = Window = GemRB.LoadWindow (6)
 314         GemRB.SetVar ("OtherWindow", Window.ID)
 315
 316         # title ...
 317         Label = Window.GetControl (0x0fffffff)
 318         Label.SetText (store_name)
 319
 320         # price ...
 321         Label = Window.GetControl (0x10000001)
 322         Label.SetText (str (666))
 323
 324         # price ...
 325         Label = Window.GetControl (0x1000000e)
 326         Label.SetText (character_name)
 327
 328         # Heal
 329         Button = Window.GetControl (3)
 330         Button.SetText (8836) # FIXME: better strref
 331
 332
 333         # 13 ta
 334
 335         UpdateStoreHealWindow ()
 336         GemRB.UnhideGUI ()
 337
 338
 339 def OpenStoreRumourWindow ():
 340         global StoreRumourWindow
 341
 342         GemRB.HideGUI ()
 343         SelectStoreAction ('rumour')
 344
 345         if StoreRumourWindow != None:
 346                 Window = StoreRumourWindow
 347                 GemRB.SetVar ("OtherWindow", Window.ID)
 348                 UpdateStoreRumourWindow ()
 349                 GemRB.UnhideGUI ()
 350                 return
 351
 352         StoreRumourWindow = Window = GemRB.LoadWindow (9)
 353         GemRB.SetVar ("OtherWindow", Window.ID)
 354
 355         # title ...
 356         Label = Window.GetControl (0x1000000a)
 357         Label.SetText (store_name)
 358
 359         # 13 ta, 15 ta
 360
 361         UpdateStoreRumourWindow ()
 362         GemRB.UnhideGUI ()
 363
 364
 365 def OpenStoreRentWindow ():
 366         global StoreRentWindow, HelpStoreRent
 367
 368         GemRB.HideGUI ()
 369         SelectStoreAction ('rent')
 370
 371         if StoreRentWindow != None:
 372                 Window = StoreRentWindow
 373                 GemRB.SetVar ("OtherWindow", Window.ID)
 374                 UpdateStoreRentWindow ()
 375                 GemRB.UnhideGUI ()
 376                 return
 377
 378         StoreRentWindow = Window = GemRB.LoadWindow (8)
 379         GemRB.SetVar ("OtherWindow", Window.ID)
 380
 381         # title ...
 382         Label = Window.GetControl (0x1000000a)
 383         Label.SetText (store_name)
 384
 385         # Peasant
 386         Button = Window.GetControl (0)
 387         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentPeasant)
 388         Button = Window.GetControl (4)
 389         Button.SetText (45308)
 390         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentPeasant)
 391
 392         # Merchant
 393         Button = Window.GetControl (1)
 394         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentMerchant)
 395         Button = Window.GetControl (5)
 396         Button.SetText (45310)
 397         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentMerchant)
 398
 399         # Noble
 400         Button = Window.GetControl (2)
 401         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentNoble)
 402         Button = Window.GetControl (6)
 403         Button.SetText (45313)
 404         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentNoble)
 405
 406         # Royal
 407         Button = Window.GetControl (3)
 408         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentRoyal)
 409         Button = Window.GetControl (7)
 410         Button.SetText (45316)
 411         Button.SetEvent (IE_GUI_BUTTON_ON_PRESS, SelectStoreRentRoyal)
 412
 413
 414         # Rent
 415         Button = Window.GetControl (8)
 416         Button.SetText (45306)
 417         Button.SetState (IE_GUI_BUTTON_DISABLED)
 418
 419
 420         # price ...
 421         Label = Window.GetControl (0x1000000c)
 422         Label.SetText ("0")
 423
 424         HelpStoreRent = Text = Window.GetControl (9)
 425
 426
 427         GemRB.UnhideGUI ()
 428
 429
 430 last_room = None
 431 def SelectStoreRent (room):
 432         global last_room
 433
 434         Window = StoreRentWindow
 435
 436         HelpStoreRent.SetText (66865 + room)
 437
 438         if last_room != None and room != last_room:
 439                 Picture = Window.GetControl (0 + last_room)
 440                 Picture.SetState (IE_GUI_BUTTON_UNPRESSED)
 441                 Button = Window.GetControl (4 + last_room)
 442                 Button.SetState (IE_GUI_BUTTON_UNPRESSED)
 443
 444         Picture = Window.GetControl (0 + room)
 445         Picture.SetState (IE_GUI_BUTTON_SELECTED)
 446         Button = Window.GetControl (4 + room)
 447         Button.SetState (IE_GUI_BUTTON_PRESSED)
 448
 449         Label = Window.GetControl (0x1000000c)
 450         Label.SetText (str (Store['StoreRoomPrices'][room]))
 451
 452         last_room  = room
 453
 454 def SelectStoreRentPeasant ():
 455         SelectStoreRent (0)
 456
 457 def SelectStoreRentMerchant ():
 458         SelectStoreRent (1)
 459
 460 def SelectStoreRentNoble ():
 461         SelectStoreRent (2)
 462
 463 def SelectStoreRentRoyal ():
 464         SelectStoreRent (3)
 465
 466
 467 def UpdateStoreCommon ():
 468         global party_gold, character_name, pc
 469
 470         print "UpdateStoreWindow"
 471         pc = GemRB.GameGetSelectedPCSingle ()
 472         character_name = GemRB.GetPlayerName (pc, 1)
 473
 474         party_gold = GemRB.GameGetPartyGold ()
 475
 476
 477 def UpdateStoreShoppingWindow ():
 478         Window = StoreShoppingWindow
 479
 480         GemRB.HideGUI ()
 481         UpdateStoreCommon ()
 482
 483         # character name ...
 484         Label = Window.GetControl (0x10000005)
 485         Label.SetText (character_name)
 486
 487         # party gold ...
 488         Label = Window.GetControl (0x10000002)
 489         Label.SetText (str (party_gold))
 490         GemRB.UnhideGUI ()
 491
 492 def UpdateStoreIdentifyWindow ():
 493         Window = StoreIdentifyWindow
 494
 495         GemRB.HideGUI ()
 496         UpdateStoreCommon ()
 497
 498         # party gold ...
 499         Label = Window.GetControl (0x10000000)
 500         Label.SetText (str (party_gold))
 501
 502         # character name ...
 503         Label = Window.GetControl (0x10000002)
 504         Label.SetText (character_name)
 505
 506         GemRB.UnhideGUI ()
 507
 508 def UpdateStoreStealWindow ():
 509         Window = StoreStealWindow
 510
 511         GemRB.HideGUI ()
 512         UpdateStoreCommon ()
 513
 514         # party gold ...
 515         Label = Window.GetControl (0x10000001)
 516         Label.SetText (str (party_gold))
 517
 518         # character name ...
 519         Label = Window.GetControl (0x10000002)
 520         Label.SetText (character_name)
 521
 522         GemRB.UnhideGUI ()
 523
 524 def UpdateStoreDonateWindow ():
 525         Window = StoreDonateWindow
 526
 527         GemRB.HideGUI ()
 528         UpdateStoreCommon ()
 529
 530         # party gold ...
 531         Label = Window.GetControl (0x10000006)
 532         Label.SetText (str (party_gold))
 533
 534         GemRB.UnhideGUI ()
 535
 536 def UpdateStoreHealWindow ():
 537         Window = StoreHealWindow
 538
 539         GemRB.HideGUI ()
 540         UpdateStoreCommon ()
 541
 542         # party gold ...
 543         Label = Window.GetControl (0x10000000)
 544         Label.SetText (str (party_gold))
 545
 546         GemRB.UnhideGUI ()
 547
 548 def UpdateStoreRumourWindow ():
 549         Window = StoreRumourWindow
 550
 551         GemRB.HideGUI ()
 552         UpdateStoreCommon ()
 553
 554         # party gold ...
 555         Label = Window.GetControl (0x1000000b)
 556         Label.SetText (str (party_gold))
 557
 558         GemRB.UnhideGUI ()
 559
 560 def UpdateStoreRentWindow ():
 561         Window = StoreRentWindow
 562
 563         GemRB.HideGUI ()
 564         UpdateStoreCommon ()
 565
 566         # party gold ...
 567         Label = Window.GetControl (0x1000000b)
 568         Label.SetText (str (party_gold))
 569
 570         GemRB.UnhideGUI ()
 571
 572
 573 def CloseStoreShoppingWindow ():
 574         global StoreShoppingWindow
 575
 576         if StoreShoppingWindow != None:
 577                 if StoreShoppingWindow:
 578                         StoreShoppingWindow.Unload ()
 579                 StoreShoppingWindow = None
 580
 581
 582 def CloseStoreIdentifyWindow ():
 583         global StoreIdentifyWindow
 584
 585         if StoreIdentifyWindow != None:
 586                 if StoreIdentifyWindow:
 587                         StoreIdentifyWindow.Unload ()
 588                 StoreIdentifyWindow = None
 589
 590
 591 def CloseStoreStealWindow ():
 592         global StoreStealWindow
 593
 594         if StoreStealWindow != None:
 595                 if StoreStealWindow:
 596                         StoreStealWindow.Unload ()
 597                 StoreStealWindow = None
 598
 599
 600 def CloseStoreDonateWindow ():
 601         global StoreDonateWindow
 602
 603         if StoreDonateWindow != None:
 604                 if StoreDonateWindow:
 605                         StoreDonateWindow.Unload ()
 606                 StoreDonateWindow = None
 607
 608
 609 def CloseStoreHealWindow ():
 610         global StoreHealWindow
 611
 612         if StoreHealWindow != None:
 613                 if StoreHealWindow:
 614                         StoreHealWindow.Unload ()
 615                 StoreHealWindow = None
 616
 617
 618 def CloseStoreRumourWindow ():
 619         global StoreRumourWindow
 620
 621         if StoreRumourWindow != None:
 622                 if StoreRumourWindow:
 623                         StoreRumourWindow.Unload ()
 624                 StoreRumourWindow = None
 625
 626
 627 def CloseStoreRentWindow ():
 628         global StoreRentWindow
 629
 630         if StoreRentWindow != None:
 631                 if StoreRentWindow:
 632                         StoreRentWindow.Unload ()
 633                 StoreRentWindow = None
 634
 635
 636 ###################################################
 637 # End of file GUISTORE.py