Hilfe Gesucht

hallo ArmaWorld Community

Ich hoffe ihr könnt mir weiterhelfen ich suche schon längeren nach einen Script wo ich einen AI Heli rufen kann der mir eine Kiste abwirft oder mich in die AO und von der AO abholen kann gibt es da was?

Da ich nicht wirklich sqf Sprache kann oder eine andere programmier- Sprache würde ich mich über eine Antwort freuen

mit freundlichen grüßen
ExE

Danke an alle die geschrieben haben

das Problem ist es muss nicht ein Script sein ich versuche es auch mit den Arma Modulen aber habe noch nichts richtiges gefunden ich würde gerne das die teamleder nur die befehle bekommen und Kisten abrufen können Ares mod kenne ich aber ich würde ungern wieder eine mod einbauen da ich momentan 12 habe wenn es die Möglichkeit gibt alles mit Script abzurufen wehre es einfach nur geil da ich nicht so wirklich Erfahrung habe in sqf ich lerne noch alles über SQF und BI wiki

würde mich über jede Antwort freuen und Hilfe auch DANKE

Zitat von Drunken Officer

Bitte genauer ausführen.
1. Gibt es die Kiste bereits auf der Karte?
2. Gibt es den Heli bereits auf der Karte?

Ich habe mir mal einen Coce gebaut, da flog mich mein AI Heli entweder zur LZ rein oder holte mich ab. Auch ein Kistenabwurf ist sehr einfach zu bewerkstelligen

Nein es gibt keine Kisten
Ja es gibt Heils auf der Karte uh60 von RHS

Ich würde gerne das zum bespiele der uh60 wohl als auch Kisten abwirft und uns in die AO und von der AO abholt

Zitat von Drunken Officer

Wir die LZ/EZ an Hand es Anforders definiert, oder sind dies Marker auf der Karte?

Ich habe es mir so gedacht wenn der Heli in dem HQ steht steigen die Leute ein und durch ein addAction ich die Karte aufmache und sage LZ da und er fliegt weg. Und dasselbe auch wenn ich fertig bin das ich den Heli rufen kann und sagen hier abholzone Flieg mich in das HQ

ich hoffe das ich mich richtig ausgedrückt habe

LG

Zitat von Drunken Officer

Ich habe mal um die Mittagszeit ein altes Script von mir modifiziert. Ein Helikopter fliegt dich zur LZ bzw. holt die ab. Du gibtst dem Helikoper ein Zeichen, wenn er wieder abheben soll. Damit gibt es keine Gruppenbindung oder ähnliches.

Folgendes Beispielt zeigt eine Variante auf. Man kann es auf die Spitze treiben, das eine bestimmte Rauchfarbe genutzt werden muss oder das im Umkreis von 1km kein Fein sein darf usw. Möglichkeiten gibt es viele.

1. Du stellst einen Helikopter incl Besatzung auf die Karte und benennst diesen Transe

2. Du erstellst einen Marker (helikoptersymbol) und benennst diesen mkr_transe
3. du erstellst ein init.sqf, sowie einen Unterordner s (kurz für Scripte) und erstellst darin die Helisupport.sqf
6. den u.a. Code kopierst du in die Helisupport.sqf

in die Init.sqf

Code

1. if (isserver) then
2. {
3. missionNamespace setVariable ["callsupport", false,true];
4. setmarkerposonme = transe spawn { while {alive _this} do { "mkr_transe" setmarkerpos getpos _this; sleep 1; } };
5. };
10. //--- Fügt dem Helikopter ein Addaction zu
11. EineID = Transe addAction
12. [
13. "<t color='#FF0000'>Transport zur LZ</t>",
14. "s\helisupport.sqf",
15. [transe, 0],
16. 6,
17. false,
18. false,
19. "",
20. "!(missionNameSpace getVariable 'callsupport') && _target == vehicle _this"
21. ];

Alles anzeigen

in die Init des Spielers, der rufen kann

Code

1. EineID = this addAction
2. [
3. "<t color='#FF0000'>Evac rufen</t>",
4. "s\helisupport.sqf",
5. [transe,1],
6. 6,
7. false,
8. false,
9. "",
10. "_target == player && !(missionNameSpace getVariable 'callsupport')"
11. ];

Alles anzeigen

die eigentliche Datei

Code

