Uproszczenie kowala.
This commit is contained in:
parent
1f860e1e86
commit
1e87a04760
@ -11,38 +11,24 @@
|
||||
|
||||
/def -ar -mregexp -Fp2 -t'^[a-z]+ [a-z]+ [a-z]+ .*rozpada sie\!' = /beep 1
|
||||
|
||||
/def -mregexp -p2 -t'bierze twoj.' = /set moje on
|
||||
/def -mregexp -p2 -t'konczy prace.$' = \
|
||||
/def -mregexp -Fp2 -t'bierze twoj.* do (ostrzenia|naprawy)' = /set moje on
|
||||
/def -mregexp -Fp2 -t'konczy prace.$' = \
|
||||
/if ( {moje} =~ "on" )\
|
||||
/tbind do_kowal %;\
|
||||
/endif
|
||||
|
||||
/def kowal = \
|
||||
/if ( {pack} =~ "on" )\
|
||||
/zp monety %;\
|
||||
/endif%;\
|
||||
/zp monety %;\
|
||||
/do_kowal
|
||||
|
||||
/def do_kowal = \
|
||||
/def -ag -p2 -t'*jest pochloniety*nie wypada*' _kowal_gag_0 %;\
|
||||
/def -ag -p2 -t'*Nie masz niczego takiego*' _kowal_gag_1 %;\
|
||||
/def -ag -p2 -t'*Juz dzierzysz*' _kowal_gag2 %;\
|
||||
/def -ag -p2 -t'*masz*na plecach*' _kowal_gag3 %;\
|
||||
/def -ag -Fp2 -t'.*jest pochloniety*nie wypada.*' _kowal_gag_0 %;\
|
||||
/def -ag -Fp2 -t'.*Nie masz niczego takiego.*' _kowal_gag_1 %;\
|
||||
/def -ag -Fp2 -t'.*Juz dzierzysz.*' _kowal_gag2 %;\
|
||||
/def -ag -Fp2 -t'.*Juz masz na sobie.*' _kowal_gag3 %;\
|
||||
/set moje off %;\
|
||||
/send naostrz bron %;\
|
||||
/if ( {dual} =~ "on" ) \
|
||||
/send naostrz druga bron %;\
|
||||
/endif %;\
|
||||
/send napraw zbroje %;\
|
||||
/send napraw druga zbroje %;\
|
||||
/send napraw trzecia zbroje %;\
|
||||
/send napraw czwarta zbroje %;\
|
||||
/send napraw piata zbroje %;\
|
||||
/send napraw szosta zbroje %;\
|
||||
/send napraw siodma zbroje %;\
|
||||
/send napraw osma zbroje %;\
|
||||
/send napraw dziewiata zbroje %;\
|
||||
/send napraw dziesiata zbroje %;\
|
||||
/send naostrz bronie %;\
|
||||
/send napraw wszystkie zbroje %;\
|
||||
/purge _kowal_gag_* %;\
|
||||
/repeat -1 1 /_kowal_finish
|
||||
|
||||
@ -50,9 +36,7 @@
|
||||
/if ({moje} =~ "off" ) \
|
||||
/send dobadz wszystkich broni %;\
|
||||
/send zaloz wszystkie zbroje %;\
|
||||
/if ( {pack} =~ "on" )\
|
||||
/dp monety %;\
|
||||
/endif%;\
|
||||
/dp monety %;\
|
||||
/endif
|
||||
/alias do_kowal /do_kowal
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user