202 lines
15 KiB
Plaintext
202 lines
15 KiB
Plaintext
|
<EFBFBD><EFBFBD>{ {
|
|||
|
|
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %%
|
|||
|
|
% A u t o r : I n g o K r i p a h l e %
|
|||
|
|
% C o p y r i g h t ( c ) 2 0 1 0 I n g o K r i p a h l e %
|
|||
|
|
% S e e e n d o f f i l e f o r t e r m s o f u s e . %
|
|||
|
|
% D i e N u t z u n g s b e d i n g u n g e n b e f i n d e n s i c h a m E n d e d e r D a t e i %
|
|||
|
|
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %%
|
|||
|
|
|
|||
|
|
I n f o r m a t i o n e n : h i v e - p r o j e c t . d e
|
|||
|
|
K o n t a k t : d r o h n e 2 3 5 @ g o o g l e m a i l . c o m
|
|||
|
|
S y s t e m : T r i O S
|
|||
|
|
N a m e : c o p y
|
|||
|
|
C h i p : R e g n a t i x
|
|||
|
|
T y p : P r o g r a m m
|
|||
|
|
V e r s i o n : 0 0
|
|||
|
|
S u b v e r s i o n : 0 1
|
|||
|
|
|
|||
|
|
F u n k t i o n : E x t e r n e s K o m m a n d o " c o p y " . D i e D a t e i w i r d d a b e i i n d e n e R A M e i n g e l e s e n
|
|||
|
|
u n d w i e d e r m i t n e u e m N a m e n g e s c h r i e b e n . E i n f a c h e V e r s i o n : k e i n e S p e i c h e r v e r w a l t u n g ,
|
|||
|
|
e s k <00> n n e n n u r D a t e i e n k o p i e r t w e r d e n , d i e i n d e n v e r f <00> g b a r e n e R A M p a s s e n .
|
|||
|
|
|
|||
|
|
L o g b u c h :
|
|||
|
|
|
|||
|
|
1 3 - 0 3 - 2 0 0 9 - d r 2 3 5 - e r s t e v e r s i o n
|
|||
|
|
2 2 - 0 3 - 2 0 1 0 - d r 2 3 5 - a n p a s s u n g t r i o s
|
|||
|
|
|
|||
|
|
K o m m a n d o l i s t e :
|
|||
|
|
|
|||
|
|
c o p y < q u e l l e > d a t e i - - - > e R A M
|
|||
|
|
c o p y < q u e l l e > < z i e l > d a t e i - - - > d a t e i
|
|||
|
|
c o p y < q u e l l e > < z i e l > < p a r a m e t e r > d a t e i - - - > d a t e i , p a r a m e t e r m o m e n t a n u n b e n u t z t
|
|||
|
|
|
|||
|
|
} }
|
|||
|
|
|
|||
|
|
O B J
|
|||
|
|
i o s : " i o s "
|
|||
|
|
|
|||
|
|
C O N
|
|||
|
|
|
|||
|
|
_ C L K M O D E = X T A L 1 + P L L 1 6 X
|
|||
|
|
_ X I N F R E Q = 5 _ 0 0 0 _ 0 0 0
|
|||
|
|
|
|||
|
|
P A R A L E N = 3 2
|
|||
|
|
|
|||
|
|
V A R
|
|||
|
|
|
|||
|
|
b y t e p a r a s t r 1 [ P A R A L E N ]
|
|||
|
|
b y t e p a r a s t r 2 [ P A R A L E N ]
|
|||
|
|
b y t e p a r a s t r 3 [ P A R A L E N ]
|
|||
|
|
|
|||
|
|
b y t e m o d u s
|
|||
|
|
l o n g d l e n ' d a t e i l <00> n g e
|
|||
|
|
l o n g c o u n t ' p o s i t i o n s z <00> h l e r
|
|||
|
|
|
|||
|
|
P U B m a i n 2 | i , n
|
|||
|
|
' m o d u s 0 k e i n e a k t i o n
|
|||
|
|
' 1 v o n d a t e i n a c h e r a m
|
|||
|
|
' 2 v o n d a t e i n a c h d a t e i
|
|||
|
|
|
|||
|
|
i o s . s t a r t
|
|||
|
|
|
|||
|
|
m o d u s : = 0 ' k o p i e r m o d u s
|
|||
|
|
i o s . p a r a s t a r t
|
|||
|
|
p a r a s t r 1 [ 0 ] : = 0
|
|||
|
|
p a r a s t r 2 [ 0 ] : = 0
|
|||
|
|
p a r a s t r 3 [ 0 ] : = 0
|
|||
|
|
r d p a r a 1
|
|||
|
|
i f m o d u s > 0 ' d a t e i - - > e r a m
|
|||
|
|
r d f i l e
|
|||
|
|
i f m o d u s = = 2 ' e r a m - - > d a t e i
|
|||
|
|
w r f i l e
|
|||
|
|
i o s . p a r a d e l
|
|||
|
|
i o s . s t o p
|
|||
|
|
|
|||
|
|
P U B r d f i l e | s t a t u s , l e n , i , c h a r , c u r p o s
|
|||
|
|
|
|||
|
|
d l e n : = 0 ' d a t e i l <00> n g e a u f 0 s e t z e n
|
|||
|
|
l e n : = i o s # S Y S V A R ' m a x i m a l e d a t e i g r <00> <00> e
|
|||
|
|
s t a t u s : = i o s . s d o p e n ( " r " , @ p a r a s t r 1 ) ' d a t e i <00> f f n e n
|
|||
|
|
i f s t a t u s > 0 ' f e h l e r b e i m <00> f f n e n d e r d a t e i ?
|
|||
|
|
i o s . p r i n t ( @ e r r 2 )
|
|||
|
|
i o s . p r i n t d e c ( s t a t u s )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
i f s t a t u s = = 0
|
|||
|
|
i o s . p r i n t ( @ m s g 5 )
|
|||
|
|
c u r p o s : = i o s . c u r g e t x ' c u r s o r p o s i t i o n x m e r k e n
|
|||
|
|
r e p e a t i f r o m 0 t o l e n
|
|||
|
|
c h a r : = i o s . s d g e t c
|
|||
|
|
i f i o s . s d e o f = = 1 ' e o f e r r e i c h t ?
|
|||
|
|
q u i t
|
|||
|
|
i o s . r a m _ w r i t e ( c h a r , i )
|
|||
|
|
d l e n + +
|
|||
|
|
i o s . c u r s e t x ( c u r p o s ) ' p o s i t i o n s e t z e n
|
|||
|
|
i o s . p r i n t d e c ( d l e n )
|
|||
|
|
i o s . p r i n t ( @ m s g 9 )
|
|||
|
|
i o s . s d c l o s e
|
|||
|
|
i o s . p r i n t ( @ m s g 8 )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
|
|||
|
|
P U B w r f i l e | c u r p o s , s t a t u s , i , c h a r
|
|||
|
|
|
|||
|
|
s t a t u s : = i o s . s d o p e n ( " r " , @ p a r a s t r 2 ) ' t e s t o b d a t e i v o r h a n d e n
|
|||
|
|
i o s . s d c l o s e ' d a t e i g l e i c h w i e d e r s c h l i e <00> e n
|
|||
|
|
i f s t a t u s = = 0 ' d a t e i i s t s c h o n v o r h a n d e n
|
|||
|
|
i o s . p r i n t ( @ m s g 7 )
|
|||
|
|
i f i o s . k e y w a i t < > " j "
|
|||
|
|
m o d u s : = 0
|
|||
|
|
i o s . p r i n t ( s t r i n g ( " n e i n " ) )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
e l s e
|
|||
|
|
m o d u s : = 2
|
|||
|
|
i o s . p r i n t ( s t r i n g ( " j a " ) )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
|
|||
|
|
i f m o d u s = = 2
|
|||
|
|
i o s . p r i n t ( @ m s g 6 )
|
|||
|
|
c u r p o s : = i o s . c u r g e t x ' c u r s o r p o s i t i o n x m e r k e n
|
|||
|
|
s t a t u s : = i o s . s d o p e n ( " w " , @ p a r a s t r 2 ) ' d a t e i <00> f f n e n
|
|||
|
|
i f s t a t u s > 0 ' f e h l e r b e i m <00> f f n e n d e r d a t e i ?
|
|||
|
|
i o s . p r i n t ( @ e r r 3 )
|
|||
|
|
i o s . p r i n t d e c ( s t a t u s )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
i f s t a t u s = = 0
|
|||
|
|
r e p e a t i f r o m 0 t o d l e n - 1
|
|||
|
|
c h a r : = i o s . r a m _ r e a d ( i )
|
|||
|
|
i o s . s d p u t c ( c h a r )
|
|||
|
|
i o s . c u r s e t x ( c u r p o s ) ' p o s i t i o n s e t z e n
|
|||
|
|
i o s . p r i n t d e c ( i + 1 )
|
|||
|
|
i o s . p r i n t ( @ m s g 9 )
|
|||
|
|
i o s . s d c l o s e
|
|||
|
|
i o s . p r i n t ( @ m s g 8 )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
P U B r d p a r a 1
|
|||
|
|
i f i o s . p a r a n e x t ( @ p a r a s t r 1 ) ' p a r a m e t e r q u e l l d a t e i e i n l e s e n
|
|||
|
|
i o s . p r i n t ( @ m s g 1 )
|
|||
|
|
i o s . p r i n t ( @ p a r a s t r 1 )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
r d p a r a 2
|
|||
|
|
r d p a r a 3
|
|||
|
|
e l s e
|
|||
|
|
i o s . p r i n t ( @ e r r 1 )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
r e t u r n
|
|||
|
|
|
|||
|
|
P U B r d p a r a 2
|
|||
|
|
i f i o s . p a r a n e x t ( @ p a r a s t r 2 ) ' p a r a m e t e r z i e l d a t e i e i n l e s e n
|
|||
|
|
i o s . p r i n t ( @ m s g 2 )
|
|||
|
|
i o s . p r i n t ( @ p a r a s t r 2 )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
m o d u s : = 2
|
|||
|
|
e l s e
|
|||
|
|
i o s . p r i n t ( @ m s g 4 )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
m o d u s : = 1
|
|||
|
|
|
|||
|
|
P U B r d p a r a 3
|
|||
|
|
i f i o s . p a r a n e x t ( @ p a r a s t r 3 ) ' p a r a m e t e r o p t i o n e n e i n l e s e n
|
|||
|
|
i o s . p r i n t ( @ m s g 3 )
|
|||
|
|
i o s . p r i n t ( @ p a r a s t r 3 )
|
|||
|
|
i o s . p r i n t n l
|
|||
|
|
|
|||
|
|
D A T
|
|||
|
|
|
|||
|
|
m s g 1 b y t e " Q u e l l d a t e i : " , 0
|
|||
|
|
m s g 2 b y t e " Z i e l d a t e i : " , 0
|
|||
|
|
m s g 3 b y t e " P a r a m e t e r : " , 0
|
|||
|
|
m s g 4 b y t e " K o p i e r m o d u s : S D - C a r d - - > e R A M " , 0
|
|||
|
|
m s g 5 b y t e " D a t e i e i n l e s e n : " , 0
|
|||
|
|
m s g 6 b y t e " D a t e i s c h r e i b e n : " , 0
|
|||
|
|
m s g 7 b y t e " V o r h a n d e n e D a t e i <00> b e r s c h r e i b e n ? < j / n > : " , 0
|
|||
|
|
m s g 8 b y t e " o k " , 0
|
|||
|
|
m s g 9 b y t e " B y t e s " , 0
|
|||
|
|
|
|||
|
|
e r r 1 b y t e " K e i n e Q u e l l d a t e i a n g e g e b e n ! " , 1 3 , 0
|
|||
|
|
e r r 2 b y t e " Q u e l l d a t e i k a n n n i c h t g e <00> f f n e t w e r d e n ! : " , 0
|
|||
|
|
e r r 3 b y t e " Z i e l d a t e i k a n n n i c h t g e <00> f f n e t w e r d e n ! : " , 0
|
|||
|
|
e r r 4 b y t e " D a t e i z u g r o <00> ! " , 0
|
|||
|
|
|
|||
|
|
D A T
|
|||
|
|
{ {
|
|||
|
|
|
|||
|
|
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %%
|
|||
|
|
% T E R M S O F U S E : M I T L i c e n s e %
|
|||
|
|
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %$%
|
|||
|
|
%P e r m i s s i o n i s h e r e b y g r a n t e d , f r e e o f c h a r g e , t o a n y p e r s o n o b t a i n i n g a c o p y o f t h i s s o f t w a r e a n d a s s o c i a t e d d o c u m e n t a t i o n %
|
|||
|
|
%f i l e s ( t h e " S o f t w a r e " ) , t o d e a l i n t h e S o f t w a r e w i t h o u t r e s t r i c t i o n , i n c l u d i n g w i t h o u t l i m i t a t i o n t h e r i g h t s t o u s e , c o p y , %
|
|||
|
|
%m o d i f y , m e r g e , p u b l i s h , d i s t r i b u t e , s u b l i c e n s e , a n d / o r s e l l c o p i e s o f t h e S o f t w a r e , a n d t o p e r m i t p e r s o n s t o w h o m t h e S o f t w a r e %
|
|||
|
|
%i s f u r n i s h e d t o d o s o , s u b j e c t t o t h e f o l l o w i n g c o n d i t i o n s : %
|
|||
|
|
% %
|
|||
|
|
%T h e a b o v e c o p y r i g h t n o t i c e a n d t h i s p e r m i s s i o n n o t i c e s h a l l b e i n c l u d e d i n a l l c o p i e s o r s u b s t a n t i a l p o r t i o n s o f t h e S o f t w a r e . %
|
|||
|
|
% %
|
|||
|
|
%T H E S O F T W A R E I S P R O V I D E D " A S I S " , W I T H O U T W A R R A N T Y O F A N Y K I N D , E X P R E S S O R I M P L I E D , I N C L U D I N G B U T N O T L I M I T E D T O T H E %
|
|||
|
|
%W A R R A N T I E S O F M E R C H A N T A B I L I T Y , F I T N E S S F O R A P A R T I C U L A R P U R P O S E A N D N O N I N F R I N G E M E N T . I N N O E V E N T S H A L L T H E A U T H O R S O R %
|
|||
|
|
%C O P Y R I G H T H O L D E R S B E L I A B L E F O R A N Y C L A I M , D A M A G E S O R O T H E R L I A B I L I T Y , W H E T H E R I N A N A C T I O N O F C O N T R A C T , T O R T O R O T H E R W I S E , %
|
|||
|
|
%A R I S I N G F R O M , O U T O F O R I N C O N N E C T I O N W I T H T H E S O F T W A R E O R T H E U S E O R O T H E R D E A L I N G S I N T H E S O F T W A R E . %
|
|||
|
|
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %%
|
|||
|
|
} }
|
|||
|
|
|
|||
|
|
|