1. params ["_caller", "_lfz", "_wp1","_wp2","_startpos"];
6. _lfz = (_this select 3) select 0;
7. _transporttyp = (_this select 3) select 1; // 0 = zur LZ; 1 = zurück zur Basis
8. _lfz setVariable ["var_backtobase", false, true];
13. if ( missionNamespace getVariable "callsupport") exitWith { [(side _caller),"HQ"] commandChat "Einsatz abgelehnt. Keine freien Transportmittel" };
20. _dof_fnc_meinMarkerFunction =
21. {
22. createMarker ["LzEzMarker",LandingPos];
23. "LzEzMarker" setMarkerShape "ICON";
24. "LzEzMarker" setMarkerType "hd_dot";
25. "LzEzMarker" setMarkerText _this;
26. };
29. _caller = (_this select 1);
32. openmap [true,false];
33. titletext ["auf der Karte die Helikopereinsatzort markieren","plain"];
34. onMapSingleClick "onMapSingleClick ''; LandingPos = _pos; missionNamespace setvariable ['callsupport', true, true];";
35. waitUntil {sleep 1; (!visiblemap || callsupport)};
36. if (!callsupport) exitWith
37. {
38. missionNamespace setvariable ['callsupport', false, true];
39. hint parseText format["<t size='1.25' color='#ff0000'>Helikoptereinsatz abgebrochen</t>"];
40. titletext ["","plain"];
41. };
42. [[(side _caller),"HQ"], "Daten an Flugzentrale gesendet. Helikoper kommt zum Einsatz"] remoteExec ["commandChat"];
49. if (_transporttyp == 0) then { "Landezone" call _dof_fnc_meinMarkerFunction} else { "Evac Punkt" call _dof_fnc_meinMarkerFunction };
50. _startpos = getpos _lfz;
51. _lfzpad = "Land_HelipadEmpty_F" createVehicle LandingPos;
52. _lfz synchronizeObjectsAdd [_lfzpad];
57. //--- erstellt Wegpunkt im Einsatzgebeit
58. _wp1 = group _lfz addwaypoint [LandingPos, 1];
59. _wp1 setwaypointtype "MOVE";
60. _wp1 setWaypointStatements ["true", "(vehicle this) LAND 'GET OUT';"];
61. _lfz setCombatMode "blue";
62. _lfz setBehaviour "SAFE";
63. _lfz allowfleeing 0;
64. _lfz flyinHeight 40;
69. waitUntil {sleep 1; _lfz distance LandingPos < 600};
70. if (_transporttyp == 1) then{ "SmokeShellGreen" createVehicle LandingPos};
71. _lfz setspeedMode "normal";
72. [[(side _caller),"HQ"], "Helikopter erreicht das Einsatzgebiet. Landung erfolgt in x < 3"] remoteExec ["commandChat"];
73. _lfz setcaptive true;
78. waitUntil {sleep 1; _lfz distance LandingPos < 150};
79. _lfz setspeedMode "LIMITED";
80. waitUntil {sleep 1; getpos _lfz select 2 < 5};
81. //--- fügt ein Abflugkommando hinzu
82. flyhomeID = _lfz addAction
83. [
84. "<t color='#FF0000'>Ready! Fly Back </t>",
85. { (_this select 0) setVariable ["var_backtobase", true,true]; (_this select 0) removeAction flyhomeID; },
86. nil,
87. 6,
88. false,
89. false,
90. "",
91. ""
92. ];
97. waituntil {sleep 2; _lfz getVariable "var_backtobase"}; // waituntil {sleep 2; {_x in _lfz} count allunits == countedcrew} --> wenn helicrew vorher ausgezählt;
98. //--- Löscht den Marker, Setzt Pad neu, Syncronisert neu, Heli gehört wieder zur Seite
99. deleteMarker "LzEzMarker";
100. _lfz setcaptive false;
101. _lfzpad setpos _startpos; _lfz synchronizeObjectsAdd [_lfzpad];
102. //--- Leitet Ablug ein
103. _wp2 = group _lfz addwaypoint [_startpos, 1];
104. _wp2 setwaypointtype "MOVE";
105. _lfz setCombatMode "blue";
106. _lfz setBehaviour "SAFE";
107. _lfz allowfleeing 0;
108. _lfz flyinHeight 40;
113. waitUntil {sleep 1; _lfz distance _startpos < 600};
114. _lfz setspeedMode "normal";
115. waitUntil {sleep 1; _lfz distance _startpos < 150};
116. _lfz setspeedMode "LIMITED";
117. _lfz land "LAND";
122. waitUntil {isTouchingGround _lfz};
123. _lfz action ["engineOff", _lfz];
124. _lfz setdammage 0; _lfz setfuel 1;
125. missionNamespace setvariable ["callsupport", false, true];
126. deleteVehicle _lfzpad;
127. while {(count (waypoints (group _lfz))) > 0} do
128. {
129. deleteWaypoint ((waypoints (group _lfz)) select 0);
130. };

Alles anzeigen

Alles anzeigen

Ich werde das gleich mal in der VR testen danke dir viel mal für das evac Script werde es mir genau anschauen, wo ob was lernen kann von den Script danke danke

