-	script	CARD_CHECK	-1,{
	OnInit:
		// Card ID
		setarray .@cardIds$, 1, 2, 3, 4, 5, 6;
		.@cardCount = getarraysize( .@cardIds$ );

		// 0 = All. For all other numbers see the reference at http://herc.ws/wiki/Custom_Items - Weapon-type items.
		setarray .@allowedSubtype, 0, 0, 0, 0, 0, 0;

		// Slot size. Additional space that card takes. So if card id 1 shall take two slots this needs to be 1.
		setarray .@slotSize, 1, 1, 1, 1, 1, 1;

		while( sleep( 5000 ) ) {
			cleararray .@accountIds, 0, getarraysize( .@accountIds );
			.@resCount = query_sql( "SELECT `account_id` FROM `char` WHERE online = 1", .@accountIds );
			for( .@i = 0; .@i < .@resCount; .@i++ ) {
				if( attachrid( .@accountIds[ .@i ] ) ) {
					for( .@y = 1; .@y < 20; .@y++ ) {
						if( getequipisequiped( .@y ) ) {
							.@wrongType = 0;
							.@eqWeaponType = 0;

							.@equipmentId = getequipid( .@y );
							.@eqSlotSpace = getitemslots( .@equipmentId );
							.@eqOccupiedSlots = getequipcardcnt( .@y );

							if( getiteminfo( .@equipmentId, 2 ) == 4 )
								.@eqWeaponType = getiteminfo( .@equipmentId, 14 );

							.@eqInfoCards$[ 0 ] = getequipcardid( .@y, 0 );
							.@eqInfoCards$[ 1 ] = getequipcardid( .@y, 1 );
							.@eqInfoCards$[ 2 ] = getequipcardid( .@y, 2 );
							.@eqInfoCards$[ 3 ] = getequipcardid( .@y, 3 );

							for( .@z = 0; .@z < .@cardCount; .@z++ ) {
								for( .@x = 0; .@x < 4; .@x++ ) {
									if( .@cardIdPattern$[ .@z ] == .@eqInfoCards$[ .@x ] ) {
										if( .@eqWeaponType && .@allowedSubtype[ .@z ] && .@allowedSubtype[ .@z ] != .@eqWeaponType ) {
											.@wrongType = 1;
											break;
										}

										.@eqOccupiedSlots += .@slotSize[ .@z ];
									}
								}

								if( .@wrongType ) break;
							}

							if( .@wrongType ) {
								successremovecards .@y;
								dispbottom "You tried to add a cards to " + getequipname( .@y ) + " that didn't match the allowed weapon type.";
							} else if( ( .@eqSlotSpace - .@eqOccupiedSlots ) > 0 ) {
								successremovecards .@y;
								dispbottom "You tried to add more cards to " + getequipname( .@y ) + " as allowed.";
							}
						}
					}
				}
			}
		}
	end;
}