Tampilkan postingan dengan label air. Tampilkan semua postingan
Tampilkan postingan dengan label air. Tampilkan semua postingan

Script Air Combat IV AC IV

This script makes possible to spawn Jets with custom number of engines, flaps/elevators, gears, cannons, rockets with lock on target feature, bombs and flares. Also you can spawn enemies in jets to combat

Download: GTA 4 Mods

This one im really proud of, really complex script, started with an request of CORE.MAX2010 to create engine fire and jet sound for jets, when i finished this task i tested the idea of using AI drivers in jets and worked very well, then the real complex script started.





Controls:
To control the jet:
W (accel.)
S (desaccel.)
A (or numpad 4)
D (or numpad 6)
Shift (or numpad 8)
Control (or numpad 5)
numpad 7 - turn left
numpad 9 - turn right
X - Switch cam
Right click - Follow missile/bomb with camera
Space shoot missiles
Numpad0 - Shoot cannon
Q - Drop bomb
E - Release flare to avoid missiles (hold to release one by one)
F - Enter Jet / Exit Jet / Eject (if flying)
Left/Right help "drive" the jet while in the ground
0 - Spawn menu
Enter - Spawn select Jet in spawn menu, hold shift to spawn and start flying
2 - Spawn enemy
3 - Spawn fugitive
When on ground:
Left/Right (or numpads 7/9) - turn left or right
S - Break


XBox 360 controller controls:
Hold left and right Shoulders to see/hide jet spawn menu, use A to spawn on air or use X to spawn on ground
A - Shoot rockets
X - Shoot cannon
Y - Release flares
DPad Down - Drop bombs
B - Eject/Exit/Enter jet
Left Thumb stick - Pitch and Roll
Left/Right Shoulder - Turn left or right
Left Trigger - slow down
Right Trigger - Accelerate








In this one i used a lot of custom classes to be used in lists, this helped a lot and make the script more easy to modify.

You can have one list of jets to spawn, each one with custom configuration for weapons, engines, flaps, etc

Also its possible to set jet spawn/aquirement points

To create the rocket lock feature i must list the possible targets in a list of vehicles, then use this calc to see if the object is close to center of aiming position:


Dim tmpDist As Double = v.Position.DistanceTo(Game.CurrentCamera.Position)
Dim tmpPos As Vector3 = Game.CurrentCamera.Position + Game.CurrentCamera.Direction * tmpDist

If v.Position.DistanceTo(tmpPos) < (tmpDist / 3) Then

mark the vehicle as an locked target...
end if

obs.: "v" is one vehicle in the possible targets list

The use of classes made easy to make the enemy jets do the same rocket lock on the player and control they flight
Read More..

HUT ke 64 Pecahkan Rekor Upacara Bawah Air

Manado - Sebanyak 2.827 orang ikut serta dalam pemecahan rekor dunia upacara bawah air di Pantai Malalayang, Manado, Senin, dalam rangka peringatan detik-detik proklamasi HUT Kemerdekaan RI ke 64.



"Selain peserta ada juga tujuh pejabat upacara dan 19 tim setting area, di bawah air Pantai Malalayang," kata Kepala Dinas Penerangan Angkatan Laut (Kadispenal), Laksamana Pertama TNI Iskandar Sitompul di Manado Senin seperti dikutip Antara.

Sitompul menjelaskan para peserta itu terdiri atas 2.700 penyelam lokal, penyelam VIP dan 76 partisipan dari mancanegara. Dalam upacara tersebut bertindak sebagai inspektur upacara adalah Wakil Kepala Staf Angkatan Laut, Laksamana Madya TNI Moekhlas Sidik, dan komandan upacara Kadispenal, Laksamana Pertama TNI Iskandar Sitompul.

Karena adanya upacara ini, sejak pukul 06.00 Wita, jalan raya trans Sulawesi antara terminal dan batas kota Manado dan Minahasa yaitu Gerbang Boboca sudah ditutup, dan arus kendaraan ditutup, kata Sitompul.

Berdasarkan laporan Antara, arus lalulintas yang melintasi jalan raya tersebut juga dialihkan, dari Kalasey ke Manado dan dari Minahasa Selatan ke Manado dialihkan sekitar 6 jam, dan sama sekali tak boleh melintasi jalan tersebut.

"Terpaksa saya harus jalan kaki, karena jalan ditutup, padahal kantornya ada di Manado dan untuk ke tempat kerja harus naik angkot jurusan pusat kota, jadi suka tak suka saya jalan kaki, supaya jangan terlambat ikut upacara bendera," kata salah satu pegawai negeri Sipil (PNS) yang tinggal di Kalasey, Minahasa bernama Vera.

Arikel diambil dari tempointeraktif.com

Wah-wah-wah. Pada HUT Kemerdekaan yang ke-64 sampai memecahkan rekor dunia. Betapa semangatnya warga Indonesia. Jadi kita harus berbangga menjadi Warga Negara Indonesia. Indonesia Merdeka!!!
Read More..