|
X |
* |
AGENTINF |
BEGSR |
BAR$AGENT |
102 |
|
|
|
|
|
|
|
|
X |
* |
AGENTSPAM$ |
BEGSR |
BAR$AGENT |
18 |
|
|
|
|
|
|
|
|
X |
* |
AGENTSPAM$123 |
BEGSR |
BAR$AGENT |
45 |
|
|
|
|
|
|
|
|
X |
* |
BESUCHERAG |
BEGSR |
BAR$AGENT |
7 |
|
|
|
|
|
|
|
|
X |
* |
BESUCHERNAME |
BEGSR |
BAR$AGENT |
6 |
|
|
|
|
|
|
|
|
X |
* |
BESUCHERNAMEX |
BEGSR |
BAR$AGENT |
36 |
|
|
|
|
|
|
|
|
X |
|
|
|
X |
* |
BESUCHERPARMAG |
PLIST |
BAR$AGENT |
7 |
|
|
|
|
|
|
|
|
X |
* |
BESUCHERPARM |
PLIST |
BAR$AGENT |
7 |
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
*COPYRIGHT JÜRGEN REULE 2010-2024 |
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
*MAIN* |
EXSR |
BAR$MAIN |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
AGENTINF |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
iOS |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'iPhone' |
SCAN |
AGENT |
|
|
|
— |
77 |
61 |
|
|
|
C |
|
N61 |
'iPod' |
SCAN |
AGENT |
|
|
|
— |
77 |
61 |
|
|
|
C |
|
N61 |
'iPad' |
SCAN |
AGENT |
|
|
|
— |
77 |
61 |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Smartphone / Tablet |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'Mobile' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'Android' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'PlayBook' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'BlackBerry' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'Opera Mobi' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'Opera Mini' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'IEMobile' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'Tablet' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'Phone' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'iPhone' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'iPod' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'iPad' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'webOS' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
N62 |
'wOS' |
SCAN |
AGENT |
|
|
|
— |
77 |
62 |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Nicht automatisch vervollständigen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'Safari' |
SCAN |
AGENT |
|
|
|
— |
77 |
63 |
|
|
|
C |
|
N63 |
'NetFront' |
SCAN |
AGENT |
|
|
|
— |
77 |
63 |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Breite nicht automatisch |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'iCab' |
SCAN |
AGENT |
|
|
|
— |
77 |
64 |
|
|
|
C |
|
N64 |
'MSIE' |
SCAN |
AGENT |
|
|
|
— |
77 |
64 |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Navigation trennen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'iCab 2.' |
SCAN |
AGENT |
|
|
|
— |
77 |
65 |
|
|
|
C |
|
N65 |
'iCab/2.' |
SCAN |
AGENT |
|
|
|
— |
77 |
65 |
|
|
|
C |
|
N65 |
'NetFront/' |
SCAN |
AGENT |
|
|
|
— |
77 |
65 |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Smartphone (Kleiner Bildschirm) |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'Mobile' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
66 |
'Android' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
N66 |
'NetFront/' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
N66 |
'Opera Mobi' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
N66 |
'Opera Mini' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
N66 |
'IEMobile' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
N66 |
'Phone' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
N66 |
'iPhone' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
N66 |
'iPod' |
SCAN |
AGENT |
|
|
|
— |
77 |
66 |
|
|
|
C |
|
|
'iPad' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
78 |
|
SETOFF |
|
|
|
|
— |
— |
66 |
|
|
|
C |
|
78 |
|
SETON |
|
|
|
|
— |
— |
66 |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Firefox Mobile |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
62 |
'Firefox' |
SCAN |
AGENT |
|
|
|
— |
77 |
67 |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text-Browser |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'Lynx' |
SCAN |
AGENT |
|
|
|
— |
77 |
68 |
|
|
|
C |
|
N68 |
'Links' |
SCAN |
AGENT |
|
|
|
— |
77 |
68 |
|
|
|
C |
|
N68 |
'ELinks' |
SCAN |
AGENT |
|
|
|
— |
77 |
68 |
|
|
|
C |
|
N68 |
'Terminal' |
SCAN |
AGENT |
|
|
|
— |
77 |
68 |
|
|
|
C |
|
|
*IN68 |
IFEQ |
*ON |
|
|
|
|
|
|
|
|
|
C |
|
|
'bot' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'Bot' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'BOT' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'crawl' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'Crawl' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'CRAWL' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'spider' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'Spider' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
N78 |
'SPIDER' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
78 |
|
SETOFF |
|
|
|
|
— |
— |
68 |
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Smartphone (Kleiner Bildschirm) |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
DEBUG |
IFEQ |
'6' |
|
|
|
|
|
|
|
|
|
C |
|
|
*IN66 |
COMP |
*OFF |
|
|
|
— |
— |
66 |
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Mobile |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
66 |
|
MOVEL(P) |
'X' |
MOBILE |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Schmal |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
N66 |
*BLANKS |
COMP |
SCHMAL |
|
|
|
66 |
66 |
— |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
*MAIN* |
EXSR |
BAR$MAIN |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
AGENTSPAM$ |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*OFF |
IFNE |
*OFF |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Werbung aus Agent löschen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'<a ' |
SCAN |
AGENT |
POS |
|
|
— |
77 |
78 |
|
|
|
C |
|
78 |
'</a>' |
SCAN |
AGENT:POS |
POS2 |
|
|
— |
77 |
78 |
|
|
|
C |
|
78 |
|
MOVEL(P) |
*ALL'*' |
SPAM$ |
|
|
|
|
|
|
|
|
C |
|
78 |
|
EVAL |
%SUBST(AGENT: POS) = |
|
|
C |
|
|
|
|
%SUBST(AGENT: POS2+4) |
|
|
C |
|
|
|
|
|
|
|
|
C |
|
78 |
' ' |
SCAN |
AGENT |
POS |
|
|
— |
77 |
78 |
|
|
|
C |
|
78 |
' (W' |
SCAN |
AGENT:POS |
POS2 |
|
|
— |
77 |
78 |
|
|
|
C |
|
78 |
|
MOVEL(P) |
*ALL'*' |
SPAM$ |
|
|
|
|
|
|
|
|
C |
|
78 |
|
EVAL |
%SUBST(AGENT: POS) = |
|
|
C |
|
|
|
|
%SUBST(AGENT: POS2) |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
*MAIN* |
EXSR |
BAR$MAIN |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
AGENTSPAM$123 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
'HEAD' |
IFEQ |
METHOD |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
SPAM-Agenten zusammenfassen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'MSIE' |
SCAN |
AGENT |
|
|
|
— |
77 |
78 |
|
|
|
C |
|
|
*IN78 |
IFEQ |
*ON |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
SPAM-Agenten zusammenfassen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL(P) |
AGENT |
SPAMDS |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
SPAM-Agenten zusammenfassen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
'MSIE' |
IFEQ |
SPAM4 |
|
|
|
|
|
|
|
|
|
C |
|
|
'0123456789' |
CHECK |
SPAM1 |
|
|
|
— |
— |
78 |
|
|
|
C |
|
N78 |
'0123456789' |
CHECK |
SPAM2 |
|
|
|
— |
— |
78 |
|
|
|
C |
|
N78 |
'0123456789' |
CHECK |
SPAM3A |
|
|
|
— |
— |
78 |
|
|
|
C |
|
|
*IN78 |
IFEQ |
*OFF |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
SPAM-Agenten zusammenfassen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL(P) |
SPAM1 |
SPAM$1 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
SPAM2 |
SPAM$2 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
SPAM3 |
SPAM$3 |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
SPAM-Agenten zusammenfassen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL(P) |
SPAMX |
SPAM1 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
SPAMX |
SPAM2 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
SPAMX |
SPAM3 |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
SPAM-Agenten zusammenfassen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL |
SPAMDS |
AGENT |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
SEITEBESUCHE |
EXSR |
BAR$SEITE |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
BESUCHERAG |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUFV = %TRIM(AGAGENT) |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Name des Besuchers ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
CALL |
'BESUCHER' |
BESUCHERPARMAG |
|
|
— |
77 |
— |
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
BESUCHERAG |
CALL |
BAR$AGENT |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
BESUCHERPARMAG |
PLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*ZERO |
POS |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*ZERO |
LEN |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*BLANKS |
ROBOT |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
|
BUFV |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*BLANKS |
BESUCHER |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*ON |
TEXTBROWSER |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
BESUCHERNAMEX |
EXSR |
BAR$AGENT |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
BESUCHERNAME |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Name des Besuchers ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
CALL |
'BESUCHER' |
BESUCHERPARM |
|
|
— |
77 |
— |
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
BESUCHERNAME |
CALL |
BAR$AGENT |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
BESUCHERPARM |
PLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*ZERO |
POS |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*ZERO |
LEN |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*BLANKS |
ROBOT |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
|
BUFV |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*BLANKS |
BESUCHER |
|
|
|
|
|
|
|
|
C |
|
|
|
PARM |
*IN68 |
TEXTBROWSER |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYSAGX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
ZEILEBESUCHE |
EXSR |
BAR$ZEILE |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
BESUCHERNAMEX |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Name des Besuchers ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
BESUCHERNAME |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Name des Besuchers ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFEQ |
BUFV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUFV = NONE |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Name des Besuchers ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*ZERO |
IFEQ |
POS |
|
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
OREQ |
LEN |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
BESUCHER |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Name des Besuchers ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUFV = |
|
|
C |
|
|
|
|
BUFV + ' | ' |
|
|
C |
|
|
1 |
ADD |
BUFVLEN |
POS |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Name des Besuchers ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUFV = |
|
|
C |
|
|
|
|
BUFV + %TRIMR |
( |
BESUCHER) |
|
|
C |
|
|
1 |
ADD |
BUFVLEN |
LEN |
|
|
|
|
|
|
|
|
C |
|
|
|
SUB |
POS |
LEN |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|