|
|
@ -0,0 +1,50 @@ |
|
|
|
-module(test). |
|
|
|
|
|
|
|
-compile([export_all]). |
|
|
|
|
|
|
|
timer(_, _) -> |
|
|
|
% I = atomics:add_get(persistent_term:get(cnt), 1, 1), |
|
|
|
%io:format("IMY******* ~p~n", [I]) , |
|
|
|
% case I of |
|
|
|
% 1000000 -> |
|
|
|
% io:format("end time ~p ~n", [erlang:system_time(millisecond)]); |
|
|
|
% _ -> |
|
|
|
% ignore |
|
|
|
% end, |
|
|
|
ok. |
|
|
|
|
|
|
|
test(N, Time) -> |
|
|
|
io:format("start time1 ~p ~n", [erlang:system_time(millisecond)]), |
|
|
|
% persistent_term:put(cnt, atomics:new(1, [])), |
|
|
|
gTimer:startWork(16), |
|
|
|
doTest(N, Time). |
|
|
|
|
|
|
|
doTest(0, Time) -> |
|
|
|
io:format("start time2 ~p ~n", [erlang:system_time(millisecond)]), |
|
|
|
gTimer:setTimer(rand:uniform(Time), {?MODULE, timer, []}); |
|
|
|
doTest(N, Time) -> |
|
|
|
gTimer:setTimer(rand:uniform(Time), {?MODULE, timer, []}), |
|
|
|
doTest(N - 1, Time). |
|
|
|
|
|
|
|
timer(_) -> |
|
|
|
%io:format("IMY******* ~p~n", [I]) , |
|
|
|
% case I of |
|
|
|
% 1000000 -> |
|
|
|
% io:format("end time ~p ~n", [erlang:system_time(millisecond)]); |
|
|
|
% _ -> |
|
|
|
% ignore |
|
|
|
% end, |
|
|
|
ok. |
|
|
|
|
|
|
|
test2(N, Time) -> |
|
|
|
io:format("start time1 ~p ~n", [erlang:system_time(millisecond)]), |
|
|
|
doTest2(N, Time). |
|
|
|
|
|
|
|
doTest2(0, Time) -> |
|
|
|
io:format("start time2 ~p ~n", [erlang:system_time(millisecond)]), |
|
|
|
zm_dtimer:set({game, 0}, {?MODULE, timer, []}, {time, rand:uniform(Time), 6000}); |
|
|
|
doTest2(N, Time) -> |
|
|
|
zm_dtimer:set({game, N}, {?MODULE, timer, []}, {time, rand:uniform(Time), 6000}), |
|
|
|
doTest2(N - 1, Time). |
|
|
|
|
|
|
|
|