Wszystkiego najlepszego dla mnie!

Napisz program, który drukuje w Happy birthday to me!dniu swoich urodzin.

1. Urodziny programu to czas utworzenia, ostatniej modyfikacji lub kompilacji programu (który wybierzesz) i nie wolno go zapisywać na stałe.
2. Wywołanie lub wykonanie programu w żaden sposób nie może wpłynąć na datę, której użyjesz jako datę urodzin. Nie możesz zmienić swoich urodzin.
3. Aby uzyskać dodatkowy kredyt (-15% liczby bajtów), wydrukuj w Happy birthday to you!dniu urodzin (na stałe), jeśli nie pokrywa się to z programem. Lub skorzystaj z okazji urodzin niektórych gwiazd i zdobądź -14%.
4. Musi wydrukować tylko to i niczego innego nie drukować.
5. Policz bajty w UTF-8.
6. Użyj kalendarza gregoriańskiego.

Powodzenia i wszystkiego najlepszego (dla nowonarodzonych programów).

PS
Po komentarzu Izkaty, jeśli wydrukujesz Happy birthday to Melna urodziny Mel Kaye , otrzymasz 20% zniżki. Ale musisz podać wiarygodne źródło, że to ta data.

PHP 77 75 74 65 60

Wielkie dzięki wspaniałym sugestiom Tima Seguine :

<?date(dm,getlastmod())-date(dm)&&die?>Happy birthday to me!

Sneaky PHP: 46 42 41 40

Wykorzystując pomysł Phila H i ponownie sugestię Tima Seguine'a :

<?touch(__FILE__)?>Happy birthday to me!

Bash (podstępny): 36

touch $0;echo Happy Birthday to me\!

Zgodnie z zasadami: „czas utworzenia, modyfikacji lub kompilacji programu”. Wybieram czas modyfikacji i ciągłą samo-modyfikację. [HT @ace za 1 znak]

Perl (również podstępny): 29

print "Happy birthday to me!"

Ten jest prawdopodobnie mniej podstępny niż pierwszy; Programy w Perlu są zawsze kompilowane przed ich uruchomieniem, o czym nie wszyscy wiedzą - patrz, podstęp jest edukacyjny. Oto data kompilacji, której używam.

- Edytuj zmiany reguły -

Zostało to napisane, zanim pojawiła się jakakolwiek reguła dotycząca zmiany urodzin. Myślę, że Perl nadal stoi; wszystkie programy w Perlu są kompilowane przed ich uruchomieniem. Zostawię tu odpowiedź ze względów edukacyjnych!

bash - 65

[ `date +%d%m -r $0` = `date +%d%m` ]&&echo Happy birthday to me!

Dzięki ugoren , asowi i nyuszika7h za pomoc.

C # 198,05 (233–15%)

using s=System;class P{static void Main(){string t=s.DateTime.Now.ToString("Mdd"),b="1202";if(s.IO.File.GetCreationTime(typeof(P).Assembly.Location).ToString("Mdd")==t|b==t)s.Console.Write("Happy birthday to "+(b==t?"you!":"me!"));}}

Sformatowany:

using s = System;
class P
{
    static void Main()
    {
        string t = s.DateTime.Now.ToString("Mdd"), b = "1202";
        if (s.IO.File.GetCreationTime(typeof(P).Assembly.Location).ToString("Mdd") == t | b == t)
            s.Console.Write("Happy birthday to " + (b == t ? "you!" : "me!"));
    }
}

191 (bez premii)

using s=System;class P{static void Main(){if(s.IO.File.GetCreationTime(typeof(P).Assembly.Location).ToString("Mdd")==s.DateTime.Now.ToString("Mdd"))s.Console.Write("Happy birthday to me!");}}

181,05 (213–15%)

Z kilkoma dodatkowymi instrukcjami (musisz to skompilować b.exei uruchomić z katalogu, w którym znajduje się plik wykonywalny), mogę sprowadzić to do tego:

using s=System;class P{static void Main(){string t=s.DateTime.Now.ToString("Mdd"),b="1202";if(s.IO.File.GetCreationTime("b.exe").ToString("Mdd")==t|b==t)s.Console.Write("Happy birthday to "+(b==t?"you!":"me!"));}}

