最近、正規表現とシーフ プログラミングを学びました。近くにリーグ オブ レジェンドをプレイする友人がいるので、ヒーローのスキルなどを確認するためにゲーム データベースを作成することを突然思いつきました。以下のコードは、実際にはシーフ プログラムです。目的は、Web ページを携帯電話で簡単に閲覧できるように簡素化していることです。ヒーロー情報は Duowan League of Legends データベースから取得されています。これを読んだ後は、学んだ知識を応用して他のデータベースを作成することもできます。

01

01

02	header("Content-Type: text/html; charset=utf-8");date_default_timezone_set("Asia/Shanghai");

<テーブル>

03	function li($p)

02

header("Content-Type: text/html; charset=utf-8");date_default_timezone_set("アジア/上海");

04

{

<テーブル>

05	$l=file_get_contents("http://lol.duowan.com/s/heroes.html");

03

関数 li($p)

06	preg_match_all('!(.*).*(.*).*!suU',$l,$list);

テーブル>

07	$ay=ceil(count($list[1])/30);

04

{

08	if($p==NULL){$p=1;}

テーブル>

09	if($p<0$p>$ay){die('error');}

05

$l=file_get_contents("http://lol.duowan.com/s/heroes.html");

10	$sta=30*($p-1);

テーブル>

11	$end=30*$p;

06

preg_match_all('!(.*).*(.*)。 *!suU',$l,$list);

12	for($p2=$sta;$p2<$end;$p2++)

<テーブル>

13	{$ys=$p2%3;$m=$list[1][$p2];

07

$ay=ceil(count($list[1])/30);

14	if($ys==2){$hh=" ";}else{$hh=" ";}

テーブル>

15	if($m!=NULL)

08

if($p==NULL){$p=1;}

16	{$l2=$l2."".$list[3][$p2]."".$hh;

テーブル>

17

}

09

if($p$ay){die('error');}

18

}

テーブル> 10 $sta=30*($p-1); テーブル> 11 $end=30*$p; テーブル> 12 for($p2=$sta;$p2<$end;$p2++)<🎜> <🎜> <🎜> <テーブル> <🎜>13<🎜> <🎜>{$ys=$p2%3;$m=$list[1][$p2];<🎜> <🎜> <🎜> <テーブル> <🎜>14<🎜> <🎜>if($ys==2){$hh="

---

";}else{$hh=" ";} テーブル> 15 if($m!=NULL) テーブル> 16 {$l2=$l2."".$list[3][$p2] ."".$hh;<🎜> <🎜> <🎜> <テーブル> <🎜>17<🎜> <🎜>}<🎜> <🎜> <🎜> <テーブル> <🎜>18<🎜> <🎜>}<🎜>

19	$l2=$l2." ";

20	for($dy=1;$dy<=$ay;$dy++)

21	{if($dy!=$p)

22	{$l2=$l2." ".$dy." ";}

23

else

24	{$l2=$l2." ".$dy." ";}

25

}

26	$time=date("Y.m.d H:i");

27	$l2=" 英雄联盟—资料库 ".$l2." [ ".$p." / ".$ay."] 为易首页.留言反馈 .相关说明 Time: ".$time." Powered by Vst93 ";

28	return $l2;

29

}

30

31	function gk($b)

32	{preg_match_all('!LOL英雄联盟专区>英雄资料>(.*)!suU',$b[0][0],$heroname);

33	preg_match_all('! (.*)(.*)(.*) !suU',$b[0][0],$money);

34	preg_match_all('! 英雄标签： (.*) (.*) !suU',$b[0][0],$tag);

35	preg_match_all('! (.*) !suU',$b[0][0],$dj);

36	preg_match_all('! (.*) !suU',$b[0][0],$cz);

37	$cz=str_replace(" "," ",$cz[1][1]);

38	$cz=str_replace("","",$cz);

39	$cz=strip_tags($cz," ");

40	$out=" ".$heroname[1][0]." 英雄概况 国服：".$money[2][0]." / ".$money[4][0]." 美服：".$money[2][1]." / ".$money[4][1]." 英雄标签：".$tag[2][0]." 物理攻击：".$dj[1][1]." 法术攻击：".$dj[1][2]." 生命数值：".$dj[1][0]." 操作难度：".$dj[1][3]." 成长能力 ".$cz;

41	return $out;

42

}

43	function jn($b)

44	{preg_match_all('! s*(.*) (.*) (.*) (.*)( )?(.*) s* !suU',$b[0][0],$jn);

45	$out2=" 英雄技能详情 ".$jn[3][0]." ".$jn[4][0]." ".$jn[7][0]." ".$jn[3][1]." ".$jn[4][1]." ".$jn[7][1]." ".$jn[3][2]." ".$jn[4][2]." ".$jn[7][2]." ".$jn[3][3]." ".$jn[4][3]." ".$jn[7][3]." ".$jn[3][4]." ".$jn[4][4]." ".$jn[7][4]."";

46	return $out2;

47

}

48

//技巧

49	function jq($b)

50	{preg_match_all('! s* (.*) (.*) !suU',$b[0][0],$jq);

51	$out3=" 英雄技巧与提示 ".$jq[1][0].$jq[2][0]." ".$jq[1][1].$jq[2][1]." ";

52	return $out3;

53

}

54	$n=$_GET["n"];

55	$m=$_GET["m"];

56	$y=$_GET["y"];

57

$head='

58

59

60

';

68	$foot=" 列表.概况.技能.提示 ";

69	$url="http://lol.duowan.com/heros/".$n."/";

70	curl_setopt($ch, CURLOPT_URL,$url);

71	curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);

72

// 指定代理地址

73	curl_setopt($ch, CURLOPT_PROXY, '202.108.50.72:80');

74	$a = curl_exec($ch);

75	curl_close ($ch);**/

76	$a=file_get_contents($url);

77	$d1='!您的当前位置(.*) !su';

78	preg_match_all($d1,$a,$b);

79	//preg_match_all($d2,$b[0][0],$b2);

80	if($n==NULL)

81	{$body=li($y);}

82

else

83	{if($m==1){$body=jn($b);}

84	elseif($m==2){$body=jq($b);}

85	else{$body=gk($b);}

86

}

87	echo $head.$css1.$body;

88	if($n!=Null)

89	{echo $foot;}

90

?>