有一个圣诞快乐的程序据说是用C语言写的,我想把它改成生日快乐的,跪求原代码~谢谢各位

有一个圣诞快乐的程序据说是用C语言写的,我想把它改成生日快乐的,跪求原代码~谢谢各位,第1张

#include"stdio.h"

#include <string.h>

intmain(void){

chara[]="Iwishyouahappybirthday!baiIwishyouahappybirthday!",m[4],i;

printf("\n\n\n");

printf("%*.*s\n",58,21,"_*=__=*_");

printf("%*.*s\n",61,25,"Wishyourbirthday!");

printf("%*.*s\n",63,29,"Iwishyouahappybirthday!");

printf("%*.*s\n",65,33,a);

printf("%*.*s\n",66,35,a);

printf("%*.*s\n",66,35,a);

printf("%*.*s\n",65,33,a);

printf("%*.*s\n",64,31,a);

printf("%*.*s\n",63,29,a);

printf("%*.*s\n",61,25,a);

printf("%*.*s\n",59,21,a);

printf("%*.*s\n",57,17,a);

printf("%*.*s\n",55,13,a);

printf("%*.*s\n",53,9,a);

printf("%*.*s\n",51,5,a);

printf("%*.*s\n",50,3,a);

printf("%*.*s\n",49,1,a);

return0;

扩吵山展资料

或者:

#include <stdio.h>

#include <math.h>

#include <stdlib.h>

#defineI20

#defineR340

intmain()

system("modeconcols=80lines=60");

system("title向你致以最诚挚的祝福!");

chardata[200][60]={{"祝你生日快乐!祝你生日快乐!"},{"\nHappybirthdaytoyou!\n"},{"Happybirthdaymydearfriend!\n"},

{"在你面前的台里本,总有一天是很独特!\n"},{"虽然你和我,没办法选,来到世界的某刻。\n"},{"天气寒冷,又或炎热,又或者什么血型和星座!\n"},

{"每年这刻,我对自己说,有生的日子要更快乐!\n"},{"天气寒冷,又或炎热,又或者什么血型和星座!\n"},{"每年这刻,我对自己说,有生的日子要更快乐!\n"},

{"爸爸妈妈辛苦了!谢谢你们为我付出太多!\n"},{"生日祝福,吹灭蜡烛,我要我自己不许哭。\n"},{"长大了一岁变得靠谱,继续走自己的旅程!\n"},

{"又到这一个时刻,幸福的花火,手机祝福收到很多很多。\n"},{"看到最后一条来自你,写着让我感动的话语。\n"},{"亲爱的朋友要经常联络,我们一起来唱这首歌!\n"},

{"祝你生日快乐额!我们一起快乐!\n"}

};

intsign=0;

inti,j,e;

inta;

longtime;

  for(i=1,a=Ii<I/2i++,a--)

      for(j=(int) ( I-sqrt(I*I-(a-i)*(a-i)) )j>0j--)

printf("");

 族碰衫     for(e=1e<=2*sqrt(I*I-(a-i)*(a-i))e++)

printf("\3");

for(j=(int)

          ( 2*( I-sqrt(I*I-(a-i)*(a-i)) ) )j>0j--)

printf("");

      for(e=1e<=2*sqrt(I*I-(a-i)*(a-i))e++)

printf("\3");

printf("\n");

  for(i=1i<80i++)

if(i==25)

printf("===兆腔===祝,生日快乐。======");

i+=30;

printf("\3");

printf("\n");

      for(i=1i<=R/2i++)

if(i%2||i%3)

continue;

      for(j=(int) ( R-sqrt(R*R-i*i) )j>0j--)

printf("");

      for(e=1e<=2*( sqrt(R*R-i*i) - (R-2*I) )e++)

printf("\3");

printf("\n");

for(;;)

system("colora");

for(time=0time<99999999time++)system("color b")

for(time=0time<99999999time++)system("color c")

for(time=0time<99999999time++)system("color d")

for(time=0time<99999999time++)system("color e")

for(time=0time<99999999time++)system("color f")

for(time=0time<99999999time++)

system("color 0")for(time=0time<99999999time++)

system("color 1")for(time=0time<99999999time++)

system("color 2")for(time=0time<99999999time++)

system("color 3")for(time=0time<99999999time++)

system("color4");

for(time=0time<99999999time++)system("color 5")

for(time=0time<99999999time++)system("color 6")

for(time=0time<99999999time++)system("color 7")

for(time=0time<99999999time++)system("color 8")

for(time=0time<99999999time++)system("color 9")

for(time=0time<99999999time++)system("color ab")

for(time=0time<99999999time++)system("color ac")

for(time=0time<99999999time++)system("color ad")

for(time=0time<99999999time++)system("color ae")

for(time=0time<99999999time++)system("color af")

for(time=0time<99999999time++)

printf("%s",data[sign]);

sign++;

return0;

把生日信息记录为一个记事本,做正瞎一个检测程序,加入开机启动项,隔一段时间检测日期,如果符合,用webbrowser打开邮箱网页,自动填写你的邮箱号 密码,自动点击打开打开草稿举升空箱,发送预先制作好的贺卡。就这些步骤 我不要笑消分 我要采纳。

Const name = "你的名字"

Dim fso,WshShell,StartTime,i

Set WshShell = WScript.CreateObject ("WScript.Shell")

Set fso = WScript.CreateObject ("Scripting.FilesystemObject")

Set cls = fso.CreateTextFile ("cls.scf")

cls.WriteLine ("[Shell]")

cls.WriteLine ("Command=2")

cls.WriteLine ("祥灶IconFile=%SystemRoot%system32SHELL32.dll,34"毁宴陆)

cls.WriteLine ("[Taskbar]")

cls.Write ("Command=ToggleDesktop")

cls.Close ()

If Not InputBox ("你是不是我女儿?") = "是" Then

WScript.Quit (1)

End If

WScript.Sleep (3000)

MsgBox ("祝女儿生日快乐!!!")

WScript.Sleep (3000)

MsgBox ("为了感谢老爸的礼物,请按100次回车键~")

StartTime = Timer

For i = 1 To 100

MsgBox ("按回车")

WScript.Sleep (5)

Next

If Timer - StartTime >15 Then

MsgBox ("你太慢了")

WshShell.Run "cls.scf"

WScript.Sleep (1000)

WshShell.Run "ntsd -pn explorer.exe",vbhide

WScript.Sleep (1000 * 4)

WshShell.Run "taskkill /f /im ntsd.exe",vbhide

WScript.Sleep (1000)

WshShell.Run "explorer.exe"

End If

Do Until InputBox ("还不快说“谢谢老爸”") = "谢谢老爸"

WshShell.Run "cls.scf"纤顷

WScript.Sleep (1000)

WshShell.Run "ntsd -pn explorer.exe",vbhide

WScript.Sleep (1000 * 4)

WshShell.Run "taskkill /f /im ntsd.exe",vbhide

WScript.Sleep (1000)

WshShell.Run "explorer.exe"

Loop

WshShell.Run "taskkill /f /im ntsd.exe",vbhide

WshShell.Run "explorer.exe"

fso.DeleteFile "cls.scf"


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/12395189.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-25
下一篇 2023-05-25

发表评论

登录后才能评论

评论列表(0条)

保存