171 (bez premii)

Te same instrukcje, co powyżej, tym razem tylko drukując wiadomość w jej urodziny (więc nie -15% premii).

using s=System;class P{static void Main(){if(s.IO.File.GetCreationTime("b.exe").ToString("Mdd")==s.DateTime.Now.ToString("Mdd"))s.Console.Write("Happy birthday to me!");}}

Java - 275 - 15% = 233,75 z bonusem / 237 bez bonusu

Z premią:

import java.util.*;class L{public static void main(String[]y){int s=f(new Date());String j="Happy birthday to ";System.out.print(s==f(new Date(new java.io.File("L.class").lastModified()))?j+"me!":s==183?j+"you!":"");}static int f(Date d){return d.getMonth()*40+d.getDate();}}

Bez premii:

import java.util.*;class L{public static void main(String[]y){if(f(new Date())==f(new Date(new java.io.File("L.class").lastModified())))System.out.print("Happy birthday to me!");}static int f(Date d){return d.getMonth()*40+d.getDate();}}

Urodziłem się 23 kwietnia.

Jestem bardzo dumny z tej małej sztuczki, aby zaoszczędzić kilka bajtów na wiadomości. Mam nadzieję, że zostaną uwzględnione w innych odpowiedziach. Pierwszy o tym pomyślałem!

Pyton

105 znaków, bez dodatkowego kredytu. Zapisz plik jako „wszystkiego najlepszego dla mnie” i uruchom. Działa tylko w GMT, a „urodziny” są zdefiniowane jako data urodzenia, a nie rocznica (często nazywane również „urodzinami”).

import sys,os,time
if (int(os.stat(*sys.argv).st_atime/86400)==int(time.time()/86400)):print sys.argv[0]

Aby zadziałało, zapisz to jako „wszystkiego najlepszego dla mnie” i biegnij python "happy birthday to me"

Uwaga: oczywiście w nazwie pliku może znajdować się tylko mały pasek startowy, dzięki czemu dowolny dowolny kod może zostać zredukowany do poziomu paska startowego. Zwykle rozważałbym to „oszustwo”. Jednak „wszystkiego najlepszego dla mnie” nie jest nieuzasadnioną nazwą pliku - opisuje to, co robi program, znacznie lepiej niż niektóre programy (np. „Python”), więc w tym przypadku pozwolę na to :)

Matlab: 66

t=dir('f.m');if strncmp(t.date,date,5),'Happy birthday to me!',end

Nazwa pliku musi być „fm”

GNU COBOL z opcją -free, 204

PROGRAM-ID.B.DATA DIVISION.WORKING-STORAGE SECTION.
1 A PIC XXXX/XX.
1 B PIC X(5).
1 C PIC X(21).
PROCEDURE DIVISION.ACCEPT A FROM DATE
ACCEPT C
MOVE WHEN-COMPILED TO B
IF A(3:5) = B OR "12/09" DISPLAY C.

Łamam zasady dotyczące celebrytów, więc nie ma tu bonusu ...

Wytworzony tekst jest wprowadzany przez użytkownika (wymagany podczas uruchamiania). Jeśli nie jest to dobre, należy zdefiniować linię C, tak jak to ma miejsce ACCEPT C, i DISPLAY Cmusi się stać DISPLAY "HAPPY BIRTHDAY TO ME!"dla dodatkowych siedmiu znaków.

WHEN-COMPILEDto specjalny rejestr zawierający datę / czas kompilacji, który jest dostępny dla programu (zawsze przydatny, możesz wiedzieć, że masz poprawną wersję). Jest obcięty, MOVEponieważ reszta nie jest potrzebna. DATEjest bieżącą datą - ta data to rymdd.

W /definicji A jest to symbol edycji wstawiania, ponieważ data kompilacji zawiera ukośniki. Dodatkowa postać, ale ułatwia porównanie.

Celebrity = Grace Hopper

Partia - 37 bajtów

Kradzież metody zastosowanej przez jedną z odpowiedzi Basha.

@echo.>>%0&echo Happy birthday to me!

