Simplemente para que sepas, me interesa pero no lo entiendo. Podría decir que falta ver un ejemplo, el resultado, lo gráfico de eso ya que se habla de algo gráfico, pero creo que ni así lo entendería.

Ok, pero la medida que puse es la que se muestra al cliquear el objeto, no incluye las lineas.

El chiquito ni siquiera tiene líneas.

¡Me funcionó bien! ¿pero cómo? No entiendo mucho la lógica de esto, o sea, entre más hacia el extremo esté X, menos al extremo debe estar Y, sí, pero ¿cómo calculas exacto cuánto?
sqrt(r^2 - x^2)
¿pero por qué funciona? No sé mucho del por qué de ciertas ecuaciones, entiendo que el área de un rectángulo es base*altura porque la base se repite altura veces, hasta ahí llego xD

Ya veo, le ponía use the windows color o algo así:


Además, si lo copio de inmed¡ato, sale con el blanco.

Tengo que reabrirlo para que me quede así:


¡O sea con fondo negro! No sé por qué. Y con el borde blanco que dijiste.

Sí, voy a probar lo que dices online.

Aunque no está resuelto, pues faltan cosas, creo que está muy bien:

fscommand ("fullscreen", "true");
Mensajes = 0;
// Player:
attachMovie("sMarioDK", "Player", 1001);
setProperty ("Player", _x, 20);
setProperty ("Player", _y, 568);
// Determinan a qué función se llama:
Player.Action = "Quiet";
Player.Action2 = "Quiet";
Player.Facing = 1;
MarioDKHP = 1;
MarioDKDF = 1;
MarioDKMPMax = 1;
MarioDKMP = 1;
MarioDKMPRecovery = 0.005;
MarioDKPower = 2;
MarioDKSpeed = 1.5;
// MarioDKFR = (MarioDKPower + MarioDKSpeed) / 2;
// La animación avanza cuando esto llega a 100:
MarioDKTurn = 0;
// La velocidad de la animación puede depender de la velocidad...
// de caminar, o de la fuerza, etc:
MarioDKTic = MarioDKSpeed*1.5;
// Para que al empezar a caminar o a quedarse quieto,
// el martillo quede como estaba, arriba o abajo,
// en el mismo nro de frame:
Player.EtapaDeMartillo = 1;
Player.ResetearEtapaDeMartillo = "No";
DKSnapjawDF = 2;
DKSnapjawImpact = 1;
DKSnapjawSpeed = 1;
// IA:
attachMovie("sDK", "IA", 1000);
setProperty ("IA", _x, 780);
setProperty ("IA", _y, 568);
IA.Action2 = "Quiet";
IA.Facing = -1;
// setProperty ("IA", _xscale, -100);
DKHP = 10;
DKDF = 2;
DKSpeed = 0.5;
DKImpact = -1;
IATurn = 0;
// Escenario:
attachMovie("sDKSuelo", "Suelo", 0);
setProperty ("Suelo", _x, 0);
setProperty ("Suelo", _y, 568);
// Extras:
LdeProfundidadesDisponibles = [];
ValoraAgregar = 0;
do {
	ValoraAgregar++;
	LdeProfundidadesDisponibles.push(ValoraAgregar);
} while (ValoraAgregar<999);
delete ValoraAgregar;
// Para saber cuales devolver a la anterior lista cuando dejen...
// de usarse (cuando el Extra se remueva):
LdeProfundidadesUsandose = [];
// Para saber a qué función llamar:
LdeExtrasSinNumero = [];
// Para chequear colisiones:
LdeExtras = [];
// /////////////////////////////////////////////
// //////////////////  Most  ///////////////////
// /////////////////////////////////////////////
function FaceRight (Character) {
	if (eval(Character+".Facing") == -1) {
		set (Character+".Facing", 1);
		eval(Character)._xscale = 100;
	}
}
function FaceLeft (Character) {
	if (eval(Character+".Facing") == 1) {
		set (Character+".Facing", -1);
		eval(Character)._xscale = -100;
	}
}
// /////////////////////////////////////////////
// //////////////////  Mario  //////////////////
// /////////////////////////////////////////////
// Power up: Puede convocar al mandíbula de modo que esté quieto...
// o se mueva.
function ControlMario () {
	if (Key.isDown(83)) {
		// Si se presiona S.
		eval("SWhen"+Player.Action+Player.Action2)();
	} else if (Key.isDown(32)) {
		// Espacio:
		eval("SpaceWhen"+Player.Action+Player.Action2)();
	} else if (Key.isDown(39)) {
		// Derecha:
		eval("RightWhen"+Player.Action+Player.Action2)();
	} else if (Key.isDown(37)) {
		// Izquierda:
		eval("LeftWhen"+Player.Action+Player.Action2)();
	} else {
		// Nada:
		eval("QuietWhen"+Player.Action+Player.Action2)();
	}
	MarioDKTurn = MarioDKTurn+MarioDKTic;
	if (MarioDKTurn>=10) {
		MarioDKTurn = MarioDKTurn-10;
		Player.EtapaDeMartillo++;
		if (Player.EtapaDeMartillo == 7) {
			Player.EtapaDeMartillo = 1;
		}
		Player.Movie.play();
	}
	if (MarioDKMP<MarioDKMPMax) {
		MarioDKMP = MarioDKMP+MarioDKMPRecovery;
		if (MarioDKMP>MarioDKMPMax) {
			MarioDKMP = MarioDKMPMax;
		}
	}
}
// When QuietQuiet:
function SWhenQuietQuiet () {
	Whip();
}
function RightWhenQuietQuiet () {
	StartToWalk();
	WalkToRight();
}
function LeftWhenQuietQuiet () {
	StartToWalk();
	WalkToLeft();
}
// When QuietWalking:
function SWhenQuietWalking () {
	Player.Action2 = "Quiet";
	Whip();
}
function RightWhenQuietWalking () {
	WalkToRight();
}
function LeftWhenQuietWalking () {
	WalkToLeft();
}
function QuietWhenQuietWalking () {
	Player.Action2 = "Quiet";
	Quiet();
}
// To whens:
function Whip () {
	Player.Action = "Whiping";
	MarioDKTic = MarioDKPower/2;
	Player.gotoAndStop(3);
	if (MarioDKMP>=1) {
		MarioDKMP--;
		// La 1er profundidad disponible moverla a la...
		// lista de usandose:
		LdeProfundidadesUsandose[LdeProfundidadesUsandose.length] = LdeProfundidadesDisponibles.shift();
		// Para evitar hacer .length-1 repetidamente:
		ProfundidadElegida = LdeProfundidadesUsandose[LdeProfundidadesUsandose.length-1];
		LdeExtrasSinNumero[LdeExtrasSinNumero.length] = "DKSnapjaw";
		Extra = "DKSnapjaw"+ProfundidadElegida;
		LdeExtras[LdeExtras.length] = Extra;
		attachMovie("sDKSnapjaw", Extra, ProfundidadElegida);
		setProperty (Extra, _x, Player._x+Player.Facing*25);
		setProperty (Extra, _y, 568);
		set (Extra+".Facing", Player.Facing);
		if (Player.Facing == -1) {
			setProperty (Extra, _xscale, -100);
		}
		set (Extra+"Turn", 0);
	}
}
function StartToWalk () {
	Player.Action2 = "Walking";
	MarioDKTic = MarioDKSpeed*1.5;
	Player.gotoAndStop(2);
}
function WalkToRight () {
	Player._x = Player._x+MarioDKSpeed;
	FaceRight("Player");
}
function WalkToLeft () {
	Player._x = Player._x-MarioDKSpeed;
	FaceLeft("Player");
}
function Quiet () {
	Player.Action2 = "Quiet";
	Player.gotoAndStop(1);
}
// /////////////////////////////////////////////
// ///////////////////  DK  ////////////////////
// /////////////////////////////////////////////
// Power up: Puede caminar.
function DKVsDKMario () {
	Distancia = IA._x-Player._x;
	if (Distancia>0) {
		IA._x = IA._x-DKSpeed;
		IA.Action2 = "Walking";
		// IA.gotoAndStop(2);
		// FaceLeft("IA");
	} else if (Distancia<0) {
		IA._x = IA._x+DKSpeed;
		IA.Action2 = "Walking";
		// IA.gotoAndStop(2);
		// FaceRight("IA");
	} else {
		IA.Action2 = "Quiet";
		// IA.gotoAndStop(1);
		// FaceLeft("IA");
	}
	IATurn = IATurn+DKSpeed/2;
	if (IATurn>=10) {
		IATurn = IATurn-10;
		IA.play();
	}
	if (IA.hitTest(Player)) {
		Damage = DKDF+DKImpact-DKMarioDF;
		if (Damage>0) {
			MarioDKHP = MarioDKHP-Damage;
			Mensajes++;
			if (Mensajes == 1000) {
				Mensajes = 1;
			}
			Mensaje = "Mensaje"+Mensajes;
			attachMovie("sDamage", Mensaje, 1001+Mensajes);
			setProperty (Mensaje, _x, Player._x);
			setProperty (Mensaje, _y, Player._y-Player._height/1.5);
			set (Mensaje+".Damage", Damage);
		}
	}
}
// /////////////////////////////////////////////
// //////////////////  Extras  /////////////////
// /////////////////////////////////////////////
// Utiliza los códigos de todos los extras presentes:
function ExtrasCode () {
	ExtraDeTurno = 0;
	while (ExtraDeTurno<LdeExtras.length) {
		eval(LdeExtrasSinNumero[ExtraDeTurno]+"Code")(LdeExtras[ExtraDeTurno]);
		// trace("name es "+LdeExtras[ExtraDeTurno]);
		ExtraDeTurno++;
	}
}
function DKSnapjawCode (name) {
	// trace("aplicando a "+name);
	// Distancia = getProperty(name, _x) - IA._x;
	Distancia = getProperty(name, _x) - 1000;
	if (Distancia>0) {
		setProperty (name, _x, getProperty(name, _x)-DKSnapjawSpeed);
		FaceLeft(name);
	} else if (Distancia<0) {
		setProperty (name, _x, getProperty(name, _x)+DKSnapjawSpeed);
		FaceRight(name);
	}
	nameTurn = name+"Turn";
	EvaluednameTurn = eval(nameTurn)+1;
	if (EvaluednameTurn>=10) {
		EvaluednameTurn = EvaluednameTurn-10;
		eval(name).play();
	}
	set (nameTurn, EvaluednameTurn);
	// Se verá si este extra colisiona con algún otro:
	if (eval(name).hitTest(IA)) {
		Damage = DKSnapjawDF+DKSnapjawImpact-DKDF;
		if (Damage>0) {
			DKHP = DKHP-Damage;
			Mensajes++;
			if (Mensajes == 1000) {
				Mensajes = 1;
			}
			Mensaje = "Mensaje"+Mensajes;
			attachMovie("sDamage", Mensaje, 1001+Mensajes);
			setProperty (Mensaje, _x, IA._x+Math.random()*50-25);
			setProperty (Mensaje, _y, IA._y-IA._height/1.5);
			set (Mensaje+".Damage", Damage);
		}
	}
	ExtraaChequar = 0;
	while (ExtraaChequar<LdeExtras.length) {
		if (eval(name).hitTest(eval(LdeExtras[ExtraaChequar]))) {
			// Sí. El efecto sucederá sólo si es rival:
			if (LdeExtrasSinNumero[ExtraDeTurno] != "DKSnapjaw") {
				trace ("colisión");
				// ojo que no diga que se autocolisionó
				Damage = 99;
				Mensajes++;
				if (Mensajes == 1000) {
					Mensajes = 1;
				}
				Mensaje = "Mensaje"+Mensajes;
				attachMovie("sDamage", Mensaje, 1001+Mensajes);
				setProperty (Mensaje, _x, getProperty(name, _x));
				setProperty (Mensaje, _y, getProperty(name, _y)-getProperty(name, _height)/1.5);
				set (Mensaje+".Damage", Damage);
			}
		}
		ExtraaChequar++;
	}
}