Ich habe auch ein Script gefunden aber das ist leider auf einer alten Version von arma bei mir spuckt es auf Fehler könnte mir da noch einer dabei helfen ?

Um den Fehler genau zu finden danke an alle die alle geschrieben haben

besonderen dank an Drunken Officer für sein EVAC Script

www.armaholic.com

Zitat von John Weingarten

Wenn du von A nach B abgesetzt werden willst kannst in deine Team dem Piloten aufnehmen und per Behelfen hin und her aussenden und Kisten hin und her Fliegen lassen.Geht alles mit dem AI Behelfen als Team Ldr.

Wenn es dir leicht machen willst

ich habe keine KI auf der Mission als blufor bzw was ich spannen kann

das Script von Drunken Officer hat wunderbar funktioniert der Teamleiter kann nur die EVAC rufen und das ich habe ich gesucht jetzt muss ich nur noch was finden wie ich eine VRArsenal noch als supply drop einbauen kann

Zitat von Drunken Officer

Ich habe mal um die Mittagszeit ein altes Script von mir modifiziert. Ein Helikopter fliegt dich zur LZ bzw. holt die ab. Du gibtst dem Helikoper ein Zeichen, wenn er wieder abheben soll. Damit gibt es keine Gruppenbindung oder ähnliches.

Folgendes Beispielt zeigt eine Variante auf. Man kann es auf die Spitze treiben, das eine bestimmte Rauchfarbe genutzt werden muss oder das im Umkreis von 1km kein Fein sein darf usw. Möglichkeiten gibt es viele.

1. Du stellst einen Helikopter incl Besatzung auf die Karte und benennst diesen Transe

2. Du erstellst einen Marker (helikoptersymbol) und benennst diesen mkr_transe
3. du erstellst ein init.sqf, sowie einen Unterordner s (kurz für Scripte) und erstellst darin die Helisupport.sqf
6. den u.a. Code kopierst du in die Helisupport.sqf

in die Init.sqf

Code

1. if (isserver) then
2. {
3. missionNamespace setVariable ["callsupport", false,true];
4. setmarkerposonme = transe spawn { while {alive _this} do { "mkr_transe" setmarkerpos getpos _this; sleep 1; } };
5. };
10. //--- Fügt dem Helikopter ein Addaction zu
11. EineID = Transe addAction
12. [
13. "<t color='#FF0000'>Transport zur LZ</t>",
14. "s\helisupport.sqf",
15. [transe, 0],
16. 6,
17. false,
18. false,
19. "",
20. "!(missionNameSpace getVariable 'callsupport') && _target == vehicle _this"
21. ];

Alles anzeigen

in die Init des Spielers, der rufen kann

Code

1. EineID = this addAction
2. [
3. "<t color='#FF0000'>Evac rufen</t>",
4. "s\helisupport.sqf",
5. [transe,1],
6. 6,
7. false,
8. false,
9. "",
10. "_target == player && !(missionNameSpace getVariable 'callsupport')"
11. ];

Alles anzeigen

die eigentliche Datei
Code geändert

Code

