27.12.2012, 11:20
(
Последний раз редактировалось mau.tito; 27.12.2012 в 20:41.
)
Systen Hospital
Ola galera vim trazer este sistema de hospital, feito por mim mesmo.
Ele e bom para qualquer estilo de gamemode , espero que voces gostem.
Explicaзao:
Quando voce compra um plano automaticamente ele irar criar um arquivo
na pas ta Planos todos os arquivos criados la sao de extensao .txt caso
queira trocar fica de sua opcao.
Nao botei preco dos planos no dialog pois se voces quizerem trocar os
preзo fiquem avontade!
Mapp:
O mapa do hospital foi feito felo coringa .
Link : https://sampforum.blast.hk/showthread.php?tid=363783
Img:
http://imageshack.us/f/692/samp007ww.png/
http://imageshack.us/f/849/samp008to.png/
Code\/
Creditos:
Ola galera vim trazer este sistema de hospital, feito por mim mesmo.
Ele e bom para qualquer estilo de gamemode , espero que voces gostem.
Explicaзao:
Quando voce compra um plano automaticamente ele irar criar um arquivo
na pas ta Planos todos os arquivos criados la sao de extensao .txt caso
queira trocar fica de sua opcao.
Nao botei preco dos planos no dialog pois se voces quizerem trocar os
preзo fiquem avontade!
Mapp:
O mapa do hospital foi feito felo coringa .
Link : https://sampforum.blast.hk/showthread.php?tid=363783
Img:
http://imageshack.us/f/692/samp007ww.png/
http://imageshack.us/f/849/samp008to.png/
Code\/
pawn Код:
#include a_samp
#include DOF2
#include zcmd
#include sscanf2
#define DIALOGPLANOS 123
#define CallBack::%0(%1) forward %0(%1); \
public %0(%1)
new Morto[MAX_PLAYERS];
new TemPlano[MAX_PLAYERS];
new quantidadedemortes[MAX_PLAYERS];
new Nome[MAX_PLAYER_NAME];
new Float:RadomCama[][3] ={
{1711.5227, 1193.1580, 35.7302},
{1712.1383, 1191.0619, 35.7302},
{1711.6455, 1189.0698, 35.7302},
{1711.6312, 1187.4750, 35.7302},
{1711.7756, 1185.4668, 35.7302},
{1711.6484, 1183.6871, 35.7302},
{1711.7993, 1181.7736, 35.7302},
{1711.7340, 1179.9402, 35.7302}
};
public OnFilterScriptInit()
{
CreatePickup(1240, 2, 1714.6462,1174.0515,34.8259);
Create3DTextLabel("/comprarplano" , 0x008080FF, 1714.6462,1174.0515,34.8259, 3, 0, 0);
// Hospital
CreateObject(19379, 1716.53, 1183.26, 33.74, 0.00, -90.00, 0.51);
CreateObject(19379, 1717.44, 1173.73, 37.23, 0.00, -90.00, 359.97);
CreateObject(19379, 1706.17, 1183.19, 33.74, 0.00, -90.00, 0.27);
CreateObject(19450, 1721.77, 1173.72, 35.55, 0.00, 0.00, 0.51);
CreateObject(19388, 1710.28, 1173.83, 35.55, 0.00, 0.00, 359.79);
CreateObject(19450, 1721.68, 1183.05, 35.55, 0.00, 0.00, 0.51);
CreateObject(19450, 1717.06, 1168.98, 35.55, 0.00, 0.00, 89.39);
CreateObject(19450, 1707.44, 1169.08, 35.55, 0.00, 0.00, 89.49);
CreateObject(19358, 1710.29, 1170.68, 35.55, 0.00, 0.00, 359.79);
CreateObject(19450, 1710.27, 1180.19, 35.55, 0.00, 0.00, 0.21);
CreateObject(19450, 1713.76, 1178.76, 35.55, 0.00, 0.00, 89.69);
CreateObject(19388, 1720.07, 1178.73, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1705.48, 1178.81, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1702.75, 1173.98, 35.55, 0.00, 0.00, 0.21);
CreateObject(1536, 1714.74, 1169.06, 33.83, 0.00, 0.00, 359.29);
CreateObject(1536, 1717.74, 1169.06, 33.83, 0.00, 0.00, 179.55);
CreateObject(1502, 1719.28, 1178.70, 33.83, 0.00, 0.00, 359.80);
CreateObject(1502, 1710.28, 1174.64, 33.83, 0.00, 0.00, 269.97);
CreateObject(1722, 1721.57, 1170.17, 33.73, 0.00, 0.00, 91.00);
CreateObject(1722, 1721.54, 1171.25, 33.73, 0.00, 0.00, 90.19);
CreateObject(1722, 1721.53, 1172.41, 33.73, 0.00, 0.00, 90.19);
CreateObject(1722, 1721.50, 1173.65, 33.73, 0.00, 0.00, 90.19);
CreateObject(1722, 1721.49, 1174.89, 33.73, 0.00, 0.00, 90.19);
CreateObject(2029, 1710.93, 1175.13, 33.83, 0.00, 0.00, 0.00);
CreateObject(2029, 1712.89, 1175.13, 33.83, 0.00, 0.00, 0.00);
CreateObject(2029, 1714.85, 1175.12, 33.83, 0.00, 0.00, 0.00);
CreateObject(2029, 1716.83, 1175.11, 33.83, 0.00, 0.00, 0.00);
CreateObject(2204, 1710.89, 1178.53, 33.83, 0.00, 0.00, 0.00);
CreateObject(2204, 1713.83, 1178.56, 33.83, 0.00, 0.00, 0.00);
CreateObject(1715, 1711.48, 1176.51, 33.83, 0.00, 0.00, 359.59);
CreateObject(1715, 1713.49, 1176.47, 33.83, 0.00, 0.00, 359.59);
CreateObject(1715, 1715.37, 1176.49, 33.83, 0.00, 0.00, 359.59);
CreateObject(1715, 1717.40, 1176.40, 33.83, 0.00, 0.00, 359.59);
CreateObject(2184, 1709.57, 1170.04, 33.83, 0.00, 0.00, 94.00);
CreateObject(2184, 1706.12, 1169.97, 33.83, 0.00, 0.00, 94.00);
CreateObject(1715, 1707.43, 1170.92, 33.83, 0.00, 0.00, 89.01);
CreateObject(1715, 1704.06, 1170.92, 33.83, 0.00, 0.00, 89.01);
CreateObject(2184, 1709.19, 1175.82, 33.83, 0.00, 0.00, 94.00);
CreateObject(1715, 1707.28, 1176.81, 33.83, 0.00, 0.00, 89.01);
CreateObject(2184, 1706.00, 1175.86, 33.83, 0.00, 0.00, 94.00);
CreateObject(1715, 1703.94, 1176.95, 33.83, 0.00, 0.00, 89.01);
CreateObject(19450, 1710.24, 1189.75, 35.55, 0.00, 0.00, 0.21);
CreateObject(19379, 1716.39, 1192.82, 37.23, 0.00, -90.00, 0.10);
CreateObject(19379, 1706.31, 1192.70, 33.74, 0.00, -90.00, 0.51);
CreateObject(19450, 1713.72, 1194.54, 35.55, 0.00, 0.00, 89.69);
CreateObject(19388, 1720.12, 1194.52, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1721.60, 1192.60, 35.55, 0.00, 0.00, 0.51);
CreateObject(19404, 1719.22, 1180.39, 35.55, 0.00, 0.00, 359.80);
CreateObject(19404, 1719.23, 1183.54, 35.55, 0.00, 0.00, 359.80);
CreateObject(19404, 1719.24, 1186.74, 35.55, 0.00, 0.00, 359.80);
CreateObject(19404, 1719.25, 1189.92, 35.55, 0.00, 0.00, 359.80);
CreateObject(19388, 1719.26, 1192.97, 35.55, 0.00, 0.00, 359.79);
CreateObject(19325, 1719.31, 1182.46, 35.15, 0.00, 0.00, 359.80);
CreateObject(19325, 1719.32, 1188.42, 35.15, 0.00, 0.00, 359.70);
CreateObject(1502, 1719.25, 1193.75, 33.83, 0.00, 0.00, 269.97);
CreateObject(1723, 1718.68, 1191.00, 33.83, 0.00, 0.00, 269.30);
CreateObject(1723, 1718.66, 1187.02, 33.83, 0.00, 0.00, 269.30);
CreateObject(1723, 1718.59, 1182.72, 33.83, 0.00, 0.00, 269.30);
CreateObject(19379, 1716.41, 1202.51, 33.74, 0.00, -90.00, 0.51);
CreateObject(19450, 1721.52, 1202.21, 35.55, 0.00, 0.00, 0.51);
CreateObject(19450, 1713.60, 1197.36, 35.55, 0.00, 0.00, 89.69);
CreateObject(19388, 1719.99, 1197.34, 35.55, 0.00, 0.00, 90.01);
CreateObject(19379, 1705.92, 1202.16, 33.74, 0.00, -90.00, 0.51);
CreateObject(19450, 1708.85, 1202.14, 35.55, 0.00, 0.00, 0.31);
CreateObject(19450, 1713.59, 1206.90, 35.55, 0.00, 0.00, 90.71);
CreateObject(19450, 1716.69, 1206.94, 35.55, 0.00, 0.00, 90.71);
CreateObject(19388, 1707.30, 1194.57, 35.55, 0.00, 0.00, 89.69);
CreateObject(1723, 1720.90, 1201.10, 33.83, 0.00, 0.00, 270.12);
CreateObject(1723, 1720.89, 1204.90, 33.83, 0.00, 0.00, 270.12);
CreateObject(1723, 1709.56, 1199.29, 33.83, 0.00, 0.00, 90.51);
CreateObject(1723, 1709.53, 1203.28, 33.83, 0.00, 0.00, 90.51);
CreateObject(1723, 1713.17, 1198.10, 33.83, 0.00, 0.00, 180.00);
CreateObject(1723, 1717.62, 1198.10, 33.83, 0.00, 0.00, 180.00);
CreateObject(1723, 1710.98, 1206.23, 33.83, 0.00, 0.00, 1.03);
CreateObject(1723, 1714.86, 1206.25, 33.83, 0.00, 0.00, 1.03);
CreateObject(1723, 1718.72, 1206.34, 33.83, 0.00, 0.00, 1.03);
CreateObject(19450, 1701.41, 1194.61, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1700.90, 1189.78, 35.55, 0.00, 0.00, 0.21);
CreateObject(19450, 1700.92, 1183.64, 35.55, 0.00, 0.00, 0.21);
CreateObject(1502, 1719.34, 1194.53, 33.83, 0.00, 0.00, 359.80);
CreateObject(1502, 1719.19, 1197.31, 33.83, 0.00, 0.00, 359.80);
CreateObject(1502, 1706.53, 1194.52, 33.83, 0.00, 0.00, 359.80);
CreateObject(19388, 1707.22, 1197.39, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1701.46, 1197.43, 35.55, 0.00, 0.00, 89.63);
CreateObject(19450, 1700.78, 1202.22, 35.55, 0.00, 0.00, 0.31);
CreateObject(19450, 1704.28, 1206.84, 35.55, 0.00, 0.00, 90.13);
CreateObject(1502, 1706.42, 1197.38, 33.83, 0.00, 0.00, 359.80);
CreateObject(2206, 1702.00, 1205.20, 33.83, 0.00, 0.00, 0.00);
CreateObject(2206, 1705.81, 1205.22, 33.83, 0.00, 0.00, 0.00);
CreateObject(2206, 1705.78, 1202.56, 33.83, 0.00, 0.00, 0.00);
CreateObject(2206, 1705.74, 1200.18, 33.83, 0.00, 0.00, -0.12);
CreateObject(2206, 1701.99, 1202.56, 33.83, 0.00, 0.00, 0.00);
CreateObject(2206, 1701.91, 1200.18, 33.83, 0.00, 0.00, 0.00);
CreateObject(1714, 1702.90, 1203.93, 33.83, 0.00, 0.00, 181.11);
CreateObject(1714, 1702.94, 1201.55, 33.83, 0.00, 0.00, 181.11);
CreateObject(1714, 1702.79, 1199.13, 33.83, 0.00, 0.00, 181.11);
CreateObject(1714, 1706.56, 1199.06, 33.83, 0.00, 0.00, 181.11);
CreateObject(1714, 1706.66, 1201.44, 33.83, 0.00, 0.00, 181.11);
CreateObject(1714, 1706.79, 1204.06, 33.83, 0.00, 0.00, 181.11);
CreateObject(2204, 1706.07, 1197.68, 33.83, 0.00, 0.00, 178.94);
CreateObject(2204, 1703.31, 1197.70, 33.83, 0.00, 0.00, 178.94);
CreateObject(2241, 1709.66, 1198.09, 34.23, 0.00, 0.00, 0.00);
CreateObject(2241, 1714.37, 1198.09, 34.23, 0.00, 0.00, 0.00);
CreateObject(2241, 1709.51, 1202.30, 34.23, 0.00, 0.00, 0.00);
CreateObject(2241, 1709.53, 1206.28, 34.23, 0.00, 0.00, 0.00);
CreateObject(2241, 1713.87, 1206.25, 34.23, 0.00, 0.00, 0.00);
CreateObject(2241, 1717.84, 1206.30, 34.23, 0.00, 0.00, 0.00);
CreateObject(2241, 1720.97, 1198.10, 34.23, 0.00, 0.00, 0.00);
CreateObject(2241, 1720.91, 1202.02, 34.23, 0.00, 0.00, 0.00);
CreateObject(1892, 1714.92, 1169.64, 33.43, 0.00, 0.00, 358.66);
CreateObject(1892, 1716.54, 1169.59, 33.43, 0.00, 0.00, 358.66);
CreateObject(2256, 1718.36, 1206.78, 36.09, 0.00, 0.00, 0.00);
CreateObject(2256, 1712.36, 1206.67, 36.09, 0.00, 0.00, 0.00);
CreateObject(2258, 1706.77, 1206.74, 36.09, 0.00, 0.00, 0.00);
CreateObject(2258, 1703.41, 1206.68, 36.09, 0.00, 0.00, 0.00);
CreateObject(2146, 1702.38, 1193.23, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1702.34, 1190.99, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1702.32, 1188.58, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1702.33, 1186.27, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1702.35, 1184.07, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1702.33, 1182.02, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1702.39, 1179.98, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1711.79, 1179.88, 34.23, 0.00, 0.00, 90.29);
CreateObject(2204, 1716.82, 1178.55, 33.83, 0.00, 0.00, 0.00);
CreateObject(19388, 1696.67, 1196.17, 35.55, 0.00, 0.00, 359.79);
CreateObject(19379, 1696.03, 1193.01, 33.74, 0.00, -90.00, 0.51);
CreateObject(19450, 1692.13, 1194.66, 35.55, 0.00, 0.00, 89.69);
CreateObject(19388, 1685.78, 1194.69, 35.55, 0.00, 0.00, 89.69);
CreateObject(19379, 1685.84, 1192.79, 33.74, 0.00, -90.00, 0.51);
CreateObject(19450, 1684.29, 1189.86, 35.55, 0.00, 0.00, 0.21);
CreateObject(19379, 1685.38, 1183.21, 33.74, 0.00, -90.00, 0.51);
CreateObject(19379, 1695.94, 1183.54, 33.74, 0.00, -90.00, 0.51);
CreateObject(19450, 1695.95, 1178.87, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1686.77, 1178.91, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1684.30, 1182.27, 35.55, 0.00, 0.00, 0.21);
CreateObject(2455, 1687.22, 1194.15, 33.83, 0.00, 0.00, 271.10);
CreateObject(2454, 1687.28, 1190.50, 33.83, 0.00, 0.00, 270.26);
CreateObject(2455, 1687.23, 1193.24, 33.83, 0.00, 0.00, 271.10);
CreateObject(2455, 1687.24, 1192.32, 33.83, 0.00, 0.00, 271.10);
CreateObject(2455, 1688.37, 1190.35, 33.83, 0.00, 0.00, 359.50);
CreateObject(2455, 1689.30, 1190.35, 33.83, 0.00, 0.00, 359.90);
CreateObject(2455, 1690.21, 1190.35, 33.83, 0.00, 0.00, 0.00);
CreateObject(2455, 1691.13, 1190.35, 33.83, 0.00, 0.00, 0.00);
CreateObject(2455, 1692.04, 1190.35, 33.83, 0.00, 0.00, 0.00);
CreateObject(2455, 1692.94, 1190.35, 33.83, 0.00, 0.00, 0.00);
CreateObject(2416, 1688.96, 1192.00, 33.83, 0.00, 0.00, 0.00);
CreateObject(2416, 1691.81, 1191.95, 33.83, 0.00, 0.00, 0.00);
CreateObject(2455, 1687.26, 1191.42, 33.83, 0.00, 0.00, 271.10);
CreateObject(2455, 1693.86, 1190.35, 33.83, 0.00, 0.00, -0.24);
CreateObject(2416, 1694.64, 1191.94, 33.83, 0.00, 0.00, 0.00);
CreateObject(2416, 1697.47, 1191.93, 33.83, 0.00, 0.00, 0.00);
CreateObject(2455, 1694.78, 1190.35, 33.83, 0.00, 0.00, -0.24);
CreateObject(2455, 1695.70, 1190.35, 33.83, 0.00, 0.00, -0.24);
CreateObject(2455, 1696.62, 1190.35, 33.83, 0.00, 0.00, -0.24);
CreateObject(2455, 1697.54, 1190.35, 33.83, 0.00, 0.00, -0.24);
CreateObject(2455, 1698.46, 1190.35, 33.83, 0.00, 0.00, -0.24);
CreateObject(2455, 1699.28, 1190.34, 33.83, 0.00, 0.00, -0.24);
CreateObject(1502, 1699.39, 1190.16, 32.29, 0.00, 0.00, 0.31);
CreateObject(2764, 1698.86, 1187.57, 34.14, 0.00, 0.00, 0.00);
CreateObject(2788, 1700.07, 1187.60, 34.23, 0.00, 0.00, 0.00);
CreateObject(2448, 1689.99, 1194.33, 33.83, 0.00, 0.00, 0.00);
CreateObject(1775, 1700.21, 1194.04, 34.82, 0.00, 0.00, 0.00);
CreateObject(1776, 1692.64, 1194.26, 34.82, 0.00, 0.00, 0.00);
CreateObject(1775, 1688.73, 1194.13, 34.82, 0.00, 0.00, 0.00);
CreateObject(2738, 1680.89, 1198.87, 34.43, 0.00, 0.00, 89.70);
CreateObject(2419, 1693.81, 1193.87, 33.83, 0.00, 0.00, 0.00);
CreateObject(2451, 1695.79, 1193.91, 33.83, 0.00, 0.00, 0.00);
CreateObject(2415, 1697.87, 1193.62, 33.83, 0.00, 0.00, 0.00);
CreateObject(2415, 1698.99, 1193.65, 33.83, 0.00, 0.00, 0.00);
CreateObject(2764, 1698.78, 1184.35, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1698.93, 1180.99, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1694.24, 1187.44, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1694.24, 1184.34, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1694.26, 1181.05, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1690.43, 1187.55, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1686.60, 1181.00, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1690.35, 1184.35, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1690.27, 1181.14, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1686.52, 1184.34, 34.14, 0.00, 0.00, 0.00);
CreateObject(2764, 1686.71, 1187.68, 34.14, 0.00, 0.00, 0.00);
CreateObject(2788, 1700.16, 1184.24, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1700.16, 1180.84, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1695.34, 1181.01, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1695.22, 1184.37, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1695.16, 1187.57, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1691.50, 1187.67, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1691.42, 1184.33, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1691.51, 1180.99, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1687.80, 1181.01, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1687.73, 1184.39, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1687.87, 1187.81, 34.23, 0.00, 0.00, 0.00);
CreateObject(2788, 1697.92, 1187.65, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1697.79, 1184.30, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1697.82, 1180.88, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1693.33, 1180.97, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1693.12, 1184.41, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1693.08, 1187.57, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1689.50, 1187.58, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1689.36, 1184.38, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1689.27, 1180.93, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1685.70, 1180.99, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1685.72, 1184.44, 34.23, 0.00, 0.00, 180.43);
CreateObject(2788, 1685.79, 1187.61, 34.23, 0.00, 0.00, 180.43);
CreateObject(19450, 1695.98, 1197.71, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1683.25, 1197.79, 35.55, 0.00, 0.00, 89.69);
CreateObject(19388, 1689.64, 1197.75, 35.55, 0.00, 0.00, 89.69);
CreateObject(19379, 1695.62, 1202.45, 37.23, 0.00, -90.00, 0.51);
CreateObject(19379, 1685.17, 1202.46, 33.74, 0.00, -90.00, 0.21);
CreateObject(19450, 1684.28, 1193.03, 35.55, 0.00, 0.00, 0.21);
CreateObject(19450, 1691.54, 1205.65, 35.55, 0.00, 0.00, 359.60);
CreateObject(19388, 1691.50, 1199.39, 35.55, 0.00, 0.00, 359.79);
CreateObject(19388, 1688.31, 1199.44, 35.55, 0.00, 0.00, 359.79);
CreateObject(19450, 1688.33, 1205.59, 35.55, 0.00, 0.00, 359.91);
CreateObject(19450, 1694.65, 1206.86, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1685.13, 1206.92, 35.55, 0.00, 0.00, 89.69);
CreateObject(19450, 1680.36, 1202.19, 35.55, 0.00, 0.00, 0.11);
CreateObject(19435, 1681.34, 1199.53, 34.53, 0.00, 0.00, 89.69);
CreateObject(1523, 1682.12, 1198.01, 33.73, 0.00, 0.00, 89.59);
CreateObject(19435, 1681.33, 1198.07, 34.54, 0.00, 0.00, 89.69);
CreateObject(2738, 1680.87, 1200.39, 34.43, 0.00, 0.00, 89.70);
CreateObject(19435, 1681.31, 1201.15, 34.51, 0.00, 0.00, 89.69);
CreateObject(1523, 1682.14, 1199.61, 33.73, 0.00, 0.00, 89.59);
CreateObject(2738, 1680.78, 1202.00, 34.43, 0.00, 0.00, 89.70);
CreateObject(19435, 1681.31, 1202.71, 34.53, 0.00, 0.00, 89.69);
CreateObject(1523, 1682.13, 1201.17, 33.73, 0.00, 0.00, 89.59);
CreateObject(2738, 1680.78, 1203.62, 34.43, 0.00, 0.00, 89.70);
CreateObject(19435, 1681.27, 1204.27, 34.54, 0.00, 0.00, 89.63);
CreateObject(1523, 1682.12, 1202.69, 33.73, 0.00, 0.00, 89.59);
CreateObject(19435, 1681.29, 1205.79, 34.54, 0.00, 0.00, 89.63);
CreateObject(1523, 1682.13, 1204.23, 33.73, 0.00, 0.00, 89.35);
CreateObject(2738, 1680.75, 1205.04, 34.43, 0.00, 0.00, 89.70);
CreateObject(19435, 1687.49, 1200.29, 33.09, 0.00, 0.00, 89.80);
CreateObject(19435, 1686.76, 1205.49, 34.08, 90.00, 0.00, 180.00);
CreateObject(19435, 1686.75, 1202.00, 34.08, 90.00, 0.00, 180.00);
CreateObject(19435, 1687.50, 1202.03, 34.85, 0.00, -91.00, 89.87);
CreateObject(19435, 1687.48, 1205.51, 34.85, 0.00, -89.00, 90.30);
CreateObject(2515, 1687.97, 1205.54, 35.15, 0.00, 0.00, -91.00);
CreateObject(2515, 1687.93, 1203.35, 35.15, 0.00, 0.00, -91.00);
CreateObject(2515, 1687.92, 1201.04, 35.15, 0.00, 0.00, -91.00);
CreateObject(2741, 1688.17, 1205.47, 36.39, 0.00, 0.00, -91.00);
CreateObject(2741, 1688.13, 1203.21, 36.39, 0.00, 0.00, -91.00);
CreateObject(2741, 1688.15, 1200.97, 36.39, 0.00, 0.00, -91.00);
CreateObject(19435, 1700.02, 1197.89, 34.53, 0.00, 0.00, 89.69);
CreateObject(1523, 1699.25, 1197.87, 33.73, 0.00, 0.00, 89.59);
CreateObject(19435, 1700.06, 1199.46, 34.53, 0.00, 0.00, 89.69);
CreateObject(1523, 1699.28, 1199.40, 33.73, 0.00, 0.00, 89.59);
CreateObject(19435, 1700.01, 1200.90, 34.53, 0.00, 0.00, 89.69);
CreateObject(1523, 1699.27, 1200.92, 33.73, 0.00, 0.00, 89.59);
CreateObject(19435, 1700.02, 1202.45, 34.53, 0.00, 0.00, 89.69);
CreateObject(1523, 1699.25, 1202.42, 33.73, 0.00, 0.00, 89.59);
CreateObject(19435, 1700.01, 1203.89, 34.53, 0.00, 0.00, 89.69);
CreateObject(19435, 1699.98, 1205.39, 34.53, 0.00, 0.00, 89.69);
CreateObject(1523, 1699.23, 1203.89, 33.73, 0.00, 0.00, 89.59);
CreateObject(2738, 1700.26, 1198.68, 34.43, 0.00, 0.00, 269.00);
CreateObject(2738, 1700.28, 1200.35, 34.43, 0.00, 0.00, 271.54);
CreateObject(2738, 1700.29, 1201.74, 34.43, 0.00, 0.00, 271.54);
CreateObject(2738, 1700.31, 1203.21, 34.43, 0.00, 0.00, 271.54);
CreateObject(2738, 1700.23, 1204.73, 34.43, 0.00, 0.00, 271.54);
CreateObject(19435, 1692.37, 1200.28, 33.09, 0.00, 0.00, 89.80);
CreateObject(19435, 1693.13, 1201.97, 34.08, 90.00, 0.00, 180.00);
CreateObject(19435, 1693.13, 1205.36, 34.08, 90.00, 0.00, 179.89);
CreateObject(19435, 1692.37, 1205.42, 34.85, 0.00, -90.00, 90.00);
CreateObject(19435, 1692.37, 1201.94, 34.85, 0.00, -90.00, 90.00);
CreateObject(2515, 1691.82, 1201.47, 35.15, 0.00, 0.00, 89.00);
CreateObject(2515, 1691.81, 1203.50, 35.15, 0.00, 0.00, 89.00);
CreateObject(2515, 1691.90, 1205.86, 35.15, 0.00, 0.00, 89.00);
CreateObject(2741, 1691.67, 1201.56, 36.39, 0.00, 0.00, 89.00);
CreateObject(2741, 1691.71, 1203.52, 36.39, 0.00, 0.00, 89.00);
CreateObject(2741, 1691.69, 1205.86, 36.39, 0.00, 0.00, 89.00);
CreateObject(1523, 1691.50, 1198.59, 33.73, 0.00, 0.00, 89.59);
CreateObject(1523, 1688.40, 1198.65, 33.73, 0.00, 0.00, 89.59);
CreateObject(1502, 1696.66, 1196.96, 33.83, 0.00, 0.00, 269.97);
CreateObject(1502, 1685.00, 1194.67, 33.83, 0.00, 0.00, 359.80);
CreateObject(1502, 1688.86, 1197.72, 33.83, 0.00, 0.00, 360.04);
CreateObject(19379, 1706.18, 1173.66, 33.74, 0.00, -90.00, 0.27);
CreateObject(19379, 1716.65, 1173.68, 33.74, 0.00, -90.00, 0.27);
CreateObject(19379, 1706.97, 1173.75, 37.23, 0.00, -90.00, 359.77);
CreateObject(19379, 1716.33, 1202.38, 37.23, 0.00, -90.00, -0.05);
CreateObject(19379, 1705.91, 1202.34, 37.23, 0.00, -90.00, -0.05);
CreateObject(19379, 1685.64, 1183.53, 37.23, 0.00, -90.00, 0.02);
CreateObject(19379, 1685.31, 1202.38, 37.23, 0.00, -90.00, 0.02);
CreateObject(2146, 1711.80, 1181.77, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1711.77, 1183.67, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1711.83, 1185.44, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1711.74, 1187.38, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1711.73, 1189.18, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1711.73, 1191.04, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1711.66, 1193.00, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1708.78, 1179.80, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1708.78, 1181.66, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1708.77, 1183.59, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1708.90, 1185.47, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1708.83, 1187.36, 34.23, 0.00, 0.00, 90.29);
CreateObject(2146, 1708.76, 1189.27, 34.23, 0.00, 0.00, 90.23);
CreateObject(2146, 1708.77, 1190.93, 34.23, 0.00, 0.00, 90.23);
CreateObject(2146, 1708.78, 1193.08, 34.23, 0.00, 0.00, 90.35);
CreateObject(19379, 1716.49, 1192.89, 33.74, 0.00, -90.00, 0.51);
CreateObject(19379, 1716.45, 1183.20, 37.23, 0.00, -90.00, 0.21);
CreateObject(19379, 1695.64, 1202.59, 33.74, 0.00, -90.00, 0.51);
CreateObject(19379, 1706.02, 1192.87, 37.23, 0.00, -90.00, 0.51);
CreateObject(19379, 1706.11, 1183.38, 37.23, 0.00, -90.00, 0.51);
CreateObject(19379, 1695.97, 1183.29, 37.23, 0.00, -90.00, 0.51);
CreateObject(19379, 1695.78, 1192.84, 37.23, 0.00, -90.00, 0.51);
CreateObject(19379, 1685.45, 1192.89, 37.23, 0.00, -90.00, 0.51);
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
public OnPlayerConnect(playerid)
{
CarregarSeuPlano(playerid);
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
if(TemPlano[playerid] > 0)
{
SalvarPlanos(playerid);
}
return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
Morto[playerid] = 1;
quantidadedemortes[playerid]--;
return true;
}
public OnPlayerSpawn(playerid)
{
if(Morto[playerid] == 1 && TemPlano[playerid] == 5) // plano 5
{
Morto[playerid] = 0;
SpawnPlayer(playerid);
SendClientMessage(playerid, -1,"[Aviso] Voce tem plano e foi spawnado direto");
return 1;
}
if(Morto[playerid] == 1 && TemPlano[playerid] > 1)
{
SendClientMessage(playerid, 0xCC0033AA, "[Hospital ] Voce foi hospitalizado . . .");
SendClientMessage(playerid, 0xCC0033AA, "Espere 4 segundos para sair do hospital!");
new rand = random(sizeof(RadomCama));
SetPlayerPos(playerid, RadomCama[rand][0], RadomCama[rand][1], RadomCama[rand][2]);
ApplyAnimation(playerid, "CRACK", "crckdeth1", 4.1, 0, 1, 1, 1, 1, 1);
TogglePlayerControllable(playerid, 0);
SetTimerEx("Curando", 4000, false, "i", playerid);
return 1;
}
if(Morto[playerid] == 1 && TemPlano[playerid] == 0)
{
SendClientMessage(playerid, 0xCC0033AA, "[Hospital ] Voce foi hospitalizado . . .");
SendClientMessage(playerid, 0xCC0033AA, "Espere 5 segundos para sair do hospital!");
new rand = random(sizeof(RadomCama));
SetPlayerPos(playerid, RadomCama[rand][0], RadomCama[rand][1], RadomCama[rand][2]);
ApplyAnimation(playerid, "CRACK", "crckdeth1", 4.1, 0, 1, 1, 1, 1, 1);
TogglePlayerControllable(playerid, 0);
SetTimerEx("Curando", 5000, false, "i", playerid);
return 1;
}
return 1;
}
CallBack::Curando(playerid)
{
ClearAnimations(playerid, 0);
Morto[playerid] = 0;
TogglePlayerControllable(playerid, 1);
GivePlayerMoney(playerid, -100);
SendClientMessage(playerid, 0xFF3030FF,"Voce pagou a internacao de R$ 100 e foi liberado");
if(quantidadedemortes[playerid] == 0)
{
TemPlano[playerid] = 0;
SendClientMessage(playerid, -1,"[Aviso] Seu plano acabou !");
Remover(playerid);
return 1;
}
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == DIALOGPLANOS)
{
if(response)
{
if(listitem == 0)
{
if(GetPlayerMoney(playerid) < 1000) return 1;
if(TemPlano[playerid] == 1) return SendClientMessage(playerid, -1, "Voce ja tem plano, termine seu plano para depois comprar outro!");
quantidadedemortes[playerid] = 20;
SendClientMessage(playerid, 0xFF3030FF,"Voce compru o plano de 20 internacoes");
GivePlayerMoney(playerid, -1000);
TemPlano[playerid] = 1;
}
else if(listitem == 1)
{
if(GetPlayerMoney(playerid) < 4000) return 1;
if(TemPlano[playerid] == 1) return SendClientMessage(playerid, -1, "Voce ja tem plano, termine seu plano para depois comprar outro!");
quantidadedemortes[playerid] = 40;
SendClientMessage(playerid, 0xFF3030FF,"Voce compru o plano de 40 internacoes");
GivePlayerMoney(playerid, -4000);
TemPlano[playerid] = 2;
}
else if(listitem == 2)
{
if(GetPlayerMoney(playerid) < 6000) return 1;
if(TemPlano[playerid] == 1) return SendClientMessage(playerid, -1, "Voce ja tem plano, termine seu plano para depois comprar outro!");
quantidadedemortes[playerid] = 60;
SendClientMessage(playerid, 0xFF3030FF,"Voce compru o plano de 60 internacoes");
GivePlayerMoney(playerid, -6000);
TemPlano[playerid] = 3;
}
else if(listitem == 3)
{
if(GetPlayerMoney(playerid) < 8000) return 1;
if(TemPlano[playerid] == 1) return SendClientMessage(playerid, -1, "Voce ja tem plano, termine seu plano para depois comprar outro!");
quantidadedemortes[playerid] = 80;
SendClientMessage(playerid, 0xFF3030FF,"Voce compru o plano de 80 internacoes");
GivePlayerMoney(playerid, -8000);
TemPlano[playerid] = 4;
}
else if(listitem == 4)
{
if(GetPlayerMoney(playerid) < 10000) return 1;
if(TemPlano[playerid] == 1) return SendClientMessage(playerid, -1, "Voce ja tem plano, termine seu plano para depois comprar outro!");
quantidadedemortes[playerid] = 100;
SendClientMessage(playerid, 0xFF3030FF,"Voce compru o plano de 100 internacoes");
GivePlayerMoney(playerid, -10000);
TemPlano[playerid] = 5;
}
}
}
return 1;
}
COMMAND:comprarplano(playerid)
{
if(IsPlayerInRangeOfPoint(playerid, 2.0, 1714.6462,1174.0515,34.8259))
{
ShowPlayerDialog(playerid, DIALOGPLANOS, DIALOG_STYLE_LIST, "Planos", "Plano 1 20 Internacoes\n\
Plano 2 40 Internacoes \nPlano 3 60 Internacoes\nPlano 4 80 Internacoes \n\
Plano 5 100 Internacoes", "Selecionar", "Cancelar");
}
return 1;
}
COMMAND:tirarhosp(playerid, params[])
{
new id, motivo[50], tito[100];
if(IsPlayerAdmin(playerid))
{
GetPlayerName(playerid, Nome, sizeof(Nome));
if(sscanf(params, "is", id, motivo))
return SendClientMessage(playerid, -1, "CMD : /tirarhosp [id] [motivo]");
Morto[playerid] = 0;
SpawnPlayer(id);
format(tito, sizeof(tito), "O Admin %s tirou o player %s do hospital| Motivo: %s", Nome[playerid], Nome[id], motivo);
SendClientMessageToAll( -1, tito );
}
return 1;
}
CallBack::CriarArquivo(playerid)
{
new tito[50];
GetPlayerName(playerid, Nome, sizeof(Nome));
format(tito, sizeof(tito), "Planos/%s.txt",Nome[playerid]);
if(!DOF2_FileExists(tito)) DOF2_CreateFile(tito);
DOF2_SetInt(tito, "Quantidade Plano", quantidadedemortes[playerid]);
DOF2_SetInt(tito, "Plano", TemPlano[playerid]);
return 1;
}
CallBack::SalvarPlanos(playerid)
{
new tito[50];
GetPlayerName(playerid, Nome, sizeof(Nome));
format(tito, sizeof(tito), "Planos/%s.txt",Nome[playerid]);
if(DOF2_FileExists(tito))
{
DOF2_SetInt(tito, "Quantidade Plano", quantidadedemortes[playerid]);
DOF2_SetInt(tito, "Plano", TemPlano[playerid]);
DOF2_SaveFile();
}else{CriarArquivo(playerid);}
return true;
}
CallBack::CarregarSeuPlano(playerid)
{
new tito[50];
GetPlayerName(playerid, Nome, sizeof(Nome));
format(tito, sizeof(tito), "Planos/%s.txt",Nome[playerid]);
quantidadedemortes[playerid] = DOF2_GetInt(tito, "Quantidade Plano");
TemPlano[playerid] = DOF2_GetInt(tito, "Plano");
return 1;
}
CallBack::Remover(playerid)
{
new tito[50];
GetPlayerName(playerid, Nome, sizeof(Nome));
format(tito, sizeof(tito), "Planos/%s.txt",Nome[playerid]);
DOF2_RemoveFile(tito);
return true;
}
Creditos:
Код:
mau.tito codei Mapp #Coringa
.
