This site is a testing version, but all data is shared with the live forum.


Raised This Month: $ Target: $400
 0% 

MoneyMod Whats Wrong here??


Post New Thread Reply   
 
Thread Tools Display Modes
Author Message
HBxander
Senior Member
Join Date: Jan 2011
Location: Behind you!
Old 07-21-2011 , 11:37   MoneyMod Whats Wrong here??
Reply With Quote #1

Hi AlliedModders..

I've made this moneymod and wonder why its not working, can you check ?

PHP Code:
#include < amxmodx >
#include < amxmisc >
#include < cstrike >
#include < hamsandwich >
#include < nvault >
#include < colorchat >
#include < fun >
#include < engine >
#include < fakemeta >

#define PLUGIN "MoneyMod"
#define VERSION "0.0.1"
#define AUTHOR "HBxander"
#define prefix "^4[EG] Money Mod^3."

enum _:Weapons
{
    
FIVESEVEN,
    
DEAGLE,
    
AWP,
    
SPACE,
    
HEGREN,
    
FLASH
}

new const 
WeapMaxLevel Weapons ] =
{
    
4,
    
5,
    
5,
    
1,
    
4,
    
4
}

new const 
WeapMaxValue Weapons ] =
{
    
20,
    
10,
    
5,
    
1,
    
100,
    
100
}

new const 
WeapFirstCost Weapons ] =
{
    
1240,
    
1650,
    
2280,
    
1,
    
250,
    
180
}

new const 
WeapName Weapons ] [ ] =
{
    
"FiveSeven",
    
"Deagle",
    
"AWP",
    
"",
    
"He Grenade",
    
"Extra Flash"
}

new const 
WeapShort Weapons ] [ ] =
{
    
"%",
    
"%",
    
"%",
    
"",
    
"%",
    
"%"
}

new const 
WeapCSW Weapons ] =
{
    
CSW_FIVESEVEN,
    
CSW_DEAGLE,
    
CSW_AWP,
    
2,
    
CSW_HEGRENADE,
    
CSW_FLASHBANG
}

new const 
WeapGive Weapons ] [ ] =
{
    
"weapon_fiveseven",
    
"weapon_deagle",
    
"weapon_awp",
    
"",
    
"weapon_hegrenade",
    
"weapon_flashbang"
}

enum _:Items
{
    
HEALTH,
    
ARMOR,
    
STEALTH,
    
FALLDMGREDUCER,
    
RSCHANCE,
    
NOPAIN,
    
NOFLASH,
    
NOFOOT,
    
DMGREDUCER,
    
DMG
}

new const 
ItemMaxLevel Items ] =
{
    
5,
    
4,
    
3,
    
5,
    
5,
    
1,
    
1,
    
1,
    
5,
    
5
}

new const 
ItemMaxValue Items ] =
{
    
50,
    
100,
    
60,
    
50,
    
25,
    
1,
    
1,
    
1,
    
25,
    
25
    
}

new const 
ItemFirstCost Items ] =
{
    
550,
    
420,
    
750,
    
530,
    
880,
    
8500,
    
8500,
    
8500,
    
2375,
    
1430
}

new const 
ItemName Items ] [ ] =
{
    
"Extra Health",
    
"Armor",
    
"Stealth",
    
"Fall Damage Reducer",
    
"Respawn Chance",
    
"No Pain Shock",
    
"No Flash",
    
"No Footsteps",
    
"Weapon Damage Reducer",
    
"Extra Damage"
}

new const 
ItemShort Items ] [ ] =
{
    
" HP",
    
" AP",
    
"%",
    
"%",
    
"%",
    
"",
    
"",
    
"",
    
"%",
    
"%"
}

//Money
new iMoney 33 ], tMoney 33 ]

//Levels
new ItemLevel 33 ] [ Items ]
new 
WeapLevel 33 ] [ Weapons ]

new 
VIPLevel 33 // For VIP ( VIPs gonna get 1 extra bullet on weapons, added with mm_addvip <nick> )

//Cvars
new money_killmoney_survivemoney_startmoney_roll6money_roll1delay_rollminimum_donationprice_vip
new killsurvivestartroll6roll1rolltimedonate_minimumVIPPrice

//Other
new FloatLastRoll 33 ]

new 
boolcRespawned 33 ]

//Vault
new gVault

//No Flash
new cMsgScreenFade

new FloatcGametime

new boolcTrack 33 ]
new 
boolcTrackEnemy

public plugin_init ( )
{
    
//Commands
    
register_clcmd "say /moneymod""CmdMenuShow" )
    
register_clcmd "say /mm""CmdMenuShow" )
    
register_clcmd "say /money""CmdMenuShow" )
    
register_clcmd "say /rtd""CmdRoll" )
    
register_clcmd "say /roll""CmdRoll" )
    
    
//Cvars
    
money_kill register_cvar "mm_money_kill""40" )
    
money_survive register_cvar "mm_money_survive""80" )
    
money_start register_cvar "mm_money_start""400" )
    
money_roll6 register_cvar "mm_money_roll6""25" )
    
money_roll1 register_cvar "mm_money_roll1""10" )
    
