branch | ios-develop |
changeset 13413 | ba39a1d396c0 |
parent 13358 | a79c1206bacd |
child 15929 | 128ace913837 |
13411:6e8b807bda4b | 13413:ba39a1d396c0 |
---|---|
77 end; |
77 end; |
78 |
78 |
79 for i:= t to 54 do |
79 for i:= t to 54 do |
80 cirbuf[i]:= $A98765 + 68; // odd number |
80 cirbuf[i]:= $A98765 + 68; // odd number |
81 |
81 |
82 for i:= 0 to 1023 do |
82 for i:= 0 to 2047 do |
83 GetNext; |
83 GetNext; |
84 end; |
84 end; |
85 |
85 |
86 function GetRandomf: hwFloat; |
86 function GetRandomf: hwFloat; |
87 begin |
87 begin |