Прикладная программа на языке PivoScript
Прикольные исходники. Прикладная программа на языке ПивоСкрипт.
Как известно, Microsoft изобрела для своих нужд язык JScript, игнорируя JavaScript, изобретенный компанией Netscape. Если им можно - почему нам нельзя? Вот пример чисто прикладной программы на совершенно новом языке - PivoScript 0.5. Можете сами убедиться в ее крайней необходимости:
<head>
<font size=+100>Nado vypit' piva</font>
<script language="PivoScript0.5">
<!-- Hide from wife
// global setting
var Money = zanachka;
var head = "light";
body.full = false;
// global functions
function goBar () {
body.location = "bar";
drink();
}
function drink () {
fatalError!!!();
while (body.full != true) {
if (Money == 0) break();
else {
if (wife.location == "near") break();
else {
var Pivo = 0;
Money --;
Pivo ++;
body.input(pivo);
Pivo --;
replika();
}
}
}
goHome();
}
function replika () {
var randomReplika = round( random() * 10 );
array randomReplikaArray = new array;
randomReplikaArray[0] = "O-pa!";
randomReplikaArray[1] = "Ty zachem mne etu gadost' nalil?";
randomReplikaArray[2] = "Vobly by...";
randomReplikaArray[3] = "Horosho poshla!";
randomReplikaArray[4] = "Ni cherta vy v pive ne smyslite!";
randomReplikaArray[5] = "Eh, i zhizn' webmasterskaja...";
randomReplikaArray[6] = "Sam takoj!";
randomReplikaArray[7] = "Barmen! Povtorit'!";
randomReplikaArray[8] = "Kisljatina!";
randomReplikaArray[9] = "A vot byvalochi...";
bodyOnDrink = body.head.voice.output
= writeln(randomReplikaArray[randomReplika]);
}
function goHome() {
body.location = "street";
body.head.voice.output = writeln('Taxi!');
if (Money == 0) {
body.head.voice.input = "Kozel!";
body.head.voice.output = writeln('Sam Kozel!');
setTimeOut(1000000, bar-home.way.length -- );
}
else {
body.location = "bar";
drink();
}
}
//fatal errors
function fatalError!!!() {
if (
Money.location == wife ||
body.onLoad == overwrite ||
bar.message == "Piva net" ||
bar.message == "Closed" ||
head == "dark" ||
body.vertical == false
) {
windows.close();
doors.close();
all.close();
body.location = "bedroom";
sleep();
}
-->
</script>
</head>
<body onUnsleep="goBar()">
<hat color=green size=58>hat</hat><br>
<sweater color=broun size=48>sweater</sweater><br>
<jeans color=blue size=48>jeans</jeans><br>
<boots color=black size=43>boots</boots><br>
</body>
Прикольные исходники. Прикладная программа на языке ПивоСкрипт: "Надо выпить пива". Как известно, Microsoft изобрела для своих нужд язык JScript, игнорируя JavaScript, изобретенный компанией Netscape. Если им можно - почему нам нельзя? Вот пример чисто прикладной программы на совершенно новом языке - PivoScript 0.5. Можете сами убедиться в ее крайней необходимости...
Источник: www.dix.ru/3962
|
