File: test.rexx.html

package info (click to toggle)
kf6-syntax-highlighting 6.13.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 47,568 kB
  • sloc: xml: 197,750; cpp: 12,850; python: 3,023; sh: 955; perl: 546; ruby: 488; pascal: 393; javascript: 161; php: 150; jsp: 132; lisp: 131; haskell: 124; ada: 119; ansic: 107; makefile: 96; f90: 94; ml: 85; cobol: 81; yacc: 71; csh: 62; erlang: 54; sql: 51; java: 47; objc: 37; awk: 31; asm: 30; tcl: 29; fortran: 18; cs: 10
file content (59 lines) | stat: -rw-r--r-- 7,809 bytes parent folder | download 
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
 
<!DOCTYPE html>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
<title>test.rexx</title>
<meta name="generator" content="KF5::SyntaxHighlighting - Definition (REXX) - Theme (Breeze Light)"/>
</head><body style="background-color:#ffffff;color:#1f1c1b"><pre>
<span style="color:#898887">/* REXX */</span>                                                         
ASCB_PTR <span style="color:#0057ae">=</span> <span style="color:#644a9b">C2X</span><span style="color:#0057ae">(</span><span style="color:#644a9b">STORAGE</span><span style="color:#0057ae">(</span><span style="color:#644a9b">D2X</span><span style="color:#0057ae">(</span><span style="color:#644a9b">X2D</span><span style="color:#0057ae">(</span>"224"<span style="color:#0057ae">)),</span>4<span style="color:#0057ae">))</span>                         
<span style="font-weight:bold">SAY</span> <span style="color:#644a9b">X2B</span><span style="color:#0057ae">(</span>ASCB_PTR<span style="color:#0057ae">)</span>                                                  
<span style="color:#898887">/* COMMENTS */</span>                                                     
<span style="color:#898887">/******************************************************************</span>
<span style="color:#898887">   </span><span style="color:#0057ae;background-color:#e0e9f8">END</span><span style="color:#898887"> OF COMMENTS */</span>                                              
<span style="font-weight:bold">SAY</span> <span style="color:#bf0303">'ENTER YOUR NAME'</span>                                              
<span style="font-weight:bold">PULL</span> NAME                                                          
<span style="font-weight:bold">DO</span> <span style="font-weight:bold">WHILE</span> NAME \<span style="color:#0057ae">=</span> <span style="color:#bf0303">'QUIT'</span>                                            
   <span style="font-weight:bold">SAY</span> <span style="color:#bf0303">'HELLO THERE'</span> NAME                                          
   <span style="font-weight:bold">PULL</span> NAME                                                       
<span style="font-weight:bold">END</span>                                                                
X <span style="color:#0057ae">=</span> <span style="color:#644a9b">OUTTRAP</span><span style="color:#0057ae">(</span><span style="color:#bf0303">'LU.'</span><span style="color:#0057ae">)</span>                                                 
"LU"                                                               
X <span style="color:#0057ae">=</span> <span style="color:#644a9b">OUTTRAP</span><span style="color:#0057ae">(</span><span style="color:#bf0303">'OFF'</span><span style="color:#0057ae">)</span>                                                 
<span style="font-weight:bold">SAY</span> <span style="color:#bf0303">'THE NUMBER OF LINES:'</span> LU<span style="color:#0057ae">.</span>0                                    
<span style="font-weight:bold">DO</span> I <span style="color:#0057ae">=</span> 1 <span style="font-weight:bold">TO</span> LU<span style="color:#0057ae">.</span>0                                                   
  <span style="font-weight:bold">SAY</span> LU<span style="color:#0057ae">.</span>I <span style="color:#898887">/* SAYS THE OUTPUT FROM LU */</span>                           
