SMS Donation System. Is it possible?

[Hideki]

Good morning / afternoon / evening, everyone.

I need a huge favour, if I'm not asking too much...

Well... yesterday I tried all night long to install a SQL script into the RO database [Got it from a latin guide] into my RO Server [rAthena / Ceres] but it didn't work when I tested it. I was trying to use 'PayGol' to send the message, get the PIN and then use it with a NPC located in Prontera.

So I need one of the following options:

A) An updated guide of an effective way to put a SMS Donation System.

An effective method to get paid for Cash Points via SMS.

C) A PHP/MySQL/NPC script already working from another server.

D) A correction into my scripts/codes.

// PHP //

<?php
  $host = "***.***.***.***";
  $user = "*******";
  $pass = "**************";
  $db = "********";

  $conexion = mysql_connect($host, $user, $password);

	$codigo = $_GET['message'];
	$codigomds5 = md5($codigo);
	$pais = $GET['country'];
	$numero = $_GET['sender'];
	$operador = $_GET['operator'];

$mysql_select_db($db, $conexion);
	 $result=mysql_query("INSERT INTO sms (Codigo,CodigoMD5,Pais,Numero,Operador) VALUES ('".$codigo."','".$codigomd5."','".$pais."','".$numero."','".$operador."') ",$conexion);
	echo "OK Gracias por su donación. Su código es: $codigo";
}
?>

// SQL //

CREATE TABLE `sms` (
 `ID` int(11) NOT NULL auto_increment,
 `Codigo` text NOT NULL,
 `CodigoMD5` text NOT NULL,
 `Estado` int(1) NOT NULL,
 `Pais` text,
 `Numero` text,
 `Operador` text,
 `Fecha` text,
 `CuentaAdquisicion` text,
 `FechaAdquisicion` text,
 PRIMARY KEY  (`ID`)
) ENGINE=MyISAM AUTO_INCREMENT=1 DEFAULT CHARSET=latin1;

// NPC //

//////////////////////////////////////////////////
//		   - eAthena Script -
//			 Donaciones SMS
//================================================
// Creado por Karmic para DivineRO.net
// Editado algunas cosas por Darkness.
// Creditos de códigos: Racing
//================================================
// Changelog:
// 1.0 Creado por Karmic con recompenza en CASHPOINT
// 1.1 -Adaptado a las necesidades de VLRO
//	 -Agregados menú y diseñado el script para ser simple y útil
//	
///////////////////////////////////////////////////

prontera.gat,156,145,4	script	Donación SMS	951,{
set .@n$,"^008888[Donaciones SMS Marux-RO]^000000"; //Nombre del NPC
set @custom,7539; //ID del item por default "Poring Coin"
set @pxe,100; //Cantidad de Item que recibirá por cada SMS.

setarray @paisN$[0],"DE","AR","AU","AT","BE","BO","CL","CO","EC","ES","FR","GB","NL","IE","MX","NO","PE","PT","SE","CH","VE";
setarray @paisE[0],1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1;


mes .@n$;
npctalk "¡Saludos y bienvenido "+ strcharinfo(0) +" al sistema de donación SMS!";
mes "Saludos, Bienvenido al sistema de Donaciones SMS";
mes " de Marux-RO.";
mes "¿En que puedo  ayudarte?";
  menu "^5533ff¡Validar mi Código SMS!^000000",vali,"¿Cómo Donar vía SMS?",como,"Salir",salir;

vali:
next;
mes .@n$;
mes "Por favor, Introduce el código que has recibido por SMS:";
input @codigo$;
set @codigomd5$,md5(@codigo$);
next;

query_sql("SELECT COUNT(*) FROM sms WHERE CodigoMD5 = '" + @codigomd5$ + "' AND Estado = '0'", @producto);
if (@producto == 0) {
query_sql("SELECT COUNT(*) FROM sms WHERE CodigoMD5 = '" + @codigomd5$+ "' AND Estado = '1'", @producto);
if (@producto == 0) {
	mes .@n$;
	mes "El código de donación sms: ^ff0000"+@codigo$+"^000000";
	mes "No es válido.";
	close;
}

query_sql("SELECT Pais FROM sms WHERE CodigoMD5 = '" + @codigomd5$ + "' AND Estado = '0'", @paisR$);

for(set .@i, 0; .@i < getarraysize(@paisN$); set .@i, .@i + 1) {
  if(@paisN$[.@i] == @paisR$) {
  set @paisRE,@paisE[.@i];
  }
}
mes .@n$;
mes "El código de donación SMS: ^ff0000"+@codigo$+"^000000";
mes "Ya ha sido utilizado y ya no es válido.";
close;
}
query_sql("UPDATE sms SET estado = '1', CuentaAdquisicion = '" + getcharid(3) + "', FechaAdquisicion = '" + gettimestr("%d-%m-%Y %H:%M:%S",21) + "' WHERE CodigoMD5 = '" + @codigomd5$ + "'");
//getitem @custom,@pxe;//Obtencion del item por la donacion
set #CASHPOINTS,#CASHPOINTS + @pxe;
  announce "~ ["+ strcharinfo(0) +"] acaba de donar vía SMS. Muchas Gracias por su Donación  ~",bc_all,0xFF6633;
mes .@n$;
mes "El código de donación SMS: ^ff0000"+@codigo$+"^000000";
mes "Es correcto, Marux-RO agradece su donación.";
next;
mes .@n$;
mes "Se han añadido: ^ff0000["+@pxe+"]^000000 Cash Points a tu Personaje.";
mes "Actualmente dispones de :";
mes "--->^0000FF["+#CASHPOINTS+"]  ^000000Cash Points <---";
close;

como:
next;
mes .@n$;
mes "Para donar ^ff0000vía SMS^000000 deberás dirigirte a nuestro sitio Web, en el a sección de Donaciones.";
mes "Web:";
mes "^0000FFmarux-ro.com^000000";
mes " ";
mes "Allí encontrara un bloque llamado [Donación por SMS]. Al darle Clic un ventana identificara su País";
next;
mes .@n$;
mes "Ahí el sistema le Indicara los datos que debe colocar en su Teléfono Móvil, ya sea la palabra en MAYÚSCULAS con números y el numero de destino";
mes "Además de las Compañías telefónicas disponibles y el costo de el Mensaje de Texto.";
next;
mes .@n$;
mes "Una ves enviado el Mensaje de Texto, recibirá automáticamente un SMS a su teléfono Móvil indicando el Código de donación y será además";
mes "Redirigido a una pagina web de nuestro servidor que le Recordara como Activar el Código recibido Conmigo.";
mes "Espero a verle ayudado, ante cualquier duda los miembros del Staff están para ayudarle.";
close;

salir:
close;

OnInit:
  waitingroom "¡Donación SMS!",0;
}

I really REALLY need some answers.

Thank you in advance.

Greetings.