This commit is contained in:
Bartek Stalewski 2014-01-02 22:56:36 +01:00
parent f942c4cbac
commit 8d8325847f

View file

@ -1,6 +1,6 @@
/def ustaw_indeksy = \ /def ustaw_indeksy = \
/for i 1 $$[{rozmiar_tablicy_druzyna}] /use_index druzyna $$[{i}]%;\ /for i 1 (rozmiar_tablicy_druzyna) /use_index druzyna $$[{i}]%;\
/for i 1 $$[{rozmiar_tablicy_druzyna_bie}] /use_index druzyna_bie $$[{i}] /for i 1 (rozmiar_tablicy_druzyna_bie) /use_index druzyna_bie $$[{i}]
/def rozmiar_tablicy = \ /def rozmiar_tablicy = \
/if ({#} < 1) \ /if ({#} < 1) \
@ -186,7 +186,6 @@
/echo %{1} %;\ /echo %{1} %;\
/echo Index %{_nr} of an array '%{_ta}' is '%{1}' /echo Index %{_nr} of an array '%{_ta}' is '%{1}'
/def member_array = \ /def member_array = \
/let _ind=%{1}%;\ /let _ind=%{1}%;\
/let _arr=%{2}%;\ /let _arr=%{2}%;\
@ -199,11 +198,3 @@
/else \ /else \
/mesg -w Tablica '%_arr' nie istnieje!%;\ /mesg -w Tablica '%_arr' nie istnieje!%;\
/endif /endif
;/def remove_index = \
; /let _arr=%{1}%; \
; /let _ind=%{2}%; \
; /if (if_array_exists(_arr)) \
; /let _inx=$(/check_index %_arr %_ind)%; \
; /remove_index name nr_of_index
; Not impleted yet :)