2005-01-15 00:34

by Vasil Kolev

Най-накрая Велин ми даде нещото, с което са се забавлявали на нова година. Прилагам го директно, с неговото оформление.

миналата нова година получих поздравителен sms от spite издържан в духа на “Язык програмирования C” когато тази нова година му го върнах обратно (пазейки го в телефона цяла година), получих нов вариант, този път в python style. от там zaphod ги препрати на половината си phonebook, и в отговор получихме java вариант. това се оказа катализатор на ненормална реакция и всеки написа по един – dobber на bash, zaphod на perl и аз на asm. от тук до края има само една крачка: вечната липса на оригинален текст който да изпратите като sms на общоприетите случаи рожден ден, имен ден, коледа, нова година, великден и каквото още се сетите – които все пак да отразяват изкривеното ни съзнание. ето и идеята: ще организираме online депо за такива sms-и. условията: charset-a да е съвместим със всички телефони, дължината да не превишава 160 знака, да отразява някакъв програмен език или нещо друго в IT. изпращайте идеите като коментари в този блог или на velin@zadnik.org. а когато се съберат повечко, ще отделим отделна страничка.

2004, spite, C
————————

#include <greetings.h>
HAPPY_NEW_YEAR(2005)
#include <stdwishes.h>

2005, spite, python
————————

#!/usr/bin/env/python
import wishes
wishes.happy_new_year(‘velin’)
wishes.wish(‘velin’, wishes.ALL_GOOD_COME_TRUE)

2005, unknown, java
————————
class New_Year public static nain void (Strings [] args)
println(“Happy new year and best wishes!”)

2005, zaphod, perl
————————

#!/usr/bin/perl
$party = “old”;
$party =~ s/old/new/;
printf (“Happy %s year”, $party);
exit(0);

2005, velin, asm
————————

mov ah, 9
mov dx, offset wishes
int 21h
int 20h
wishes db ‘HNY’, ODh, OAh, ‘$’

2005, dobber, bash
————————

dobber:/# cat > party < EOF
#!/bin/bash
echo “Happy new $1 year”
EOF
dobber:/# sh ./party 2005

