僵尸插件:VIP送护甲和OP管理弹药袋

TCMBW · 发表于 2009-3-25 23:45:10

本帖最后由 TCMBW 于 2009-3-27 11:57 编辑

1、每局VIP,OP都自动配150护甲和150生命值
2、管理员控制弹药袋，可以送5个或者50个。作者：Grief.QQ

小白 · 发表于 2009-3-26 01:57:12

谢谢!!! 这个需要

小白 · 发表于 2009-3-26 01:58:32

不发源码可不好哦!! 楼主能发一下源码吗?

degame · 发表于 2009-3-26 09:14:15

好东西就得顶．．．

TCMBW · 发表于 2009-3-26 22:31:16

有就上传了，我也没有这个源码啊。其实这两个插件有没有源码无所谓了，反正没有任何广告。

colaawp · 发表于 2009-3-26 23:51:31

默认什么权限的VIP能送护甲呢~~？LZ晓得嘛？

小白 · 发表于 2009-3-27 00:11:06

有就上传了，我也没有这个源码啊。其实这两个插件有没有源码无所谓了，反正没有任何广告。

我是怕不稳定...

Joseph · 发表于 2009-3-27 08:00:27

本帖最后由 Joseph 于 2009-3-27 08:09 编辑

第二个是QQ发布了的。。。
把2改成5，把5改成50拿来卖5DT币，不厚道。
users.ini里标志m权限才能使用。。

#include <amxmodx>
#include <amxmisc>
#include <zombieplague>

#define PLUGIN "[ZP] Admin_Money"
#define VERSION "0.5"
#define AUTHOR "[Grief.QQ]"

#define MENU_SIZE 256
#define MENU_PLAYERS 7

new g_iMenuPosition
new g_iMenuPlayers[32]
new g_iMenuOption[32]
new g_iMenuSettings[32]

const PACKS_1 = 5 //给予五个弹药袋(可修改)
const PACKS_2 = 50 //给予五十个弹药袋(可修改)

public plugin_init()
{
register_plugin(PLUGIN,VERSION,AUTHOR)
register_menucmd(register_menuid("\r在线玩家列表:"),1023,"actionMenu")
register_clcmd("zp_money","ZP_GIVE_MONEY",ADMIN_LEVEL_A,"- displays Players")
AddMenuItem("[ZP]给予弹药袋","zp_money",ADMIN_LEVEL_A,PLUGIN)
}

public ZP_GIVE_MONEY( id, lvl, cid )
{
if( cmd_access( id, lvl, cid, 0 ) )
{
g_iMenuOption[id] = 0
g_iMenuSettings[id] = 0

showMenu( id, g_iMenuPosition = 0 )
}
return PLUGIN_HANDLED
}

public showMenu( id, pos )
{
if( pos < 0 ) return

new i, j
new szMenuBody[MENU_SIZE]
new iCurrKey = 0
new szUserName[32]
new iStart = pos * MENU_PLAYERS
new iNum

get_players( g_iMenuPlayers, iNum )

if( iStart >= iNum )
iStart = pos = g_iMenuPosition = 0

new iLen = format( szMenuBody, MENU_SIZE-1, "\r在线玩家列表:\R%d/%d^n\w^n", pos+1, (iNum / MENU_PLAYERS + ((iNum % MENU_PLAYERS) ? 1 : 0 )) )
new iEnd = iStart + MENU_PLAYERS
new iKeys = (1<<9|1<<7)

if( iEnd > iNum )
iEnd = iNum

for( i = iStart; i < iEnd; i++ )
{
j = g_iMenuPlayers
get_user_name( j, szUserName, 31 )
iKeys |= (1<<iCurrKey++)
iLen += format( szMenuBody[iLen], (MENU_SIZE-1-iLen), "%d. %s^n", iCurrKey, szUserName )

}

if ( g_iMenuSettings[id] )
iLen += format( szMenuBody[iLen], (MENU_SIZE-1-iLen), "^n8. 给予%d个弹药袋^n" ,PACKS_2)
else
iLen += format( szMenuBody[iLen], (MENU_SIZE-1-iLen), "^n8. 给予%d个弹药袋币^n" ,PACKS_1)

if( iEnd != iNum )
{
format( szMenuBody[iLen], (MENU_SIZE-1-iLen), "^n9. 更多玩家^n0. %s", pos ? "返回" : "退出" )
iKeys |= (1<<8)
}
else
format( szMenuBody[iLen], (MENU_SIZE-1-iLen), "^n0. %s", pos ? "返回" : "退出" )

show_menu( id, iKeys, szMenuBody, -1 )

return
}

public actionMenu( id, key )
{
switch( key )
{
case 7: {
++g_iMenuOption[id]
g_iMenuOption[id] %= 2

switch(g_iMenuOption[id])
{
case 0: g_iMenuSettings[id] = 0
case 1: g_iMenuSettings[id] = 1
}
showMenu( id, g_iMenuPosition )
}
case 8: showMenu( id, ++g_iMenuPosition ) // 翻页
case 9: showMenu( id, --g_iMenuPosition ) // 返回

default:
{
new player = g_iMenuPlayers[g_iMenuPosition * MENU_PLAYERS + key]

switch(g_iMenuSettings[id])
{
case 0: zp_set_user_ammo_packs(player, zp_get_user_ammo_packs(player) + PACKS_1);
case 1: zp_set_user_ammo_packs(player, zp_get_user_ammo_packs(player) + PACKS_2);
}
}
}
return PLUGIN_HANDLED
}

qtcathy · 发表于 2009-3-27 09:34:39

sdsdsdsdsdsdsdsdsdsdsdsd

qtcathy · 发表于 2009-3-27 09:35:30

555555555555555555

[AMXX 无源码] 僵尸插件:VIP送护甲和OP管理弹药袋

本帖子中包含更多资源