1. params ["_caller", "_lfz", "_wp1","_wp2","_startpos"];
4. _lfz = (_this select 3) select 0;
5. _transporttyp = (_this select 3) select 1; // 0 = zur LZ; 1 = zurück zur Basis
6. _lfz setVariable ["var_backtobase", false, true];
9. if ( missionNamespace getVariable "callsupport") exitWith { [(side _caller),"HQ"] commandChat "Einsatz abgelehnt. Keine freien Transportmittel" };
14. _dof_fnc_meinMarkerFunction =
15. {
16. createMarker ["LzEzMarker",LandingPos];
17. "LzEzMarker" setMarkerShape "ICON";
18. "LzEzMarker" setMarkerType "hd_dot";
19. "LzEzMarker" setMarkerText _this;
20. };
21. _caller = (_this select 1);
26. openmap [true,false];
27. titletext ["auf der Karte die Helikopereinsatzort markieren","plain"];
28. onMapSingleClick "onMapSingleClick ''; LandingPos = _pos; missionNamespace setvariable ['callsupport', true, true];";
29. waitUntil {sleep 1; (!visiblemap || callsupport)};
30. if (!callsupport) exitWith
31. {
32. missionNamespace setvariable ['callsupport', false, true];
33. hint parseText format["<t size='1.25' color='#ff0000'>Helikoptereinsatz abgebrochen</t>"];
34. titletext ["","plain"];
35. };
36. [[(side _caller),"HQ"], "Daten an Flugzentrale gesendet. Helikoper kommt zum Einsatz"] remoteExec ["commandChat"];
41. if (_transporttyp == 0) then { "Landezone" call _dof_fnc_meinMarkerFunction} else { "Evac Punkt" call _dof_fnc_meinMarkerFunction };
42. _startpos = getpos _lfz;
43. _lfzpad = "Land_HelipadEmpty_F" createVehicle LandingPos;
44. _lfz synchronizeObjectsAdd [_lfzpad];
47. //--- erstellt Wegpunkt im Einsatzgebeit
48. _wp1 = group _lfz addwaypoint [LandingPos, 1];
49. _wp1 setwaypointtype "MOVE";
50. _wp1 setWaypointStatements ["true", "(vehicle this) LAND 'GET OUT';"];
51. _lfz setCombatMode "blue";
52. _lfz setBehaviour "SAFE";
53. _lfz allowfleeing 0;
54. _lfz flyinHeight 40;
57. waitUntil {sleep 1; _lfz distance LandingPos < 600};
58. if (_transporttyp == 1) then{ "SmokeShellGreen" createVehicle LandingPos};
59. _lfz setspeedMode "normal";
60. [[(side _caller),"HQ"], "Helikopter erreicht das Einsatzgebiet. Landung erfolgt in x < 3"] remoteExec ["commandChat"];
61. _lfz setcaptive true;
64. waitUntil {sleep 1; _lfz distance LandingPos < 150};
65. _lfz setspeedMode "LIMITED";
66. waitUntil {sleep 1; getpos _lfz select 2 < 5};
67. //--- fügt ein Abflugkommando hinzu
68. flyhomeID = _lfz addAction
69. [
70. "<t color='#FF0000'>Ready! Fly Back </t>",
71. { (_this select 0) setVariable ["var_backtobase", true,true]; (_this select 0) removeAction flyhomeID; },
72. nil,
73. 6,
74. false,
75. false,
76. "",
77. ""
78. ];
81. waituntil {sleep 2; _lfz getVariable "var_backtobase"}; // waituntil {sleep 2; {_x in _lfz} count allunits == countedcrew} --> wenn helicrew vorher ausgezählt;
82. //--- Löscht den Marker, Setzt Pad neu, Syncronisert neu, Heli gehört wieder zur Seite
83. deleteMarker "LzEzMarker";
84. _lfz setcaptive false;
85. _lfzpad setpos _startpos;
86. //--- Leitet Ablug ein
87. _wp2 = group _lfz addwaypoint [_startpos, 1];
88. _wp2 setwaypointtype "MOVE";
89. _wp2 setWaypointStatements ["true", "(vehicle this) LAND 'Land';"];
90. _lfz setCombatMode "blue";
91. _lfz setBehaviour "SAFE";
92. _lfz allowfleeing 0;
93. _lfz flyinHeight 40;
96. waitUntil {sleep 1; _lfz distance _startpos < 600};
97. _lfz setspeedMode "normal";
98. waitUntil {sleep 1; _lfz distance _startpos < 150};
99. _lfz setspeedMode "LIMITED";
100. //_lfz land "LAND";
103. waitUntil {isTouchingGround _lfz};
104. _lfz action ["engineOff", _lfz];
105. _lfz setdammage 0; _lfz setfuel 1;
106. missionNamespace setvariable ["callsupport", false, true];
107. deleteVehicle _lfzpad;
108. while {(count (waypoints (group _lfz))) > 0} do
109. {
110. deleteWaypoint ((waypoints (group _lfz)) select 0);
111. };

Alles anzeigen

MPMission angefügt

Alles anzeigen

@Drunken Officer

wie
kann ich die Geschwindigkeit von den Heli beschleunigen und die Höhe
noch einbauen kann ansonsten funktioniert es einwandfrei das kleine
Problem ist das er nicht wirklich auf den Punkt landen, wo der Marker ist was ich angegeben habe aber das ist das kleinste Problem

danke noch mal für das tolle Script

Zitat von Drunken Officer

Wo willst du VA einbauen?

Box abwerfen ist auch nicht schwer. Box mit dem Fallschirm absetzen oder soll der Heli landen und die Box ausladen?

Ich würde gerne das der Heli landet und die Leute sich da ausrüsten können

oder gibt es eine andere Möglichkeit das ich die Box selber befüllen kann

_Box addItemCargoGlobal ["rhsusf_20Rnd_762x51_m118_special_Mag",50];
_Box addItemCargoGlobal ["rhsusf_20Rnd_762x51_m993_Mag",50];

am besten würde es mit dem befüllen gehen da die Arsenalbox probleme machen würde bei den Spieler und das ich nicht der sin der Sache

Habe das Script auch mit Radio installiert aber ab und zu kommt der heli nicht ohne Fehler ohne irgend was habe das Script in deine TUT_Helisupport.Stratis eingebaut kannst es dir mal anschauen

zu den script gibt es ein tut

Youtube