game tower defense

mas kevin klo baris uda diatasi tapi pake  gini scriptnya

Code:

+string(ee-target.ID+1)

ee itu globalvar di script get_wave_enemies
distu ee = wave_enemies;
la ini ada yg mw aq tanyain lg mimin n momod
ini aq minta bantuan temenE tapi kok malah acak kadul bisa minta tolong fixin g....??
aq kan minta tolong gini
pertama dicari nilai hp terkecil

kedua dicari speed dterbesar  

ketiga dicari nilai  jarak musuh dgn tower terkecil

keempat dihitung nilai hp/speed dicari hasil terkecil

kelima dihitung nilai jarak/speed dicari hasil terkecil

keenam dihitung nilai hpxspeed/jarak  dicari hasil terkecil

dari enam seleksi itu musuh mana yg paling byk dpilih trus ditembak tower ampe kalah trus dihitung ulang lagi gt mas…. bisa g ya…??


kata tmnQ
sc_hp = method yg hpnya *aku +1 soalnya da kejadian minus

Code:

if argument0.speed != 0
return argument0.own_health+1;

sc_speed = method yg return speed enemy obj

Code:

if argument0.speed != 0
return argument0.speed;

sc_distance = method yg return distance between enemy obj and tower

Code:

if arg[hr]ument0.speed != 0
return distance_to_object(argument0);

sc_hp_speed = method yg return (hp+1)/speed

Code:

if argument0.speed != 0
return argument0.own_health+1/argument0.speed;

sc_dis_speed = method yg return distance/speed

Code:

if argument0.speed != 0
return distance_to_object(argument0)/argument0.speed;

sc_hp_dis_speed = method yg return
(hp+1)*speed/distance

Code:

if argument0.speed != 0
return (argument0.own_health+1)*argument0.speed/distance_to_object(argument0);

sc_ret_hp = method yg mengurutkan algoritma 1 sampe 6, kmudian dcari enemy obj yg paling bnyak muncul (mode)

Code:

//script hp musuh terkecil

if instance_exists(ob_enemy){
    hp0 = sc_hp(ob_enemy);
    hp[hp0] = ob_enemy;
}else hp0 = 9999;
if instance_exists(ob_enemy2){
    hp1 = sc_hp(ob_enemy2);
    hp[hp1] = ob_enemy2;
}else hp1 = 9999;
if instance_exists(ob_enemy3){
    hp2 = sc_hp(ob_enemy3);
    hp[hp2] = ob_enemy3;
}else hp2 = 9999;
if instance_exists(ob_enemy4){
    hp3 = sc_hp(ob_enemy4);
    hp[hp3] = ob_enemy4;
}else hp3 = 9999;
if instance_exists(ob_enemy5){
    hp4 = sc_hp(ob_enemy5);
    hp[hp4] = ob_enemy5;
}else hp4 = 9999;

if own_health !=0 && !(hp0=9999 && hp1=9999 && hp2=9999 && hp3=9999 && hp4=9999)
{
    min_hp = min(hp0,hp1,hp2,hp3,hp4)
    obj_min[0] = hp[min_hp]; //musuh hp terkecil
}

//script speed terbesar
if instance_exists(ob_enemy){
    speed0 = sc_speed(ob_enemy);
    speedObj[speed0] = ob_enemy;
}else speed0 = -1;
if instance_exists(ob_enemy2){
    speed1 = sc_speed(ob_enemy2);
    speedObj[speed1] = ob_enemy2;
}else speed1 = -1;
if instance_exists(ob_enemy3){
    speed2 = sc_speed(ob_enemy3);
    speedObj[speed2] = ob_enemy3;
}else speed2 = -1;
if instance_exists(ob_enemy4){
    speed3 = sc_speed(ob_enemy4);
    speedObj[speed3] = ob_enemy4;
}else speed3 = -1;
if instance_exists(ob_enemy5){
    speed4 = sc_speed(ob_enemy5);
    speedObj[speed4] = ob_enemy5;
}else speed4 = -1;

if !(speed0=-1 && speed1=-1 && speed2=-1 && speed3=-1 && speed4=-1)
{
    min_speed = max(speed0,speed1,speed2,speed3,speed4)
    obj_min[2] = speedObj[min_speed]; //speed terbesar
}

//script distance terkecil
if instance_exists(ob_enemy){
    dis0 = sc_distance(ob_enemy);
    dis[dis0] = ob_enemy;
}else dis0 = 9999;
if instance_exists(ob_enemy2){
    dis1 = sc_distance(ob_enemy2);
    dis[dis1] = ob_enemy2;
}else dis1 = 9999;
if instance_exists(ob_enemy3){
    dis2 = sc_distance(ob_enemy3);
    dis[dis2] = ob_enemy3;
}else dis2 = 9999;
if instance_exists(ob_enemy4){
    dis3 = sc_distance(ob_enemy4);
    dis[dis3] = ob_enemy4;
}else dis3 = 9999;
if instance_exists(ob_enemy5){
    dis4 = sc_distance(ob_enemy5);
    dis[dis4] = ob_enemy5;
}else dis4 = 9999;