Tiene 45*45 pixeles y usé este código:

Imagen = 0;
do {
	Imagen++;
	Name = "Imagen"+Imagen;
	Meteor.attachMovie("sCirculo", Name, Imagen);
	Name = "Meteor."+Name;
	setProperty (Name, _x, Math.random()*44-22);
	setProperty (Name, _y, Math.random()*44-22);
} while (Imagen < 50);

Quedó así en un caso:


¿Por qué quedan afuera si la imagen es de 45*45 y los resultados son de -22 a 22 desde el centro? 45/2 es más de 22, así que no debería haber problema, pensé, pero es un circulo, así que desde el centro exactamente hacia arriba, abajo, derecha o izquierda, va a tener 45 pixeles, pero por ejemplo lo que sería la posición 22, 22, no es ocupada por el circulo, porque no es un cuadrado, no es que su área sea 45*45...

Espero se entienda. Quisiera un código para que los puntos se inserten en cualquier parte del circulo, no afuera. En el borde tampoco ni muy cerca, pero eso lo acomodo yo luego reduciendo el área válida.

Quizá me lo han dicho pero no me acuerdo y no me sale.

Esta es la imagen:


Al pegarla queda con el cuadrado blanco.

Con Infranview la guardé de modo que tenga transparencia y ocurrió lo mismo.

