[QUEST+SQL]Trimite mesaj la GM

QUEST :

quest eposta begin   state start begin      when letter with pc.is_gm() begin      --GM Ýse e-posta yazabilsin--         send_letter("Contact GM")      end      when info or button with pc.is_gm() begin   --E-posta butonuna týklayýnca karakter Gm ise eposta yazsýn         local gm = pc.get_name()         say_title("Introduceti un titlu pentru e-mail..")         say("Subiectul este gol!!")         local baslik = input()         say_title("Dikkat: ilk kutu zorunlu")         say("Mesajýnýzý girin toplam 3 kutunuz var")         local kutu1 = input()         say("Devam edin..")         local kutu2 = input()         say("Devam edin")         local kutu3 = input()         if(kutu1 == " ") then            say("ilk kutu boþ geçildi")            return         else            say_title("Mesajý Onayla")            say_green("Mesajýnýz böyle görülecek")            say(""..kutu1.." "..kutu2.." "..kutu3.."")            say_green("Onaylýyor musun?")            local onay = select("Evet","Hayýr")            if(onay == 2) then               return            else               local posta = (kutu1.." "..kutu2.." "..kutu3)               local ekle = mysql_query10("insert into eposta(yazar,baslik,posta) values('"..gm.."','"..baslik.."','"..posta.."')")               if(ekle) then                  say_title("Sonuc:")                  say_green("Tebrikler E-posta baþarýlý bir þekilde bütün oyunculara gönderilmiþtir")                  say("")                  say_yellow("Koded: BY Trspp H.özs")                  notice_all(gm.." Bütün oyunculara bir E-posta yolladý eposta kutunuzu kontrol ediniz..")                  notice_all("E-posta kutunuz sol görev menüsünde VIP:E-POSTA olarak görülmektedir..")                  wait()                  send_letter("GM:E-posta")               else                  say_title("Sonuç:")                  say_red("Sistem kaynaklý bir sorun oluþtu kontrol et:")                  say("Eposta veri tabaný varmý!")                  say("Mysql_query fonksiyonu çalýþmaktamý!")                                 end                           end         end      end         when letter begin         send_letter("VIP:E-posta")      end      when info or button begin         local secim = mysql_query10("select * from eposta order by id desc")         say_title("E-Posta kutusu:")         say("")         say("Adminin gönderdiði son 3 E-posta MAX 3 E-POSTA")         say("Okumak istediðin E-postayi sec")         local sec = select(secim.baslik[1],secim.baslik[2],secim.baslik[3],"Kapat")         if (sec == 1 ) then                        say_title(secim.baslik[1])            say("")            say(secim.posta[1])            say("")            say(secim.tarih[1].." "..secim.yazar[1])            wait()            send_letter("GM:E-posta")                     elseif (sec == 2 ) then                           say_title(secim.baslik[2])            say("")            say(secim.posta[2])            say("")            say(secim.tarih[2].." "..secim.yazar[2])            wait()            send_letter("GM:E-posta")         else                            say_title(secim.baslik[3])            say("")            say(secim.posta[3])            say("")            say(secim.tarih[3].." "..secim.yazar[3])            wait()            send_letter("GM:E-posta")         end               end   endend

SQL :

/*Navicat MySQL Data TransferSource Server         : ServerSource Server Version : 50095Source Host           : 78.135.88.171:3306Source Database       : playerTarget Server Type    : MYSQLTarget Server Version : 50095File Encoding         : 65001Date: 2015-01-31 22:39:50*/SET FOREIGN_KEY_CHECKS=0;-- ------------------------------ Table structure for eposta-- ----------------------------DROP TABLE IF EXISTS `eposta`;CREATE TABLE `eposta` (  `id` int(11) NOT NULL auto_increment,  `yazar` varchar(50) character set latin1 NOT NULL,  `baslik` varchar(50) character set latin1 NOT NULL,  `posta` text character set latin1 NOT NULL,  `tarih` timestamp NOT NULL default CURRENT_TIMESTAMP on update CURRENT_TIMESTAMP,  PRIMARY KEY  (`id`)) ENGINE=MyISAM AUTO_INCREMENT=18 DEFAULT CHARSET=utf8 COLLATE=utf8_turkish_ci;-- ------------------------------ Records of eposta-- ----------------------------INSERT INTO `eposta` VALUES ('2', 'moses', 'Deneme2', 'Buda bir deneme koded by trspp', '2015-01-31 15:44:47');INSERT INTO `eposta` VALUES ('1', 'moses', 'Deneme', 'bu bir deneme epostas? d?r ve ba?ar?l? olmu?tur koded by trspp', '2015-01-31 15:44:09');

Tutorial de instalare SQL :

Intrati in navicat la : player si executati partea de sql.

Tutorial instalare quest:

1. Salvati continutul quest-ului într-un fisier text numit de exemplu nume_quest.quest .

2. Va conectati la filezilla / winscp si întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveti).

3. Îl puneti acolo (sa fie .quest) si da-ti permisiuni 777.

4. Te loghezi în FreeBSD / putty si scrii în felul urmator: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest

5. Intrati pe server si scrieti /reload q .

6. Testati quest-ul .

Nu am testat acest quest, este in limba Turca ! 

Succes !