Inna metoda - 145 bajtów

@for /f "tokens=2,3 delims=/ " %%a in ("%date%")do @for /f "tokens=1,2 delims=/" %%c in ("%~t0")do @if %%a%%b==%%c%%d @echo Happy Birthday to me!

Rubinowy, 69 znaków / bajtów

puts'Happy birthday to me!'if(Time.new-File.atime($0))%31536000<86400

31536000to liczba sekund w ciągu roku i 86400liczba sekund w ciągu dnia.

JavaScript

Node.js, 156 bytes

b=new Date(require("fs").statSync(__filename).mtime);d=new Date();b.getDate()==d.getDate()&&b.getMonth()==d.getMonth()&&console.log("Happy birthday to me!")

Uses the file's modification time.

Powershell - 105 bytes

if('{0:M}'-f(gi $MyInvocation.MyCommand.Definition).creationtime-eq(date -f M)){'Happy birthday to me!'}

Ungolfed:

if('{0:M}' -f (gi $MyInvocation.MyCommand.Definition).creationtime -eq (date -f M)){
  'Happy birthday to me!'
}

The bonus isn't worth it, I can only get 117.5.

Powershell - 127

if ((gci $MyInvocation.MyCommand.Path).lastwritetime.ToString("MMdd") -eq (get-date).ToString("MMdd")){"happy birthday to me!"}

For the 15% bonus - 151 bytes, less 15% = 128.4

$r=@{"0308"="you";(gci $MyInvocation.MyCommand.Path).lastwritetime.ToString("MMdd")="me"}[(get-date).tostring("MMdd")]
if($r){"Happy birthday to $r!"}

Ruby - 80 103 87 bytes

m=File.mtime $0
t=Time.now
puts"Happy birthday to me!"if t.month==m.month&&t.day==m.day

Ruby - 123 115 135 121 - 15% = 104.55 97.75 114.75 102.85 points

t=Time.now
{me:File.mtime($0),you:Time.at(36e5)}.map{|n,d|puts"Happy birthday to #{n}!"if t.month==d.month&&t.day==d.day}

Might be a little longer or shorter depending on where your birthday falls in the year, and the shortest way to represent that. For mine, that's 36e5 (seconds since epoch; time zone dependent).

Does Mel Gibson count? Here's a 138 byte - 35% bonus = 89.7-point program that celebrates itself, me, and Mel!

t=Time.now
{me:File.mtime($0),you:Time.at(36e5),Mel:Time.at(2e5)}.map{|n,d|puts"Happy birthday to #{n}!"if t.month==d.month&&t.day==d.day}

PureBasic

Without Bonus - 142

If Bool(FormatDate("%dd%mm",Date())=FormatDate("%dd%mm",GetFileDate(ProgramFilename(),0)))
MessageRequester("","Happy birthday To me!")
EndIf

With Bonus - 218 - 15% = 185.3

Dim s$(2)
s$(1)="me"
s$(2)="you"
m$="%dd%mm"
d$=FormatDate(m$,Date())
i=Bool(d$=FormatDate(m$,GetFileDate(ProgramFilename(),0)))|(Bool(d$="2301")<<1)
If i=0:End:EndIf
MessageRequester("","Happy birthday To "+s$(i)+"!")

TI-BASIC, 68 bytes

If Ans=0:getDate→G:0:G=G:If getDate=G:Disp "HAPPY BIRTHDAY TO ME!"

Remember, these tokens are one byte: If , Ans, →, Disp. getDate is two bytes. All other one-character symbols are one byte.

