Обсуждение:Преведно-ориентированный язык: различия между версиями
Нет описания правки |
Нет описания правки |
||
| (не показано 5 промежуточных версий 4 участников) | |||
| Строка 2: | Строка 2: | ||
напессать('жжошь, падонак'); | напессать('жжошь, падонак'); | ||
кончеть. | кончеть. | ||
Пять баллов )) | |||
[[Участник:M03r|M03r]] 12:26, 21 июня 2006 (UTC) | |||
== Preved++ неправильный == | |||
Это не превед++, это жаба. превед++ будет что-то вроде | |||
templat <klas T>... ну и так далее. | |||
:Исправим... --[[Участник:Grep|g]]''[[Обсуждение участника:Grep|re]]''[[Служебная:Contributions/Grep|p]] 20:56, 10 июля 2006 (UTC) | |||
Вот так надо, это хоть компилируется: | |||
<pre> | |||
// | |||
// Превед.cpp : Defines the entry point for the console application. | |||
// | |||
#include <iostream> | |||
#include <locale.h> | |||
//------------------------------------------------------------------ | |||
// The PREVED Language Kernel area. Do not touch! :) | |||
#if !defined (_MSC_VER) || _MSC_VER < 1400 | |||
#error Wrong compiler! Use MSVS 8.0 | |||
#endif | |||
#define НАЧЕЛ { | |||
#define КОНЧЕЛ ;} | |||
#define ТИПА int | |||
#define ВДРУГ if ( | |||
#define ТАДА ) | |||
#define НИХРИНА else | |||
#define ВЗАД return | |||
#define КАГДИЛА ( | |||
#define ЙО ; | |||
#define ЖЖОШ(p,n) for (; (p) <= (n); (p)++) | |||
#define БАЗАР std::cout << | |||
#define СЛЫШЬ << | |||
#define СТОЙ system ("echo. & pause"); | |||
#define БЛИН _wsetlocale (LC_ALL, L"Russian_Russia.ACP"); | |||
#define ВРОДЕ try | |||
#define ИБАНУЦЦО throw | |||
#define АПСТЕНУ catch (const char* __чё__) | |||
#define ПРЕВЕД ТИПА main КАГДИЛА ТАДА | |||
#define МЕДВЕД ВЗАД 0; КОНЧЕЛ | |||
// End of area | |||
//------------------------------------------------------------------ | |||
ТИПА КРУТО КАГДИЛА ТИПА фигня ТАДА | |||
НАЧЕЛ | |||
БАЗАР "ВАЩЕ " ЙО | |||
ВДРУГ фигня == 8 ТАДА ИБАНУЦЦО "мля! " ЙО | |||
ВЗАД 0 | |||
КОНЧЕЛ | |||
ПРЕВЕД | |||
НАЧЕЛ | |||
БЛИН | |||
ВРОДЕ НАЧЕЛ | |||
ТИПА фишка = 0 ЙО | |||
ЖЖОШ (фишка, 10) | |||
НАЧЕЛ | |||
БАЗАР фишка СЛЫШЬ " "; | |||
ВДРУГ фишка >= 5 ТАДА КРУТО (фишка) ЙО | |||
КОНЧЕЛ | |||
КОНЧЕЛ АПСТЕНУ НАЧЕЛ | |||
БАЗАР "ИБАНУЦЦО invoked: " СЛЫШЬ __чё__; | |||
КОНЧЕЛ | |||
СТОЙ | |||
МЕДВЕД</pre> | |||
цопирайты я куда-то потерял. | |||
А, вот, вроде нарыл: [http://sizeof.livejournal.com/23169.html взято тут] | |||
Билса галавой апстену полчаса, потом валялса пацталом (кстате я пишу на Object Преведе) | |||