sp_buypower_take:
  type: task
  debug: true
  speed: 0t
  script:
  - define player_buypower "<def[player_buypower]||<proc[sp_buypower]>>"
  # sp.buypower.<region||default>.<e-id||npcid>
  - define flag_destination "sp.buypower.<player.flag[erpg_region]||general>.<def[npcid].flag[e-id] || <def[npcid]>   >"
  # <destination> :  <proc[buypower]> - ( ( wert * clicktype_factor||1 ) * 100 .as_int  )||unbegrenzt
  - if <def[player_buypower]> matches number {
    - flag player "<def[flag_destination]>:<def[player_buypower].mul[100].sub[<def[worth].mul[<def[clicktype_factor]||1>].mul[100]>].as_int||unbegrenzt>"
    }

sp_buypower_add:
  type: task
  debug: true
  speed: 0t
  script:
  - define player_buypower "<def[player_buypower]||<proc[sp_buypower]>>"
  - define flag_destination "sp.buypower.<player.flag[erpg_region]||general>.<def[npcid].flag[e-id] || <def[npcid]>   >"
  - if <def[player_buypower]> matches number {
    - flag player "<def[flag_destination]>:<def[player_buypower].mul[100].add[<def[worth].mul[<def[clicktype_factor]||1>].mul[100]>].as_int||unbegrenzt>"
    }

#Returns:
# players erpg buypower <FALLBACK> players general buypower <FALLBACK> npcs default buypower <FALLBACK> unbegrenzt
sp_buypower:
  type: procedure
  debug: true
  script:
  - define npcid <player.flag[sp.talking_to].as_npc>
  - define flag_source "<player.flag[sp.buypower.<player.flag[erpg_region]||general>.<def[npcid].flag[e-id] || <def[npcid]>   >]  || <def[npcid].flag[sp.buypower].as_int||x> >"
  - if <def[flag_source]> matches number {
    - determine "<def[flag_source].div[100]>"
    } else {
    - determine unbegrenzt
    }