Hulp Twitter Script
Ik kom er maar niet uit...
Ik wil instellen hoeveel tweets hij laat zien ? Derest werkt.
Wie zal mij kunnen helpen?
Quote:
Code (php)
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
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
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
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
<?php
/* Functies */
function TweetRSS($user)
{
$Array = file("http://twitter.com/". $user);
$Page = NULL;
$k = 0;
for ($i=0;$i<count($Array);$i++)
{
$A_STR = $Array[$i];
if (eregi("<a href=\"(.*)\" class=\"xref rss profile-rss(.*)</a>",$A_STR,$Array2))
{
$Array2 = file("http://twitter.com". $Array2[1]);
for ($j=0;$j<count($Array2);$j++) $Page .= $Array2[$j];
for ($k=2;$k<=FindTag($Page,"<title>","</title>",0);$k++)
{
$Tweets[$k-2][1] = FindTag($Page,"<title>","</title>",$k);
$Tweets[$k-2][1] = html_entity_decode($Tweets[$k-2][1]);
$Tweets[$k-2][1] = str_replace("<",'<',$Tweets[$k-2][1]);
$Tweets[$k-2][1] = str_replace(">",'>',$Tweets[$k-2][1]);
$Tweets[$k-2][1] = ParseURL($Tweets[$k-2][1]);
$Array3 = explode(":",$Tweets[$k-2][1]);
$Tweets[$k-2][0] = $Array3[0];
$Tweets[$k-2][1] = NULL;
for ($m=1;$m<count($Array3);$m++) $Tweets[$k-2][1] .= " ". $Array3[$m];
$d_EN = array("Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", "Sunday", "January", "February", "March", "May", "June", "July", "August", "October");
$d_NL = array("Maandag", "Dinsdag", "Woensdag", "Donderdag", "Vrijdag", "Zaterdag", "Zondag", "Januari", "Februari", "Maart", "Mei", "Juni", "Juli", "Augustus", "Oktober");
$Tweets[$k-2][2] = FindTag($Page,"<pubDate>","</pubDate>",$k-1);
$date = date_create($Tweets[$k-2][2]);
date_modify($date,"+2 hour");
$Tweets[$k-2][2] = date_format($date,"l, j F Y H:i");
$Tweets[$k-2][2] = str_replace($d_EN,$d_NL,$Tweets[$k-2][2]);
}
break;
}
}
return $Tweets;
}
function TweetP($Tweets)
{
for ($i=0;$i<count($Tweets);$i++) echo "<b>". $Tweets[$i][0] ."</b> ". $Tweets[$i][1] ." gepost op ". $Tweets[$i][2] ."<br>";
}
function Findtag($Data,$Tag1,$Tag2,$n)
{
$n--;
$pos = 0;
for ($i=0;;$i++)
{
$pos3 = stripos($Data,$Tag1,$pos) + strlen($Tag1);
if ($pos3 < $pos) break;
else $pos = $pos3;
$pos2 = stripos($Data,$Tag2,$pos) - $pos;
$Tag[$i] = substr($Data,$pos,$pos2);
}
if ($n == -1) return count($Tag);
else return $Tag[$n];
}
function ParseURL($Data)
{
$Array = explode("\n",$Data);
$Data = NULL;
for ($i=0;$i<count($Array);$i++)
{
$Data2 = NULL;
$Array2 = explode(" ",$Array[$i]);
for ($j=0;$j<count($Array2);$j++)
{
if (eregi("http:\/\/(.*)",$Array2[$j],$Parse)) $Array2[$j] = "<a href=\"". $Parse[0] ."\">". $Array2[$j] ."</a>";
$Data2 = $Data2 ." ". $Array2[$j];
}
$Data = $Data ."\n". substr($Data2,1);
}
return substr($Data,1);
}
/* MAIN
TweetRSS($user) : Deze functie returned een array met alle tweets geplaatst door de user.
Deze Array heeft 2 dimensies, de eerste is het hoeveelste bericht je wilt
en de tweede geeft weer of je de datum of het onderwerp wilt.
Een voorbeeld:
$Tweets[0][0]; geeft het 1e bericht
$Tweets[0][1]; geeft de 1e datum
$Tweets[3][0]; geeft het 4e bericht
...
TweetP($Array) : Deze functie print de Tweets-array op het scherm, dit is louter voor mij,
ik heb dit script nl. getest op m'n eigen PC (Commandprompt).
FindTag($Data,$Tag1,$Tag2,$n) : Deze functie heb ik al in vele talen gemaakt en ik blijf het handig vinden.
Met deze functie kan je zien wat er tussen bepaalde tags staat en hoe vaak.
Een voorbeeld:
FindTag("<p>a</p><p>b</p><p>c</p>","<p>","</p>",0); geeft het aantal keer er iets tussen de tags staat
FindTag("<p>a</p><p>b</p><p>c</p>","<p>","</p>",1); geeft a
...
ParseURL($Data) : Deze functie doet wat de RSS van Twitter niet doet: van URL's aanklikbare links maken.
*/
$Tweets = TweetRSS("webgateUP");
TweetP($Tweets);
?>
/* Functies */
function TweetRSS($user)
{
$Array = file("http://twitter.com/". $user);
$Page = NULL;
$k = 0;
for ($i=0;$i<count($Array);$i++)
{
$A_STR = $Array[$i];
if (eregi("<a href=\"(.*)\" class=\"xref rss profile-rss(.*)</a>",$A_STR,$Array2))
{
$Array2 = file("http://twitter.com". $Array2[1]);
for ($j=0;$j<count($Array2);$j++) $Page .= $Array2[$j];
for ($k=2;$k<=FindTag($Page,"<title>","</title>",0);$k++)
{
$Tweets[$k-2][1] = FindTag($Page,"<title>","</title>",$k);
$Tweets[$k-2][1] = html_entity_decode($Tweets[$k-2][1]);
$Tweets[$k-2][1] = str_replace("<",'<',$Tweets[$k-2][1]);
$Tweets[$k-2][1] = str_replace(">",'>',$Tweets[$k-2][1]);
$Tweets[$k-2][1] = ParseURL($Tweets[$k-2][1]);
$Array3 = explode(":",$Tweets[$k-2][1]);
$Tweets[$k-2][0] = $Array3[0];
$Tweets[$k-2][1] = NULL;
for ($m=1;$m<count($Array3);$m++) $Tweets[$k-2][1] .= " ". $Array3[$m];
$d_EN = array("Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", "Sunday", "January", "February", "March", "May", "June", "July", "August", "October");
$d_NL = array("Maandag", "Dinsdag", "Woensdag", "Donderdag", "Vrijdag", "Zaterdag", "Zondag", "Januari", "Februari", "Maart", "Mei", "Juni", "Juli", "Augustus", "Oktober");
$Tweets[$k-2][2] = FindTag($Page,"<pubDate>","</pubDate>",$k-1);
$date = date_create($Tweets[$k-2][2]);
date_modify($date,"+2 hour");
$Tweets[$k-2][2] = date_format($date,"l, j F Y H:i");
$Tweets[$k-2][2] = str_replace($d_EN,$d_NL,$Tweets[$k-2][2]);
}
break;
}
}
return $Tweets;
}
function TweetP($Tweets)
{
for ($i=0;$i<count($Tweets);$i++) echo "<b>". $Tweets[$i][0] ."</b> ". $Tweets[$i][1] ." gepost op ". $Tweets[$i][2] ."<br>";
}
function Findtag($Data,$Tag1,$Tag2,$n)
{
$n--;
$pos = 0;
for ($i=0;;$i++)
{
$pos3 = stripos($Data,$Tag1,$pos) + strlen($Tag1);
if ($pos3 < $pos) break;
else $pos = $pos3;
$pos2 = stripos($Data,$Tag2,$pos) - $pos;
$Tag[$i] = substr($Data,$pos,$pos2);
}
if ($n == -1) return count($Tag);
else return $Tag[$n];
}
function ParseURL($Data)
{
$Array = explode("\n",$Data);
$Data = NULL;
for ($i=0;$i<count($Array);$i++)
{
$Data2 = NULL;
$Array2 = explode(" ",$Array[$i]);
for ($j=0;$j<count($Array2);$j++)
{
if (eregi("http:\/\/(.*)",$Array2[$j],$Parse)) $Array2[$j] = "<a href=\"". $Parse[0] ."\">". $Array2[$j] ."</a>";
$Data2 = $Data2 ." ". $Array2[$j];
}
$Data = $Data ."\n". substr($Data2,1);
}
return substr($Data,1);
}
/* MAIN
TweetRSS($user) : Deze functie returned een array met alle tweets geplaatst door de user.
Deze Array heeft 2 dimensies, de eerste is het hoeveelste bericht je wilt
en de tweede geeft weer of je de datum of het onderwerp wilt.
Een voorbeeld:
$Tweets[0][0]; geeft het 1e bericht
$Tweets[0][1]; geeft de 1e datum
$Tweets[3][0]; geeft het 4e bericht
...
TweetP($Array) : Deze functie print de Tweets-array op het scherm, dit is louter voor mij,
ik heb dit script nl. getest op m'n eigen PC (Commandprompt).
FindTag($Data,$Tag1,$Tag2,$n) : Deze functie heb ik al in vele talen gemaakt en ik blijf het handig vinden.
Met deze functie kan je zien wat er tussen bepaalde tags staat en hoe vaak.
Een voorbeeld:
FindTag("<p>a</p><p>b</p><p>c</p>","<p>","</p>",0); geeft het aantal keer er iets tussen de tags staat
FindTag("<p>a</p><p>b</p><p>c</p>","<p>","</p>",1); geeft a
...
ParseURL($Data) : Deze functie doet wat de RSS van Twitter niet doet: van URL's aanklikbare links maken.
*/
$Tweets = TweetRSS("webgateUP");
TweetP($Tweets);
?>
Code (php)
1
2
3
4
2
3
4
function TweetP($Tweets)
{
for ($i=0;$i<count($Tweets);$i++) echo "<b>". $Tweets[$i][0] ."</b> ". $Tweets[$i][1] ." gepost op ". $Tweets[$i][2] ."<br>";
}
{
for ($i=0;$i<count($Tweets);$i++) echo "<b>". $Tweets[$i][0] ."</b> ". $Tweets[$i][1] ." gepost op ". $Tweets[$i][2] ."<br>";
}
Toch gewoon in dat deel? $i<$aantal
Joris van Rijn op 28/02/2011 18:37:58:
Nee ook al heb je duizend tweets hij laat er helaas duizend zien, ik moet een limiet of dergelijke kunnen instellen?
Joris van Rijn op 28/02/2011 18:53:29:
Nee helaas, ik heb hem zo aangepast:
function TweetP($Tweets)
{
$aantal = 2;
for ($i=0;$i<count($Tweets);$i++) echo "<b>". $Tweets[$i][0] ."</b> ". $Tweets[$i][1] ." gepost op ". $Tweets[$i][2] ."<br>";
}
function Findtag($Data,$Tag1,$Tag2,$n)
{
Kijk is naar mijn vorige reactie (naar het stukje in de 'for')
Joris van Rijn op 28/02/2011 19:06:29:
Zoals als jij het aanpast klopt het ook dat het niet werkt!
Kijk is naar mijn vorige reactie (naar het stukje in de 'for')
Kijk is naar mijn vorige reactie (naar het stukje in de 'for')
Klopt sorry het spijt mij, als ik op het gebied van design iets kan betekenen voor u kunt uw mij altijd een privébericht sturen!