Jump to content

mindspike

Members
  • Content Count

    57
  • Joined

  • Last visited

Everything posted by mindspike

  1. It shows that you're on the server right now. If it's still saying you're banned then send me your GUID if you can so I can find you on the list. If you were banned then it must of been one of my other admins that did it by mistake. I only ban hackers that I have proof from logs, I don't see you on the logs any where so you're good. Just send me a PM and I'll get it straightened out.
  2. bump,. almost ranked in the top 200 servers in just under a week of being up! Come join us!
  3. Come to SWABS. Tons of friendly players, always daylight, starter gear, over 130 vehicles so its easy to find a car
  4. US But we always have people playing from all over the world, most made this server their home. Also my other admin is from Sweden, he also has fast loads and low ping.
  5. Moved http://dayzmod.com/forum/index.php?/topic/104022-173-swabs-130-vehicles-always-daylight-starter-gear-veteran-99-hacker-free/
  6. Open to all They are on, you might have to hit F when you spawn in with your pistol
  7. I'm usually always on my computer. I have RCon up and all of my setpos, createvehicle, etc steaming on my extra monitor to catch hackers. I also just got my Gotcha-Anti hack download confirmation, I will be installing that ASAP. I'm still trying to recruit a few skilled admins.
  8. It's been like 2 days since 1.7.3, everyone else seems to be upgrades but there's still no update on the HFB user CP. They said within the next 24 hours, over 24 hours ago. anyone have a update?
  9. I'm wondering how to add a helicopter to my server. I use this script to spawn other vehicles, but there's no helicopter #!/usr/bin/perl -w use warnings; use POSIX; use DBI; use DBD::mysql; use Getopt::Long; use List::Util qw(min max); my %args = (); GetOptions( \%args, 'instance|index|i=s', 'hostname|host|dbhost|h=s', 'username|user|dbuser|u=s', 'password|pass|dbpass|p=s', 'database|name|dbname|d=s', 'port|dbport=s', 'limit|l=s', 'cleanup=s', 'help' ); my %db = ( 'host' => $args{'hostname'} ? $args{'hostname'} : '216.244.80.242', 'instance' => $args{'instance'} ? $args{'instance'} : '1', 'limit' => $args{'limit'} ? $args{'limit'} : '500', 'user' => $args{'username'} ? $args{'username'} : 'user-83', 'pass' => $args{'password'} ? $args{'password'} : 'Vzy6rS', 'name' => $args{'database'} ? $args{'database'} : 'user-83', 'port' => $args{'port'} ? $args{'port'} : '3306', ); if ($args{'help'}) { print "usage: db_spawn_vehicles.pl [--instance <id>] [--limit <limit>] [--host <hostname>] [--user <username>] [--pass <password>] [--name <dbname>] [--port <port>] [--cleanup tents|bounds|all]\n"; exit; } print "INFO: Connecting to $db{'host'}:$db{'name'} as user $db{'user'}\n"; # Connect to MySQL my $dbh = DBI->connect( "dbi:mysql:$db{'name'}:$db{'host'}:$db{'port'}", $db{'user'}, $db{'pass'} ) or die "FATAL: Could not connect to MySQL - " . DBI->errstr . "\n"; my ($world_id, $world_name) = $dbh->selectrow_array("select w.id, w.name from instance i join world w on i.world_id = w.id where i.id = ?", undef, ($db{'instance'})); die "FATAL: Invalid instance ID\n" unless (defined $world_id && defined $world_name); print "INFO: Instance name dayz_$db{'instance'}.$world_name\n"; my $cleanup = ($args{'cleanup'}) ? $args{'cleanup'} : 'none'; if ($cleanup ne 'none') { print "INFO: Cleaning up damaged vehicles\n"; my $sth = $dbh->prepare(<<EndSQL delete from iv using instance_vehicle iv inner join vehicle v on iv.vehicle_id = v.id where iv.damage = 1 EndSQL ) or die "FATAL: SQL Error - " . DBI->errstr . "\n"; $sth->execute() or die "FATAL: Could not clean up destroyed vehicles - " . $sth->errstr . "\n"; print "INFO: Cleaning up old deployables\n"; $sth = $dbh->prepare(<<EndSQL delete from id using instance_deployable id inner join deployable d on id.deployable_id = d.id where (d.class_name = 'Wire_cat1' and id.last_updated < now() - interval 3 day) or (d.class_name = 'Hedgehog_DZ' and id.last_updated < now() - interval 4 day) or (d.class_name = 'TrapBear' and id.last_updated < now() - interval 5 day) or (d.class_name = 'Sandbag1_DZ' and id.last_updated < now() - interval 8 day) EndSQL ) or die "FATAL: SQL Error - " . DBI->errstr . "\n"; $sth->execute() or die "FATAL: Could not clean up old deployables - " . $sth->errstr . "\n"; } if ($cleanup eq 'tents' || $cleanup eq 'all') { print "INFO: Cleaning up tents with dead owners older than four days\n"; $sth = $dbh->prepare(<<EndSQL delete from id using instance_deployable id inner join deployable d on id.deployable_id = d.id inner join survivor s on id.owner_id = s.id and s.is_dead = 1 where d.class_name = 'TentStorage' and id.last_updated < now() - interval 4 day EndSQL ) or die "FATAL: SQL Error - " . DBI->errstr . "\n"; $sth->execute() or die "FATAL: Could not clean up orphaned tents - " . $sth->errstr . "\n"; } if ($cleanup eq 'bounds' || $cleanup eq 'all') { print "INFO: Starting boundary check for objects\n"; $sth = $dbh->prepare(<<EndSQL select id.id dep_id, 0 veh_id, id.worldspace, w.max_x, w.max_y from instance_deployable id inner join instance i on id.instance_id = i.id inner join world w on i.world_id = w.id union select 0 dep_id, iv.id veh_id, iv.worldspace, w.max_x, w.max_y from instance_vehicle iv inner join instance i on iv.instance_id = i.id inner join world w on i.world_id = w.id EndSQL ); $sth->execute() or die "FATAL: Couldn't get list of object positions\n"; my $depDelSth = $dbh->prepare("delete from instance_deployable where id = ?"); my $vehDelSth = $dbh->prepare("delete from instance_vehicle where id = ?"); while (my $row = $sth->fetchrow_hashref()) { $row->{worldspace} =~ s/[\[\]\s]//g; $row->{worldspace} =~ s/\|/,/g; my @pos = split(',', $row->{worldspace}); # Skip valid positions next unless ($pos[1] < 0 || $pos[2] < 0 || $pos[1] > $row->{max_x} || $pos[2] > $row->{max_y}); if ($row->{veh_id} == 0) { $depDelSth->execute($row->{dep_id}) or die "FATAL: Error deleting out-of-bounds deployable\n"; } else { $vehDelSth->execute($row->{veh_id}) or die "FATAL: Error deleting out-of-bounds vehicle\n"; } print "INFO: Object at $pos[1], $pos[2] was OUT OF BOUNDS and was deleted\n"; } $depDelSth->finish(); $vehDelSth->finish(); } # Determine if we are over the vehicle limit my $vehicleCount = $dbh->selectrow_array("select count(*) from instance_vehicle where instance_id = ?", undef, $db{'instance'}); die "FATAL: Count of $vehicleCount is greater than limit of $db{'limit'}\n" if ($vehicleCount > $db{'limit'}); print "INFO: Fetching spawn information\n"; my $spawns = $dbh->prepare(<<EndSQL select wv.vehicle_id, wv.worldspace, v.inventory, coalesce(v.parts, '') parts, v.limit_max, round(least(greatest(rand(), v.damage_min), v.damage_max), 3) damage, round(least(greatest(rand(), v.fuel_min), v.fuel_max), 3) fuel from world_vehicle wv inner join vehicle v on wv.vehicle_id = v.id left join instance_vehicle iv on wv.worldspace = iv.worldspace and iv.instance_id = ? left join ( select count(*) as count, vehicle_id from instance_vehicle where instance_id = ? group by vehicle_id ) vc on vc.vehicle_id = v.id where wv.world_id = ? and iv.id is null and (rand() < wv.chance) and (vc.count is null or vc.count between v.limit_min and v.limit_max) EndSQL ) or die "FATAL: SQL Error - " . DBI->errstr . "\n"; $spawns->execute($db{'instance'}, $db{'instance'}, $world_id); my $insert = $dbh->prepare(<<EndSQL insert into instance_vehicle (vehicle_id, worldspace, inventory, parts, damage, fuel, instance_id, created) values (?, ?, ?, ?, ?, ?, ?, current_timestamp()) EndSQL ) or die "FATAL: SQL Error - " . DBI->errstr . "\n"; print "INFO: Fetched " . $spawns->rows . " vehicle spawns\n"; my $spawnCount = 0; # Loop through each spawn while (my $vehicle = $spawns->fetchrow_hashref) { # If over the global limit, end prematurely if (($vehicleCount + $spawnCount) > $db{'limit'}) { print "INFO: Exiting because global limit has been reached\n"; last; } # If over the per-type limit, skip this spawn my $count = $dbh->selectrow_array("select count(*) from instance_vehicle where instance_id = ? and vehicle_id = ?", undef, ($db{'instance'}, $vehicle->{vehicle_id})); next unless ($count < $vehicle->{limit_max}); # Generate parts damage my $health = "[" . join(',', map { (sprintf(rand(), "%.3f") > 0.85) ? "[\"$_\",1]" : () } split(/,/, $vehicle->{parts})) . "]"; # Execute insert $spawnCount++; $insert->execute($vehicle->{vehicle_id}, $vehicle->{worldspace}, $vehicle->{inventory}, $health, $vehicle->{damage}, $vehicle->{fuel}, $db{'instance'}); print "INFO: Called insert with ($vehicle->{vehicle_id}, $vehicle->{worldspace}, $vehicle->{inventory}, $health, $vehicle->{damage}, $vehicle->{fuel}, $db{'instance'})\n"; } print "INFO: Spawned $spawnCount vehicles\n"; $spawns->finish(); $insert->finish(); $dbh->disconnect();
  10. I'm looking for a few skilled admins to help me run my server. You must know how to use the database / mySQL / PHPadmin Really looking for someone that can help me setup a donation option for the server. Just PM me.
  11. lol, do you expected for me to pay you or something?
  12. Over 130 Vehicles all around the map Side Chat Always Daylight You start some gear to help you get going 3 Restart per day to keep lag down and keep it daytime Veteran mode, no name tags 99% Hacker free Like us on facebook! We will be doing contest for in game items here soon. www.facebook.com/SWABSquad Name: SWABS Private 130+ Vehicles | Fast Load Times | Always Daylight | Connection Info: 199.241.184.34:2322
  13. If you play on the server please post a review so more people will join
×