Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- CREATE DEFINER=`vilayer`@`` PROCEDURE `pMain`(IN `i` INT)
- LANGUAGE SQL
- NOT DETERMINISTIC
- MODIFIES SQL DATA
- SQL SECURITY DEFINER
- COMMENT ''
- BEGIN
- DECLARE sInstance VARCHAR(8) DEFAULT i;
- DECLARE iVehSpawnMax INT DEFAULT 200;
- DECLARE iTimeoutMax INT DEFAULT 250;
- DECLARE iTimeout INT DEFAULT 0;
- DECLARE iNumVehExisting INT DEFAULT 0;
- DECLARE iNumClassExisting INT DEFAULT 0;
- DECLARE i INT DEFAULT 1;
- CALL pvCleanup(44773);
- SELECT COUNT(*)
- INTO iNumVehExisting
- FROM Object_DATA
- WHERE Instance = sInstance
- AND classname NOT LIKE 'wood%'
- AND classname NOT LIKE 'tent%'
- AND classname NOT LIKE 'dome%'
- AND classname NOT LIKE 'stash%'
- AND classname NOT LIKE 'bear%'
- AND classname NOT LIKE 'camo%'
- AND classname NOT LIKE 'trap%'
- AND classname NOT LIKE 'hedge%'
- AND classname NOT LIKE 'wire%';
- WHILE (iNumVehExisting < iVehSpawnMax) DO
- SELECT Classname, Chance, MaxNum, Damage
- INTO @rsClassname, @rsChance, @rsMaxNum, @rsDamage
- FROM object_classes ORDER BY RAND() LIMIT 1;
- SELECT COUNT(*)
- INTO iNumClassExisting
- FROM Object_DATA
- WHERE Instance = sInstance
- AND Classname = @rsClassname;
- IF (iNumClassExisting < @rsMaxNum) THEN
- IF (rndspawn(@rschance) = 1) THEN
- INSERT INTO Object_DATA (ObjectUID, Instance, Classname, Damage, CharacterID, Worldspace, Inventory, Hitpoints, Fuel, Datestamp)
- SELECT ObjectUID, sInstance, Classname, 0.3, '0', Worldspace, Inventory, Hitpoints, 0.2, SYSDATE()
- FROM object_spawns
- WHERE Classname = @rsClassname
- AND NOT ObjectUID IN (SELECT objectuid FROM Object_DATA WHERE instance = sInstance)
- ORDER BY RAND()
- LIMIT 0, 1;
- SELECT COUNT(*)
- INTO iNumVehExisting
- FROM Object_DATA
- WHERE Instance = sInstance
- AND classname NOT LIKE 'wood%'
- AND classname NOT LIKE 'tent%'
- AND classname NOT LIKE 'dome%'
- AND classname NOT LIKE 'stash%'
- AND classname NOT LIKE 'bear%'
- AND classname NOT LIKE 'camo%'
- AND classname NOT LIKE 'trap%'
- AND classname NOT LIKE 'hedge%'
- AND classname NOT LIKE 'wire%';
- SELECT COUNT(*)
- INTO iNumClassExisting
- FROM Object_DATA
- WHERE Instance = sInstance
- AND Classname = @rsClassname;
- END IF;
- END IF;
- SET iTimeout = iTimeout + 1;
- IF (iTimeout >= iTimeoutMax) THEN
- SET iNumVehExisting = iVehSpawnMax;
- END IF;
- END WHILE;
- SET i = i + 1;
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement