Subversion Repositories pentevo

Rev

Blame | Last modification | View Log | Download | RSS feed | ?url?

  1. ConstBUF32 equ 65.12
  2. ConstFL900 equ 33.52
  3. ConstMIC51 equ 359.52
  4.  
  5.  
  6.         read    "BUF32, Pass1 [sec]: ", buf32_1
  7.         read    "FL900, Pass1 [sec]: ", fl900_1
  8.         read    "MIC51, Pass1 [sec]: ", mic51_1
  9.         read    "BUF32, Pass2 [sec]: ", buf32_2
  10.         read    "FL900, Pass2 [sec]: ", fl900_2
  11.         read    "MIC51, Pass2 [sec]: ", mic51_2
  12.         read    "BUF32, Pass3 [sec]: ", buf32_3
  13.         read    "FL900, Pass3 [sec]: ", fl900_3
  14.         read    "MIC51, Pass3 [sec]: ", mic51_3
  15.  
  16. buf32   equ     (buf32_1+buf32_2+buf32_3)/3.0
  17.         message "--> BUF32= \{BUF32}"
  18. fl900   equ     (fl900_1+fl900_2+fl900_3)/3.0
  19.         message "--> Fl900= \{FL900}"
  20. mic51   equ     (mic51_1+mic51_2+mic51_3)/3.0
  21.         message "--> MIC51= \{MIC51}"
  22.  
  23. marks   equ     ((ConstBUF32/buf32)+(ConstFL900/fl900)+(ConstMIC51/mic51))/3
  24.         message "--> Marks= \{MARKS}"
  25.  
  26.         read    "Clk [MHz]: ", ClkFreq
  27. rel     equ     marks/ClkFreq
  28.         message "Rel=\{REL}"
  29.  
  30.