[Tachikomaia]

Lo probé 3 veces, quizá es casualidad, sino algún error en el código ¿lo ven o qué explicación dan?

A elige al azar.
J se adapta, o sea, si ve que el nro 0 está apareciendo más que el 1, elige el 0, si el 1 aparece más elige el 1, y sino elige al azar.
Si A acierta se le da 1 punto, sino se le resta. Para J lo mismo.
También en cierta medida se tiene en cuenta el promedio de puntos a lo largo de la partida.

Código: [Seleccionar]

onClipEvent (load) {
PuntosCon0 = 0;
PuntosCon1 = 0;
PuntosDeJ = 0;
PromedioDeJ = 0;
ElegidoPorJ = random(2);
// trace ("J eligió: "+ElegidoPorJ);
PuntosDeA = 0;
PromedioDeA = 0;
}
onClipEvent (enterFrame) {
ElegidoPorA = random(2);
ElegidoPorAzar = random(2);
// trace ("Nuevo número: "+ElegidoPorAzar);
// Si el jugador acierta:
if (ElegidoPorAzar == ElegidoPorJ) {
// Actualizar datos:
PuntosDeJ++;
Resumen = "PuntosCon"+ElegidoPorJ;
set (Resumen, eval(Resumen)+1);
// trace ("J acertó. PuntosCon0: "+PuntosCon0+", PuntosCon1: "+PuntosCon1);
// No cambia su elección.
} else {
// Falló.
// Actualizar datos:
PuntosDeJ--;
Resumen = "PuntosCon"+ElegidoPorJ;
set (Resumen, eval(Resumen)-1);
// trace ("J falló. PuntosCon0: "+PuntosCon0+", PuntosCon1: "+PuntosCon1);
// Decidir nueva elección de J.
if (PuntosCon0 == PuntosCon1) {
ElegidoPorJ = random(2);
} else if (PuntosCon0>PuntosCon1) {
ElegidoPorJ = 0;
} else {
ElegidoPorJ = 1;
}
// trace ("J eligió: "+ElegidoPorJ);
}
// Si el aliado acierta:
if (ElegidoPorAzar == ElegidoPorA) {
// Actualizar datos:
PuntosDeA++;
} else {
PuntosDeA--;
}
trace (PuntosDeJ+", "+PuntosDeA);
PromedioDeJ = (PromedioDeJ+PuntosDeJ)/2;
PromedioDeA = (PromedioDeA+PuntosDeA)/2;
trace (PromedioDeJ+", "+PromedioDeA);
}


[Richard R Richard]

No he probado el código, pero creo que J, apuesta a ganar cuando se repite el 0 o el 1 por encima del 50 %, si la tendencia  se mantiene acertara solo muy poco por debajo del 50 % de las veces, porr A no tiene límite  puede acertar el 100% de las veces tanto eligiendo 0 como 1, lo normal es que solo acierte  el60% de las veces, así en una serie larga ee jugadas, A aventajar a J y más ventaja saca cuanto más veces cambia de número la apuesta, (pasa se 0 a 1 o viceversa), pues en esos casos J tiene seguidillas de pérdidas, cuando A puede acertar.

Cuando disponga de un PC muestro con una tabla donde toma ventaja A.