delay_roll register_cvar "mm_delay_roll""120" )
    
minimum_donation register_cvar "mm_minimum_donate""5000" )
    
price_vip register_cvar "mm_price_vip""10000" )
    
    
kill get_pcvar_num money_kill )
    
survive get_pcvar_num money_survive )
    
start get_pcvar_num money_start )
    
roll6 get_pcvar_num money_roll6 )
    
roll1 get_pcvar_num money_roll1 )
    
rolltime get_pcvar_num delay_roll )
    
donate_minimum get_pcvar_num minimum_donation )
    
VIPPrice get_pcvar_num price_vip )
    
    
//No Flash
    
cMsgScreenFade get_user_msgid "ScreenFade" )
    
    
//Register when something happens
    
register_event "DeathMsg""CmdDeath""a" )
    
register_event "ScreenFade""CmdGetFlashed""br""4=255""5=255""6=255""7>199" )
    
    
RegisterHam Ham_Spawn"player""CmdSpawn")
    
RegisterHam Ham_TakeDamage"player""CmdTakeDmg")
    
RegisterHam Ham_Killed"player""CmdKilled")
    
    
register_logevent "CmdRoundEnd"2"1=Round_End")
    
register_logevent "eRound_start"2"1=Round_Start" )
    
    
// Admin Commands
    
register_concmd "mm_addvip""CmdAddVIP"ADMIN_IMMUNITY"<nick>" )
    
register_concmd "mm_givemoney""CmdAddMoney"ADMIN_IMMUNITY"<nick> <money>" )
    
register_concmd "mm_takemoney""CmdTakeMoney"ADMIN_IMMUNITY"<nick> <money>" )
    
register_concmd "mm_donate""CmdDonate"_"<nick> <money>" )
    
    
//Vault
    
gVault nvault_open "moneymod_test1" )
    if ( 
gVault == INVALID_HANDLE )
    {
        
log_amx "gVault is invalid to open -> delete the vault to start server." )
    }
}

public 
plugin_end ( )
{
    
nvault_close gVault )
}

public 
client_authorized iPlayer )
{
    
Load iPlayer )
}

public 
client_disconnect iPlayer )
{
    
Save iPlayer )
}

public 
plugin_natives ( )
{
    
register_library "moneymod" )
    
    
register_native "mm_get_user_money""_get_money" )
    
register_native "mm_set_user_money""_set_money" )
}

public 
_set_money iPluginiParams )
{
    new 
iPlayer get_param )
    if ( !
iPlayer )
        return 
PLUGIN_CONTINUE
    
    iMoney 
iPlayer ] = max 0get_param ) )
    return 
iMoney iPlayer ]
}

public 
_get_money iPluginiParams )
{
    return 
iMoney get_param ) ]
}

public 
CmdKilled iPlayer )
{
    new 
chance ItemMaxValue RSCHANCE ] * ItemLevel iPlayer ] [ RSCHANCE ] / ItemMaxLevel RSCHANCE ]
    
    if ( !
is_user_alive iPlayer ) )
    {
        if ( 
cs_get_user_team iPlayer ) != CS_TEAM_SPECTATOR )
        {
            if ( 
ItemLevel iPlayer ] [ RSCHANCE ] >= )
            {
                if ( !
cRespawned iPlayer ] )
                {
                    if ( 
random_num 1100 ) <= chance )
                    {
                        
CmdRevivePlayer iPlayer )
                    }
                }
            }
        }
    }
}

public 
CmdRevivePlayer iPlayer )
{
    new 
chance ItemMaxValue RSCHANCE ] * ItemLevel iPlayer ] [ RSCHANCE ] / ItemMaxLevel RSCHANCE ]
    
    new 
name 32 ]
    
get_user_name iPlayernamesizeof name ) )
    
    
ColorChat 0GREY"%s '^4 %s^3 ' got respawned! [^4%i%%%^3]"prefixnamechance )
    
ExecuteHamB Ham_CS_RoundRespawniPlayer )
    
cRespawned iPlayer ] = true
}

public 
CmdTakeDmg iPlayerinflictorattackerFloat:damagedamagebits )
{
    if ( 
is_user_alive iPlayer ) && ( damagebits DMG_FALL ) )
    {
        new 
CsTeams:team cs_get_user_team iPlayer )
        if ( 
team == CS_TEAM_T || team == CS_TEAM_CT )
        {
            new 
iAmount ItemMaxValue FALLDMGREDUCER ] * ItemLevel iPlayer ] [ FALLDMGREDUCER ] / ItemMaxLevel FALLDMGREDUCER ]
            
SetHamParamFloat 4damage * ( 1.0 - ( float iAmount ) / 100.0 ) ) )
        }
    }
    
    if ( 
is_user_alive iPlayer ) && ( damagebits ) )
    {
        new 
percent ItemMaxValue DMGREDUCER ] * ItemLevel iPlayer ] [ DMGREDUCER ] / ItemMaxLevel DMGREDUCER ]
        
