轉信站: GIBBS!ccnews.ncku!news.nctu!newsfeed.nthu!news.ee.nthu!tti
Origin: @u860359.li.ab.nthu.edu.tw

/*人數統計 v1.0                                        */
/*1998-1-2    by 烏龜島站長 ASKA                       */
/*                                                     */
/*ㄟ...這是我寫的第一支程式...歡迎試用...:)            */
#include <stdio.h>
#define initial 1         /*初始化*/

counter()
{
FILE *total;
long int users;
if((totalpen("total.dat","r"))ULL)
{
 totalpen("total.dat","a");
 fprintf(total,"%ld",initial);
 fclose(total);
 users
}
else
{
 totalpen("total.dat","r");
 fscanf(total,"%ld",&users);
 fclose(total);
 users++;
 totalpen("total.dat","w");
 fprintf(total,"%ld\n",users);
 fclose(total);
}
prints("你是本站自 1998/1/2 以來第[%ld]隻登陸的小龜喔!!:)\n",users);
}

--
ビゲサペろゆ諸君.OAAC一レ⑦Уэレ州 ヤヱЁЫ⑦Ьレ一ЛэЪュ一 ヱьй一
      れホゾ烏龜島ソ專屬祕密情報部員ク. 社交界ズЫжш一ウサゾビ20年,
   アモス贅澤ス暮ヘウメウサゆペシ, 時時アソ平和ゎユчズスペ事ゎやペ.
ガモス氣ネをホザ俺ゾ, 優ホギ頭腦シ天性ソ運動神經メ生ろウサ,超高級З一Шメ
   мюпЬуソЩ一⑦Иズ替り,ЗЬя一Ьлヤ一メヤи①лヤ一ズウサ私ゾ,
世界ソ惡シ戰よ決心メウギソクゲギ.顏ソスゆЗеユ,俺ソ事メ人ゾ海兒呼モク.

--
※從u860359.LI.AB.nthu.edu.tw到烏龜島一遊的小龜,留下了這番話...
--
Origin:站名:[ 烏龜島BBS ] DN:[ aska.ml.org ] IP:[140.114.221.111] :>