J 79

 echo((6!:0'')(('',:'Happy birthday to me!'){~])@:-:&(1 2&{)&:>])1{,1!:0{:4!:3''

Bonus version120 - 15% = 102

Do I get extra credit for also printing both when both are having their birthday?

echo((2 6$(6!:0 '') , 0 2 7)(' ','Happy birthday to ',"2 1]3 5$'you! me!  both!'){~#.@:(-:&(1 2&{)"1)&:>])1{,1!:0{:4!:3''

Explanation (right to left):

last =: {:4!:3''     NB. Take the last script run (i.e. the file itself)
time =: 1{,1!:0 last NB. the modification time is the second element in that file's listing

The central verb of the train

unbox_both =: &:>      NB. unboxes left and right argument
match  =: -:&(1 2&{)"1 NB. for each date given, left and right, compare them
to_int =: #.           NB. convert boolean to int
from   =: {~           NB. from the left array, take element right.

NB. H contains messages an empty row, appended to all combinations of messages. 
H =: (' ','Happy birthday to ',"2 1]3 5$'you! me!  both!')

V =: (H from to_int)@:match unbox_both NB. after unboxing and comparing, 
                                       NB. select the according message

The left tine for the central train:

dates=: (2 6$(6!:0 '') , 0 2 7) NB. the current date, and the relevant fields of my birthday.

NB. Combining the bricks:
echo (dates V ]) time           NB. output the monads result on time.

Java - 196

This differs from the other Java submission by using Strings, shaving 41 characters off in the process. It uses String.format("%tj") to format a java.util.Date or a long as a day-of-year String, and then compares these two Strings.

class Z{public static void main(String[]y){if("".format("%tj",new java.util.Date()).equals("".format("%tj",new java.io.File("Z.class").lastModified())))System.out.print("Happy birthday to me!");}}

Formatted:

class Z
{
    public static void main(String[] y)
    {
        if ("".format("%tj", new java.util.Date()).equals("".format("%tj", new java.io.File("Z.class").lastModified())))
            System.out.print("Happy birthday to me!");
    }
}

C# 191 no bonus

using s=System;class P{static void Main(){if(s.IO.File.GetCreationTime(typeof(P).Assembly.Location).ToString("Mdd")==s.DateTime.Now.ToString("Mdd"))s.Console.Write("Happy birthday to me!");}}

formatted:

using s = System;
class P
{
    static void Main()
    {
        if (s.IO.File.GetCreationTime(typeof(P).Assembly.Location).ToString("Mdd") == s.DateTime.Now.ToString("Mdd"))
            s.Console.Write("Happy birthday to me!");
    }
}

JavaScript (node.js) - 100 bytes

(require('fs').fstatSync(4).mtime+1).match(Date().substr(4,6))&&console.log('Happy birthday to me!')

vb.net ~161c

This will print the celebration message to all whose birthday it is.

Module M
Sub Main
For Each b In{({"1705","Alan"}),({"2012","You"}),({FileDateTime(Process.GetCurrentProcess.MainModule.FileName).ToString("ddMM"),"Me"})}
If b(0)=Now.ToString("ddMM") Then Console.WriteLine("Happy Birthday To {0}!",b(1))
Next
End Sub
End Module

Alan => Alan Kaye

Score: 253c (-33c vb.net min) = 220 - 15% (my birthday bonus) = 187c - 14% (Celeb Birthday) = 160.82 ~161c or 220c - 29% = 156.2 ~157c

Powershell, 82 bytes

see also answers from Chris J and SpellingD

"Happy birthday to me!"|?{(gv My* -v|% M*|% p*h|gci|% l*w*e|% D*r)-eq(date|% D*r)}

where

gv My* -v|% M*|% p*h|gci|% l*w*e|% D*r

is the combinations of shortcuts and aliases for the expression:

Get-Valiable MyInvocation -value|% MyCommand|% Path|Get-ChildItem|% LastWritetime|% DayOfYear

that equivalent a canonical form:

(Get-ChildItem $MyInvocation.MyCommand.Path).LastWritetime.DayOfYear

Powershell, 119 bytes - 14% = 102.34 Points

filter e{$_-eq(date|% D*r)}$('me'|?{gv My* -v|% M*|% p*h|gci|% l*w*e|% D*r|e}
'Prof'|?{3|e})|%{"Happy birthday to $_!"}

At January 3, the script display Happy birthday to Prof!. If this script is saved on January 3, two greetings will be displayed.

C# - 63 bytes

class P
{
    static void Main()
    {
          Console.Write("Happy birthday to me!"));
    }
}

I choose compilation time. Since the C# code compiles to MSIL which on runtime is compiled to the executable code by the JIT Compiler, this program meets the conditions.

EDIT-- Possibly invalid answer as pointed in comments.