ďťż
chomiki wymania rolki i napinacza paska w 405 turbo diesel 1995 Jaki tlumik kupic - Turbo diesel Regeneracja pompy i turbo we wlasnym zakresie kilka pytań na temat turbo diesli Możliwa jest przekładka silnika diesla na turbo? Przester BOSS OVERDRIVE TURBO Pytanie do użytkowników 2.0 turbo (406) Gdzie jest termostat w 1.9 turbo dieslu przewod miska olejowa --> turbo dokrecanie glowicy (turbo diesel) |
chomikiWitam,Tworzę grę w Turbo Pascalu, w której buduje się miasto. Jak w każdym mieście należy zarabiać na podatkach obywateli. Podatki powinny wpływać co jakiś czas do kasy miasta. Jak stworzyć czas w grze, aby podatki zostały opłacane regularnie? Za odpowiedzi z góry dziękuję. Jest taka funkcja jak gettime, poszukaj coś o niej. Zwraca czas w danej chwili, ale teraz szczegółów nie pamiętam. Jak coś znajde to napisze . W TP jest trudno ale jak byś robił to w Delphi to tam masz coś takiego jak Timer i zakładkę interval i tam ustawiasz dokładność danego zdarzenia do 0,001s A jeśli chodzi o TP to ja na razie proponuje coś takiego: Var H,M,S,St,H0,M0,S0,St0: Word; Begin GetTime(H0,M0,S0,St0); End; I następnie bym pobierał czas w pętli do: Begin GetTime(H,M,S,St); End; No i Odejmował wtedy otrzymasz konkretne liczby roznica_czasu:=(h0*360000+m0*6000+s0*100+st0)-(h*360000+m*6000+s*100+st); I załużmy: If roznica_czasu >= 12000 Then Begin h0:=h; m0:=m; s0:=s; st0:=st; .... End; No i to wszystko w jakiejś pętli A linijka ta z tym: "h0:=h; m0:=m; s0:=s; st0:=st;" Jest po to aby do zmiennych "0" przypisać czas aktualny i wtedy nie musisz zwiększać tego np: "1000" w warunku logicznym a jeśli chcesz aby był wyświetlany czas gry no to musisz mieć jeszcze jakieś zmienne PS: Nie pamiętam już czy w Pascalu są setne sekundy czy tysięczne Ale podałem na setnych 12000=2minuty |
||||
Wszelkie Prawa ZastrzeĹźone! chomiki Design by SZABLONY.maniak.pl. | |||||