[Pandora rebirth] Fall to win

[gigios]

Allora, premetto che anche in questo caso non ho guardato il codice ma, l'effetto è abbastanza simile al primo screenshot inviato.
Praticamente ho la sovrapposizione di più muri.
Io proverei a tener conto, nella generazione dei muri, di un 'offset' minimo tra un muro e l'altro, in modo che ci sia lo spazio 'fisico' per far passare il personaggio.

[Farox]

Io invece con la versione 0.37 ho modificato i tasti...

Code: Select all

//------------------menu
process menu()
private
int posizione;
begin
testo[1]=write(0,400,150,1,"Fall to win");
testo[2]=write_var(0,400,160,1,version);
sfondo(400,240,10);
logo(400,100,9);
fakemarco(260,220,8);
posizione=1;
x=400;y=340;
loop
 switch (posizione)
		    case 1 : posizione=1;//-------------start
			graph=41;
			frame(500);
		       if (key(_DOWN)) posizione=2; end
			   if (key(_SPACE)); principale(); break; end
			   if (key(_END)); principale(); break; end //tasto B su Pandora
			end //endcase
		    case 2 : posizione=2;//------------option
			graph=42;
			frame(500);
		       if (key(_UP)) posizione=1; end
			   if (key(_DOWN)) posizione=3; end
			  // if (key(_SPACE));    //menu opzioni ...........se abilito anche questa riga mi da errore!!!
			   if (key(_END)); //tasto B menu opzioni su Pandora
			   end
			end //endcase
		    case 3 : posizione=3;//--------------Bonus
			graph=43;
			frame(500);
		       if (key(_UP)) posizione=2; end
			   if (key(_DOWN)) posizione=4; end
			   //if (key(_SPACE));    //menu BONUS...........se abilito anche questa riga mi da errore!!!
			   if (key(_END));  //tasto B menu Bonus su Pandora
			   end
			end //endcase
		    case 4 : posizione=4;//--------------exit
			graph=44;
			frame(500);
		       if (key(_UP)) posizione=3; end
			   if (key(_SPACE))esci=1; end
			   if (key(_END)) esci=1; end //tasto B su Pandora
			end //endcase
	end //endswitch
frame;
end
end

ed anche

Code: Select all

//-------------------------marco----
Process marco(x,y,z)

private

//Variabili utilizzate per gestire gli id dei processi durante le collisioni (se servissero in altri processi, toglierli da qui e metterli globali)
muro idMuro;
fuoco idFuoco;

//Variabili private
int premuto;
int premuto2;
int premuto3;
int m_animazione;
int togliVita;						//Usata per rimuovere una vita in caso di collisione
int startInvincibilita;				//Memorizza l'inizio dell'invincibilità per disattivarla dopo un tempo fisso

