Challenge in Rosetta Code

[CalmoSoft]

Hello Mahmoud et  All,

Let's list the tasks in alphabetical order that have not yet been solved in Ring in Rosetta Code.

Greetings,

Gal Zsolt

CalmoSoft

[CalmoSoft]

Hello Mahmoud et  All,

In Ring programming language.

Greetings,

Gal Zsolt

CalmoSoft

[CalmoSoft]

Hello Mahmoud et  All,

As long as all the tasks were on one page, the code looked like this:

# Project: Rosetta Code/Find unimplemented tasks
 
load "stdlib.ring"
ros= download("https://rosettacode.org/wiki/Category:Programming_Tasks")
lang = "Ring"
pos = 1
num = 0
totalros = 0
rosname = ""
rostitle = ""
see "Tasks not implemented in " + lang + " language:" + nl
for n = 1 to len(ros)
        nr = searchstring(ros,'<li><a href="/wiki/',pos)
        if nr = 0
           exit
        else
           pos = nr + 1    
        ok
        nr = searchname(nr)  
        nr = searchtitle(nr)
next
see nl
see "Total: " + totalros + " examples." + nl
 
func searchstring(str,substr,n)
       newstr=right(str,len(str)-n+1)
       nr = substr(newstr, substr)
       if nr = 0
          return 0
       else
          return n + nr -1
       ok
 
func searchname(sn)
       nr2 = searchstring(ros,'">',sn)
       nr3 = searchstring(ros,"</a></li>",sn)
       rosname = substr(ros,nr2+2,nr3-nr2-2)
       return sn
 
func searchtitle(sn)
        st = searchstring(ros,"title=",sn)
        rostitle = substr(ros,sn+19,st-sn-21)
        rostitle = "rosettacode.org/wiki/" + rostitle
        rostitle = download(rostitle)
        s = substr(rostitle,lang)
        if s = 0
           num = num + 1
           totalros = totalros + 1
           see "" + num + ". " + rosname + nl
        ok
        return sn

Since then, I can't solve it.

Greetings,

Gal Zsolt

CalmoSoft

[Bert Mariani]

Hello Calmo, Mahmoud

If you can add this App to Ring  Applications

Attached Code

Rosetta_FormDesigner-TaskController.ring   <<<< Execute This

Rosetta_FormDesigner-TaskView.ring

FormDesigner-Task.rform

Output to Command Window

   ListOfTasks-NoRing.txt           <<<<<  Extract from Command Window

===========================================

There are 3 Subdivisions in Command Window Output

Category:  Ring cOutput ================
1 RING Task: doors

Category:  C cOutput ================
1 C-Code Task: Language_Comparison_Table#C

===== Category:  Programming_Tasks =====
1 Task: --- doors
2 Task: NR: 100_prisoners   <<<< NR for No Ring 

============================

Example  - NR  No Ring

===== Category:Programming_Tasks =====
1 Task: --- doors
2 Task: NR: 100_prisoners
3 Task: --- 15_puzzle_game
4 Task: --- 15_puzzle_solver
5 Task: ---
6 Task: --- 21_game
7 Task: --- 24_game
8 Task: NR: 24_game/Solve
9 Task: NR: ngs_or_4-squares_puzzle
10 Task: NR: llion_names_of_God_the_integer
11 Task: NR: 99_bottles_of_beer
12 Task: --- B
13 Task: NR: Abbreviations,_automatic
14 Task: NR: Abbreviations,_easy
15 Task: NR: Abbreviations,_simple
16 Task: NR: ABC_correlation
17 Task: --- ABC_problem
18 Task: --- ABC_words
19 Task: NR: Abelian_sandpile_model
20 Task: NR: Abelian_sandpile_model/Identity

============================

Task - Click to Show C-Code

==============================

Task Ring - Click to Show Ring Code

=====================

Regards

Bert Mariani

[CalmoSoft]

Hello Bert,

Thanks very much for your useful help.

It is so elegant.

Greetings,

Gal Zsolt

CalmoSoft