20/05/2006

ATAK İhalesi Algoritması... ya da Kaynak Kodu

Hard diskin derinliklerinden tozlanmaya yüz tutmuş bir eleştiri.. Turkish Defence forumunda saldırı helikopteri ihalesi ile ilgili bir yazımda, espri soslu bir taşlama olarak kodlamıştım, SSM'nin ATAK ihalesinde izleyeceği muhtemel rotayı.. Tabi ki sadeleştirme olağanüstü boyutta, ilaveten eleştirirken haksızlık yapmış olma riskim de mevcut. Ancak aşağı yukarı 10 senedir gündem olan ve fakat halâ sonuçlandırılamayan bu proje eleştirilmeyi ve yığınla ders çıkarılmasını mecbur kılmakta.

Sonuçta mesele, TSK ihtiyaçları ve SSM (daha doğrusu savunma sanayii) öncelikleri arasında sağlıklı bir denge kurma problemidir. Optimum denge de ancak ve ancak, bazı tavizleri vererek ve bazı konularda (zaman, para, verim vesaire) fedakarlık yaparak sağlanabilir.



Her neyse... İşte "herkesin bildiği çok gizli kaynaklar"dan elde ettiğim ATAK ihalesi algoritması.. Kaynak kodu bir yerde.. Hani şu dünyadaki her kapıyı açan kaynak kodu var ya, onlardan işte...



SSM.Project.Developer.Studio v1.0 by Orko_8 Inc. 2005 - 2006

Attack Helicopter Project v2.0 by SSM


Run ATAK

Result = Atak
// Define the winner

Bidders = Apache, Mangusta, Havoc, Rooivalk, KingCobra, Tigre, BattleHawk
// Define helicopters in the contest

Countries = Turkey, EU, USA, SouthAfrica, Italy, Russia
// Define countries involved

Butce = Bütçe
// Define Butce, sources available

Systems = MilliGorevBilgisayari, Fuze, Avionics, Logistics
// Define critical systems to be considered

IF Turkey Enter EU THEN Atak = Tigre
ELSE Tigre = Trash Can

IF Bütçe = Bütçe*10 THEN Atak = Apache
ELSE Apache = Trash Can

IF importance(logistics) = 0 AND importance(avionics) = 0 AND importance(MilliGorevBilgisayari) = 0 THEN Atak = Havoc
ELSE Havoc = Trash Can

IF mandela.love.turkey > 95% AND sag.goster.sol.vur.turkey = true THEN Atak = Rooivalk
ELSE Rooivalk = Trash Can

IF important.politician.wedding = true AND berlusconi.nikahsahidi = true THEN Atak = Mangusta
ELSE Mangusta = Trash Can

IF turkey.love.cobra.very.much = true THEN Atak = KingCobra
ELSE KingCobra = Trash Can

IF ssm.go.crazy = true THEN Atak = BattleHawk
ELSE BattleHawk = Trash Can Of Helicopter History


IF ArGe.MilliGorevBilgisayari = true AND ArGe.Avionic = true AND ArGe.Systems = true AND Butce <> 95 AND Kararlılık > 95 AND Basiret > 95 AND PlanlamaYeteneği > 95 AND Öngörü > 95 THEN Confirm Atak

ELSE Run ATAK v3.0

END PROGRAM ATAK

Hiç yorum yok: