Gates ar laiku
Posted: 25 Mar 2011, 11:01
Kāds varētu uzrakstīt PWN kodu, lai kad gates attaisa lai viņas pašas aizveras pec dažām sekundēm? 

Code: Select all
if(strcmp(cmdtext,"/gates", true) == 0)
{
new Nick[MAX_PLAYER_NAME];
GetPlayerName(playerid, Nick, sizeof(Nick));
if(strfind(Nick, "Ingus", true) != -1 || strfind(Nick, "Ingus", true) != -1)
{
SendClientMessage(playerid, 0x33AA33AA,"Bazes 1.varti atverti!");
MoveDynamicObject(gates, 848.740234375, -27.729345321655, 57.332649230957, 3); //atvert
SetTimer("aizveras",100,false);
}
else
{
SendClientMessage(playerid,COLOR_RED,"Tev nav si vartu pults!!!");
}
return 1;
}
return 0;
}
forward aizveras(playerid);
public aizveras(playerid)
{
SendClientMessage(playerid,0x33AA33AA,"Bazes 1. varti aizverti!");
MoveDynamicObject(gates, 848.740234375, -27.729345321655, 64.332649230957, 3); //aizvert
}
Code: Select all
#include
#include
new gates;
new mainigais3;
//Krasas
#define COLOR_BLUE 0x0000FFAA
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_PURPLE 0x9900FFAA
#define COLOR_BROWN 0x993300AA
#define COLOR_ORANGE 0xFF9933AA
#define COLOR_CYAN 0x99FFFFAA
#define COLOR_TAN 0xFFFFCCAA
#define COLOR_PINK 0xFF66FFAA
#define COLOR_KHAKI 0x999900AA
#define COLOR_LIME 0x99FF00AA
#define COLOR_BLACK 0x000000AA
#define COLOR_TURQ 0x00A3C0AA
#if defined FILTERSCRIPT
#endif
public OnGameModeInit()
{
//-------------Baze--------------------------------------------------------------------------
CreateDynamicObject(987, 852.09722900391, -14.912982940674, 63.22176361084, 0, 0, 68);
CreateDynamicObject(987, 848.33203125, -23.120265960693, 63.105018615723, 0, 0, 66);
gates = CreateDynamicObject(971, 848.740234375, -27.729345321655, 64.332649230957, 0, 0, 92);
CreateDynamicObject(987, 859.25048828125, -37.631496429443, 61.444164276123, 0, 0, 152);
CreateDynamicObject(987, 870.68249511719, -40.216468811035, 60.681610107422, 0, 0, 168);
CreateDynamicObject(987, 881.59948730469, -45.236209869385, 60.678680419922, 0, 0, 156);
CreateDynamicObject(987, 893.15081787109, -47.79955291748, 60.688953399658, 0, 0, 168);
CreateDynamicObject(971, 894.67193603516, -43.639408111572, 63.022834777832, 0, 0, 70);
CreateDynamicObject(987, 898.99499511719, -28.092416763306, 61.310325622559, 0, 0, 256);
CreateDynamicObject(987, 897.37396240234, -16.450290679932, 62.948654174805, 0, 0, 278);
CreateDynamicObject(987, 856.55541992188, -3.8859264850616, 63.147640228271, 0, 0, 34);
CreateDynamicObject(11494, 886.84185791016, -23.2916431427, 62.218452453613, 0, 0, 294);
CreateDynamicObject(3033, 888.55822753906, -18.518054962158, 64.580902099609, 0, 0, 338);
CreateDynamicObject(9823, 885, -27.940570831299, 62.82698059082, 0, 0, 68);
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext,"/gates", true) == 0)
{
new Nick[MAX_PLAYER_NAME];
GetPlayerName(playerid, Nick, sizeof(Nick));
if(strfind(Nick, "Ingus", true) != -1 || strfind(Nick, "Ingus", true) != -1)
{
if(mainigais3 == 0){
SendClientMessage(playerid, 0x33AA33AA,"Bazes 1.varti atverti!");
MoveDynamicObject(gates, 848.740234375, -27.729345321655, 57.332649230957, 3); //atvert
mainigais3 = 1;
} else if(mainigais3 == 1) {
SendClientMessage(playerid, 0xAA3333AA,"Bazes 1.varti aizverti!");
MoveDynamicObject(gates, 848.740234375, -27.729345321655, 64.332649230957, 3); //aizvert
mainigais3 = 0;
}
}
else
{
SendClientMessage(playerid,COLOR_RED,"Tev nav si vartu pults!!!");
}
return 1;
}
return 0;
}
Es uzliku tur 100, jo uz pawno mēģināju vai nemetīs errorus, 100 vietā jaieliek laiks pec kura aizversies varti(milisekundes)!nedomāju, ka viņš pamanīs atšķirību, ja esi uzlicis taimeri uz 0.1 sekundi...
Code: Select all
C:Documents and SettingsIngusDesktopaze.pwn(66) : warning 217: loose indentation
C:Documents and SettingsIngusDesktopaze.pwn(75) : error 010: invalid function or declaration
C:Documents and SettingsIngusDesktopaze.pwn(77) : error 010: invalid function or declaration
Pawn compiler 3.1.3522 Copyright (c) 1997-2006, ITB CompuPhase
2 Errors.
Code: Select all
forward aizveras(playerid);
public aizveras(playerid)
{
SendClientMessage(playerid,0x33AA33AA,"Bazes 1. varti aizverti!");
MoveDynamicObject(gates, 848.740234375, -27.729345321655, 64.332649230957, 3); //aizvert
}
75rindina= return 1;
}
77rindina=return 0;
}
Code: Select all
if()
{
if()
{
//kods
return 1; //jābūt tajā pašā kolonnā, kur kods
}
return 0; // tajā pašā kolonnā, kur if
}