begin
	graph=10;
	palla=0;
	invincibile=0;
	m_animazione=10;
  loop
   
	if(key(_left)) x=x-6; angle=+20000; else angle=0; end
    if(key(_right)) x=x+6; angle=-20000;  end
	if(key(_up)) y=y-6; end
	if(key(_down)) y=y+6; end
	
	// if((get_timer()-last_time)>1000)
	// if(key(_SPACE))
			// last_time=get_timer(); 
			// palla=1; graph=20; 
			// angle=0; 
			// frame; 
		// else palla=0; graph=10; 
		// end 
	// end //--appallottolamento
	
	if(palla==0&&(get_timer()-last_time)>50)
		graph=m_animazione; m_animazione+=1; frame;
		last_time=get_timer();
		if (m_animazione>11)
			m_animazione=10;
		end
	end

	//if((get_timer()-last_time)>500)
	/// se abilito anche queste righe mi da errore nel compilare........
	//if(key(_SPACE))  
	//	last_time=get_timer(); 
	//	palla=1;	graph=20;	
	//	frame; 
	//else 
	//	palla=0;
	if(key(_CONTROL)) // tasto R su pandora
		last_time=get_timer(); 
		palla=1;	graph=20;	
		frame; 
	else 
		palla=0;
	end 
	//end //--appallottolamento

	   
	/// se abilito anche queste righe mi da errore nel compilare........
	//if((key(_Z))&& premuto==0 &&palla==0 &&nfiamme>0) fiamme(x-27,y+12);premuto=1; nfiamme=nfiamme-1;end //sparafuoco
	//if(!key(_Z))	 premuto=0; end
	
        //if((key(_C))&& premuto2==0 &&palla==0 &&nacqua>0) acqua(x+27,y+12);premuto2=1; nacqua=nacqua-1; end //sparaacqua
	//if(!key(_C))	 premuto2=0; end
	
	//if((key(_X))&& premuto3==0 &&palla==0 &&nfiocco>0) fiocco(x,y+4);premuto3=1;  nfiocco=nfiocco-1; end //sparafiocco
	//if(!key(_X))	 premuto3=0; end
	
	////////////////pandora button
	
	// X: Page Down
	if((key(_PGDN))&& premuto==0 &&palla==0 &&nfiamme>0) fiamme(x-27,y+12);premuto=1; nfiamme=nfiamme-1;end //sparafuoco
	if(!key(_PGDN))	 premuto=0; end
	
	// Y: Page Up
    if((key(_PGUP))&& premuto2==0 &&palla==0 &&nacqua>0) acqua(x+27,y+12);premuto2=1; nacqua=nacqua-1; end //sparaacqua
	if(!key(_PGUP))	 premuto2=0; end
	
	// A: Home
	if((key(_HOME))&& premuto3==0 &&palla==0 &&nfiocco>0) fiocco(x,y+4);premuto3=1;  nfiocco=nfiocco-1; end //sparafiocco
	if(!key(_HOME))	 premuto3=0; end
	///////////////////////////////////////
	
	if(y<15) y=15; end              //limite_superiore
    if(y>460) y=460; end            //limite_inferiore
	if(x<260) x=260; end            //limite SX
	if(x>540) x=540; end            //limite DX
	
	//-------------------------------------------------------------------------
	togliVita = 0;					//Resetta la variabile utilizzata per togliere una vita

	//-------------------------------------------------------------------------
	//Le collisioni vengono gestite solo se il personaggio non è invincibile
	//Se è già avvenuta una collisione salta i controlli delle altre collisioni (può essere tolto il controllo se si vogliono gestire ad esempio animazioni particolari su più collisioni)
	
	//-------------------------------------------------------------------------
	//Collisione con muro
	if(togliVita==0)
		idMuro=collision(type muro);
		if(idMuro)
			//Se il muro non è già stato distrutto allora controlla la collisione
			if(idMuro.distrutto==0)
				if((idMuro.ghiacciato==1) && (palla==1))
					//Rende il muro trasparente in quanto viene attraversato e indica che non è più 'pericoloro' ad eventuali passaggi successivi
					idMuro.alpha = 50;
					idMuro.distrutto = 1;
				elseif(invincibile == 0)
					//Se il personaggio non è invincibile toglie una vita
					togliVita = 1;
				end
			end
		end
	end
	//-------------------------------------------------------------------------
	//Collisione con fuoco
	if(togliVita==0)
		idFuoco=collision(type fuoco);
		if(idFuoco)
			//Se il fuoco non è già stato distrutto allora controlla la collisione
			if(idFuoco.distrutto==0)
				if(idFuoco.spento==1)
					//Rende il fuoco trasparente in quanto viene attraversato e indica che non è più 'pericoloro' ad eventuali passaggi successivi
					idFuoco.alpha = 50;
					idFuoco.distrutto = 1;
				elseif(invincibile == 0)
					//Se il personaggio non è invincibile toglie una vita
					togliVita = 1;
				end
			end
		end
	end
	//-------------------------------------------------------------------------

	//-------------------------------------------------------------------------
	//Gestione Vita
	if ((collision(type legno) && palla==0)
		or (collision(type laser) && laserspento==0)
		or togliVita == 1)

		if(invincibile==0)
			vite=vite-1;       				//diminuisce 1 vita
			invincibile=1;     				//diventa invincibile
			alpha=100;		 				//trasparentizza
			startInvincibilita=get_timer();	//Memorizza il tempo iniziale dell'invincibilità
		end
	else
		//Check Invincibile
		if(invincibile==1)
			//Controlla per quanto tempo invincibile è a 1
			if((get_timer()-startInvincibilita)>1000)	//Dopo un secondo resetta l'invincibilità
				invincibile=0;  	  //ritorna normal
				alpha=1000;         //opacizza
			end
		end
	end //Se sbatti col muro muori
	//-------------------------------------------------------------------------
	
	frame;  
 end