SetHamParamFloat 4damage * ( 1.0 - ( float percent ) / 100.0 ) ) )
    }
    
    if ( ( 
<= attacker <= get_maxplayers ( ) && iPlayer != attacker ) )
    {
        new 
percent ItemMaxValue DMG ] * ItemLevel attacker ] [ DMG ] / ItemMaxLevel DMG ]
        new 
Floatamount 1.0 + ( percent 100 )
        
SetHamParamFloat 4damage amount )
    }
    
    if ( 
ItemLevel iPlayer ] [ NOPAIN ] >= )
    {
        
set_pdata_float iPlayer1081.0 )
    }
    return 
HAM_HANDLED
}

public 
CmdRoundStart ( )
{
    new 
players 32 ], numbiPlayer
    get_players 
playersnumb )
    
    for ( new 
inumbi++ )
    {
        
iPlayer players 
        
        
cRespawned iPlayer ] = false
    
}
}

public 
CmdRoundEnd iPlayer )
{
    if ( 
is_user_alive iPlayer ) && cs_get_user_team iPlayer ) == CS_TEAM_T )
    {
        
iMoney iPlayer ] += survive
        tMoney 
iPlayer ] += survive
        ColorChat 
iPlayerGREY"%s You gained^4 $%i^3 for surviving the round"prefixsurvive )
        
//Save ( iPlayer )
    
}
    return 
PLUGIN_HANDLED
}

public 
CmdDeath ( )
{
    new 
killer read_data )
    new 
victim read_data )
    new 
vicname 32 ]
    
get_user_name victimvicnamesizeof vicname ) )
    
    if ( 
<= killer <= get_maxplayers ( ) && killer != victim )
    {
        if ( 
cs_get_user_team killer ) != cs_get_user_team victim ) )
        {
            if ( 
is_user_alive killer ) )
            {
                
iMoney killer ] += kill
                tMoney 
killer ] += kill
                
                ColorChat 
killerGREY"%s You killed '^4 %s^3 ' and gained^4 $%i^3"prefixvicnamekill )
                
//Save ( killer )
            
}
        }
    }
}

public 
CmdMoneyUpdater iPlayer )
{
    
cs_set_user_money iPlayeriMoney iPlayer ] )
    
set_task 0.05"CmdMoneyUpdater"iPlayer )
}

public 
CmdSpawn iPlayer )
{
    if ( 
is_user_alive iPlayer ) )
    {        
        
CmdMoneyUpdater iPlayer )
        
set_task 8.0"CmdSetItems"iPlayer )
    }
}            

//*********************************G I V E***I T E M S***A N D***W E A P O N S**************************************************************************
public CmdSetItems iPlayer )
{
    if ( 
is_user_alive iPlayer ) )
    {
        if ( 
ItemLevel iPlayer ] [ HEALTH ] >= )
        {
            
set_user_health iPlayerget_user_health iPlayer ) + ItemMaxValue HEALTH ] * ItemLevel iPlayer ] [ HEALTH ] / ItemMaxLevel HEALTH ] )
        }
        if ( 
ItemLevel iPlayer ] [ ARMOR ] >= )
        {
            
set_user_armor iPlayerItemMaxValue ARMOR ] * ItemLevel iPlayer ] [ ARMOR ] / ItemMaxLevel ARMOR ] )
        }
        if ( 
ItemLevel iPlayer ] [ STEALTH ] >= )
        {
            
CmdSetStealth iPlayer )
        }
        if ( 
ItemLevel iPlayer ] [ NOFOOT ] >= && cs_get_user_team iPlayer ) == CS_TEAM_T )
        {
            
set_user_footsteps iPlayer)
        }
    }
}

public 
CmdSetStealth iPlayer )
{
    new 
StealthAmount ItemMaxValue STEALTH ] * ItemLevel iPlayer ] [ STEALTH ] / ItemMaxLevel STEALTH ]
    new 
StealthSet StealthAmount 255 100
    
new stealth 255 StealthSet
    
    set_user_rendering 
iPlayerkRenderFxNone000kRenderTransAlphastealth )
}

public 
CmdSetWeapons iPlayer )
{
    new 
number ], name 32 ]
    
get_user_name iPlayernamesizeof name ) )
    
    for ( new 
iWeap 0iWeap WeaponsiWeap++ )
    {        
        
num_to_str iWeapnumbersizeof number ) - )
        
        new 
bullets
        bullets 
1
        
        
if ( VIPLevel iPlayer ] >= )
            
bullets += 1
        
        
if ( WeapLevel iPlayer ] [ iWeap ] >= )
        {
            static 
percent
            percent 
calc_value WeapLevel iPlayer ] [ iWeap ], WeapMaxLevel iWeap ], WeapMaxValue iWeap ] )
            
            if ( 
is_user_connected iPlayer ) )
            {
                if ( 
percent && ( percent == 100 || random_num 1100 ) <= percent ) )
                {
                    if ( 
iWeap == SPACE )
                        return 
PLUGIN_HANDLED
                    
else if ( iWeap == HEGREN && !user_has_weapon iPlayerWeapCSW HEGREN ] ) )
                    {
                        
give_item iPlayerWeapGive HEGREN ] )
                        
