私たちは皆、次のような古典的なパパのジョークを知っています：

1. 誰かが自分の自己を説明する文を言います（I'm tiredまたはI'm confused）。

2. Hi <adjective>, I'm Dad!導入部は同じ形式（にI'm Peter従うのと同じ形式I'm hungry）に従うため、お父さん冗談愛好家が来て返信します。

あなたの仕事は、自己記述子の形式で入力を受け取り、適切な父親ジョーク形式を出力することですが、「お父さん」という言葉を使用する代わりに、プログラミングしているプログラミング言語の名前を使用しますに。

テストケース（Pythonによって解析されていると仮定）：

I'm amazing                  Hi amazing, I'm Python!
I'm tired                    Hi tired, I'm Python!
I'm hungry                   Hi hungry, I'm Python!
I'm fat                      Hi fat, I'm Python!

ここで、これらのテストケースがGolfscriptによって解析されていると仮定します。

I'm a programmer             Hi a programmer, I'm Golfscript!
I'm a question-writer        Hi a question-writer, I'm Golfscript!
I'm a Stack-Overflow-er      Hi a Stack-Overflow-er, I'm Golfscript!

正確な課題：

1. 標準入力または関数を使用して、自己記述形式（I'm <adjective>またはI'm a(n) <noun>）の文字列を取り込みます。

   • 終了句読点がないと仮定します。

   • 単語I'mが使用されていると仮定しI amます。

2. それをdad-joke形式に変換します。正確にどのように見えるかについては、上記の例を参照してください。

他のもの：

• これはcode-golfであるため、最短バイト数が優先されます。

• 標準的な抜け穴のルールに従ってください-それらのどれもしないでください。

• 楽しんで！

リーダーボード

この投稿のリーダーボードを表示するには、下のウィジェット/スニペットを展開します。投稿をランキングに含めるには# header text、次の情報を含むヘッダー（）が必要です。

• 言語の名前（カンマ,またはダッシュで終わる-）、その後に...

• ヘッダーに表示される最後の数字としてのバイトカウント。

たとえば、JavaScript (ES6), 72 bytesは有効ですがFortran, 143 bytes (8-bit)、バイトカウントがヘッダーの最後の数字ではないため無効です（回答は8バイトとして認識されます-これを利用しないでください）。

<iframe src="https://ozewski.github.io/ppcg-leaderboard/?id=185872" width="100%" height="100%" style="border: none;">Oops, your browser is too old to view this content! Please upgrade to a newer version of your browser that supports HTML5.</iframe><style>html,body{margin:0;padding:0;height:100%;overflow:hidden}</style>

V、13バイト

cEHi<esc>A, <C-r>" V!

オンラインでお試しください！

TSHの答えに触発

これはI'm、先頭からテキストを削除するときに文字列の先頭からヤンクされるという事実を利用<C-r>"し、挿入モードでテキストを末尾に貼り付けます。

C（gcc）、59 42 33バイト

インポートが不要であることに気づいた@Conor O'Brienのおかげで-17バイト

-9バイトのおかげで、@ tshは、より短いUBの関数記述方法を指摘してくれました

a(x){printf("Hi%s, I'm C!",x+3);}

オンラインでお試しください！

入力の最初の3文字を切り取り（削除I'm）、目的のテキストで囲みます。

V、13バイト

cEHi<Esc>A, <C-O>p V!

オンラインでお試しください！

に新しいV。ちょうど30分前にそれを知っていました。とにかく、この言語は、その名前のコストが1バイトしかないという理由だけで選択されます。<End>Vでキーを送信する方法がわかりません。ほとんどのvim環境は、この例の<End>代替として受け入れ<Esc>Aます。ただし、Vはvimより2文字短いです。:)

@Candy Gumdropのおかげで、1バイト節約できます。

スタックス、13 バイト

