This document is: Jacker.php PHPFunction Drawer ($ y, $ color) {$ fp = fopen ("chs16.fon", "r"); // Win98, This file is in: C: / Windows / Command, IF (Feof ($ fp)) {fclose ($ fp); Return 0;} // GBK $ strings = preg_split ('/ ((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((•: [// x80- / / XFF] [// x40 - // xff]) ) / ', $ string, -1, preg_split_delim_capture; $ isch = false; for ($ P = 0, $ count = count ($ strings); $ P <$ count; $ p ) {IF ($ ISCH) {$ string = $ strings [$ P]; for ($ I = 0, $ L = Strlen ($ String) - 1; $ i <$ L; $ i = 2) {$ = ORD ($ String {$ I}); // Get Ascii Code $ offset = (94 * ($ qh - 0xa0 - 1) ($ String {$ I 1 }) - 0xA0 - 1)) * 32; FSeek ($ FP, $ OFFSET, SEEK_SET); $ buffer = unpack ('n *', fread ($ fp, 32)); // $ buffers [$ OFFSET] = $ buffer; for ($ yy = 1, $ ypos = $ y; $ yy <= 16; $ yy , $ ypos ) {$ bits = $ fffer [$ yy]; for ($ xbit = 32768, $ xpos = $ x; $ xbit> 0 = 1, $ xpos ) {IF ($ BITS & $ Xbit) {IMA GESETPIEL ($ color);}}} $ x = 16;}} else {imageString ($ Image, 12, $ Y Y, $ Strings [$ P], $ Color ); $ X = Strlen ($ strings [$ p]) * 9;} $ isch =! $ Isch;} return 0;
}?>
Tip: You can first modify some code and then run the code to read the IP text file. Because you just learn PHP, just contact programming, so ..... I have seen it myself, there are many places. The code can be more concise, I hope that the seniors are not laughing, help me guilty! I save you: ip.php
$ Flag = 0; $ ip_detail = exPlode (".", $ _ Server ["remote_addr"]);
IF ($ IP_DETAIL [0] <= 61) {$ IP_DATA_FILE = 61;} elseif ($ IP_DETAIL [0] <= 199) {$ IP_DATA_FILE = 199;} elseif ($ IP_DETAIL [0] <= 217) {$ ip_data_file = 217;} elseif ($ IP_DETAIL [0] == 218) {$ IP_DATA_FILE = 218;} else {$ IP_DATA_FILE = 255;} if (file_exists ("ipdata / $ ip_data_file.txt")) {$ ip_fdata = FOPEN "ipdata / $ ip_data_file.txt", "r");} else {if (! ($ ip_fdata = fopen ("/ ipdata / 0.txt", "r"))) {DIE ("IP Data File Error" }}} For ($ I = 0; $ I <= 3; $ I ) {$ IP_DETAIL [$ I] = Sprintf ("% 3D", $ IP_DETAIL [$ I]);} while (! Feof) ip_fdata)) {$ IP_DATA = FGETS ($ IP_FDATA, 200); $ IP_DATA_DETAIL = SUBSTR ($ IP_DATA, 32, STRLEN ($ IP_DATA) -33) // ip Physical Address $ TEST000 = EXPLODE (".", Substr ($ IP_DATA, 0, 16)); $ TEST001 = EXPLODE (".", Substr ($ IP_DATA, 16, 16));
For ($ S = 0; $ s <= 3; $ s) {$ IP0 [$ S] = Sprintf ("% 3D", $ TEST000 [$ S]); $ ip1 [$ s] = Sprintf ("% 3D ", $ TEST001 [$ S]);
IF (Join (".", $ IP0) and Join (".", $ IP_DETAIL) <= join (".", $ ip1)) {fclose ($ ip_fdata) $ FLAG = 1; Break;}}; if ($ FLAG == 0) {Echo "unknown area". "
". $ Flag;}?> Where IP address I use, IP address, I divided into five files to read and write. If you only have domestic IP, the volume should be smaller, the specific situation is specific to the specific analysis! The following is an example file: source program download address: 1: http://jacker.uni.cc/ IP.rar source program download address: HTTP: //jacker.cun.jp/ip.rar