ColorChat iPlayerGREY"%s You got your^4 %s^3! [^4%i%%%^3]"prefixWeapName HEGREN ], percent )
                    }
                    else if ( 
iWeap == FLASH )
                    {
                        if ( 
user_has_weapon iPlayerWeapCSW FLASH ] ) )
                        {
                            
cs_set_user_bpammo iPlayerWeapCSW FLASH ], cs_get_user_bpammo iPlayerWeapCSW FLASH ] ) + )
                            
ColorChat iPlayerGREY"%s You got your^4 %s^3! [^4%i%%%^3]"prefixWeapName FLASH ], percent )
                        }
                        else
                        {
                            
give_item iPlayerWeapGive FLASH ] )
                            
ColorChat iPlayerGREY"%s You got your^4 %s^3! [^4%i%%%^3]"prefixWeapName FLASH ], percent )
                        }
                    }
                    else
                    {
                        
give_item iPlayerWeapName iWeap ] )
                        
cs_set_weapon_ammo find_ent_by_owner iPlayerWeapGive iWeap ], iPlayer ), bullets )
                        
cs_set_user_bpammo iPlayerWeapCSW iWeap ], )
                        
ColorChat 0GREY"%s '^4 %s^3 ' got hes^4 %s^3 with^4 %i^3 bullets! [^4%i%%%^3]"prefixnameWeapName iWeap ], bulletspercent )
                    }
                }
            }
        }
    }
    return 
PLUGIN_HANDLED
}

//***************************************M E N U S*****************************************************************************************************
public CmdMenuShow iPlayer )
{
    new 
title 190 ]
    
formatex titlesizeof title ) - 1"\r[EG]\w Money Mod^n\y- Main Menu\w" )
    
    new 
menu menu_create title"CmdMenuHandle" )
    
    new 
Temp 190 ]
    
menu_additem menu"Player Info^n""1")
    
menu_additem menu"Item Upgrades^n""2")
    
menu_additem menu"Weapon Upgrades^n""3")
    if ( 
VIPLevel iPlayer ] >= )
        
formatex Tempsizeof Temp ) - 1"\yVIP:\w Yes (\r1 Extra Bullet\w)" )
    else if ( 
iMoney iPlayer ] < VIPPrice )
        
formatex Tempsizeof Temp ) - 1"\dVIP:\w No (\r1 Extra Bullet\w)\d $%i"VIPPrice )
    else
        
formatex Tempsizeof Temp ) - 1"VIP: No (\r1 Extra Bullet\w)\y $%i"VIPPrice )
    
menu_additem menuTemp"4")
    
menu_display iPlayermenu)
    return 
PLUGIN_HANDLED
}

public 
CmdMenuHandle iPlayermenuitem )
{
    if ( 
item == MENU_EXIT )
    {
        
menu_destroy menu )
        return 
PLUGIN_HANDLED
    
}
    
    new 
data ], gName 64 ]
    new 
accesscallback
    
    menu_item_getinfo 
menuitemaccessdatasizeof data ) - 1gNamesizeof gName ) - 1callback )
    
    new 
key str_to_num data )
    switch ( 
key )
    {
        case 
1CmdPlayerShow iPlayer )
        case 
2CmdItemShow iPlayer )
        case 
3CmdWeapShow iPlayer )
        case 
4
        {
            if ( 
VIPLevel iPlayer ] >= )
            {
                
ColorChat iPlayerGREY"%s You are already^4 VIP^3!"prefix )
                return 
PLUGIN_HANDLED
            
}
            else if ( 
iMoney iPlayer ] < VIPPrice )
            {
                
ColorChat iPlayerGREY"%s You need more money to buy^4 VIP^3!"prefix )
                return 
PLUGIN_HANDLED
            
}
            else
            {
                
ColorChat iPlayerGREY"%s You bought^4 VIP^3!"prefix )
                
VIPLevel iPlayer ] += 1
                
//Save ( iPlayer )
            
}
        }
    }
    return 
PLUGIN_HANDLED
}

public 
CmdPlayerShow iPlayer )
{
    new 
menu menu_create "\r[EG]\w Money Mod^n\y- Player Menu\w""CmdPlayerHandle" )
    
    new 
players 32 ], numbtempidnameShow 190 ]
    new 
name 32 ], tempId 10 ]
    
    
get_players playersnumb )
    
    for ( new 
inumbi++ )
    {
        
tempid players ]
        
        
get_user_name tempidnamesizeof name ) - )
        
num_to_str tempidtempIdsizeof tempId ) - )
        if ( 
iPlayer == tempid )
            
formatex nameShowsizeof nameShow ) - 1"\y%s \r$%i\w"nameiMoney tempid ] )
        else
            
formatex nameShowsizeof nameShow ) - 1"%s \r$%i\w"nameiMoney tempid ] )
        
        
menu_additem menunameShowtempId)
    }
    
menu_display iPlayermenu)
}

public 
CmdPlayerHandle iPlayermenuitem )
{
    if ( 
item == MENU_EXIT )
    {
        
menu_destroy menu )
        
CmdMenuShow iPlayer )
        return 
PLUGIN_HANDLED
    
}
    
    new 
data ], name 64 ]
    new 
accesscallback
    
    menu_item_getinfo 