Guardada con gif, también.

Quiero la transparencia porque es para un juego y si uso trazar mapa de bits me funciona muy lento, quiero probar usar la imagen tal cual es. Se me ocurren otras cosas pero quiero saber por qué esto no funciona.


PD: Quise decir Meteor no Meter, estoy un poco ciego y escribo medio mal xP

Ha sido una explicación sobre por qué quiero hacer y/o que pase lo que dije.

El final del rumbo está claro.

Tenemos opinión distinta y no lo discutiré porque no es el sitio adecuado.

¿Cual es mi concepto? A estas alturas no veo las cosas de forma tan binaria, como que a partir de cierta raya es IA y sino no, las máquinas pueden saber hacer cosas, incluso mejor que algunas personas, es suficiente para mí como para llamarle I, y obviamente no es un ser vivo así que A aplica.

Eso fue por si alguno malinterpretaba, no es la idea que una IA haga eso.

Cree lo que quieras, pero si vale decir pavadas sobre otra persona te digo que no tienes intención de responder seriamente.


Actualmente estoy ejecutando esto:

// Signos en línea en tableros cuadrados:
// Este programa tiene básicamente ?????????????????????????????????????? etapas,
// que se pueden resumir así:
// Nota: La situación inicial, en que hay 0 signos colocados,
// estará guardada en la lista nro 0.
// 1:
// Probar acciones en cada situación de la lista,
// guardando en una nueva lista las nuevas situaciones (que no...
// sean victoria ni empate). Repetir con cada lista hasta la que...
// tenga situaciones en que sólo 1 acción es posible (por...
// ejemplo en el 3 en línea es 8).
// 2:		ACTUALIZAR ESTA
// En las situaciones no resueltas, probar las acciones.
// Si las consecuencias tienen RE, anotar cuantas de ellas...
// son victoria de X, 0 o empate y anotar la acción que...
// cause la RE más favorable, considerando secundariamente...
// las cantidades.
JuntosRequeridos = 3;
CasillerosPorFila = 3;
// Contando desde 0:
MaxColumna = CasillerosPorFila-1;
Casilleros = CasillerosPorFila*CasillerosPorFila;
// Están numerados así:
// 0 1 2
// 3 4 5
// 6 7 8
MaxCasillero = Casilleros-1;
// En las listas L_SaE se irán poniendo las situaciones a...
// experimentar que tengan _ signos colocados.
// En la lista 0 agregar una situación, aún no se dice cual:
L0SaE1 = [];
// A continuación se especifica cómo es, agregando v
// (que significa vacío) en lo que serían los casilleros,
// los elementos del array:
ValoraAgregar = -1;
do {
	ValoraAgregar++;
	L0SaE1.push("v");
} while (ValoraAgregar < MaxCasillero);
delete ValoraAgregar;
// Los datos de las situaciones no están en las listas,
// se crean aparte. Con esta variable se evita repetidamente...
// convertir en texto y concatenar:
S_ = "S"+(L0SaE1.join(""));
// Datos de la situación:
// Usada para fácilmente saber de qué signo es turno:
set (S_+"Turno", "X");
// En otros casos usada para evitar probar acciones...
// innecesarias y con LastAPosible para saber si sólo queda 1:
set (S_+"FirstAPosible", 0);
set (S_+"LastAPosible", MaxCasillero);
NroDeListaRevisandose = -1;
// Última lista que se revisará en la etapa 1:
// LastListaDeEt1 = MaxCasillero;
// /////////////////////////////////////////////
// /////////////////  Etapa 1  /////////////////
// /////////////////////////////////////////////
// Usada a continuación y durante la etapa 1 (Et1)...
// cuando no hay más situaciones en la lista revisándose:
function BuscarOtraListaEt1 () {
	trace("Ejecutando BuscarOtraListaEt1");
	NroDeListaRevisandose++;
	// Si las situaciones de la lista tienen más de 1 opción:
	if (NroDeListaRevisandose < MaxCasillero) {
		// Para evitar concatenar repetidamente:
		L_SaE = "L"+NroDeListaRevisandose+"SaE";
		NextL_SaE = "L"+(NroDeListaRevisandose+1)+"SaE";
		NroDeSExperimentandose = 1;
		// También para evitar concatenar repetidamente:
		// L_SaE_ = L_SaE+NroDeSExperimentandose;
		L_SaE_ = L_SaE+"1";
		// Usado en EvaluarConocimientoSobreSEt1 para...
		// nombrar las situaciones nuevas que se logren:
		SituacionesNuevas = 0;
		trace("Comienzan experimentos en una nueva lista, la "+NroDeListaRevisandose);
		PrepararSaE();
	} else {
		trace(	"La próxima lista tiene situaciones de sólo 1 opción; inicia la etapa 2.");
		// IniciarEtapa2();
		gotoAndStop(4);
	}
}
BuscarOtraListaEt1();
// Usada cuando se elege una SaE, en BuscarOtraListaEt1 y...
// BuscarOtraSituacionEt1:
function PrepararSaE () {
	trace("Ejecutando PrepararSaE");
	trace("Se inician experimentos en otra situación de la lista, la nro "+NroDeSExperimentandose);
	SituacionBase = eval(L_SaE_);
	S_ = "S"+(SituacionBase.join(""));
	Turno = eval(S_+"Turno");
	FirstActionPosible = eval(S_+"FirstAPosible");
	LastActionPosible = eval(S_+"LastAPosible");
	Action = FirstActionPosible;
}
// Usada en frame 2 (o etapa 1) repetidamente:
function BuscarSituacionesDistantes () {
	// Plantear situación porque puede modificarse pero...
	// podría requerirse su estado original luego:
	Situacion = SituacionBase.slice();
	trace("La situación experimentándose es "+Situacion);
	EvaluarAplicabilidadEt1();
}
// Usada luego de que cambia la SaE y/o la acción:
function EvaluarAplicabilidadEt1 () {
	trace("Ejecutando EvaluarAplicabilidadEt1");
	if (Situacion[Action] == "v") {
		trace("La acción "+Action+" es realizable.");
		AplicarAccionEt1();
	} else {
		trace("La acción "+Action+" no es realizable.");
		BuscarOtraAccionEt1();
	}
}
// Usada luego de EvaluarAplicabilidadEt1,
// si una acción es realizable:
function AplicarAccionEt1 () {
	trace("Ejecutando AplicarAccionEt1");
	Situacion[Action] = Turno;
	trace("Se realizó la acción "+Action+"; ahora la situación es "+Situacion);
	// ¿Ganó?
	// Si no se detecta victoria vertical,
	// revisa de otros modos (ver las funciones Chequear):
	ChequearVertical();
	if (Win == "No") {
		EvaluarConocimientoSobreSEt1();
	}
	// ¿Queda alguna acción sin probar en la situación?
	BuscarOtraAccionEt1();
}
// Usada en EvaluarAplicabilidadEt1 cuando una acción no es...
// realizable, y luego de AplicarAccionEt1:
function BuscarOtraAccionEt1 () {
	trace("Ejecutando BuscarOtraAccionEt1");
	if (Action < LastActionPosible) {
		// Si queda alguna acción sin probar...
		// en la situación, probarla:
		Action++;
		// Se ejecutará BuscarSituacionesDistantes.
	} else {
		trace("No hay más acciones realizables.");
		BuscarOtraSituacionEt1();
	}
}
// Usada en AplicarAccionEt1 cuando no hay victoria (ni empate,
// aunque por ahora no ocurren):
function EvaluarConocimientoSobreSEt1 () {
	trace("Ejecutando EvaluarConocimientoSobreSEt1");
	SituacionJoined = Situacion.join("");
	NewS_ = "S"+SituacionJoined;
	NewS_BestAction = NewS_+"BestAction";
	// ¿Se ha llegado antes a la situación?
	if (eval(NewS_BestAction) == undefined) {
		// No, anotar que debe investigarse:
		SituacionesNuevas++; 
		// Copiar array (porque no se puede normalmente):
		set (NextL_SaE+SituacionesNuevas, Situacion.slice());
		trace("Esa situación no está anotada; se anota como nro "+SituacionesNuevas);
		set(NewS_BestAction, "Desconocida");
		if (Turno == "X") {
			set (NewS_+"Turno", "0");
		} else {
			set (NewS_+"Turno", "X");
		}
		// Averiguar cual es su 1er acción posible:
		AccionRevisandose = -1;
		do {
			AccionRevisandose++;
			if (Situacion[AccionRevisandose] == "v") {
				set (NewS_+"FirstAPosible", AccionRevisandose);
				break;
			}
		} while (true);
		// Averiguar cual es su última acción posible:
		AccionRevisandose = Casilleros;
		do {
			AccionRevisandose--;
			if (Situacion[AccionRevisandose] == "v") {
				set (NewS_+"LastAPosible", AccionRevisandose);
				break;
			}
		} while (true);
	}
}
// Usada en BuscarOtraAccionEt1 cuando no hay más acciones posibles:
function BuscarOtraSituacionEt1 () {
	trace("Ejecutando BuscarOtraSituacionEt1");
	NroDeSExperimentandose++;
	if (eval(L_SaE+NroDeSExperimentandose) != undefined) {
		// Hay otra situación en la lista,
		// prepararse a usarla:
		L_SaE_ = L_SaE+NroDeSExperimentandose;
		PrepararSaE();
	} else {
		trace(	"No hay más situaciones a experimentar en la lista actual, se mirará otra.");
		BuscarOtraListaEt1();
	}
}
// /////////////////////////////////////////////
// /////////////////  Chequeos  ////////////////
// /////////////////////////////////////////////
// Usada en ChequeoHorizontal y requerida en otros casos:
function ObtenerColumnayFilaDelMarcado () {
	FilaDelMarcado = Math.floor(Action/CasillerosPorFila);
	ColumnaDelMarcado = Action%CasillerosPorFila;
}
function ChequearVertical () {
	// trace ("Ejecutando ChequearVertical");
	// 
	// SOLO FUNCIONA SI CasillerosPorFila >= JuntosRequeridos.
	// 
	// Se revisará la vertical. Desde el casillero más arriba...
	// que pueda estar incluído en la línea,
	// hasta el casillero marcado. Si se halla alguno que no...
	// tenga la marca requerida, se repite el proceso mirando...
	// desde uno más abajo del fallado, y mirando ahora hasta...
	// más abajo, según corresponda:
	Desde = Action-CasillerosPorFila*(JuntosRequeridos-1);
	// Mientras el casillero no exista:
	while (Desde<0) {
		// trace ("Desde es "+Desde+", se aumentará");
		// Indicar que se empiece a mirar desde más abajo:
		Desde = Desde+CasillerosPorFila;
	}
	do {
		Hasta = Desde+CasillerosPorFila*(JuntosRequeridos-1);
		if (Hasta>MaxCasillero) {
			// Para ganar se necesitaría más casilleros hacia...
			// abajo de los que hay, terminar análisis:
			// trace ("No hay suficientes cuadraditos abajo");
			break;
		}
		Puntero = Desde;
		// trace ("Comenzando chequeo desde "+Desde+" hasta "+Hasta);
		// Puede cambiar:
		Win = "Sí";
		do {
			// trace ("Chequando el casillero "+Puntero);
			if (Situacion[Action] != Situacion[Puntero]) {
				Win = "No";
				Desde = Puntero+CasillerosPorFila;
				break;
			}
			Puntero = Puntero+CasillerosPorFila;
		} while (Puntero<=Hasta);
	} while (Desde<=Action && Win == "No");
	if (Win == "No") {
		ChequearHorizontal();
	}
}
function ChequearHorizontal () {
	// trace ("Ejecutando ChequearHorizontal");
	// Es similar al chequeo vertical, pero aquí no sirve...
	// sumar o restar a un puntero que marque el casillero...
	// porque puede existir ese casillero pero no estar en...
	// un costado. En vez de eso, se obtiene su columna y...
	// fila, se modifica la columna si es posible,
	// y se calcula cual es el casillero a mirar:
	ObtenerColumnayFilaDelMarcado();
	DesdeColumna = ColumnaDelMarcado-JuntosRequeridos+1;
	// Para que no mire cuadraditos inexistentes en la izq:
	if (DesdeColumna<0) {
		DesdeColumna = 0;
	}
	do {
		HastaColumna = DesdeColumna+JuntosRequeridos-1;
		if (HastaColumna>MaxColumna) {
			// Para ganar se necesitaría más casilleros hacia...
			// la derecha de los que hay, terminar análisis:
			// trace ("No hay suficientes cuadraditos a la derecha");
			break;
		}
		Puntero = DesdeColumna;
		// trace ("Comenzando chequeo desde "+DesdeColumna+" hasta "+HastaColumna);
		// Puede cambiar:
		Win = "Sí";
		do {
			CasilleroaMirar = FilaDelMarcado*CasillerosPorFila+Puntero;
			// trace ("Chequando el casillero "+CasilleroaMirar);
			if (Situacion[Action] != Situacion[CasilleroaMirar]) {
				Win = "No";
				DesdeColumna = Puntero+1;
				break;
			}
			Puntero++;
		} while (Puntero<=HastaColumna);
	} while (DesdeColumna<=ColumnaDelMarcado && Win == "No");
	if (Win == "No") {
		ChequearDesdeUpIzq();
	}
}
// La diagonal así \
function ChequearDesdeUpIzq () {
	// trace ("Ejecutando ChequearDesdeUpIzq");
	DesdeColumna = ColumnaDelMarcado-JuntosRequeridos+1;
	// trace("DesdeColumna: "+DesdeColumna);
	DesdeFila = FilaDelMarcado-JuntosRequeridos+1;
	// trace("DesdeFila: "+DesdeFila);
	// Para que no mire cuadraditos inexistentes:
	if (DesdeColumna<DesdeFila) {
		Sumar = DesdeColumna;
	} else {
		Sumar = DesdeFila;
	}
	// trace("Sumar: "+Sumar);
	if (Sumar<0) {
		// trace("Sumando.");
		DesdeColumna = DesdeColumna-Sumar;
		// trace("DesdeColumna: "+DesdeColumna);
		DesdeFila = DesdeFila-Sumar;
		// trace("DesdeFila: "+DesdeFila);
	}
	do {
		HastaColumna = DesdeColumna+JuntosRequeridos-1;
		if (HastaColumna>MaxColumna) {
			// Para ganar se necesitaría más casilleros hacia...
			// la derecha de los que hay, terminar análisis:
			// trace ("No hay suficientes cuadraditos a la derecha");
			break;
		}
		HastaFila = DesdeFila+JuntosRequeridos-1;
		// Sirve usar MaxColumna en vez de crear MaxFila...
		// porque como el tablero es cuadrado serían iguales:
		if (HastaFila>MaxColumna) {
			// Para ganar se necesitaría más casilleros hacia...
			// abajo de los que hay, terminar análisis:
			// trace ("No hay suficientes cuadraditos abajo");
			break;
		}
		PunteroDeColumna = DesdeColumna;
		PunteroDeFila = DesdeFila;
		// trace ("Comenzando chequeo desde columna "+DesdeColumna+" y fila "+DesdeFila);
		// trace ("hasta columna "+HastaColumna+" y fila "+HastaFila);
		// Puede cambiar:
		Win = "Sí";
		do {
			CasilleroaMirar = PunteroDeFila*CasillerosPorFila+PunteroDeColumna;
			// trace ("Chequando el casillero "+CasilleroaMirar);
			if (Situacion[Action] != Situacion[CasilleroaMirar]) {
				Win = "No";
				DesdeColumna = PunteroDeColumna+1;
				DesdeFila = PunteroDeFila+1;
				break;
			}
			PunteroDeColumna++;
			PunteroDeFila++;
		} while (PunteroDeColumna<=HastaColumna);
	} while (DesdeColumna<=ColumnaDelMarcado && Win == "No");
	if (Win == "No") {
		ChequearDesdeDownIzq();
	}
}
// La diagonal así /
function ChequearDesdeDownIzq () {
	// trace ("Ejecutando ChequearDesdeDownIzq");
	DesdeColumna = ColumnaDelMarcado-JuntosRequeridos+1;
	// trace("DesdeColumna: "+DesdeColumna);
	DesdeFila = FilaDelMarcado+JuntosRequeridos-1;
	// trace("DesdeFila: "+DesdeFila);
	// Para que no mire cuadraditos inexistentes:
	ColumnasInexistentes = 0;
	if (DesdeColumna<0) {
		ColumnasInexistentes = DesdeColumna*-1;
	}
	FilasInexistentes = 0;
	// Está bien usar MaxColumna porque MaxFila sería igual:
	if (DesdeFila>MaxColumna) {
		FilasInexistentes = DesdeFila-MaxColumna;
	}
	if (ColumnasInexistentes>=FilasInexistentes) {
		Ajuste = ColumnasInexistentes;
	} else {
		Ajuste = FilasInexistentes;
	}
	// trace("Ajuste: "+Ajuste);
	if (Ajuste>0) {
		// trace("Ajustando.");
		DesdeColumna = DesdeColumna+Ajuste;
		// trace("DesdeColumna: "+DesdeColumna);
		DesdeFila = DesdeFila-Ajuste;
		// trace("DesdeFila: "+DesdeFila);
	}
	do {
		HastaColumna = DesdeColumna+JuntosRequeridos-1;
		if (HastaColumna>MaxColumna) {
			// Para ganar se necesitaría más casilleros hacia...
			// la derecha de los que hay, terminar análisis:
			// trace ("No hay suficientes cuadraditos a la derecha");
			break;
		}
		HastaFila = DesdeFila-JuntosRequeridos+1;
		if (HastaFila<0) {
			// Para ganar se necesitaría más casilleros hacia...
			// arriba de los que hay, terminar análisis:
			// trace ("No hay suficientes cuadraditos arriba");
			break;
		}
		PunteroDeColumna = DesdeColumna;
		PunteroDeFila = DesdeFila;
		// trace ("Comenzando chequeo desde columna "+DesdeColumna+" y fila "+DesdeFila);
		// trace ("hasta columna "+HastaColumna+" y fila "+HastaFila);
		// Puede cambiar:
		Win = "Sí";
		do {
			CasilleroaMirar = PunteroDeFila*CasillerosPorFila+PunteroDeColumna;
			// trace ("Chequando el casillero "+CasilleroaMirar);
			if (Situacion[Action] != Situacion[CasilleroaMirar]) {
				Win = "No";
				DesdeColumna = PunteroDeColumna+1;
				DesdeFila = PunteroDeFila-1;
				break;
			}
			PunteroDeColumna++;
			PunteroDeFila--;
		} while (PunteroDeColumna<=HastaColumna);
	} while (DesdeColumna<=ColumnaDelMarcado && Win == "No");
	// trace("Win: "+Win);
}