end

come potete vedere dai commenti Bennu non lo conosco granchè....infatti per compilare ho dovuto disabilitare la gestione tasti che viene usata da PC....perchè se no mi da errore.

Ah dimenticavo ho mappato i tasti cosi (versione di test e non definitiva..):
DPAD movimenti (che funzionava da sempre anche con le vecchie versioni)
Bottone R (post DX di Pandora) per accucciare ( ma puo andare bene anche B )
A : sparafiocco
X : sparafuoco
Y : spara acqua
B : conferma nei menu

Ancora manca la gestione dell'uscita pensavo di metterla nella gestione della pausa...cioè se in pausa e si preme ESC si esce dal gioco o si torna al menu...ho fatto una prova ma non funziona...

[Zip]

ieri avevo gia aggiustato y guarda come è gestito ora
@ farox posta la tua versione completa per piacere e chiamala 0.37p e cosi la confronto con la 037 normale
(nella 040 ho aggiunto la possibilita di uscire premendo ESC se si è in pausa)
oppure rimappa usando questa 0041

edit: come puoi vedere gigios la generazione non sembra cosi casuale visto che il rand genera
sx
ssx
cx
ddx
dx
di seguito :/
riedit: ho aggiunto
dopo il begin in GENERA()

Code: Select all

rand_seed(time());

sembra essere migliorata la casualita, passo a fare scelta casuale tipi dei muri

[gigios]

[OT]
Normalmente tutte le funzioni per generare numeri casuali, non sono tali!!!
Di solito, come hai fatto tu, si usa dare un 'seme' di partenza da cui partire a generare i vari numeri casuali.
Praticamente se applichi sempre lo stesso seme la sequenza di numeri generati sarà sempre la stessa, proprio perché non è realmente 'casuale'!
[/OT]

Appena posso provo l'ultima versione

[Zip]

generazione di tipo casuale introdotta!!!

ora vedo di aggiungere le condizioni
se parte =100 200 300 ecc esce 1 laser
se parte> 400 iniziano a uscire i fuochi
e vedo di rimettere i pwup
per migliorare la casualita che dovrei fare allora?

[gigios]

Per la casualità nulla!
Basta fare quello che hai fatto, ovvero passare come seed un valore sicuramente variabile, infatti sarà praticamente impossibile che il programma venga eseguito nello stesso giorno e alla stessa ora, con precisione del millisecondo
Praticamente con la tua istruzione di inizializzazione ti sei garantito che ad ogni riavvio dell'applicazione i livelli generati siano sicuramente differenti rispetto all'avvio precedente.

[Zip]

ho introdotto la parte dei fuochi dopo una certa "parte"
ho notato delle cose da sisetmare!
praticamente i poter acqua ghiaccio fuoco e i rispettivi muri nemici.

se io colpisco con una goccia il fuoco esso si spegne, ok..
ma devevo fare leggere alla goccia la variabile "spento" di fuoco e fare si che se è spento la nuova goccia non si infranga contro il muro semitrasparente ma passi..

c'era un errore che ho corretto in goccie che ho corretto aggiungendo

Code: Select all

if (collision (type fuoco))
		frame; break;

in pratica prima una goccia poteva spegnere tanti fuochi ora ho sistemato e si ferma al primo!
ma le nuove gocce non passano
devo sfruttate il pubblic che hai introdotto tu per "spento" ma non ci riesco :/ poi dai un occhiata tu magari
non subito perche devo aggiungere altro

io vedo di migliorare le condizioni legate a parte per aumentare la difficolta..

[Zip]

come faccio a ottenere una condizione del genere:

dopo che parte ha superato 50
ogni 30 parti generate
genera un fuoco
end

oppure

se parti generate multiplo di 200 (200 400)
genera laser
end

[gigios]

Ricapitolando, devo vedere il processo goccia, giusto?

Lo rendo come il muro e fuoco!

[Zip]

aspetta prendi questo che ci sono anche i fuochi..
e se puoi dimmi come dovrei tradurre qulle condizioni