menuitemaccessdata5name63callback )
    
    new 
tempid str_to_num data )
    new 
tempname 32 ]
    
get_user_name tempidtempname31 )
    
    static 
motd 2500 ]
    new 
len formatex motdsizeof motd ) -1,     "<html>" )
    
len += format motd len ], sizeof motd ) - len 1"<body style =^"background-color:#FFFFFF; color:#000000^">" )
    
len += format motd len ], sizeof motd ) - len 1,    "Player info for<b> %s</b><br>"tempname )
    
len += format motd len ], sizeof motd ) - len 1,    "Current Money: <b>%i</b><br>"iMoney tempid ] )
    
len += format motd len ], sizeof motd ) - len 1,    "Total Money: <b>%i</b><br><br>"tMoney tempid ] )
    if ( 
VIPLevel iPlayer ] >= )
        
len += format motd len ], sizeof motd ) - len 1,    "Player VIP: <b>Yes</b><br><br>" )
    else
        
len += format motd len ], sizeof motd ) - len 1,    "Player VIP: <b>No</b<<br><br>" )
    
len += format motd len ], sizeof motd ) - len 1,  "Item Upgrades:<br><br>" )
    for ( new 
iItem 0iItem ItemsiItem++ )
    {
        
len += format motd len ], sizeof motd ) - len 1,  "<b>%s:</b> %i / %i<br>"ItemName iItem ], ItemLevel iPlayer ] [ iItem ], ItemMaxLevel iItem ] )
    }
    
len += format motd len ], sizeof motd ) - len 1,  "<br><br>Weapon Upgrades:<br><br>" )
    for ( new 
iWeap 0iWeap WeaponsiWeap++ )
    {
        
len += format motd len ], sizeof motd ) - len 1,  "<b>%s:</b> %i / %i<br>"WeapName iWeap ], WeapLevel iPlayer ] [ iWeap ], WeapMaxLevel iWeap ] )
    }
    
len += format motd len ], sizeof motd ) - len 1"</body>" )
    
len += format motd len ], sizeof motd ) - len 1"</html>" )
    
    
show_motd iPlayermotd"#MM | Player Info" )
    return 
PLUGIN_HANDLED
}

public 
CmdWeapShow iPlayer )
{
    new 
menu menu_create "\r[EG]\w Money Mod^n\y- Weapon Upgrades\w""CmdWeapHandle" )
    
    new 
Temp 190 ], iPricelevellevel2iAmountnumb ]
    
    for ( new 
iItem 0iItem WeaponsiItem++ )
    {
        
num_to_str iItemnumbsizeof numb ) - )
        
        
level WeapLevel iPlayer ] [ iItem ]
        
level2 level 1
        iPrice 
WeapFirstCost iItem ] * ( << ( level2 ) )
        
iAmount WeapMaxValue iItem ] * level WeapMaxLevel iItem ]
        
        if ( 
WeapLevel iPlayer ] [ iItem ] >= WeapMaxLevel iItem ] )
            
formatex Tempsizeof Temp ) - 1"\y%s:\w Level %i (\r%i%s\w)"WeapName iItem ], leveliAmountWeapShort iItem ] )
        else if ( 
iMoney iPlayer ] < iPrice )
            
formatex Tempsizeof Temp ) - 1"\d%s:\w Level %i (\r%i%s\w)\d $%i"WeapName iItem ], leveliAmountWeapShort iItem ], iPrice )
        else 
            
formatex Tempsizeof Temp ) - 1"\w%s: Level %i (\r%i%s\w)\y $%i"WeapName iItem ], leveliAmountWeapShort iItem ], iPrice )
        
        if ( 
iItem == SPACE )
            
menu_addblank menu)
        else
            
menu_additem menuTempnumb )
    }
    
menu_display iPlayermenu)
}

public 
CmdWeapHandle iPlayermenuitem )
{
    if ( 
item == MENU_EXIT )
    {
        
menu_destroy menu )
        
CmdMenuShow iPlayer )
        return 
PLUGIN_HANDLED
    
}
    
    new 
data ], name 64 ]
    new 
accesscallback
    
    menu_item_getinfo 
menuitemaccessdata5name63callback )
    
    new 
iItem str_to_num data )
    new 
levellevel2iPricemessage 290 ]
    
    
level WeapLevel iPlayer ] [ iItem ]
    
level2 level 1
    iPrice 
WeapFirstCost iItem ] * ( << ( level2 ) )
    
    if ( 
level >= WeapMaxLevel iItem ] )
    {
        
formatex messagesizeof message ) - 1"%s^4 %s^3 is already fully upgraded"prefixWeapName iItem ] )
        return 
PLUGIN_HANDLED
    
}
    else if ( 
iMoney iPlayer ] < iPrice )
    {
        
formatex messagesizeof message ) - 1"%s You need^4 $%i^3 more to upgrade^4 %s^3 Level^4 %i^3"prefixiPrice iMoney iPlayer ], WeapName iItem ], level2 )
        return 
PLUGIN_HANDLED
    
}
    else
    {
        
iMoney iPlayer ] -= iPrice
        formatex 