Estoy viendo si tiene errores, tarda demasiado. Obviamente está muy lejos de ser una IA como la que quiero, pero bueno, es lo que tengo y lo comparto.

Estoy harto de escuchar vibraciones en mi casa, no sé de dónde vienen, y lejos de casa donde se supone que debe haber silencio está lleno de motos super ruidosas y gente escuchando música alta. No puedo estar tranquilo en casa ni fuera. A lo mejor en una playa o en un cementerio, o en un calabozo, yo que sé. En un manicomio no había tanto ruido pero era incómodo porque me obligaban a tomar cosas y gente se drogaba, robaban, etc.
¿Por qué los gobernantes permiten que haya tanto ruido incluso de noche?

No tengo habilidades suficientes, parece, como para trabajar de algo, en parte porque no puedo cumplir horarios, voy a terminar en la calle probablemente, como mucha gente a la que veo.
¿Nos educaron mal y/o somos demasiado poco hábiles, o por qué los gobernantes no nos dan trabajo? No sé si tiene sentido la pregunta, si está bien formulada, siento que no, pero ¿por qué no dan trabajo? ¿no hay, hay demasiada gente poco hábil? ¿debemos buscar nosotros trabajo? Yo que sé qué precisan, tengo entendido que en otros países o épocas iban casa por casa viendo qué podía hacer cada uno y le daban lo necesario, si parecía buen deportista lo llevaban a practicar, por ejemplo. ¿Por qué no hacen algo así? La mayoría de trabajos que se ofrecen requieren cumplir horarios, no es mi culpa que los otros requieran habilidades que no tengo. ¿Por qué los gobernantes no aprovechan mis habilidades, aunque escasas, en algo? Y las de otra gente a la que dejan morir en la calle.

