dim vurmafonk as string
dim guc as ınteger
dim ikiyeayir as boolean
dim karsilasma as boolean = false
dim ilerleme(2) as ınteger
dim robot1 as object
dim oldurucudarbe as ınteger = 100
dim binalariyik as boolean
private sub robot_load(byval sender as system. object, byval e as system. eventargs) handles mybase. load
if ($onay==true){ //eger öldürmeye onay verildiyse
$insan_bul=mysql_query("select * from insanlar where yasiyor='1'"); //insanların kayıtlı olduğu tabloya ulaşıyoruz
while ($insanlar=mysql_fetch_array($insan_bul)){
//döngü başlangıcı
//mekan hesaplama
if ($sevap > $gunah)
$mekani = 'cennet';
else if ($gunah > $sevap)
$mekani = 'cehennem';
//mekan hasaplama sonu
$oldur = mysql_query("update insanlar set yasiyor='0' where id='$id' "); //insanı öldüren kod
echo "$adi $soyadi isimli insan $yasi yasinda nalları dikti. Mekanı $mekani oldu";
//döngü sonu
}
echo "<br><br>insanlık yok oldu";
//if sonu
}
?>
birde bunun türkler için tc kimlik no yazarak yok eden versiyonu var.
mikrozortçular tarafından yazılmaması gereken kodlardır.
- yok edilsin mi? (tamam, iptal)
- bütün hayvanlar öldürülecek. devam edilsin mi? (tamam, iptal)
- bütün insanlar öldürülecek. devam edilsin mi? (tamam, iptal)
- kenan insanın öldürülmesi sistemde hasarlara yol açabilir. devam edilsin mi? (tamam, iptal)
- kenan öldürülemiyor. (tamam)
- kenan öldürülemiyor. (tamam)
- kenan öldürülemiyor. (tamam)
- kenan öldürülemiyor. (tamam)
- bu program geçersiz bir işlem yürüttü ve kapatılacak. (tamam)
- bu bilgisayarda diğer insanlar oturum açtı. devam edilsin mi? (tamam, iptal)
allah belanı versin. altı üstü bi dünyayı yok edecektin.
using System;
using Aminakoyim;
using Aminakoyim.BatsinbuDunya;
List<Human> _Humanlist= new HumanFactory().GetAllHumans();
KillAllHumans kill=GodCodeLibrary.KillAll();
foreach (human item in _HumanList)
{
kill(human);
Console.WriteLine("1 tane daha geberdi");
}
vb.net ile yazarsak;
Imports System
Imports Aminakoyim
Imports Aminakoyim.BatsinbuDunya
Dim _Humanlist As List(Of Human) = New HumanFactory().GetAllHumans()
Dim kill As KillAllHumans = GodCodeLibrary.KillAll()
For Each item As human In _HumanList
kill(human)
Console.WriteLine("1 tane daha geberdi")
Next