messagesizeof message ) - 1"%s You upgraded^4 %s^3 Level^4 %i^3"prefixWeapName iItem ], level2 )
        
WeapLevel iPlayer ] [ iItem ] += 1
        
//Save ( iPlayer )
    
}
    
ColorChat iPlayerGREYmessage )
    return 
PLUGIN_HANDLED
}

public 
CmdItemShow iPlayer )
{
    new 
menu menu_create "\r[EG]\w Money Mod^n\y- Item Upgrades\w""CmdItemHandle" )
    
    new 
Temp 190 ], iPricelevellevel2iAmountnumb ]
    
    for ( new 
iItem 0iItem ItemsiItem++ )
    {
        
num_to_str iItemnumbsizeof numb ) - )
        
        
level ItemLevel iPlayer ] [ iItem ]
        
level2 level 1
        iPrice 
ItemFirstCost iItem ] * ( << ( level2 ) )
        
iAmount ItemMaxValue iItem ] * level ItemMaxLevel iItem ]
        
        if ( 
ItemLevel iPlayer ] [ iItem ] >= ItemMaxLevel iItem ] )
            if ( 
iItem == NOPAIN || iItem == NOFLASH || iItem == NOFOOT )
                
formatex Tempsizeof Temp ) - 1"\y%s:\w Already Bought"ItemName iItem ] )
            else
                
formatex Tempsizeof Temp ) - 1"\y%s:\w Level %i (\r%i%s\w)"ItemName iItem ], leveliAmountItemShort iItem ] )
        else if ( 
iMoney iPlayer ] < iPrice )
            if ( 
iItem == NOPAIN || iItem == NOFLASH || iItem == NOFOOT )
                
formatex Tempsizeof Temp ) - 1"\d%s: $%i"ItemName iItem ], iPrice )
            else
                
formatex Tempsizeof Temp ) - 1"\d%s:\w Level %i (\r%i%s\w)\d $%i"ItemName iItem ], leveliAmountItemShort iItem ], iPrice )
        else 
            if ( 
iItem == NOPAIN || iItem == NOFLASH || iItem == NOFOOT )
                
formatex Tempsizeof Temp ) - 1"\w%s:\y $%i"ItemName iItem ], iPrice )
            else
                
formatex Tempsizeof Temp ) - 1"\w%s: Level %i (\r%i%s\w)\y $%i"ItemName iItem ], leveliAmountItemShort iItem ], iPrice )
        
        
menu_additem menuTempnumb )
    }
    
menu_display iPlayermenu)
}

public 
CmdItemHandle iPlayermenuitem )
{
    if ( 
item == MENU_EXIT )
    {
        
menu_destroy menu )
        
CmdMenuShow iPlayer )
        return 
PLUGIN_HANDLED
    
}
    
    new 
data ], name 64 ]
    new 
accesscallback
    
    menu_item_getinfo 
menuitemaccessdata5name63callback )
    
    new 
iItem str_to_num data )
    new 
levellevel2iPricemessage 290 ]
    
    
level ItemLevel iPlayer ] [ iItem ]
    
level2 level 1
    iPrice 
ItemFirstCost iItem ] * ( << ( level2 ) )
    
    if ( 
level >= ItemMaxLevel iItem ] )
    {
        
formatex messagesizeof message ) - 1"%s^4 %s^3 is already fully upgraded"prefixItemName iItem ] )
        return 
PLUGIN_HANDLED
    
}
    else if ( 
iMoney iPlayer ] < iPrice )
    {
        
formatex messagesizeof message ) - 1"%s You need^4 $%i^3 more to upgrade^4 %s^3 Level^4 %i^3"prefixiPrice iMoney iPlayer ], ItemName iItem ], level2 )
        return 
PLUGIN_HANDLED
    
}
    else
    {
        
iMoney iPlayer ] -= iPrice
        formatex 
messagesizeof message ) - 1"%s You upgraded^4 %s^3 Level^4 %i^3"prefixItemName iItem ], level2 )
        
ItemLevel iPlayer ] [ iItem ] += 1
        
//Save ( iPlayer )
    
}
    
ColorChat iPlayerGREYmessage )
    return 
PLUGIN_HANDLED
}

public 
CmdRemoveMoney iPlayerlevelcid )
{
    if ( !
cmd_access iPlayerlevelcid) )
    {
        return 
PLUGIN_HANDLED
    
}
    
    new 
arg 32 ]
    
read_argv 1argcharsmax arg ) )
    
    new 
moneys 32 ]
    
read_argv 2moneyssizeof moneys ) )
    
    new 
MoneyToGive str_to_num moneys )
    
    new 
iTarget
    
new name 32 ]
    new 
name2 32 ]
    
get_user_name iPlayernamesizeof name ) )
    {
        
iTarget cmd_target iPlayerargsizeof arg ) - )
        
get_user_name iTargetname2sizeof name2 ) - )
        
        if ( !
iTarget )
        {
            return 
PLUGIN_HANDLED
        
}
        
        
iMoney iTarget ] -= MoneyToGive
        
        ColorChat 
0GREY"%s '^4 %s^3 ' removed^4 $%i^3 to '^4 %s^3 '"prefixnameMoneyToGivename2 )
    }
    return 