<span style="font-weight:bold">END</span>                                                                
<span style="font-weight:bold">SAY</span> <span style="color:#bf0303">'GOOD-BYE.'</span>                                                    
<span style="font-weight:bold">IF</span> <span style="color:#644a9b">DATE</span><span style="color:#0057ae">(</span><span style="color:#bf0303">'D'</span><span style="color:#0057ae">)</span> \<span style="color:#0057ae">=</span> "13" <span style="font-weight:bold">THEN</span> <span style="font-weight:bold">DO</span>                                       
  Y <span style="color:#0057ae">=</span> <span style="color:#644a9b">TESTSELECT</span><span style="color:#0057ae">(</span>15<span style="color:#0057ae">,</span><span style="color:#bf0303">'RAD'</span><span style="color:#0057ae">)</span>                                         
  <span style="font-weight:bold">SAY</span> Y                                                            
  <span style="font-weight:bold">SAY</span> Y <span style="color:#0057ae">||</span> " <span style="color:#0057ae">&lt;--</span> TESTSELECT"               
<span style="font-weight:bold">END</span>                                        
<span style="font-weight:bold">EXIT</span> 1                                     
<span style="color:#898887">/* FUNCTIONS */</span>                            
<span style="color:#644a9b">TESTSELECT</span><span style="color:#0057ae">:</span> <span style="font-weight:bold">PROCEDURE</span> <span style="color:#898887">/* </span><span style="color:#81ca2d;background-color:#f7e6e6;font-weight:bold">TESTING</span><span style="color:#898887"> SELECT */</span> 
 <span style="font-weight:bold">PARSE</span> <span style="font-weight:bold">ARG</span> NUM CAR <span style="color:#0057ae">.</span>                       
 <span style="font-weight:bold">SELECT</span>                                    
   <span style="font-weight:bold">WHEN</span> NUM <span style="color:#0057ae">&lt;</span> 25 <span style="font-weight:bold">THEN</span>                      
     STATUS <span style="color:#0057ae">=</span> "25<span style="color:#0057ae">%</span>"                        
   <span style="font-weight:bold">WHEN</span> NUM <span style="color:#0057ae">&lt;</span> 50 <span style="font-weight:bold">THEN</span>                      
     <span style="font-weight:bold">DO</span>                                    
       <span style="font-weight:bold">IF</span> CAR <span style="color:#0057ae">=</span> <span style="color:#bf0303">'RAD'</span> <span style="font-weight:bold">THEN</span>                 
          STATUS <span style="color:#0057ae">=</span> <span style="color:#bf0303">'DOPE'</span>                  
       <span style="font-weight:bold">ELSE</span>                                
          STATUS <span style="color:#0057ae">=</span> <span style="color:#bf0303">'SICK'</span>                  
     <span style="font-weight:bold">END</span>                                   
   <span style="font-weight:bold">WHEN</span> NUM <span style="color:#0057ae">&lt;</span> 200 <span style="font-weight:bold">THEN</span> <span style="font-weight:bold">DO</span>                  
     <span style="font-weight:bold">NOP</span>                                   
   <span style="font-weight:bold">END</span>                                     
   <span style="font-weight:bold">WHEN</span> NUM <span style="color:#0057ae">&lt;</span> 75 <span style="font-weight:bold">THEN</span>                      
     STATUS <span style="color:#0057ae">=</span> <span style="color:#bf0303">'SEVENTY FIVE'</span>               
   <span style="font-weight:bold">OTHERWISE</span>                               
     <span style="font-weight:bold">IF</span> CAR <span style="color:#0057ae">=</span> <span style="color:#bf0303">'RAD'</span> <span style="font-weight:bold">THEN</span>                   
       STATUS <span style="color:#0057ae">=</span> <span style="color:#bf0303">'COOL'</span>
      STATUS <span style="color:#0057ae">=</span> <span style="color:#bf0303">'COOL'</span>   
    <span style="font-weight:bold">ELSE</span>                
      STATUS <span style="color:#0057ae">=</span> <span style="color:#bf0303">'RADICAL'</span>
<span style="font-weight:bold">END</span>                     
<span style="font-weight:bold">RETURN</span> STATUS           
</pre></body></html>