â∞¿φ‼0▲(─ƒSqÄ

実行してデバッグする

開梱されていない、コメントされていない、これはこのように見えます。

.Hip        print "Hi" with no newline
3tp         trim 3 characters from start of input and print with no newline
            final line is to print the unterminated compressed literal ", I'm stax!"
`dYgAwg_

終了していない文字列リテラルの後には何も続くことができないため、最終コメントを1行上に移動しました。

これを実行する

Brainfuck、164

,-.+>,>,----.++++>,.>,[.,]<<<+++++.----->>.[<]>[.>]<[->+++<]>++.[--->+<]>----.+++[->+++<]>++.++++++++.+++++.--------.-[--->+<]>--.+[->+++<]>+.++++++++.+[++>---<]>-.

オンラインでお試しください！

「brainfuck！」弦の一部はこのツールで生成され、おそらく手でさらにゴルフすることができます。

Excel、36 33バイト

Johan du Toitのおかげで-3バイト。

入力はA1に入ります。

="Hi "&MID(A1,4,99)&", I'm Excel"

最初の試み：

=REPLACE(A1,1,3,"Hi")&", I'm Excel!"

Pythonの3、35の 34バイト

lambda s:"Hi%s, I'm Python!"%s[3:]

オンラインでお試しください！

無知の実施のおかげで-1バイト

また、34バイト、新しいフォーマットの文字列を使用して、GáborFeketeに感謝します。

lambda s:f"Hi{s[3:]}, I'm Python!"

オンラインでお試しください！

R 45 44 39バイト

@ジュゼッペ編集

sub("I'm(.*)","Hi\\1, I'm R",scan(,""))

@AaronHayman編集

function(s)sub("I'm (.*)","Hi \\1, I'm R",s)

オンラインでお試しください！

PHP、34 32バイト

Hi<?=substr($argn,3)?>, I'm PHP!

オンラインでお試しください！

を介して入力しSTDIN、-Fで呼び出します。

$ echo I'm a Stack-Overflow-er|php -F dad.php
Hi a Stack-Overflow-er, I'm PHP!

$ echo I'm hungry|php -F dad.php
Hi hungry, I'm PHP!

x86、37 36バイト

$ xxd DAD.COM
00000000: d1ee ac8a d8c6 0024 adc7 0448 698b d6b4  .......$...Hi...
00000010: 09cd 21ba 1901 cd21 c32c 2049 276d 2078  ..!....!., I'm x
00000020: 3836 2124                                86!$

組み立てられていない：

D1 EE       SHR  SI, 1                  ; point SI to DOS PSP (080H)
AC          LODSB                       ; load string length into AL, advance SI
8A D8       MOV  BL, AL                 ; put string length into BL
C6 40 24    MOV  BYTE PTR[BX][SI], '$'  ; add string terminator to end of string
AD          LODSW                       ; advance SI two chars
C7 04 6948  MOV  WORD PTR[SI], 'iH'     ; replace second and third char with 'Hi'
8B D6       MOV  DX, SI                 ; load string address for INT 21H string function
B4 09       MOV  AH, 9                  ; display a '$' terminated string function
CD 21       INT  21H                    ; call DOS API
BA 0119     MOV  DX, OFFSET S           ; load address for second part of string
CD 21       INT  21H                    ; call DOS API
C3          RET                         ; return to DOS
S  DB ", I'm x86!$"  

スタンドアロンの実行可能DOSプログラム。コマンドラインからの入力、画面への出力。

DAD.COMをダウンロードしてテストします。

* CPUマシンコードは正式な意味での言語ではないため、ここでの正確な「言語」名は少しあいまいです。ターゲットプラットフォームの一般的に理解され、受け入れられている名前として「x86」を使用します。

Java、36バイト

s->"Hi"+s.substring(3)+", I'm Java!"

オンラインでお試しください。

空白、267バイト

[S S S T    S S T   S S S N
_Push_72_H][T   N
S S _Print_as_character][S S S T    T   S T S S T   N
_Push_105_i][T  N
S S _Print_as_character][S S S N
_Push_0][S N
S _Duplicate_0][S N
S _Duplicate_0][T   N
T   S _Read_STDIN_as_character][T   N
T   S _Read_STDIN_as_character][T   N
T   S _Read_STDIN_as_character][N
S S N
_Create_Label_INPUT_LOOP][S S S N
_Push_0][S N
S _Duplicate_0][T   N
T   S _Read_STDIN_as_character][T   T   T   _Retrieve][S N
S _Duplicate_input][S S S T S T S N
_Push_10][T S S T   _Subtract][N
T   S S N
_If_0_Jump_to_Label_TRAILING][T N
S S _Print_as_character][N
S N
N
_Jump_to_Label_INPUT_LOOP][N
S S S N
_Create_Label_TRAILING][S N
N
_Discard_top][S S T T   S S S T S T N
_Push_-69_!][S S T  T   N
_Push_-1_e][S S T   T   T   N
_Push_-3_c][S S T   T   S T N
_Push_-5_a][S S S T S T S N
_Push_10_p][S S S T T   S T N
_Push_13_s][S S T   T   N
_Push_-1_e][S S S T T   T   S N
_Push_14_t][S S S T T   N
_Push_3_i][S S S T  S N
_Push_2_h][S S T    T   T   T   T   N
_Push_-15_W][S S T  T   S S S T T   S N
_Push_-70_space][S S S T    T   T   N
_Push_7_m][S S T    T   T   T   T   T   T   N
_Push_-63_'][S S T  T   T   T   S T N
_Push_-29_I][S T    S S T   T   N
_Copy_0-based_3rd_-70_space][S S T  T   T   T   S T S N
_Push_-58_,][N
S S T   N
_Create_Label_PRINT_TRAILING_LOOP][S S S T  T   S S T   T   S N
_Push_102][T    S S S _Add][T   N
S S _Print_as_character][N
S N
T   N
_Jump_to_Label_PRINT_TRAILING_LOOP]

強調表示としてのみ追加される文字S（スペース）、T（タブ）、およびN（改行）。
[..._some_action]説明としてのみ追加。

空白は一度に1文字を入力するため、文字の読み取りを停止するタイミングと入力が完了するように、入力には末尾の改行が含まれている必要があります。

オンラインで試してください（未加工のスペース、タブ、改行のみ）。

擬似コードの説明：

Print "Hi"
Read three characters from STDIN, and do nothing with them
Start INPUT_LOOP:
  Character c = STDIN as character
  If(c == '\n'):
    Call function PRINT_TRAILING
  Print c as character
  Go to next iteration of INPUT_LOOP

function PRINT_TRAILING:
  Discard the top of the stack (the c='\n' that was still on the stack)
  Push "!ecapsetihW m'I ," one character at a time
  Start PRINT_TRAILING_LOOP:
    Print as character
    Go to next iteration of PRINT_TRAILING_LOOP

の文字は", I'm Whitespace!"逆の順序でプッシュされ、ループで印刷されます。これらの文字のすべての値も102ずつ下げられ、印刷前にループに追加されてバイトが節約されます。各Javaで使用されるこの定数102は、このJavaプログラムで生成されます。また、-70両方のスペースの値を2回プッシュする代わりに"!ecapsetihW m'I ,"、最初のコピーから2番目のスペースをコピービルトインでコピーして、数バイトを節約します。

IBM / Lotus Notes式言語、61 62バイト

+1 !は、出力の最後に気付いていなかったためです。

"Hi"+@Right(i;"I'm")+", I'm IBM/Lotus Notes Formula Language!"

編集可能なフィールドから入力を取得する計算フィールド式i。「I'm an I'm」では失敗しますが、それはまったく意味をなさないので、それは起こらないと仮定しています。

32バイトで、言語の名前が式の合計長の半分以上であることを残念に思います！

入力と出力の例を示すスクリーンショット：

sed（-r）、31 28 25バイト

-r出力に必要ないため、シャギー-3バイトのおかげで-3バイト

s/I'm(.*)/Hi\1, I'm sed!/

TIO

Japt、18バイト

`Hi{s3}, I'm Japt!

Japtの文字列圧縮ライブラリが0％の圧縮率を達成すると...

それを試してみてください

別の18バイトの代替：

`Hi{Ť}, {¯4}Japt!

オクターブ、35バイト

@(s)["Hi" s(4:end) ", I'm Octave!"]

オンラインでお試しください！

@(s)                                 % Anonymous function taking a string input
    [                             ]  % Concatenate everything inside the brackets
     "Hi"          ", I'm Octave!"]  % The fixed parts of the output string
          s(4:end)                   % The input, except "I'm"

                                     % Returns the concatenated string

42バイト：

ここで他の言語名のいくつかと比較して6文字が非常に多いため、何も書かずに「オクターブ」を取得しようとしました。残念ながら、verコンマで区切られたフィールドを持つ構造体を出力するのみが見つかりました。6バイト以上かかります。:(

@(s)["Hi" s(4:end) ", I'm " {ver.Name}{1}]

オンラインでお試しください！

ルビー -p、32 27 26バイト

Nick KennedyのJelly answerを活用して-5バイト。

ストリング内の異なるポイントでの分割からの-1バイト。また、古いバイトカウントが間違っていたことにも気付きました。

~/m/;$_="Hi#$', I'm Ruby!"

説明

                            # -p gets line of input and saves to $_
~/m/;                       # Find first 'm' in $_ using regex
     $_="Hi#$', I'm Ruby!"  # Save modified string to $_
                            # ($' is the string AFTER the most recent regex match)
                            # -p outputs $_ to screen

オンラインでお試しください！

さび、41バイト

|x:&str|print!("Hi{}, I'm Rust!",&x[3..])

オンラインでお試しください！

バッチ、22 + 3 = 25バイト

@echo Hi %*, %0 Batch!

このファイルに名前を付けるための+3バイトI'm（.batバッチファイルに必要な拡張子付き）。として呼び出しI'm hungry、それがエコーしHi hungry, I'm Batch!ます。

Perl 6の、30の28 27バイト

{S/.../Hi/~", I'm Perl 6!"}

オンラインでお試しください！

Perlの5 -p、31の、24バイト

OPからの説明と@NahuelFouilleulからの提案に基づいて削減します。

/ /;$_="Hi $', $` Perl!"

オンラインでお試しください！

ゼリー、 16  15 バイト

Ḋa⁾Hi“'ṫṗḶ/÷!Ṗ»

結果を出力する（Python形式の）文字列引数を受け入れる完全なプログラム。

オンラインでお試しください！

どうやって？

Ḋa⁾Hi“'ṫṗḶ/÷!Ṗ» - Link: list of characters    e.g. "I'm a programmer"
Ḋ               - dequeue                          "'m a programmer"
  ⁾Hi           - pair of characters               "Hi"
 a              - logical AND (vectorises)         "Hi a programmer"
     “'ṫṗḶ/÷!Ṗ» - list of characters               ", I'm Jelly!"
                -  - since this is a new leading constant chain the previous result
                -    is implicitly printed (with no trailing newline)
                - program result is implicitly printed (again with no trailing newline)

注：もḊ⁾Hio...動作します。

ゼリー、20 17バイト

ṫ4;“'ṫṗḶ/÷!Ṗ»⁾Hi;

オンラインでお試しください！

入力を引数として受け取り、ゼリー文字列を返すモナドリンク。

説明

ṫ4                | everything from 4th character on
  ;“'ṫṗḶ/÷!Ṗ»     | concatenate ", I’m Jelly!" to the end
             ⁾Hi; | concatenate "Hi" to the beginning

VBA（Excel）、27 28バイト

?"Hi"Mid([A1],4)", I'm VBA!

入力はExcelのアクティブシートのセルA1に入り、イミディエイトウィンドウでコードを実行します

"SomeString"SomeValueおよびSomeValue"SomeString"暗黙的に連結するという事実を活用し、MID関数の3番目の引数を省略すると、入力の最後からすべての文字が取得されます-これを「初期文字のダンプ」関数に変換します

（シャギーのおかげで1バイト、すべての回答が感嘆符で終わることをOPが確認したとき+1
）

J、22バイト

', I''m J!',~'Hi',3}.]

