Apple-2-SW/lawless-legends
1
0
Fork 0
mirror of https://github.com/badvision/lawless-legends.git synced 2024-07-04 09:29:28 +00:00
Code Issues Projects Releases Wiki Activity

Add real values to Inventory/Stats

Browse Source
This commit is contained in:
David Schmenk 2016-06-15 12:15:10 -07:00
parent a4eaeb5cf1
commit a351b9c772
1 changed files with 31 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

56
Platform/Apple/virtual/src/plasma/party.pla
View File

@ -32,47 +32,53 @@ word[] funcTbl = @_party_showPlayerSheet
/////////////////////////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////////////////////////
// Show player data // Show player data
def _party_showPlayerSheet(num) def _party_showPlayerSheet(num)
word pl word player, item
word x, y
byte dir
// Count the number of players // Count the number of players
pl = global=>p_players player = global=>p_players
while num > 0 while num > 0
pl = pl=>p_nextObj player = player=>p_nextObj
if !pl // Not that many players if !player // Not that many players
showMapName("") // Force redraw of map name
return return
fin fin
num-- num--
loop loop
// First, display the player's name in the title bar // First, display the player's name in the title bar
showMapName(pl=>s_name) showMapName(player=>s_name)
// Next, show nventory in the main map area // Next, show inventory in the main panel
setMapWindow() setMapWindow()
clearWindow() clearWindow()
rawDisplayStr("^Y^LInventory^L^N\n") rawDisplayStr("^Y^LInventory^L^N\n")
displayStr("1 Gun\n") item = player=>p_items
displayStr("2 Food\n") while item
displayStr("0 Underwear\n") displayStr(item=>s_name)
displayStr("\n")
item = item=>p_nextObj
loop
// Show stats in the right hand area // Show stats in the right panel
setWindow2() setWindow2()
clearWindow() clearWindow()
rawDisplayStr("^Y^LStats/Skills^L^N\n") rawDisplayStr("^Y^LStats^L^N\n")
displayStr("100% Health\n") displayf1("%d", player=>w_health); rawDisplayStr("^T024Health\n")
displayStr("75% Strength\n") displayf1("%d", player->b_intelligence); rawDisplayStr("^T024Intelligence\n")
displayStr("85% Agility\n") displayf1("%d", player->b_strength); rawDisplayStr("^T024Strength\n")
displayStr("85% Bravery\n") displayf1("%d", player->b_agility); rawDisplayStr("^T024Agility\n")
displayStr("85% Stamina\n") displayf1("%d", player->b_bravery); rawDisplayStr("^T024Bravery\n")
displayStr("200% Charisma\n") displayf1("%d", player->b_stamina); rawDisplayStr("^T024Stamina\n")
displayStr("85% Spirit\n") displayf1("%d", player->b_charisma); rawDisplayStr("^T024Charisma\n")
displayStr("85% Armor\n") displayf1("%d", player->b_spirit); rawDisplayStr("^T024Spirit\n")
displayStr("85% Aiming\n") displayf1("%d", player->b_armor); rawDisplayStr("^T024Armor\n")
displayStr("85% Dodging\n")
displayStr("85% Wilderness") // Show aquired skills in lower right panel
setWindow3()
clearWindow()
rawDisplayStr("^Y^LSkills^L^N\n")
if player=>b_aiming; displayStr("Aiming\n"); fin
if player=>b_dodging; displayStr("Dodging\n"); fin
if player=>b_wilderness; displayStr("Wilderness"); fin
// Get a key, do something // Get a key, do something
getUpperKey() getUpperKey()