From fe7b78c6b411e8d7c1867f0a35df0945e1ce884c Mon Sep 17 00:00:00 2001 From: Bartek Stalewski Date: Tue, 29 Sep 2015 13:56:15 +0200 Subject: [PATCH] Bug. --- arkadia/money.tf | 14 +++++--------- 1 file changed, 5 insertions(+), 9 deletions(-) diff --git a/arkadia/money.tf b/arkadia/money.tf index 80e3424..2b91451 100644 --- a/arkadia/money.tf +++ b/arkadia/money.tf @@ -6,17 +6,13 @@ /tbind dp_monety %;\ /endif -;/def -mregexp -Fp2 -t'okolo (.*) miedziak(i|ow).' wartosc_trig_1 = /substitute -p %{PL}@{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} (%{P1} miedziakow).%{PR} -;/def -mregexp -Fp2 -t'sztuk wartych (.*) miedziak.*' wartosc_trig_2 = /substitute -p %{PL}sztuk wartych @{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} (%{P1} miedziakow).%{PR} -;/def -mregexp -Fp2 -t'sztuki warte (.*) miedziak.*' wartosc_trig_3 = /substitute -p %{PL}sztuki warte @{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} (%{P1} miedziakow).%{PR} - -/def -mregexp -Fp2 -t'okolo (.*) miedziak(i|ow).' wartosc_trig_1 = /substitute -p %{PL}okolo @{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} czyli jakies %{P1} miedzi.%{PR} -/def -mregexp -Fp2 -t'wartych (.*) miedziakow.' wartosc_trig_2 = /substitute -p %{PL}wartych okolo @{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} czyli jakies %{P1} miedzi.%{PR} -/def -mregexp -Fp2 -t'warte (.*) miedziakow.' wartosc_trig_3 = /substitute -p %{PL}warte okolo @{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} czyli jakies %{P1} miedzi.%{PR} +/def -mregexp -Fp2 -t'okolo (.*) miedziak(i|ow).' wartosc_trig_1 = /substitute -p %{PL}@{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} - %{P1} miedzi.%{PR} +/def -mregexp -Fp2 -t'sztuk wartych (.*) miedziak.*' wartosc_trig_2 = /substitute -p %{PL}sztuk wartych @{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} - %{P1} miedzi.%{PR} +/def -mregexp -Fp2 -t'sztuki warte (.*) miedziak.*' wartosc_trig_3 = /substitute -p %{PL}sztuki warte @{C%c_info}$[{P1}/24000] mithryli, $[mod({P1},24000)/240] zlota, $[mod({P1},240)/12] srebra i $[mod({P1},12)] miedzi@{n} - %{P1} miedzi.%{PR} ; by Siro /def ocenkamienie = \ - /def -mregexp -F -t'^(?:> |)(?:Jest tu|Wydaje ci sie|Sa tu).*czyli jakies (.*) miedz.*.' sumujemy_kamienie = \ + /def -mregexp -F -t'^(?:> |)(?:Jest tu|Wydaje ci sie|Sa tu).*- (.*) miedz.*.' sumujemy_kamienie = \ /eval /set suma_kamieni=$$[{suma_kamieni} + {P1}] %;\ /set suma_kamieni=;; %;\ /send ocen kamienie %;\ @@ -24,5 +20,5 @@ /def sumujemy_kamienie_wynik = \ /echo %;\ - /echo -p #@{C%c_info}#@{n}# Wartosc: @{C%c_info}$[{suma_kamieni}/24000] mithryli, $[mod({suma_kamieni},24000)/240] zlota, $[mod({suma_kamieni},240)/12] srebra i $[mod({suma_kamieni},12)] miedzi@{n} (%{suma_kamieni} miedziakow).%;\ + /echo -p #@{C%c_info}#@{n}# Wartosc: @{C%c_info}$[{suma_kamieni}/24000] mithryli, $[mod({suma_kamieni},24000)/240] zlota, $[mod({suma_kamieni},240)/12] srebra i $[mod({suma_kamieni},12)] miedzi@{n} - %{suma_kamieni} miedzi.%;\ /repeat -4 1 /undef sumujemy_kamienie%%;/unset suma_kamieni