Selamat ulang tahun untukku!

Tulis program yang mencetak Happy birthday to me!pada hari ulang tahunnya.

1. Ulang tahun program adalah kreasi, modifikasi terakhir, atau waktu kompilasi program (yang Anda pilih), dan tidak boleh dengan kode keras.
2. Tanggal yang Anda gunakan sebagai tanggal lahir tidak boleh dipengaruhi oleh permintaan atau eksekusi program dengan cara apa pun. Anda tidak dapat mengubah tanggal lahir Anda.
3. Untuk kredit tambahan (-15% jumlah byte), cetak Happy birthday to you!pada hari ulang tahun Anda (hard coded), jika tidak sesuai dengan program. Atau gunakan ulang tahun selebriti dan dapatkan -14%.
4. Ini harus mencetak hanya ini, dan tidak mencetak apa pun di hari lain.
5. Hitung byte, dalam UTF-8.
6. Gunakan kalender Gregorian.

Semoga sukses dan selamat ulang tahun (untuk program yang baru lahir).

PS
Mengikuti komentar Izkata, jika Anda mencetak Happy birthday to Melpada hari ulang tahun Mel Kaye , Anda mendapat diskon 20%. Tetapi Anda harus memberikan sumber yang kredibel bahwa ini adalah tanggal ini.

PHP 77 75 74 65 60

Banyak terima kasih atas saran luar biasa dari Tim Seguine :

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

PHP Sneaky: 46 42 41 40

Menggunakan ide Phil H dan lagi saran Tim Seguine :

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

Bash (licik): 36

touch $0;echo Happy Birthday to me\!

Menurut aturan: "waktu pembuatan, modifikasi atau kompilasi program". Saya memilih waktu modifikasi, dan modifikasi diri abadi. [HT @ace untuk 1 karakter]

Perl (juga licik): 29

print "Happy birthday to me!"

Yang ini bisa dibilang kurang licik dari yang pertama; Program Perl selalu dikompilasi sebelum dijalankan, yang tidak semua orang tahu - lihat, ada putaran edukatif pada kecerdikan. Jadi ini dia tanggal kompilasi yang saya gunakan.

- Edit untuk perubahan aturan -

Ini ditulis sebelum ada aturan untuk mengubah hari ulang tahun Anda. Saya pikir Perl masih berdiri; semua program Perl dikompilasi sebelum dijalankan. Saya akan meninggalkan jawabannya di sini karena alasan pendidikan!

bash - 65

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

Terima kasih kepada ugoren , ace dan nyuszika7h untuk bantuannya.

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!"));}}

Diformat:

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 (Tidak ada 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!");}}

181,05 (213 - 15%)

Dengan beberapa instruksi tambahan (Anda perlu mengkompilasi ini b.exedan menjalankannya dari direktori yang dapat dieksekusi) saya dapat membahasnya:

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 (Tidak ada bonus)

Instruksi yang sama seperti di atas, kali ini hanya mencetak pesan pada hari ulang tahunnya sendiri (jadi tidak ada bonus -15%).

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 dengan bonus / 237 tanpa bonus

Dengan bonus:

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();}}

Tanpa bonus:

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();}}

Saya lahir pada tanggal 23 April.

Saya cukup bangga dengan trik kecil ini untuk menghemat beberapa byte pada pesan. Saya harap ini akan dimasukkan dalam jawaban lain. Saya adalah orang pertama yang memikirkan hal ini!

Python

105 karakter, tidak ada kredit tambahan. Simpan file sebagai "selamat ulang tahun untukku" dan jalankan. Berjalan dalam GMT saja, dan "ulang tahun" didefinisikan sebagai tanggal kelahiran Anda, bukan ulang tahun itu (juga sering disebut "ulang tahun").

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

Agar berhasil, simpan ini sebagai "selamat ulang tahun untukku" dan jalankan python "happy birthday to me"

Catatan: tentu saja, semua kecuali bootstrap kecil bisa dalam nama file, membuat kode besar sembarang mengurangi ke bootstrap. Biasanya saya akan menganggap ini "curang". Namun, "selamat ulang tahun untuk saya" bukan nama file yang tidak masuk akal - ini menggambarkan apa yang program lakukan, jauh lebih baik daripada beberapa program (misalnya "python"), jadi dalam hal ini saya akan mengizinkannya :)