if !(dis0=9999 && dis1=9999 && dis2=9999 && dis3=9999 && dis4=9999)
{
    min_dis = min(dis0,dis1,dis2,dis3,dis4);
    obj_min[2] = dis[min_dis]; //jarak musuh terkecil
}

//script hp_speed speed terkecil

if instance_exists(ob_enemy){
    hp_speed0 = sc_hp_speed(ob_enemy);
    hp_speed[hp_speed0] = ob_enemy;
}else hp_speed0 = 9999;
if instance_exists(ob_enemy2){
    hp_speed1 = sc_hp_speed(ob_enemy2);
    hp_speed[hp_speed1] = ob_enemy2;
}else hp_speed1 = 9999;
if instance_exists(ob_enemy3){
    hp_speed2 = sc_hp_speed(ob_enemy3);
    hp_speed[hp_speed2] = ob_enemy3;
}else hp_speed2 = 9999;
if instance_exists(ob_enemy4){
    hp_speed3 = sc_hp_speed(ob_enemy4);
    hp_speed[hp_speed3] = ob_enemy4;
}else hp_speed3 = 9999;
if instance_exists(ob_enemy5){
    hp_speed4 = sc_hp_speed(ob_enemy5);
    hp_speed[hp_speed4] = ob_enemy5;
}else hp_speed4 = 9999;

if own_health !=0 && !(hp_speed0=9999 && hp_speed1=9999 && hp_speed2=9999 && hp_speed3=9999 && hp_speed4=9999)
{
    min_hp_speed = min(hp_speed0,hp_speed1,hp_speed2,hp_speed3,hp_speed4)
    obj_min[3] = hp_speed[min_hp_speed]; //musuh hp_speed terkecil
}

//script distance speed terkecil
if instance_exists(ob_enemy){
    dis_speed0 = sc_dis_speed(ob_enemy);
    dis_speed[dis_speed0] = ob_enemy;
}else dis_speed0 = 9999;
if instance_exists(ob_enemy2){
    dis_speed1 = sc_dis_speed(ob_enemy2);
    dis_speed[dis_speed1] = ob_enemy2;
}else dis_speed1 = 9999;
if instance_exists(ob_enemy3){
    dis_speed2 = sc_dis_speed(ob_enemy3);
    dis_speed[dis_speed2] = ob_enemy3;
}else dis_speed2 = 9999;
if instance_exists(ob_enemy4){
    dis_speed3 = sc_dis_speed(ob_enemy4);
    dis_speed[dis_speed3] = ob_enemy4;
}else dis_speed3 = 9999;
if instance_exists(ob_enemy5){
    dis_speed4 = sc_dis_speed(ob_enemy5);
    dis_speed[dis_speed4] = ob_enemy5;
}else dis_speed4 = 9999;

if !(dis_speed0=9999 && dis_speed1=9999 && dis_speed2=9999 && dis_speed3=9999 && dis_speed4=9999)
{
    min_dis_speed = min(dis_speed0,dis_speed1,dis_speed2,dis_speed3,dis_speed4)
    obj_min[4] = dis_speed[min_dis_speed]; //musuh dis_speed terkecil
}


//script hp distance speed terkecil
if instance_exists(ob_enemy){
    hp_dis_speed0 = sc_hp_dis_speed(ob_enemy);
    hp_dis_speed[hp_dis_speed0] = ob_enemy;
}else hp_dis_speed0 = 9999;
if instance_exists(ob_enemy2){
    hp_dis_speed1 = sc_hp_dis_speed(ob_enemy2);
    hp_dis_speed[hp_dis_speed1] = ob_enemy2;
}else hp_dis_speed1 = 9999;
if instance_exists(ob_enemy3){
    hp_dis_speed2 = sc_hp_dis_speed(ob_enemy3);
    hp_dis_speed[hp_dis_speed2] = ob_enemy3;
}else hp_dis_speed2 = 9999;
if instance_exists(ob_enemy4){
    hp_dis_speed3 = sc_hp_dis_speed(ob_enemy4);
    hp_dis_speed[hp_dis_speed3] = ob_enemy4;
}else hp_dis_speed3 = 9999;
if instance_exists(ob_enemy5){
    hp_dis_speed4 = sc_hp_dis_speed(ob_enemy5);
    hp_dis_speed[hp_dis_speed4] = ob_enemy5;
}else hp_dis_speed4 = 9999;

if own_health !=0 && !(hp_dis_speed0=9999 && hp_dis_speed1=9999 && hp_dis_speed2=9999 && hp_dis_speed3=9999 && hp_dis_speed4=9999)
{
    min_hp_dis_speed = min(hp_dis_speed0,hp_dis_speed1,hp_dis_speed2,hp_dis_speed3,hp_dis_speed4)
    obj_min[5] = hp_dis_speed[min_hp_dis_speed]; //musuh hp_dis_speed terkecil
}