オンラインでお試しください！

05AB1E、23 21バイト

Kevin Cruijssenのおかげで2バイト節約

',«#À„Hiš"05AB1E!"ªðý

オンラインでお試しください！

説明

',«                    # append ","
   #                   # split on spaces
    À                  # rotate left
     „Hiš              # prepend "Hi"
         "05AB1E!"ª    # append the language name
                   ðý  # join on spaces

QuadR、22バイト

^...
$
Hi
, I'm QuadR!

オンラインでお試しください！

これは次のものを置き換えます。

^... 3つの初期文字
と
$ 行末

と

Hi
そして
,I'm QuadR
、それぞれ

網膜、22 21バイト

3L$`
Hi$', $` Retina!

オンラインでお試しください！リンクにはテストケースが含まれます。Retina 0.8.2では動作しないため、代わりに@AdámのQuadR回答を適応させます。説明：パターンは空なので、入力ストリングのすべての位置で一致します。ただし、3番目（または4番目が機能する）の一致のみが必要です。次に、置換がその一致に適用されます。その置換内$'で、文字列の残りを参照し、文字列$`の先頭を参照します。

網膜0.8.2、26の 25 23バイト

^...
Hi
$
, I'm Retina!

@attinatのおかげで-1バイト。@AdámのQuadR答えを
移植して-2バイトなので、必ず彼に投票してください!!

PS：@Neilが新しいバージョンで短いRetina回答を投稿したので、この回答をRetina 0.8.2に明示的に変更しました。

オンラインでお試しください。

説明：

最初の3文字を「Hi」に置き換えます。

^...
Hi

そして、末尾に「、I'm Retina！」を追加します （文字列の末尾を置き換えることにより）：

$
, I'm Retina!

bash、24バイト

echo Hi ${@:2}, $1 bash!

TIO