PLUGIN_HANDLED
}

public 
CmdDonate iPlayerlevelcid )
{
    if ( 
tMoney iPlayer ] < donate_minimum )
    {
        
console_print iPlayer"MoneyMod: You need a total of $%i to donate!"donate_minimum )
        return 
PLUGIN_HANDLED
    
}
    
    new 
arg 32 ]
    
read_argv 1argcharsmax arg ) )
    
    new 
moneys 32 ]
    
read_argv 2moneyssizeof moneys ) )
    
    new 
MoneyToGive str_to_num moneys )
    
    new 
iTarget
    
new name 32 ]
    new 
name2 32 ]
    
get_user_name iPlayernamesizeof name ) )
    {
        
iTarget cmd_target iPlayerargsizeof arg ) - )
        
get_user_name iTargetname2sizeof name2 ) - )
        
        if ( !
iTarget )
        {
            return 
PLUGIN_HANDLED
        
}
        
        
iMoney iTarget ] += MoneyToGive
        tMoney 
iTarget ] += MoneyToGive
        iMoney 
iPlayer ] -= MoneyToGive
        
        ColorChat 
0GREY"%s '^4 %s^3 ' donated^4 $%i^3 to '^4 %s^3 '"prefixnameMoneyToGivename2 )
    }
    return 
PLUGIN_HANDLED
}

public 
CmdAddMoney iPlayerlevelcid )
{
    if ( !
cmd_access iPlayerlevelcid) )
    {
        return 
PLUGIN_HANDLED
    
}
    
    new 
arg 32 ]
    
read_argv 1argcharsmax arg ) )
    
    new 
moneys 32 ]
    
read_argv 2moneyssizeof moneys ) )
    
    new 
MoneyToGive str_to_num moneys )
    
    new 
iTarget
    
new name 32 ]
    new 
name2 32 ]
    
get_user_name iPlayernamesizeof name ) )
    {
        
iTarget cmd_target iPlayerargsizeof arg ) - )
        
get_user_name iTargetname2sizeof name2 ) - )
        
        if ( !
iTarget )
        {
            return 
PLUGIN_HANDLED
        
}
        
        
iMoney iTarget ] += MoneyToGive
        tMoney 
iTarget ] += MoneyToGive
        
        ColorChat 
0GREY"%s '^4 %s^3 ' added^4 $%i^3 to '^4 %s^3 '"prefixnameMoneyToGivename2 )
    }
    return 
PLUGIN_HANDLED
}

public 
CmdAddVIP iPlayerlevelcid )
{
    if ( !
cmd_access iPlayerlevelcid) )
    {
        return 
PLUGIN_HANDLED
    
}
    
    new 
arg 32 ]
    
read_argv 1argcharsmax arg ) )
    
    new 
iTarget
    
new name 32 ]
    new 
name2 32 ]
    
get_user_name iPlayernamesizeof name ) )
    {
        
iTarget cmd_target iPlayerargsizeof arg ) - )
        
get_user_name iTargetname2sizeof name2 ) - )
        
        if ( !
iTarget )
        {
            return 
PLUGIN_HANDLED
        
}
        
        
VIPLevel iTarget ] += 1
        ColorChat 
0GREY"%s '^4 %s^3 ' gave^4 VIP^3 to '^4 %s^3 '"prefixnamename2 )
    }
    return 
PLUGIN_HANDLED
}

public 
CmdRoll iPlayer )
{
    if ( 
get_gametime ( ) < LastRoll iPlayer ] + rolltime )
    {
        
ColorChat iPlayerGREY"%s You need to wait^4 %d^3 seconds before rolling again!"prefixfloatround LastRoll iPlayer ] + rolltime get_gametime ( ) + ) )
        return 
PLUGIN_HANDLED
    
}
    
    new 
name 32 ]
    
get_user_name iPlayername32 )
    new 
number random_num 1)
    
    if ( 
number == )
    {
        
iMoney iPlayer ] += roll1
        tMoney 
iPlayer ] += roll1
        ColorChat 
iPlayerGREY"%s '^4 %s^3 ' rolled^4 %i^3 and won^4 $%i^3!"prefixnamenumberroll1 )
        
LastRoll iPlayer ] = get_gametime ( )
    }
    else if ( 
number == )
    {
        
iMoney iPlayer ] += roll6
        tMoney 
iPlayer ] += roll6 
        ColorChat 
iPlayerGREY"%s '^4 %s^3 ' rolled^4 %i^3 and won^4 $%i^3!"prefixnamenumberroll1 )
        
LastRoll iPlayer ] = get_gametime ( )
    }
    else if ( 
number >= && number <= )
    {
        
ColorChat iPlayerGREY"%s You rolled^4 %i^3 and didn't win anything!"prefixnumber )
        
LastRoll iPlayer ] = get_gametime ( )
    }
    return 
PLUGIN_HANDLED
}

