Comparar String

[marcioe]

Olá a Todos, 
A situação é a Seguinte

Imagina assim
Uma string              11|54|92|78|41|13|64|38|00|04|       preciso saber quais os numero não são  ou sejam diferentes de    11|78|64|04|
ou seja iria ler a primeira string e saber quais os numero não batem com a segunda string No caso o resultado seria   54|92|41|13|38|00| 

[Theotokos]

Tente com Hb_aToken()

aV1 := Hb_aToken("11|54|92|78|41|13|64|38|00|04|","|")

aV2 := Hb_aToken("11|78|64|04|","|")

Ai vc compara os dois Vetores aV1 , aV2

cResultado := ""

For n1 := 1 To len(aV1)

      if ASCAN(aV2,{|a| a = aV1[n1]) = 0

         cResultado += aV1[n1]+"|"

      Endif

Next n1

[sistem]

Function test()
Local cAchou:="", cNaoAchou:="", A1, B1, A2, B2, x1, z1, lOk

  A1 := "11|54|92|78|41|13|64|38|00|04|"
  B1 := "11|78|64|04|"

  For x1=1 to Len(A1)/3
     lOk := .f.
     A2 := Subs(A1,(x1*3)-2,2)
     For z1=1 to Len(B1)/3
        B2 := Subs(B1,(z1*3)-2,2)
        If A2 = B2
           cAchou = cAchou + B2+"|"
           lOk := .t.
        Endif
     Next
     If !lOk
        cNaoAchou = cNaoAchou + A2+"|"
     Endif
  Next

  ? cAchou
  ? cNaoAchou
Return nil

 

[marcioe]

resolvido amigos, obrigado.

[marcioe]

Aproveitando dos amigos,

 

Imaginem a string que vai de 00 a 99  e a segunda string 

00|01|02|03|04|05|06|07|a08|09|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|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99|
Preciso Saber a quantidade de vezes Agrupado por Numero  (exemplo 00 - > 10| vezes,       01| - > 03 veses

  36|44|16|81|12|03|50|67|85|40|01|03|07|26|20|88|64|35|24|12|13|14|95|43|47|07|77|76|40|16|10|12|14|18|30|81|51|15|21|01|99|67|60|43|40|15|45|12|70|16|02|04|11|16|31|24|08|12|10|12|00|58|05|30|14|35|45|44|73|03|24|30|43|79|06|25|34|03|14|38|00|83|17|30|70|40|12|07|71|42|92|09|47|78|14|44|07|04|02|20|03|08|36|31|55|50|60|46|02|07|00|03|09|33|55|12|91|24|69|83|05|23|51|14|50|03|00|83|79|48|00|03|08|14|17|23|48|50|83|51|03|12|27|39|45|48|58|66|72|96|07|11|16|18|40|42|51|73|88|52|03|16|17|20|33|36|46|63|68|94|50|66|33|17|56|12|03|81|00|46|28|14|47|94|03|22|98|10|19|25|02|07|10|13|16|32|36|37|54|58|09|12|68|19|58|59|32|14|00|30|34|16|50|39|14|00|19|55|90|13|03|19|27|87|93|96|21|07|13|22|03|23|34|42|46|50|52|56|82|12|48|12|02|86|82|01|20|99|07|34|38|00|12|67|96|36|00|61|03|08|07|99|14|15|84|08|11|45|29|41|03|09|12|15|29|33|48|52|58|72|53|35|11|97|40|12|14|25|30|09|03|57|11|48|49|17|74|12|23|18|09|17|14|20|80|32|48|58|38|07|25|16|42|17|00|09|83|99|26|14|93|78|64|03|59|55|16|35|71|67|14|19|69|61|00|96|07|85|36|56|69|73|09|03|50|54|49|64|59|79|24|32|38|03|51|66|33|20|96|77|55|88|12|95|46|67|08|23|75|13|00|54|55|33|43|58|75|25|26|12|69|73|34|54|50|03|09|00|19|51|12|15|28|30|38|46|50|24|84|86|11|16|81|05|13|11|69|25|15|83|10|20|36|45|16|21|27|08|11|29|16|21|32|48|50|62|68|70|11|20|69|49|90|76|89|88|71|12|62|27|47|58|12|90|37|88|96|19|70|69|00|21|43|68|16|97|20|55|71|90|79|03|04|44|79|35|83|71|19|56|00|03|08|09|19|27|33|44|53|73|17|20|37|44|97|04|57|63|87|14|00|22|33|44|66|66|16|16|41|57|06|10|20|15|30|12|04|19|60|70|08|14|22|28|32|44|56|68|71|83|03|05|15|22|37|48|61|71|79|99|46|49|93|58|69|04|55|16|52|18|00|02|07|19|79|81|09|11|09|35|04|07|19|24|32|55|65|39|46|60|03|15|23|34|37|43|54|65|73|86|49|67|33|28|12|65|04|25|02|44|31|08|12|52|74|96|55|60|72|80|03|10|19|33|39|56|15|64|72|78|33|26|56|94|85|56|74|20|42|07|72|92|03|97|40|01|88|51|10|06|06|10|99|00|03|79|13|32|49|47|03|09|10|13|19|24|41|46|50|73|07|17|27|37|47|57|67|77|87|97|25|32|42|40|50|07|27|84|61|64|00|03|09|17|21|32|50|54|59|79|08|17|07|55|64|88|22|75|11|09|81|79|95|59|32|12|24|55|49|05|29|44|49|98|12|09|64|90|69|21|61|50|55|66|98|00|03|43|56|83|14|55|71|89|28|05|66|36|44|98|04|08|16|20|36|45|68|80|88|99|06|14|27|30|40|45|54|15|65|72|13|16|18|21|23|28|44|46|68|88|19|18|03|29|10|05|13|41|09|32|03|00|05|69|83|00|79|50|76|33|07|27|38|44|00|00|99|69|31|73|10|12|20|21|24|25|33|89|50|65|24|48|43|35|33|39|70|12|36|67|09|14|20|24|36|40|57|83|60|96|21|01|12|04|19|63|05|27|35|93|79|02|93|12|50|40|21|97|32|63|17|11|81|12|05|50|20|70|00|99|05|07|09|10|19|20|39|51|59|79|66|88|33|19|17|77|99|02|22|07|03|02|33|00|17|19|37|38|94|95|88|14|98|05|86|39|32|36|50|49|03|21|32|44|57|63|62|31|13|24|03|03|50|83|00|37|79|23|51|48|69|20|14|29|99|75|10|09|32|36|05|14|23|43|48|50|69|79|83|00|03|10|19|50|24|27|36|65|70|99|18|39|49|73|98|44|35|13|16|63|03|23|45|54|00|55|29|31|25|52|07|09|13|25|40|55|65|77|00|98|50|45|00|19|09|69|03|39|76|24|16|21|50|61|61|73|73|86|62|51|51|50|62|99|05|14|06|19|73|59|49|69|18|44|00|20|90|66|12|17|14|19|34|72|51|77|81|97|93|87|03|13|33|34|52|57|62|66|83|99|05|13|16|18|22|33|44|58|72|98|97|94|66|69|44|45|09|33|07|31|17|37|71|54|08|51|20|54|12|00|66|40|71|96|12|36|52|10|84|91|03|11|20|34|40|55|60|64|75|94|14|20|72|61|97|82|36|86|17|43|23|54|43|95|16|99|79|69|19|18|02|12|13|19|38|49|55|68|76|91|19|36|16|37|44|57|62|77|81|99|03|11|17|25|31|49|69|82|73|95|01|02|12|19|37|38|49|18|48|00|74|33|00|48|51|96|18|24|07|09|69|00|03|50|85|33|43|08|44|21|33|25|28|29|98|00|14|83|13|33|03|03|17|31|54|51|58|79|85|97|06|18|20|44|50|66|43|78|94|14|23|57|76|28|19|56|07|22|87|69|73|79|40|55|98|03|23|25|86|93|43|87|66|09|37|28|06|02|14|10|04|16|22|41|20|36|31|66|27|45|00|03|24|44|50|49|51|69|79|96|12|23|40|64|67|20|56|97|06|26|02|03|10|11|52|20|50|23|26|56|00|98|33|19|05|65|40|69|45|14|98|44|64|71|12|88|73|37|19|85|02|16|36|29|51|73|59|32|69|41|73|94|45|89|55|60|02|07|98|51|04|01|02|12|19|37|38|49|18|48|87|99|24|03|56|82|43|00|92|45|64|34|42|12|54|63|37|27|72|67|63|24|45|55|85|20|18|08|03|37|36|11|07|44|99|00|77|65|88|67|75|26|79|14|32|15|83|18|84|02|03|32|33|45|59|63|73|83|84|00|12|24|36|44|54|66|70|82|89|92|01|06|08|15|18|19|24|44|50|70|09|19|29|39|49|59|69|79|89|99|77|35|27|83|41|21|22|23|24|20|00|70|69|99|36|08|01|19|47|72|08|13|10|24|33|50|59|84|97|99|01|08|19|20|36|47|65|70|99|00|04|08|11|23|32|72|56|97|99|51|79|80|90|35|05|08|06|24|71|19|05|11|22|35|31|51|98|18|55|63|05|22|26|62|68|94|33|90|99|00|48|60|33|56|29|13|17|71|86|86|23|56|30|44|47|17|20|76|89|84|95|57|93|97|53|73|37|35|39|59|08|86|27|80|93|54|09|40|15|57|78|19|34|37|66|27|18|05|09|93|00|19|34|24|44|93|69|77|37|54|10|20|18|36|40|70|80|90|50|60|29|34|37|42|43|51|53|65|72|93|30|10|17|28|84|02|24|42|40|94|01|10|19|20|40|60|45|65|75|91|39|40|44|19|00|99|87|34|56|55|33|13|84|24|97|32|59|04|19|28|63|57|11|15|64|25|26|76|98|28|47|11|19|13|60|84|06|73|27|36|00|33|59|91|92|01|02|50|20|21|02|25|45|74|76|52|61|85|54|35|01|09|19|18|23|24|35|45|70|87|06|09|10|28|58|67|69|00|20|42|34|47|96|59|08|42|50|76|43|79|06|09|13|30|47|23|58|43|60|04|02|19|25|33|46|56|72|77|88|96|38|40|35|34|18|32|68|41|52|86|44|17|22|30|52|69|88|90|96|70|93|34|85|87|17|19|51|77|97|81|69|72|86|71|73|36|21|33|74|32|02|10|19|20|31|36|47|87|99|70|04|09|11|19|23|27|38|58|72|84|01|10|18|19|23|29|35|45|70|99|15|25|42|61|10|17|27|00|19|50|13|55|59|62|67|78|85|23|27|00|22|33|59|68|20|56|34|21|95|09|22|45|00|54|71|60|50|80|70|90|32|34|37|62|64|54|77|78|00|92|72|76|86|87|90|64|67|06|19|24|86|78|63|98|52|38|89|76|96|54|10|21|98|28|02|77|64|42|26|30|09|10|18|77|88|67|29|65|33|99|09|17|19|23|33|45|49|69|75|65|01|09|19|36|45|50|64|70|87|99|69|99|29|22|79|50|66|00|20|05|04|06|19|24|26|32|45|52|70|73|11|27|29|26|94|06|67|84|06|57|75|85|78|92|25|62|58|53|23|46|17|36|23|60|73|37|85|27|35|30|19|20|21|22|26|27|29|30|33|34|78|99|59|76|15|00|21|06|10|67|00|97|72|68|11|40|50|81|25|36|11|40|90|68|00|33|25|73|02|35|00|51|71|36|27|37|44|56|23|97|09|19|53|59|38|66|00|79|52|90|79|53|27|00|84|15|19|66|10|42|54|48|68|78|69|79|89|90|39|08|08|15|26|41|73|99|98|31|32|55|02|05|08|11|27|29|33|68|72|72|00|33|44|55|66|88|77|89|34|67|31|49|95|43|10|34|68|18|86|45|46|24|21|77|99|79|80|61|88|01|20|00|74|68|31|13|01|92|20|34|99|00|69|79|64|04|19|33|70|55|02|05|19|20|21|69|56|59|74|63|55|72|45|69|95|98|52|20|58|22|30|00|10|15|18|59|17|49|73|55|08|01|19|66|77|44|22|23|33|88|58|52|45|19|41|36|10|72|09|89|09|17|28|39|45|57|64|68|85|92|13|93|62|38|11|46|70|51|69|66|63|35|11|27|36|56|48|43|30|18|54|36|54|73|42|73|80|94|17|56|42|33|15|72|36|19|64|23|45|22|19|20|23|32|50|55|54|81|82|99|36|72|09|69|47|21|02|11|51|25|89|24|79|23|39|34|22|06|37|47|01|45|44|19|98|86|99|73|09|08|57|75|17|85|59|15|79|87|56|58|06|11|19|21|36|54|59|63|80|81|95|97|29|32|70|38|40|50|83|52|00|61|75|28|04|30|51|19|33|39|42|58|34|28|25|19|60|11|09|00|09|04|13|21|56|10|79|26|58|32|40|36|06|46|91|96|71|74|93|97|22|32|45|54|58|52|51|77|37|20|18|94|31|11|09|30|70|90|00|59|19|33|00|25|74|42|24|83|15|54|27|34|13|25|43|96|79|65|51|05|95|50|86|39|89|36|58|79|32|85|10|30|50|33|60|71|98|18|79|80|81|93|94|37|89|44|53|31|61|36|02|08|17|18|13|21|29|36|47|63|08|23|10|11|96|69|26|21|47|80|54|31|51|33|22|27|61|56|77|71|13|74|27|01|18|80|79|99|43|24|56|86|49|54|64|20|90|17|59|44|44|68|60|43|63|23|13|88|08|30|54|76|62|42|00|45|72|05|57|56|11|24|27|90|00|59|68|19|05|59|65|44|54|49|33|86|75|64|37|57|38|79|42|19|27|76|67|72|24|83|00|79|76|33|95|50|37|19|76|59|52|72|09|42|91|35|19|88|69|13|01|20|33|36|54|60|09|58|77|19|32|02|56|59|78|39|32|79|06|37|32|02|56|59|96|86|38|37|15|34|02|06|09|11|23|52|61|65|66|72|08|20|23|25|31|45|50|60|70|00|00|06|36|40|32|52|84|56|48|90|02|10|15|39|46|50|66|83|96|98|02|09|19|20|32|49|29|79|59|22|05|17|21|29|35|42|45|59|64|68|45|93|69|94|50|60|86|19|21|25|

Preciso que o resultado, seja um array mais ou menos assim
Dezena     Qtde de Vezes
00              10
01              04
02              01
03              50

 

 

Agradeço mais uma vez

 

[sistem]

Function test()
Local A1, A2, B1, B2, x1, z1, aVetor:=array(200)

  A1 := "00|01|02|03|04|05|06|07|08|09|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|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99|"
  B1 := "36|44|16|81|12|03|50|67|85|40|01|03|07|26|20|88|64|35|24|12|13|14|95|43|47|07|77|76|40|16|10|12|14|18|30|81|51|15|21|01|99|67|60|43|40|15|45|12|70|16|02|04|11|16|31|24|08|12|10|12|00|58|05|30|14|35|45|44|73|03|24|30|43|79|06|25|34|03|14|38|00|83|17|30|70|40|12|07|71|42|92|09|47|78|14|44|07|04|02|20|03|08|36|31|55|50|60|46|02|07|00|03|09|33|55|12|91|24|69|83|05|23|51|14|50|03|00|83|79|48|00|03|08|14|17|23|48|50|83|51|03|12|27|39|45|48|58|66|72|96|07|11|16|18|40|42|51|73|88|52|03|16|17|20|33|36|46|63|68|94|50|66|33|17|56|12|03|81|00|46|28|14|47|94|03|22|98|10|19|25|02|07|10|13|16|32|36|37|54|58|09|12|68|19|58|59|32|14|00|30|34|16|50|39|14|00|19|55|90|13|03|19|27|87|93|96|21|07|13|22|03|23|34|42|46|50|52|56|82|12|48|12|02|86|82|01|20|99|07|34|38|00|12|67|96|36|00|61|03|08|07|99|14|15|84|08|11|45|29|41|03|09|12|15|29|33|48|52|58|72|53|35|11|97|40|12|14|25|30|09|03|57|11|48|49|17|74|12|23|18|09|17|14|20|80|32|48|58|38|07|25|16|42|17|00|09|83|99|26|14|93|78|64|03|59|55|16|35|71|67|14|19|69|61|00|96|07|85|36|56|69|73|09|03|50|54|49|64|59|79|24|32|38|03|51|66|33|20|96|77|55|88|12|95|46|67|08|23|75|13|00|54|55|33|43|58|75|25|26|12|69|73|34|54|50|03|09|00|19|51|12|15|28|30|38|46|50|24|84|86|11|16|81|05|13|11|69|25|15|83|10|20|36|45|16|21|27|08|11|29|16|21|32|48|50|62|68|70|11|20|69|49|90|76|89|88|71|12|62|27|47|58|12|90|37|88|96|19|70|69|00|21|43|68|16|97|20|55|71|90|79|03|04|44|79|35|83|71|19|56|00|03|08|09|19|27|33|44|53|73|17|20|37|44|97|04|57|63|87|14|00|22|33|44|66|66|16|16|41|57|06|10|20|15|30|12|04|19|60|70|08|14|22|28|32|44|56|68|71|83|03|05|15|22|37|48|61|71|79|99|46|49|93|58|69|04|55|16|52|18|00|02|07|19|79|81|09|11|09|35|04|07|19|24|32|55|65|39|46|60|03|15|23|34|37|43|54|65|73|86|49|67|33|28|12|65|04|25|02|44|31|08|12|52|74|96|55|60|72|80|03|10|19|33|39|56|15|64|72|78|33|26|56|94|85|56|74|20|42|07|72|92|03|97|40|01|88|51|10|06|06|10|99|00|03|79|13|32|49|47|03|09|10|13|19|24|41|46|50|73|07|17|27|37|47|57|67|77|87|97|25|32|42|40|50|07|27|84|61|64|00|03|09|17|21|32|50|54|59|79|08|17|07|55|64|88|22|75|11|09|81|79|95|59|32|12|24|55|49|05|29|44|49|98|12|09|64|90|69|21|61|50|55|66|98|00|03|43|56|83|14|55|71|89|28|05|66|36|44|98|04|08|16|20|36|45|68|80|88|99|06|14|27|30|40|45|54|15|65|72|13|16|18|21|23|28|44|46|68|88|19|18|03|29|10|05|13|41|09|32|03|00|05|69|83|00|79|50|76|33|07|27|38|44|00|00|99|69|31|73|10|12|20|21|24|25|33|89|50|65|24|48|43|35|33|39|70|12|36|67|09|14|20|24|36|40|57|83|60|96|21|01|12|04|19|63|05|27|35|93|79|02|93|12|50|40|21|97|32|63|17|11|81|12|05|50|20|70|00|99|05|07|09|10|19|20|39|51|59|79|66|88|33|19|17|77|99|02|22|07|03|02|33|00|17|19|37|38|94|95|88|14|98|05|86|39|32|36|50|49|03|21|32|44|57|63|62|31|13|24|03|03|50|83|00|37|79|23|51|48|69|20|14|29|99|75|10|09|32|36|05|14|23|43|48|50|69|79|83|00|03|10|19|50|24|27|36|65|70|99|18|39|49|73|98|44|35|13|16|63|03|23|45|54|00|55|29|31|25|52|07|09|13|25|40|55|65|77|00|98|50|45|00|19|09|69|03|39|76|24|16|21|50|61|61|73|73|86|62|51|51|50|62|99|05|14|06|19|73|59|49|69|18|44|00|20|90|66|12|17|14|19|34|72|51|77|81|97|93|87|03|13|33|34|52|57|62|66|83|99|05|13|16|18|22|33|44|58|72|98|97|94|66|69|44|45|09|33|07|31|17|37|71|54|08|51|20|54|12|00|66|40|71|96|12|36|52|10|84|91|03|11|20|34|40|55|60|64|75|94|14|20|72|61|97|82|36|86|17|43|23|54|43|95|16|99|79|69|19|18|02|12|13|19|38|49|55|68|76|91|19|36|16|37|44|57|62|77|81|99|03|11|17|25|31|49|69|82|73|95|01|02|12|19|37|38|49|18|48|00|74|33|00|48|51|96|18|24|07|09|69|00|03|50|85|33|43|08|44|21|33|25|28|29|98|00|14|83|13|33|03|03|17|31|54|51|58|79|85|97|06|18|20|44|50|66|43|78|94|14|23|57|76|28|19|56|07|22|87|69|73|79|40|55|98|03|23|25|86|93|43|87|66|09|37|28|06|02|14|10|04|16|22|41|20|36|31|66|27|45|00|03|24|44|50|49|51|69|79|96|12|23|40|64|67|20|56|97|06|26|02|03|10|11|52|20|50|23|26|56|00|98|33|19|05|65|40|69|45|14|98|44|64|71|12|88|73|37|19|85|02|16|36|29|51|73|59|32|69|41|73|94|45|89|55|60|02|07|98|51|04|01|02|12|19|37|38|49|18|48|87|99|24|03|56|82|43|00|92|45|64|34|42|12|54|63|37|27|72|67|63|24|45|55|85|20|18|08|03|37|36|11|07|44|99|00|77|65|88|67|75|26|79|14|32|15|83|18|84|02|03|32|33|45|59|63|73|83|84|00|12|24|36|44|54|66|70|82|89|92|01|06|08|15|18|19|24|44|50|70|09|19|29|39|49|59|69|79|89|99|77|35|27|83|41|21|22|23|24|20|00|70|69|99|36|08|01|19|47|72|08|13|10|24|33|50|59|84|97|99|01|08|19|20|36|47|65|70|99|00|04|08|11|23|32|72|56|97|99|51|79|80|90|35|05|08|06|24|71|19|05|11|22|35|31|51|98|18|55|63|05|22|26|62|68|94|33|90|99|00|48|60|33|56|29|13|17|71|86|86|23|56|30|44|47|17|20|76|89|84|95|57|93|97|53|73|37|35|39|59|08|86|27|80|93|54|09|40|15|57|78|19|34|37|66|27|18|05|09|93|00|19|34|24|44|93|69|77|37|54|10|20|18|36|40|70|80|90|50|60|29|34|37|42|43|51|53|65|72|93|30|10|17|28|84|02|24|42|40|94|01|10|19|20|40|60|45|65|75|91|39|40|44|19|00|99|87|34|56|55|33|13|84|24|97|32|59|04|19|28|63|57|11|15|64|25|26|76|98|28|47|11|19|13|60|84|06|73|27|36|00|33|59|91|92|01|02|50|20|21|02|25|45|74|76|52|61|85|54|35|01|09|19|18|23|24|35|45|70|87|06|09|10|28|58|67|69|00|20|42|34|47|96|59|08|42|50|76|43|79|06|09|13|30|47|23|58|43|60|04|02|19|25|33|46|56|72|77|88|96|38|40|35|34|18|32|68|41|52|86|44|17|22|30|52|69|88|90|96|70|93|34|85|87|17|19|51|77|97|81|69|72|86|71|73|36|21|33|74|32|02|10|19|20|31|36|47|87|99|70|04|09|11|19|23|27|38|58|72|84|01|10|18|19|23|29|35|45|70|99|15|25|42|61|10|17|27|00|19|50|13|55|59|62|67|78|85|23|27|00|22|33|59|68|20|56|34|21|95|09|22|45|00|54|71|60|50|80|70|90|32|34|37|62|64|54|77|78|00|92|72|76|86|87|90|64|67|06|19|24|86|78|63|98|52|38|89|76|96|54|10|21|98|28|02|77|64|42|26|30|09|10|18|77|88|67|29|65|33|99|09|17|19|23|33|45|49|69|75|65|01|09|19|36|45|50|64|70|87|99|69|99|29|22|79|50|66|00|20|05|04|06|19|24|26|32|45|52|70|73|11|27|29|26|94|06|67|84|06|57|75|85|78|92|25|62|58|53|23|46|17|36|23|60|73|37|85|27|35|30|19|20|21|22|26|27|29|30|33|34|78|99|59|76|15|00|21|06|10|67|00|97|72|68|11|40|50|81|25|36|11|40|90|68|00|33|25|73|02|35|00|51|71|36|27|37|44|56|23|97|09|19|53|59|38|66|00|79|52|90|79|53|27|00|84|15|19|66|10|42|54|48|68|78|69|79|89|90|39|08|08|15|26|41|73|99|98|31|32|55|02|05|08|11|27|29|33|68|72|72|00|33|44|55|66|88|77|89|34|67|31|49|95|43|10|34|68|18|86|45|46|24|21|77|99|79|80|61|88|01|20|00|74|68|31|13|01|92|20|34|99|00|69|79|64|04|19|33|70|55|02|05|19|20|21|69|56|59|74|63|55|72|45|69|95|98|52|20|58|22|30|00|10|15|18|59|17|49|73|55|08|01|19|66|77|44|22|23|33|88|58|52|45|19|41|36|10|72|09|89|09|17|28|39|45|57|64|68|85|92|13|93|62|38|11|46|70|51|69|66|63|35|11|27|36|56|48|43|30|18|54|36|54|73|42|73|80|94|17|56|42|33|15|72|36|19|64|23|45|22|19|20|23|32|50|55|54|81|82|99|36|72|09|69|47|21|02|11|51|25|89|24|79|23|39|34|22|06|37|47|01|45|44|19|98|86|99|73|09|08|57|75|17|85|59|15|79|87|56|58|06|11|19|21|36|54|59|63|80|81|95|97|29|32|70|38|40|50|83|52|00|61|75|28|04|30|51|19|33|39|42|58|34|28|25|19|60|11|09|00|09|04|13|21|56|10|79|26|58|32|40|36|06|46|91|96|71|74|93|97|22|32|45|54|58|52|51|77|37|20|18|94|31|11|09|30|70|90|00|59|19|33|00|25|74|42|24|83|15|54|27|34|13|25|43|96|79|65|51|05|95|50|86|39|89|36|58|79|32|85|10|30|50|33|60|71|98|18|79|80|81|93|94|37|89|44|53|31|61|36|02|08|17|18|13|21|29|36|47|63|08|23|10|11|96|69|26|21|47|80|54|31|51|33|22|27|61|56|77|71|13|74|27|01|18|80|79|99|43|24|56|86|49|54|64|20|90|17|59|44|44|68|60|43|63|23|13|88|08|30|54|76|62|42|00|45|72|05|57|56|11|24|27|90|00|59|68|19|05|59|65|44|54|49|33|86|75|64|37|57|38|79|42|19|27|76|67|72|24|83|00|79|76|33|95|50|37|19|76|59|52|72|09|42|91|35|19|88|69|13|01|20|33|36|54|60|09|58|77|19|32|02|56|59|78|39|32|79|06|37|32|02|56|59|96|86|38|37|15|34|02|06|09|11|23|52|61|65|66|72|08|20|23|25|31|45|50|60|70|00|00|06|36|40|32|52|84|56|48|90|02|10|15|39|46|50|66|83|96|98|02|09|19|20|32|49|29|79|59|22|05|17|21|29|35|42|45|59|64|68|45|93|69|94|50|60|86|19|21|25|"

  For x1=1 to Len(A1)/3
     A2 := Subs(A1,(x1*3)-2,2)
     aVetor[Val("1"+A2)]=0
     For z1=1 to Len(B1)/3
        B2 := Subs(B1,(z1*3)-2,2)
        If A2 = B2
           aVetor[Val("1"+A2)]++
        Endif
     Next
  Next

  For x1=1 to Len(A1)/3
      A2 := Subs(A1,(x1*3)-2,2)
      If aVetor[Val("1"+A2)] > 0
         ? A2+" = "+str(aVetor[Val("1"+A2)])+" vezes"
      Endif
  Next

Return nil

é para contar quantos do conjunto A1 esta contido no conjunto B1 (agrupando)?

uma curiosidade para que o amigo usa isto?

[marcioe]

Nesse caso é um sistema de conferencia de Bolão.