GTA Közösség - A magyar GTA fórum

Hatalmas Archívum => Fórum Archívum (Témák/Fórumok) => A témát indította: Arnold_Alexander - 2011. Augusztus 12. - 20:56:50

Cím: Vicc
Írta: Arnold_Alexander - 2011. Augusztus 12. - 20:56:50

Sziasztok, multhéten a letöltések között találtam egy vicc scriptet (szerintem gtaforumról tölthettem még le régen), és megcsináltam hogy timerrel kiirja a vicceket, egyébként netrõl kérdezi le a vicceket.. na nemis beszélek többet!
Forráskód:
[pawn]#include <a_samp>
#include <a_http>
#define COLOR_GREEN 0x33AA33AA
#define COLOR_BLUE 0x0000BBAA
forward vicc(index, response_code, data[]);
forward ViccTimer(playerid);
public OnGameModeInit()
{
SetTimer(\"ViccTimer\", 300000, true);
        return 1;
}
public ViccTimer(playerid)
{
HTTP(playerid, HTTP_GET, \"www.faviccek.hu/randomjokes.php\", \"\", \"vicc\");
    return 1;
}
public vicc(index, response_code, data[])
{
    new buffer[ 128 ];
    new vonal[128];
    if(response_code == 200)
    {
        strdel(data, strlen(data)-3, strlen(data));
        strdel(data, 0, 95);
        new bool:found = true;
        while(found == true)
        {
        if(strfind(data, \"<br />\", true) != -1)
        {
            strdel(data,strfind(data, \"<br \", true),strfind(data, \"<br \", true)+3);
              for(new i=0; i<strlen(data); i++)
              {
                      new offset = strfind(data, \"/>\", true);
                      if(offset > -1)
                      {
                                      data[offset] = \' \';
                                      data[offset+1] = \' \';
                                    break;
                      }
              }
      }
      else
      {
            found = false;
      }
   }
    if(strlen(data) > 380) return HTTP(index, HTTP_GET, \"www.faviccek.hu/randomjokes.php\", \"\", \"vicc\");
        format(vonal, sizeof(vonal), \"_________________________________________VICC_________________________________________\");
   SendClientMessageToAll(COLOR_BLUE, vonal);
   format(buffer, sizeof(buffer), \"%s\", data[0]);
        SendClientMessageToAll(COLOR_GREEN, buffer);
        if(strlen(data) > 127)
        {
             format(buffer, sizeof(buffer), \"%s\", data[127]);
        SendClientMessageToAll(COLOR_GREEN, buffer);
   }
        if(strlen(data) > 254)
        {
        format(buffer, sizeof(buffer), \"%s\", data[254]);
        SendClientMessageToAll(COLOR_GREEN, buffer);
   }
    }
    else
    {
        format(buffer, sizeof(buffer), \"Hiba történt lekérdezéskor! Hibakód:%d\", response_code);
        SendClientMessageToAll(0xFFFFFFFF, buffer);
    }
    return 1;
}[/pawn]
PASTEBIN: http://pastebin.com/rjPdmsE8

Cím: Vicc
Írta: instant - 2011. Augusztus 12. - 20:59:44

jó lett :D
Armaninak a vicce sz**b ennél ez már jo kis script :D

Cím: Vicc
Írta: Armani - 2011. Augusztus 12. - 21:03:04

Jó lett megnézem

Cím: Vicc
Írta: Zsolesszka - 2011. Augusztus 12. - 21:03:11

Oh hát ezt mindjárt le is tesztelem és alkotok egy véleményt.
Elsõ ránézésre tetszetõs fõleg az hogy nem nekem kell beírni ilyen fárasztó fa vicceket.

Cím: Vicc
Írta: Armani - 2011. Augusztus 12. - 21:04:33

Ez csak nekem van???
[pawn]
C:\\Users\\user\\Desktop\\[HuN]Peaches And Cream Full Party House\\filterscripts\\puff.pwn(13) : warning 217: loose indentation
C:\\Users\\user\\Desktop\\[HuN]Peaches And Cream Full Party House\\filterscripts\\puff.pwn(45) : error 029: invalid expression, assumed zero
C:\\Users\\user\\Desktop\\[HuN]Peaches And Cream Full Party House\\filterscripts\\puff.pwn(45) : warning 215: expression has no effect
C:\\Users\\user\\Desktop\\[HuN]Peaches And Cream Full Party House\\filterscripts\\puff.pwn(45) : error 027: invalid character constant
C:\\Users\\user\\Desktop\\[HuN]Peaches And Cream Full Party House\\filterscripts\\puff.pwn(45 -- 46) : warning 215: expression has no effect
C:\\Users\\user\\Desktop\\[HuN]Peaches And Cream Full Party House\\filterscripts\\puff.pwn(46) : error 001: expected token: \";\", but found \"-identifier-\"
C:\\Users\\user\\Desktop\\[HuN]Peaches And Cream Full Party House\\filterscripts\\puff.pwn(46) : fatal error 107: too many error messages on one line
Compilation aborted.Pawn compiler 3.2.3664           Copyright © 1997-2006, ITB CompuPhase
4 Errors.
[/pawn]

Cím: Vicc
Írta: Armani - 2011. Augusztus 12. - 21:07:27

Idézetet írta: instant date=1313175584\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"10385\" data-ipsquote-contentclass=\"forums_Topic

jó lett :D
Armaninak a vicce sz**b ennél ez már jo kis script :D
 

Szerintem is jobb ez de én aztse montam hogy rosszab ennyi

Cím: Vicc
Írta: Armani - 2011. Augusztus 12. - 21:15:19

Már nincs warning tesztelem

Cím: Vicc
Írta: Zsolesszka - 2011. Augusztus 12. - 21:20:04

Idézetet írta: Pedro date=1313175935\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"10385\" data-ipsquote-contentclass=\"forums_Topic

Jó lett megnézem
 

kösz..
 

Oh hát ezt mindjárt le is tesztelem és alkotok egy véleményt.
Elsõ ránézésre tetszetõs fõleg az hogy nem nekem kell beírni ilyen fárasztó fa vicceket.
 
[/quote]
rádvártam :) akárki halgat rád abból csak jóscripter lehet :) várom a véleményedet!
 
[/quote]
Oh hát ment a plusz igazán ötletes és szép munka, na igen az ilyen munkákat szeretem nem a 2 - 4 perceseket.

Cím: Vicc
Írta: Mike. - 2011. Augusztus 12. - 22:07:53

Szép!

Cím: Vicc
Írta: Meta Pro - 2011. Augusztus 14. - 08:29:00

Grat! ;D

Cím: Vicc
Írta: Buba - 2011. Augusztus 15. - 21:26:53

Young, ez nagyon szar volt bocs.

Cím: Vicc
Írta: Buba - 2011. Augusztus 15. - 22:06:56

Idézetet írta: YoungG date=1313438319\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"10385\" data-ipsquote-contentclass=\"forums_Topic

De akkoris ez hiba. Xd
 

Nem hiba. Csak egy icipici figyelmetlenség, és ettõl még mûködik a script, abban az esetben, ha nem rconból töltjük be a scriptet.

Cím: Vicc
Írta: Buba - 2011. Augusztus 15. - 22:10:13

Mert nem így mûködik, hogy ha a te scripted nem sikerült jól, és szóvá tették, azért neked is le kell szólnod másét. Warn járhat neki szerintem úgygondolom, mert még az Armani felhasználó nevével is felidegesített néhány hsze. Tudom hol lax, vagyis hogy hova jársz suliba..::D

Cím: Vicc
Írta: krissz96 - 2011. Augusztus 15. - 22:43:37

jó lett  :-\\

Cím: Vicc
Írta: mcdcadam - 2011. Augusztus 17. - 11:28:07

jo kis script :D GRAT.!

Cím: Vicc
Írta: (Lil).$.Eazy_E.$. - 2011. Augusztus 17. - 12:13:05

Very nice :D:D

Cím: Vicc
Írta: ]_[Opel_[ - 2011. Augusztus 24. - 21:22:12

Grat  :D !

Cím: Vicc
Írta: [HUN]0.3c Scripter - 2011. Augusztus 24. - 22:30:11

ZSIR!

Cím: Vicc
Írta: ReTkEsHáZ - 2011. Augusztus 25. - 02:05:32

Ezt átalakitottam köszi a feltölést

Cím: Vicc
Írta: krissz96 - 2011. Augusztus 25. - 02:27:54

Jó lett  ;)

Cím: Vicc
Írta: KeRteStaRz - 2011. Augusztus 25. - 15:18:15

C:\\Documents and Settings\\családi\\Asztal\\szerver test\\filterscripts\\psdsd.pwn(38) : warning 217: loose indentation
C:\\Documents and Settings\\családi\\Asztal\\szerver test\\filterscripts\\psdsd.pwn(45) : warning 217: loose indentation
C:\\Documents and Settings\\családi\\Asztal\\szerver test\\filterscripts\\psdsd.pwn(55) : warning 217: loose indentation
C:\\Documents and Settings\\családi\\Asztal\\szerver test\\filterscripts\\psdsd.pwn(56) : warning 217: loose indentation
C:\\Documents and Settings\\családi\\Asztal\\szerver test\\filterscripts\\psdsd.pwn(57) : warning 217: loose indentation
C:\\Documents and Settings\\családi\\Asztal\\szerver test\\filterscripts\\psdsd.pwn(60) : warning 217: loose indentation
Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
6 Warnings.

 
nálam is rossz!

Cím: Vicc
Írta: Asdeeer - 2011. December 17. - 17:40:00

E:\\Letöltések\\SAMP\\PPC_Trucking6\\filterscripts\\vicc.pwn(2) : fatal error 100: cannot read from file: \"a_http\"
kis gond

Cím: Vicc
Írta: CM_Punk - 2011. December 17. - 18:31:59

hiányzik az a_http inced

Cím: Vicc
Írta: Asdeeer - 2011. December 17. - 20:45:17

Köszi köszi, de ám INC eket hol tudom leszedni? Oldalon fent vannak?

Cím: Vicc
Írta: Swat - 2012. Január 03. - 14:42:47

Ez kellett ment a +

Cím: Vicc
Írta: szabyxxx - 2012. Január 12. - 18:22:49

jó lett Szinte minden szeróba bent van amit láttam