home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 September / Chip_1999-09_cd.bin / ctenari / Trejbal / TRELL.PAK / SOURCE / ERSD.EXE / REVIZE.PAS < prev    next >
Pascal/Delphi Source File  |  1999-06-14  |  1KB  |  67 lines
  1. su,;lstaoerkvscia ,t,dsamo
  2.  
  3. uvs;ka,g,rhnz lizser,fdtys,sy,a ,ah:d,axab,xr,x
  4. , b;c btc ,x: aeta
  5. l ,;  kr: ,e  jgim,en,it
  6.   k;: ar  nac zh
  7.  
  8. Nb }Ae{  gUZi1KKn3SO U
  9. vsn;efo)rsc)t:\'.=lhdfltlsealerp'at',r\(Gc:vehcnt('E
  10. si=nff'es 'h(n)tto 
  11. gbine
  12.  
  13. e l;ral)ts\'\scl:iolcgnd'nv.,(etaar
  14. t r;\ae):sl'cslc'i\e,gknbnoab(p
  15.  
  16. t (;era)sea
  17. o  ;dfr) oed4raa  droil,t:na =(a1
  18. e (;sca)ola
  19.  
  20. = :;0j
  21. = :;0k
  22. o ro fddoo( trr)  a]1id0=:[
  23. g enib
  24. = ';]  1ii'=[f):d  kant rohn(te
  25. h t;e  1ni + f0jj ==:k
  26. n d;e
  27.  
  28. t (;era)sea
  29. t e;ir()rebbw
  30. e (oowtdfho (in)al )ae
  31. g enib
  32. ( a;n a)lr,dderaa
  33. : =;k 0
  34. ( i;' d)Vij'Afa0R n'In=,Ao:dBtkaI( rLrn,Nae'ïdhL =tOS' BY')M
  35. = 1nk  e ithf
  36. e gnb i
  37. d e;: l'= h'
  38. 0 ];[ )]d  kafd[rood(r ad hrrkl+o:ed =deo3:lt0=h 
  39. i s;c l)= od:h(edlhle
  40. n e;d 
  41. : s;= u''k
  42. [ 0;d ]]af)iro [(rddd oari ro:k+ =usojsut+:k 1=
  43. ( n;b l)bwes,rtuki
  44. n d;e
  45. e (;sca)ola
  46. e (;scb)olb
  47.  
  48. t (;erb)seb
  49. t e;ir()reaaw
  50. e (oowtdfho (in)bl )be
  51. g enib
  52. ( b;n b)lr,dderaa
  53. ( n;a l)awed,rtari
  54. n d;e
  55. e (;scb)olb
  56. e (;sca)ola
  57.  
  58. e (;seb)arb
  59.  
  60. e r;lat)ls\'\s:lniclug'dmn,.b(breb
  61. t e;ir()rebbw
  62. b (;bwn),rldhieelt
  63. e (;scb)olb
  64.  
  65. den;
  66. den.
  67.