網址現形小程式

 

以現在來看沒啥意義的東西……就當作winAPI的練習實作吧。

 




1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
 /*
能力:可以把[img]網址[/img]轉為純網址的程式
檔案:123.txt --> 轉好的網址.txt
用途:把論壇的貼圖語法拿掉
能力:可以把[img]網址[/img]轉為純網址的程式
檔案:123.txt --> 轉好的網址.txt
用途:把網頁貼圖語法轉成檔案列表,然後給FlashGet抓取下載


變革:1.0,基本轉換功能
   1.1,[img]到網址之間的空白部分可以自動修掉
   1.2,C++  -->  C,檔案縮小十倍

*/

#include<stdio.h>

#include <windows.h>
#include "resource.h"


int WINAPI
WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int iCmdShow)
{
    WNDCLASSEX wc;
    wc.hIcon         = LoadIcon(hInstance, MAKEINTRESOURCE(ID_ICON_1));

    int count=0;
    int n,n0,n1;

    char a[201]={0},b[201]={0};
    
    FILE *fp1, *fp2;
    
    fp1 = fopen("123.txt","r");


    if (fp1 == NULL){
        MessageBox (NULL, "同個資料夾中找不到名為 123.txt 的文件", "錯誤了喔!", MB_OK);
        //cerr <<"cant open file: test.txt\n";
        exit(0);
    }

    fp2 = fopen("轉好的網址.txt","w");

    while (fgets(a,200,fp1) != NULL){
        for (n=0;n<190 ;n++){
            if (a[n]=='[' && a[n+4]==']'){
                n0=0;
                while (a[n+5+n0] == ' ')   //檢查[img]到網址之間有無空白
                    n0++;
                for (n1=n;n1<190;n1++){   //每一行都拉前五個字元
                    b[n1]=a[n1+5+n0];
                    a[n1]=b[n1];
                }
            }
            else if (a[n]=='[' && a[n+5]==']'){
                for (int n2=n;n2<n+6;n2++)
                    a[n2]=0;
            }
        }
        fprintf(fp2,a);

        fputs("\n",fp2);
    }
    fclose(fp1);
    fclose(fp2);

    return 0;
}

No response to “網址現形小程式” ;

張貼留言