Matlab: 66

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

Nama file harus 'fm'

GNU COBOL dengan -gratis, 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.

Saya melanggar aturan tentang selebriti, jadi tidak ada bonus di sana ...

Teks yang dihasilkan adalah input pengguna (diminta saat dijalankan). Jika itu tidak baik, maka definisi baris Cperlu dihapus, seperti halnya ACCEPT C, dan DISPLAY Charus menjadi DISPLAY "HAPPY BIRTHDAY TO ME!", untuk tujuh karakter tambahan.

WHEN-COMPILEDadalah register khusus yang berisi tanggal kompilasi / waktu yang tersedia untuk program (selalu berguna, Anda dapat mengetahui bahwa Anda memiliki versi yang benar). Itu terpotong di MOVEkarena sisanya tidak diperlukan. DATEadalah tanggal saat ini - ini adalah yymmdd.

The /dalam definisi A adalah simbol pengeditan penyisipan, karena tanggal kompilasi berisi garis miring. Karakter tambahan, tetapi memudahkan perbandingan.

Selebriti = Grace Hopper

Batch - 37 Bytes

Mencuri metode yang digunakan oleh salah satu jawaban Bash ..

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

Metode lain - 145 Bytes

@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!

Ruby, 69 karakter / byte

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

31536000adalah jumlah detik dalam setahun, dan 86400jumlah detik dalam sehari.

JavaScript

Node.js, 156 byte

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!")

Menggunakan waktu modifikasi file.

Powershell - 105 byte

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

Tidak Disatukan:

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

Bonus tidak sepadan, saya hanya bisa mendapatkan 117,5.

Powershell - 127

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

Untuk bonus 15% - 151 byte, kurang 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 byte

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 poin

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}

Mungkin sedikit lebih lama atau lebih pendek tergantung di mana ulang tahun Anda jatuh pada tahun itu, dan cara terpendek untuk mewakili itu. Bagi saya, itu 36e5(detik sejak zaman; tergantung zona waktu).

Apakah Mel Gibson masuk hitungan? Berikut adalah 138 byte - bonus 35% = program 89,7 poin yang merayakan dirinya sendiri, saya, dan 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

Tanpa Bonus - 142

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

Dengan 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 byte

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

Ingat, token ini adalah satu byte: If , Ans, →, Disp. getDateadalah dua byte. Semua simbol satu karakter lainnya adalah satu byte.

J 79

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

Bonus versi 120 - 15% = 102

Apakah saya mendapatkan kredit tambahan untuk mencetak keduanya saat keduanya berulang tahun?

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''

Penjelasan (kanan ke kiri):

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

Kata kerja pusat kereta

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

Tine kiri untuk kereta pusat:

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.

Jawa - 196

Ini berbeda dari pengajuan Java lainnya dengan menggunakan Strings, mencukur 41 karakter dalam proses. Ia menggunakan String.format ("% tj") untuk memformat java.util.Date atau selama String sehari-tahun, dan kemudian membandingkan dua String ini.

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!");}}

Diformat:

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 tidak ada 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!");}}

diformat:

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 byte

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

vb.net ~ 161c

Ini akan mencetak pesan perayaan untuk semua orang yang berulang tahun.

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

Nilai: 253c (-33c vb.net min) = 220 - 15% (bonus ulang tahun saya) = 187c - 14% (Ulang Tahun Perayaan) = 160,82 ~ 161c atau 220c - 29% = 156,2 ~ 157c

Powershell, 82 byte

lihat juga jawaban dari Chris J dan SpellingD

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

dimana

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

adalah kombinasi pintasan dan alias untuk ekspresi:

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

yang setara dengan bentuk kanonik:

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

Powershell, 119 byte - 14% = 102,34 Poin

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 $_!"}

Pada 3 Januari , skrip ditampilkan Happy birthday to Prof!. Jika skrip ini disimpan pada 3 Januari, dua salam akan ditampilkan.

C # - 63 byte

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

Saya memilih waktu kompilasi . Karena kode C # dikompilasi ke MSIL yang pada saat runtime dikompilasi ke kode yang dapat dieksekusi oleh JIT Compiler , program ini memenuhi persyaratan.

EDIT - Kemungkinan jawaban tidak valid seperti yang ditunjukkan dalam komentar.