[Lua] Too long without yielding

  • Sonstige

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Manawyrm.

    [Lua] Too long without yielding

    Hallo,

    ich habe in Minecraft den Forestry Mod (Bienen) und ComputerCraft
    drauf und wollte ein Programm erstellen, dass die Bienenarten und
    die Anzahl der Bienen anzeigt und schreiben kann.

    Beim Schreiben bekomme ich den Fehler "Too long without yielding"

    Der Fehler befindet sich in der Zeile 64.

    "Code"

    Quellcode

    1. function explode(div,str)
    2. if(div=='') then return false end
    3. local pos,arr = 0,{}
    4. for st,sp in function() return string.find(str,div,pos,true) end do
    5. table.insert(arr,string.sub(str,pos,st-1))
    6. pos = sp + 1
    7. end
    8. table.insert(arr,string.sub(str,pos))
    9. return arr
    10. end
    12. function add(str,num)
    13. first = explode(",",str)[0]
    14. ersetzt = tonumber(first) + tonumber(num)
    15. added = string.gsub(str,first,ersetzt)
    16. return added
    17. end
    18. local beesfile
    19. function write(k,v)
    21. if v == nil then
    22. return false
    23. else
    24. beesfile.writeLine(v)
    25. return true
    26. end
    27. end
    29. while true do
    30. term.clear()
    31. term.setCursorPos(1,1)
    33. print("BeeOS 1.0")
    34. print("What do you want?")
    36. input = read()
    38. if input == "read" then
    39. if fs.exists("bees") == true then
    41. file = fs.open("bees","r")
    42. print(file.readAll)
    43. file.close()
    44. else
    45. print("File doesn't exist")
    46. print("Press enter to continue")
    47. leer = read()
    48. end
    49. end
    51. if input == "write" then
    52. print("How many bees?")
    53. count = tonumber(read())
    54. print("What color they have?")
    55. color = read()
    56. wfile = fs.open("bees","w")
    57. wfile.close()
    58. file = fs.open("bees","r")
    60. local beenden = true
    61. local speichern = {}
    63. while beenden == true do
    64. lesen = file.readLine()
    65. if lesen == nil then
    66. beenden = true
    67. else
    69. if string.find(lesen,color) == true then
    70. table.insert(speichern,add(lesen,count))
    71. else
    72. table.insert(speichern,lesen)
    73. end
    74. end
    75. end
    77. if fs.exists("bees") == true then
    78. fs.delete("bees")
    79. end
    80. beesfile = fs.open("bees","w")
    81. table.foreach(speichern,write)
    82. beesfile.close()
    84. print("Writed successfully!")
    85. print("Press enter to continue")
    86. leer = read()
    87. end
    89. if input == "delete" then
    90. fs.delete("bees")
    91. print("Deleted successfully!")
    92. print("Press enter to continue")
    93. leer = read()
    94. end
    95. end



    P.S.: Habe die Datei vorher nicht erstellt.

    Hoffe, jemand kann helfen.

    MFG

    Alex-Digital :D
    ~ Alex-Digital :D

    if(!Internet.VBP.Get<User>("Alex-Digital").IsOnline) this.Close(); :D

    Ohne mir das genauer angesehen zu haben sage ich, dass der Fehler in Zeile 66 liegt.
    Dort muss

    VB.NET-Quellcode

    1. beenden = false

    stehen.

    Ansonsten solltest du in den Code der While() Schleife nochmal ein sleep(0) hineinbauen, damit sich das Programm beim Watchdog meldet.

    Gruß,
    Manawyrm

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Manawyrm“ ()