Error Ramttation pack bgt
Guys made the code on BGT, but for a long time with ramttation pack did not work. when shooting at a target, nothing happens.sound_pool s;vector player(0, 0, 0);double turn;vector object(0, 0, 0);int object_slot;int points=0;timer step;timer turning;void l1(){start.play_wait();wait(3000);dlgplay("sounds/m1.wav");player.x=1;player.y=1;object.x=random(1, 20);object.y=random(1, 20);object_slot=s.play_2d("sounds/звук предмета.wav", player.x, player.y, object.x, object.y, calculate_theta(turn), true);turn=0;while(true) {if(key_down(KEY_UP) and step.elapsed>300) {player=move(player.x, player.y, 0, turn, north);s.play_stationary("sounds/step"+random(1, 3)+".wav", false);step.restart();}if(key_down(KEY_DOWN) and step.elapsed>300) {player=move(player.x, player.y, 0, turn, south);s.play_stationary("sounds/step"+random(1, 3)+".wav", false);step.restart();}if(key_down(KEY_LEFT) and turning.elapsed>50){turn=turnleft(turn, 10);turning.restart();}if(key_down(KEY_RIGHT) and turning.elapsed>50){turn=turnright(turn, 10);turning.restart();}if(key_pressed(KEY_SPACE)){if(calculate_x_y_angle(player.x, player.y, object.x, object.y, turn)>345 and calculate_x_y_angle(player.x, player.y, object.x, object.y, turn)<=15){s.play_stationary("sounds/предмет взят.wav", false);object.x=random(1, 20);object.y=random(1, 20);s.update_sound_2d(object_slot, object.x, object.y);points+=1;}s.play_stationary("sounds/vin.wav", false);}if(points==5){alert("Сообщение", "Вы выиграли");exit();}if(key_pressed(KEY_C))say_message(round(player.x, 0)+", "+round(player.y, 0));if(key_pressed(KEY_RETURN))say_message("Вы набрали "+points+" очков");if(key_pressed(KEY_ESCAPE))exit();s.update_listener_2d(player.x, player.y, calculate_theta(turn));wait(5);}}
URL: http://forum.audiogames.net/viewtopic.php?pid=263980#p263980
___
Audiogames-reflector mailing list
Audiogames-reflector@sabahattin-gucukoglu.com
https://sabahattin-gucukoglu.com/cgi-bin/mailman/listinfo/audiogames-reflector