//script mencari mode
maxCount = 0;
maxValue = ob_enemy;
if (variable_local_exists("obj_min")){
for (i = 0; i < 6; i+=1) { //6 = size of array obj_min
        count = 0;
        for (j = 0; j < 6; j+=1) { //6 = size of array obj_min
            if (obj_min[j] == obj_min[i]) count+=1;
        }
        if (count > maxCount) {
            maxCount = count;
            maxValue = obj_min[i];
        }
    }
}
return maxValue;

kata tmnQ

btw tuk method sc_ret_hp , aku gak tau dmna script buat manggil tu,, namanya gak aku ganti, takut gak kpanggil <"DPILIH TRUS DITEMBAK TOWER AMPE KALAH TRUS DIHITUNG ULANG LAGI HAM" << aku blom tau gmna bikinnya, yg jelas aku modify FILE PROJECT yg dari FORUM,, klo smisal FILE PROJECT dari FORUM blom mnyertakan tu, brarti d kerjaanku jg BELOM

la dirubah gt sama temenQ kok malah gelombang musuhnya acaka kadul jadi tiap 4 detik kok malah ngirim enemy ya...??
klo ada yg niat bantuin ini aq kirim GMKnya ni linkNya
makasi maaf ngrepotin....

yg di sc_distance ad salah ketik atau emg script ny?

Code:

if arg[hr]ument0.speed != 0
return distance_to_object(argument0);

gk ad hr ny, yg bner argument0

tpi game ny berjalan seperti yg di harapkan? (kecuali wave ny). kalo cma ubah wave sih kyk ny ada di event alarm

yg di sc_distance ad salah ketik atau emg script ny?

Code:

if arg[hr]ument0.speed != 0
return distance_to_object(argument0);

gk ad hr ny, yg bner argument0

tpi game ny berjalan seperti yg di harapkan? (kecuali wave ny). kalo cma ubah wave sih kyk ny ada di event alarm

salah ketik disni itu bang dgamenya g ada itu bang kev....
tau bang aq br mw taruh blm apa2 ud ngirim enemy aja.... trus g bisa naruh tower klo uda jalan musuhnya
dievent alarm tower ya bang...??  cm da script ini dievent alarm

Code:

target=sc_ret_hp()

di uabah gmana bang di event alarmnya...??

ooh ok

utk wave ny:
coba lihat script get_wave_enemies
disana ada angka 100, gnti jdi 900

yg ini:
if wave_time = 100
dan
if wave_time < 100 wave_time += 1;

gnti angka 100 jdi 900

ak coba bisa kok taruh tower pas musuh ny jalan

oala hehehehehehe..... masih kurang teliti aq bang.....
aq pelajari dulu ntar klo ada yg g bisa aq tanya lg y.... hehehehehehe.....
oya bang

<"DPILIH TRUS DITEMBAK TOWER AMPE KALAH TRUS DIHITUNG ULANG LAGI HAM" << aku blom tau gmna bikinnya, yg jelas aku modify FILE PROJECT yg dari FORUM,, klo smisal FILE PROJECT dari FORUM blom mnyertakan tu, brarti d kerjaanku jg BELOM

la ini uda ada blm bang...??
makasi2 bang.... aq pengen jago GM kyk km bang bth brp taun lg ni??

hehehe
ok

kyk ny udh, tpi gk work yg instance_exists(target) itu lho

ak udh 3 tahun tpi msih blum jago

___________________________________________
ERROR in
action number 1
of Step Event
for object ob_tower_laser:

In script sc_ret_hp:
Error in code at line 180:
if (obj_min[j] == obj_min[i]) count+=1;
^
at position 18: Unknown variable obj_min or array index out of bounds

error gini knp ya bang...??

temen mu bikin variable obj_min, tpi gk tau size array ny brp, jdi ketika nilai array ny sudah melebihi batas, maka kluar lh error ini

btw temen mu itu siapa?

anak bali ilham namanya dy bukan game maker tapi cpt bgt untuk mempelajari bahasa pemprograman bang... bisa dbilang cerdas tp y gt sibuk kerja dia.....
adakah solusinys untuk error itu bang...??

wah, bagus tuh
bisa jdi programmer handal

di sc_ret_hp()
di buang aja kode ini:
if (obj_min[j] == obj_min[i])

sisa'in count+=1

tmabahin dikit script ny:

if distance_to_object(target) > range
    {
       target=instance_nearest(x,y,ob_enemy);
     }

utk masalah mogok nembak, ak coba cek dlu

EDIT:
pke script ini aja di Step event:

if distance_to_object(target) <= range
{
//script seleksi
target=sc_ret_hp()
}
else
target=instance_nearest(x,y,ob_enemy_parent);

jdi baris pertama itu di buang, yg !instance_exist itu