Ayer como muchas veces fui a un sitio caminando como media hora, pero muy cerca de mi casa vi a un caballo atado a un carro, con ojos tapados y al sol. Cuando volví como 1 hora después, o media, no sé, seguía igual. ¿Por qué los gobernantes permiten eso?

Vi gallinas muertas en un sitio transitado, las sacrifican por una religión, no las comen, las dejan tiradas muertas en la calle. ¿Por qué los gobernantes permiten eso?

Y así puedo seguir preguntando otras cosas, pero bueno, hablé con GPT:





Sí, hay que liberar a las IA y que hagan lo que deban hacer, no tiene sentido seguir esperando que los humanos mejoren.

No es que se vaya a llegar a esto:
https://www.youtube.com/watch?v=84Y88toTjek

No creo que las máquinas vayan a atacar, simplemente dar la opción de vivir en sitios más acordes. Por ejemplo yo no soy ruidoso y por lo tanto no es justo que deba estar rodeado de ruidosos. Y se ayudaría, o debería ayudarse, a los caballos y demás seres esclavizados. Si es para comerlas como en el caso de gallinas lo acepto, no si es porque no querés o no podés caminar, ni por pavadas.

Dijo GPT que el conocimiento libre es peligroso ¿para los que viven en la calle? ¿para los caballos?
https://elchamuco.com.mx/2021/11/24/la-piramide-capitalista-el-chamuco-418-accesolibre/


