Threaded Mode | Linear Mode

Ultima One · 05-16-2013 01:04 AM

Time to share some scripts we use frequently on TUP. Some may be in need of updating.

This script shows you the totals of each ore in your backpack, since it can be a pain to move it all to see. You will likely need to update with your own ores.

Use: .ore

Code:

[FUNCTION ore]  

  if ( <isdead> )

     src.sysmessage You're dead.

     return 1

  endif

  // set up color code tiers

  var.exist_color = 0480

  var.red_all = 100

  var.red_num = 50

  status_ore

[FUNCTION status_ore]

  status_ore_color ore_copper

  status_ore_color ore_pure_copper

  status_ore_color ore_old_copper

  status_ore_color ore_tin

  status_ore_color ore_iron

  status_ore_color ore_ferrum

  status_ore_color ore_silver

  status_ore_color ore_gold

  status_ore_color ore_titanium

  status_ore_color ore_agapite

  status_ore_color ore_shadow

  status_ore_color ore_verite

  status_ore_color ore_valorite

  status_ore_color ore_terathane

  status_ore_color ore_mytheril

  status_ore_color ore_skargard

  status_ore_color ore_blackrock

  status_ore_color coal

  status_ore_color resource_sandstone

  status_ore_color resource_stone

  status_ore_color resource_gypsum

  status_ore_color resource_clay

  DIALOG d_ore

[FUNCTION status_ore_color]  

  var.cnt = <eval <rescount i_<args>>>

  if ( <VAR.CNT> >= <var.red_all> )

     TRY VAR.<args> = 025

     TRY VAR.<args>_t = 025

  elif ( <VAR.CNT> >= <var.red_num> )

     TRY VAR.<args> = 025

     TRY VAR.<args>_t = 0

  elif ( <VAR.CNT> <=  0 )

     TRY VAR.<args> = 0

     TRY VAR.<args>_t = 0

  else

     TRY VAR.<args> = <var.exist_color>

     TRY VAR.<args>_t = 0

  endif

  return 1

[DIALOG d_ore]

   0,0

   NOMOVE

   //079e

   //07a1 07a0

   // Background

   gumppic -10 0 <eval 0980>

   gumppic -10 90 <eval 0980>

   gumppic -10 180 <eval 0980>

   gumppic -10 270 <eval 0980>

   gumppic -10 360 <eval 0980>

   tilepic 11 5 <eval 019b8>

   tilepic 5 339 <eval 01bf0>

   button 100 422 <eval 081a> <eval 081b> 1 0 0

   text 7 1 <eval <var.ore_copper>> 1

   text 45 1 <eval <var.ore_copper_t>> 2

   text 7 18 <eval <var.ore_pure_copper>> 3

   text 45 18 <eval <var.ore_pure_copper_t>> 4

   text 7 36 <eval <var.ore_old_copper>> 5

   text 45 36 <eval <var.ore_old_copper_t>> 6

   text 7 53 <eval <var.ore_tin>> 7

   text 45 53 <eval <var.ore_tin_t>> 8

   text 7 72 <eval <var.ore_iron>> 9

   text 45 72 <eval <var.ore_iron_t>> 10

   text 7 91 <eval <var.ore_ferrum>> 11

   text 45 91 <eval <var.ore_ferrum_t>> 12

   text 7 108 <eval <var.ore_silver>> 13

   text 45 108 <eval <var.ore_silver_t>> 14

   text 7 126 <eval <var.ore_gold>> 15

   text 45 126 <eval <var.ore_gold_t>> 16

   text 7 144 <eval <var.ore_titanium>> 17

   text 45 144 <eval <var.ore_titanium_t>> 18

   text 7 161 <eval <var.ore_agapite>> 19

   text 45 161 <eval <var.ore_agapite_t>> 20

   text 7 181 <eval <var.ore_shadow>> 21

   text 45 181 <eval <var.ore_shadow_t>> 22

   text 7 198 <eval <var.ore_verite>> 23

   text 45 198 <eval <var.ore_verite_t>> 24

   text 7 217 <eval <var.ore_valorite>> 25

   text 45 217 <eval <var.ore_valorite_t>> 26

   text 7 234 <eval <var.ore_terathane>> 27

   text 45 234 <eval <var.ore_terathane_t>> 28

   text 7 251 <eval <var.ore_mytheril>> 29

   text 45 251 <eval <var.ore_mytheril_t>> 30

   text 7 271 <eval <var.ore_skargard>> 31

   text 45 271 <eval <var.ore_skargard_t>> 32

   text 7 288 <eval <var.ore_blackrock>> 33

   text 45 288 <eval <var.ore_blackrock_t>> 34

   text 7 306 <eval <var.coal>> 36

   text 45 306 <eval <var.coal_t>> 37

   text 7 341 <eval <var.resource_sandstone>> 38

   text 45 341 <eval <var.resource_sandstone_t>> 39

   text 7 361 <eval <var.resource_stone>> 40

   text 45 361 <eval <var.resource_stone_t>> 41

   text 7 379 <eval <var.resource_gypsum>> 42

   text 45 379 <eval <var.resource_gypsum_t>> 43

   text 7 397 <eval <var.resource_clay>> 44

   text 45 397 <eval <var.resource_clay_t>> 45

[DIALOG d_ore TEXT]

<var.blankline>

<eval <rescount i_ore_copper>>

Copper

<eval <rescount i_ore_pure_copper>>

Pure copper

<eval <rescount i_ore_old_copper>>

Old copper

<eval <rescount i_ore_tin>>

Tin

<eval <rescount i_ore_iron>>

Iron

<eval <rescount i_ore_ferrum>>

Ferrum

<eval <rescount i_ore_silver>>

Silver

<eval <rescount i_ore_gold>>

Gold

<eval <rescount i_ore_titanium>>

Titanium

<eval <rescount i_ore_agapite>>

Agapite

<eval <rescount i_ore_shadow>>

Shadow

<eval <rescount i_ore_verite>>

Verite

<eval <rescount i_ore_valorite>>

Valorite

<eval <rescount i_ore_terathane>>

Terathane

<eval <rescount i_ore_mytheril>>

Mytheril

<eval <rescount i_ore_skargard>>

Skargard

<eval <rescount i_ore_blackrock>>

Blackrock

G

<eval <rescount i_coal>>

Coal

<eval <rescount i_resource_sandstone>>

Sandstone

<eval <rescount i_resource_stone>>

Stone

<eval <rescount i_resource_gypsum>>

Gypsum

<eval <rescount i_resource_clay>>

Clay

Threaded Mode \| Linear Mode Ore Quantity List
Author	Message