public 
CmdGetFlashed iPlayer )
{
    new 
Floatgametime get_gametime ( )
    if ( 
gametime != cGametime )
    {
        
cGametime gametime
        
for ( new 033i++ )
        {
            
cTrack ] = false
        
}
        
cTrackEnemy false
    
}
    if ( 
ItemLevel iPlayer ] [ NOFLASH ] >= )
    {
        
cTrackEnemy true
        
        message_begin 
MSG_ONEcMsgScreenFade, { 00}, iPlayer )
        
write_short )
        
write_short )
        
write_short )
        
write_byte )
        
write_byte )
        
write_byte )
        
write_byte 255 )
        
message_end ( )
    }
}

public 
CmdFlashDelay ( )
{
    if ( 
cTrackEnemy == false )
    {
        for ( new 
033i++ )
        {
            if ( 
cTrack ] == true && is_user_connected ) )
            {
                
message_begin MSG_ONEcMsgScreenFade, { 00}, )
                
write_short )
                
write_short )
                
write_short )
                
write_byte )
                
write_byte )
                
write_byte )
                
write_byte 255 )
                
message_end ( )
            }
        }
    }
}

public 
calc_value ( const player_level, const max_level, const max_value )
{
    return ( 
max_value player_level max_level )
}

//*****************S A V E***A N D***L O A D********************************************************************************************************************************
public Load iPlayer )
{
    new 
iAuth 32 ]
    
get_user_authid iPlayeriAuth32 )
    
    static 
data 256 ], timestamp
    
if ( nvault_lookup gVaultiAuthdatasizeof data ) - 1timestamp ) )
    {
        
ParseLoadData iPlayerdata )
    }
    else
    {
        
NewUser iPlayer )
    }
}

public 
NewUser iPlayer )
{
    
iMoney iPlayer ] = start
    tMoney 
iPlayer ] = start
    VIPLevel 
iPlayer ] = 0
    
    
for ( new iWeap 0iWeap WeaponsiWeap++ )
    {
        
WeapLevel iPlayer ] [ iWeap ] = 0
    
}
    for ( new 
iItem 0iItem ItemsiItem++ )
    {
        
ItemLevel iPlayer ] [ iItem ] = 0
    
}
}

ParseLoadData iPlayerdata 256 ] )
{
    static 
num ]
    
strbreak datanumsizeof num ) - 1datasizeof data ) - )
    
    
iMoney iPlayer ] = str_to_num num )
    
    
strbreak datanumsizeof num ) - 1datasizeof data ) - )
    
tMoney iPlayer ] = clamp str_to_num num ), 0, -)
    
    
strbreak datanumsizeof num ) - 1datasizeof data ) - )
    
VIPLevel iPlayer ] = clamp str_to_num num ), 0, -)
    
    for ( new 
iWeap 0iWeap WeaponsiWeap++ )
    {
        
strbreak datanumsizeof num ) - 1datasizeof data ) - )
        
WeapLevel iPlayer ] [ iWeap ] = clamp str_to_num num ), 0WeapMaxLevel iWeap ] )
    }
    for ( new 
iItem 0iItem ItemsiItem++ )
    {
        
strbreak datanumsizeof num ) - 1datasizeof data ) - )
        
ItemLevel iPlayer ] [ iItem ] = clamp str_to_num num ), 0ItemMaxLevel iItem ] )
    }
}

public 
Save iPlayer )
{
    new 
iAuth 32 ]
    
get_user_authid iPlayeriAuth32 )
    
    static 
data 256 ]
    new 
len formatex datasizeof data ) - 1"%i"iMoney iPlayer ] )
    
    
len += formatex data len ], sizeof data ) - len 1" %i"tMoney iPlayer ] )
    
len += formatex data len ], sizeof data ) - len 1" %i"VIPLevel iPlayer ] )
    for ( new 
iWeap 0iWeap WeaponsiWeap++ )
        
len += formatex data len ], sizeof data ) - len 1" %i"WeapLevel iPlayer ] [ iWeap ] )
    for ( new 
iItem 0iItem ItemsiItem++ )
        
len += formatex data len ], sizeof data ) - len 1" %i"ItemLevel iPlayer ] [ iItem ] )
    
    
nvault_set gVaultiAuthdata )

__________________
Selling:

- PointMod for Hide And Seek - $20
- Private BlockMaker with Weapon Block And More - $50
- Achievements ( FFA GamePlay ) - $25

PM Me about Private Work!

Last edited by HBxander; 07-21-2011 at 11:40.
HBxander is offline
v0VExxx2
Junior Member
Join Date: Dec 2011
Location: Saint-Peterburg
Old 01-01-2012 , 18:02   Re: MoneyMod Whats Wrong here??
Reply With Quote #2

HBxander you can help me?
v0VExxx2 is offline
Send a message via ICQ to v0VExxx2 Send a message via Skype™ to v0VExxx2
fysiks
Veteran Member
Join Date: Sep 2007
Location: Flatland, USA
Old 01-01-2012 , 20:05   Re: MoneyMod Whats Wrong here??
Reply With Quote #3

Quote:
Originally Posted by v0VExxx2 View Post
HBxander you can help me?
This is not your thread. Don't ask for help in it.
__________________
fysiks is offline
Reply



Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are GMT -4. The time now is 00:39.


Powered by vBulletin®
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Theme made by Freecode