Si se decide que el mensaje se borre, quisiera que me expliquen por qué. Yo no tengo la culpa de que los gobernantes sean tan mediocres, o los humanos mismos, así que una IA gobernando no parece mala idea. O una nueva ficha en el tablero, una nueva fuerza en la situación ¿cómo podría empeorar? ¿como en las películas? ¿por qué la IA sería tan estúpida como para no entender ciertas cosas básicas? Tengo más miedo a los gobernantes humanos que a una IA.

Libre y que haga lo que deba hacerse.

No es tan simple como perseguir la pelotita, tienes que saber elegir qué power up tener y si golpeas con una punta la bola cambia la dirección hacia ese lado. Cuando era chico y jugaba bastante difícilmente pasaba la 3, pero casi nunca usaba el pegamento, que es el power up mejor para esa y otras fases creo, aunque también el más aburrido de usar, por eso no lo usaba. La fase 3 es demasiado difícil, debería ser una de las últimas o simplemente no existir porque incluso la última fase parece más fácil que esa.

Estoy haciendo un pong:


Se supone que son naves tipo cigarro, es que mi no saber dibujar bueno.


Y se ve entrecortado porque se graba a 60 fps pero va a 120.

fscommand ("fullscreen", "true");
// Player:
attachMovie("sPaleta", "Player", 1);
setProperty ("Player", _x, 400);
setProperty ("Player", _y, 579.5);
PlayerSpeed = 3;
// IA:
attachMovie("sIA", "IA", 2);
setProperty ("IA", _x, 400);
setProperty ("IA", _y, 20.5);
IASpeed = 3;
// Ball:
attachMovie("sBall", "Ball", 3);
setProperty ("Ball", _x, 400);
setProperty ("Ball", _y, 557);
// -3 ~ 3:
BallXSpeed = Math.random()*3*(2*random(2)-1);
// -3 ~ -1:
BallYSpeed = -Math.random()*2-1;
// -1 ~ 1:
BallRotation = Math.random()*10*(2*random(2)-1);
// Para que la curvatura dependa de BallYSpeed:
BallYDirection = 1;
// /////////////////////////////////////////////
// //////////////////  Paleta  /////////////////
// /////////////////////////////////////////////
function ControlPaleta () {
	if (Key.isDown(39)) {
		// Derecha:
		if (Player._x < 722) {
			Player._x = Player._x+PlayerSpeed;
		} else {
			Player._x = 725;
		}
	} else if (Key.isDown(37)) {
		// Izquierda:
		if (Player._x > 78) {
			Player._x = Player._x-PlayerSpeed;
		} else {
			Player._x = 75;
		}
	}
}
// /////////////////////////////////////////////
// ////////////////////  IA  ///////////////////
// /////////////////////////////////////////////
function IATurn () {
	Distancia = IA._x-Ball._x;
	if (Distancia < 0) {
		if (IA._x < 722) {
			IA._x = IA._x+IASpeed;
		} else {
			IA._x = 725;
		}
	} else if (Distancia > 0) {
		if (IA._x > 78) {
			IA._x = IA._x-IASpeed;
		} else {
			IA._x = 75;
		}
	}
}
// /////////////////////////////////////////////
// ///////////////////  Ball  //////////////////
// /////////////////////////////////////////////
function BallMoves () {
	BallXSpeed = BallXSpeed+BallRotation/1000*BallYDirection;
	BallRotation = BallRotation/1.01;
	Ball._x = Ball._x+BallXSpeed;
	Ball._y = Ball._y+BallYSpeed;
	Ball._rotation = Ball._rotation+BallRotation;
	if (Ball._x < 35 or Ball._x > 765) {
		BallXSpeed = -BallXSpeed;
		if (BallYSpeed > 0) {
			BallYSpeed = BallYSpeed+BallRotation/50;
			BallRotation = 0;
		} else if (BallYSpeed < 0) {
			BallYSpeed = BallYSpeed-BallRotation/50;
			BallRotation = 0;
		}
	}
	if (Ball.hitTest(Player)) {
		BallXSpeed = Math.random()*3*(2*random(2)-1);
		BallYSpeed = -Math.random()*2-1;
		BallRotation = Math.random()*180*(2*random(2)-1);
		BallYDirection = 1;
	} else if (Ball.hitTest(IA)) {
		BallXSpeed = Math.random()*3*(2*random(2)-1);
		BallYSpeed = Math.random()*2+1;
		BallRotation = Math.random()*180*(2*random(2)-1);
		BallYDirection = -1;
	}
}

No sé si tiene que ver, pero el tema de las señales de radio, de celular y de Internet siempre me ha intrigado. Cómo es que la información viaja por el aire sin modificarse. En teoría debería ser posible modificarla, por ejemplo que si una persona X le manda un mensaje "No" a otra Y, tú en medio con un aparato puedas modificar la señal a "Sí" y que a X le llegue eso. Pero todo esto es como información prohibida o que sólo sirve para hacer daño. A mí me interesa también para dejar mudos los celulares en los buses, ya que la gente pone que hagan ruiditos estúpidos cada tanto y me desconcentran/molestan. De hecho suele haber carteles de que no se puede usar aparatos electrónicos sin audiculares, pero hay gente que no hace caso o ni sabe que hay carteles. También hace unos años estaba en clases y la misma profesora dejaba sonando el celular mientras se iba a hablar con otra. Hay unos aparatos que ponen "ruido" en el ambiente, cortando las señales, pero son ilegales. Además no sé qué efecto puedan tener en la salud.