18 Responses to “2005-01-15 00:34”

  1. Mordred Says:

    (втори опит)
    PHP, с евентуален warning (който се изключва през php.ini)
    Също може да се наложи да си настроите кодовата таблица на браузъра, за да четете кирилицата ;)
    <?=чнг?>

  2. Димитър Шиячки Says:

    Честита Нова Година на PROFAN (http://www.profan.de)


    Print @Add$ ("Happy New Year ", @SubStr$ (@Date$(0),3,"/"))
    PlaySound "JingleBells.wav", 8

  3. Стефан Кочев Says:

    2005, ColdFusion, Makefile
    ————————

    greetings: year.o wishes.o
            gcc -o happy_new_year-2.0.0.5 year.o wishes.o
    year.o: year.c
            gcc -c year.c
    wishes.o: wishes.c
            gcc -c wishes.c
    

    Пред gcc трябва да са табулации ама нали няма такова нещо при смс-ите съм сложил интервали. Обаче смс-ът не излиза хубаво на малък екран на GSM-a заради дългия ред… :/ За това го пращайте на GSM-и с по-голями екрани.

    ColdFusion

  4. Стефан Кочев Says:

    Е тука не излизат интервалите пред gcc… Трябва да са по 8 пред всяко gcc за да се впишем в ограничението от 160 знака.

  5. Assen Says:

    C++:

    life.push_back(new year(2005));

    (малко тъпо това с директната проверка за коментари на кирилица… върна ме преди малко, защото нямаше нищо освен парчето “код”. Като не съм написал нищо, това нищо не е на кирилица, ама не е и на 6lyokavica, нали така?)

  6. Assen Says:

    (Изяде ми темплейт параметъра преди малко, защото съм прост…. да видим така дали ще стане?)

    C++:

    life.push_back(new year<happy>(2005));

  7. Владо Says:

    Лек опит за bash script:
    #!/bin/bash
    for $person in `cat party`
    while $person not tired
    do HAVE_FUN

  8. Васил Колев Says:

    По-правилно на bash би било следното:

    #!/bin/bash
    for person in `cat /etc/personlist`; do
          if ! tired $person; then
                  HAVE_FUN person
          fi
    done
    
  9. velin Says:

    още един от spite:
    ——————-

    $ mail -s “URGENT” pr@my.org
    Could you please write and sendsome nice wishes for the new year to velin@zadnik.org.
    Thank you!
    Your boss
    ^D

  10. DaFixer Says:

    Вариант на XSLT:

    <xsl:stylesheet>
    <xsl:output omit-xml-declaration=”yes”/>
    <xsl:template match=”Velin”>
    Happy New Year <xsl:value-of select=”//Inputs/@NewYearNumber”/>! Wish you <xsl:value-of select=”//Wishes/AllBestWishes/@List”/>
    </xsl:template>

  11. Sergo Varbanov Says:

    Ако ще гледаме да сме синтактично коректни, на java би трябвало да е така:

    public class New_Year {
    public static void main (Strings [] args) {
    System.out.println(“Happy new year and best wishes!”);
    }
    }

  12. Тодор Says:

    това е нещо като config на Juniper ;))
    unit 2005 {
    description Novata_2005_a;
    vlan-id 2005;
    family praznik {
    filter {
    input alcohol;
    output veselba_i_prostotii;
    }
    policer {
    input 10liters;
    output kolkoto_moje_poveche;
    }
    }
    }

  13. Bla Says:



    Greetings


    Честита Нова Година

  14. Bla wtori opit Says:




    Greetings


    Честита Нова Година


  15. Alto Says:

    Patch-нат вариант на ASM. Все пак Int 20h, отдавна не се ползва :)

    mov ah, 9
    mov dx, offset wishes
    int 21h
    mov ax, 4c00h
    int 21h
    wishes db ‘HNY’, ODh, OAh, ‘$’

  16. zavod Says:

    Ъхмъъ, еми хайде още един вариант :)

    MySQL:
    select concat(‘Happy new year:’, DATE_FORMAT(NOW(),’%Y’,rcp.name)) from recipients rcp
    WHERE name IS NOT NULL and name <> ”;

    Pgsql:
    select ‘Happy new year:’ || to_char(NOW(),’YYYY’)|| ‘ ‘|| rcp.name||’!’ from recipients rcp
    WHERE rcp.id IN (SELECT id from friends);

    :)

  17. Blade al'Slayer Says:

    Ето поздрав на Flash ActionScript:
    #initclip 1
    var newYear:Number = oldYear + 1;
    _root.TimelineMovie.gotoAndPlay(cYear);
    greetingsText.text = “Happy new ” + cYear + ” year!”;
    for (cWish in Wishes)
    trace(cWish);
    #endinitclip

  18. Baraliton Says:

    // Ето поздрав на Delphi
    //—————————-
    type

    THappy = class(TObject)
    FWishes : String;
    procedure SetWishes(const Value: String);
    const sWishes = ‘Happy New ‘;
    public
    type
    TNewYear = class(TObject)
    const nYear = 2008;
    end;
    constructor Create();
    property Wishes : String read FWishes write SetWishes;
    class procedure NewYearMessage; static;
    end;

    implementation

    constructor THappy.Create;
    begin
    Wishes:=sWishes+IntToStr(TNewYear(TNewYear.Create).nYear)+’ Year’;
    end;

    class procedure THappy.NewYearMessage;
    begin
    ShowMessage(THappy(THappy.Create).Wishes);
    end;

    procedure THappy.SetWishes(const Value: String);
    begin
    FWishes := Value;
    end;

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    THappy.NewYearMessage;
    end;

Leave a Reply