was bedeutet diese Fehlermeldung bei computerCraft?

Bild zum Beitrag

ich habe versucht mir meinen Reaktor mit einem einfachen Code zu automatisieren. Jedoch taucht jedes mal eine Fehlermeldung auf (siehe Bild).

kann mir da jemand helfen oder mir den Code anpassen, dass es passt?

code:

reactor = peripheral.wrap("left")

if capacity < 10000 then

reactor-setActive(true)

elseif capacity > 900000 then

reactor.setActive(false)

end

sleep(5.0)

1 Antwort

BeamerBen

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

programmieren

22.08.2024, 18:54

lt wird für "less then" stehen, also dem < operator.

Daraus resultiert, du vergleichst nil (kein Wert) mit einer number.

In deinem Code gibt es "if capacity < 10000 then".

Es liegt also nahe, dass die Fehlermeldung daher kommt, dass "capacity" keinen Wert hat.

Ich denke du meinst vielleicht so etwas wie reactor.capacity, oder brauchst eine Zeile wie capacity = reactor.getCapacity()

Ich habe lange kein Lua gemacht, daher nur Vermutungen, ich hoffe es hilft dir trotzdem :)

Woher ich das weiß:Berufserfahrung – Software Entwickler / Devops

Iuhjh

Beitragsersteller

22.08.2024, 19:59

ich habe die Zeile mal hinzugefügt. der Fehlercode ist aber immernoch der gleiche :(

BeamerBen

23.08.2024, 13:41

@Iuhjh

Du musst dir die API von dem Mod anschauen welche Methode du genau brauchst.

Peripheral gibt dir ein „Objekt“ zurück.

Ähnliche Beiträge

Minecraft Draconic Evolution Reaktor mit Computercraft?

Hallo Leute,

ich have vor, mit Computercraft, eine automatische Steuerung für meinen Draconic Evolution Reaktor zu programmieren. Mein Problem ist jedoch ich finde nirgendwo die Befehle zum anfordern der Stats vom Reactor. Weiß die vllt jemand oder kann mir genau sagen wo ich die finden kann?

Danke im Voraus,

DasesColles

PS: Bevor irgendjemand schreibt, dass ich die Finger davon lassen soll sag ich das hier schon mal: "Ich habe genug Kenntnisse im Thema Programmieren mit Computercraft/LUA"

...zum Beitrag

UserForm durch CommandButton schließen

Hallo zusammen,

ich habe eine UserForm mit verschiedenen OptionButtos. Durch klicken auf einen CommandButton soll zum einen je nach ausgewähltem OptionButton eine neue UserForm geöffnet werden, dass ist kein Problem, und zum anderen die aktuelle UserForm geschloßen werden. Wie bekomme ich das hin?

Hier der Code, den ich bisher habe:

Private Sub CommandButton1_Click()

If OptionButton1 = True Then
    UserForm2.Show
ElseIf OptionButton2 = True Then
    UserForm3.Show
ElseIf OptionButton3 = True Then
    UserForm4.Show
ElseIf OptionButton4 = True Then
    UserForm5.Show
ElseIf OptionButton5 = True Then
    UserForm6.Show
ElseIf OptionButton6 = True Then
    UserForm7.Show
ElseIf OptionButton7 = True Then
    UserForm8.Show
ElseIf OptionButton8 = True Then
    UserForm9.Show
ElseIf OptionButton9 = True Then
    UserForm10.Show
ElseIf OptionButton10 = True Then
    UserForm11.Show
ElseIf OptionButton11 = True Then
    UserForm12.Show
End If

End Sub

...zum Beitrag

[lua] Fehlermeldung " '=' expected near [...] "; Woran liegts?

Ich habe ein Skript für eine ComputerCraft MiningTurtle geschrieben, welches beim Kompilieren sich immer an einer bestimmten Stelle aufhängt: " term.setCursorPos(1,1) "

    function Intro()
        term.clear
        term.setCursorPos(1,1)
        print("HelloWorld")
        [noch ein paar Strings]
        [...]
    end

Eine solche Situation hab ich zwei mal im ganzen Code. Als Fehlermeldung kommt dann das hier:

'=' expected near 'term'

Ich bin mittlerweile niedergeschlagen und finde den Fehler einfach nicht. Hier noch die APIs: http://www.computercraft.info/wiki/Category:APIs

...zum Beitrag

LUA - ComputerCraft Programm mit Variablen aufrufen

Hallo zusammen

Ich habe in Feed the Beast (MinecraftMod) mich ein bisschen mit ComputerCraft beschäftigt. Jedoch hab ich ein Problem: Ich habe ein Programm mit dem Namen login. Nun möchte ich von diesem Programm ein anderes Programm aufrufen. Dies ist ja shell.run("Programm")

Wie kann ich denn eine Variable mitgeben in das neue Programm, so dass sie auch benutzt werden kann.

Beispiel: Ich habe im Programm login eine Variable "User" mit dem Wert 1.

Nun möchte ich im Programm Programm die Variable abfragen.

...zum Beitrag

Computercraft Miningturtle lädt codes von Pastebin nicht?

Meine Miningturtle von Tekkit Classic will nichts von pastebin runterladen. jedesmal wenn ich eingebe >pastebin get erscheint eine Fehlermeldung mit No such program kann mir einer Helfen?

...zum Beitrag

Wo ist der Fehler in meinem Code?

Hallo, ich habe ein Problem, ich bin gerade in der Programmiersprache Lazarus am programmieren, ich mache gerade einen Stromkostenvergleichsrechner, nun mein Problem:

IF(realEvu1GeskMitTBonus<realEvu2GeskMitTBonus) Then Begin LBLSparen.Caption := realEvu1GeskMitTBonus-realEvu2GeskMitTBonus end;

(Bei den Fehlermeldungen steht : Error: Incompatible type for arg no.1: Got "Real", expected "TTranslateString")

Was ist daran falsch?

...zum Beitrag

Excel VBA - If Not ... Like ... Wurm drin

Irgendwie hab ich den Wurm drin...

Ich habe es mit beiden untenstehenden Codes probiert und jedes mal bringt er den MsgBox Text, der auf dir If anweisung folgt, auch wenn eingabe 1 "1" oder "5" enthält.

ElseIf Not eingabe1 Like "1" Or Not eingabe1 Like "5" And eingabe2 Like "" Then
ElseIf eingabe1 <> "1" Or eingaben1 <> "5" And eingabe2 = "" Then

...zum Beitrag

Excel-Code für Mehrfachauswahl in Dropdown-Listen?

Hallo zusammen,

Ich versuche gerade ein Excel-Dokument zu erstellen, bei dem eine Mehrfachauswahl aus Dropdown-Listen möglich ist. Das heißt aus einer Liste sollte es möglich sein mehrere Werte anzuwählen. Das habe ich auch mit dem untenstehenden VisualBasic-Code gemeistert. Allerdings habe ich erstens das Problem, dass auch eine Mehrfachauswahl des immer gleichen Wertes möglich ist. Theoretisch könnte also in einer Zelle x-mal derselbe Werte auftauchen. Dies soll natürlich nicht möglich sein. Bei Doppelauswahl desselben Wertes soll dieser aus der Zelle wieder verschwinden.

Mein zweites Problem ist, dass ich bislang nur 2 zwei Dropdown-Listen mit Mehrfachauswahl eingefügt bekomme. Sobald ich eine dritte Spalte versuche zu implementieren, bekomme ich eine Fehlermeldung für meinen Code.

Dadurch, dass ich mich mit dem Ganzen nicht so wirklich auskenne, wäre es sehr nett, wenn mir jemand helfen könnte.

Danke!

Bisheriger Code:

Private Sub Worksheet_Change(ByVal Target As Range)

** Mehrfachauswahl über DropDown-Liste

'** Einfügen im Code-Container des betreffenden Arbeitsblattes

'** Dimensionierung der Variablen

Dim rngDV As Range

Dim wert_old As String

Dim wertnew As String

'** Errorhandling

On Error GoTo Errorhandling

'** Mehrfachauswahl im definierten Bereich "Abteilungen" und "Themen" (Bsp. J2:J2000, I2:I2000) durchführen

If Not Application.Intersect(Target, Range("J2:J2000", "I2:I2000")) Is Nothing Then

'**Range definieren

Set rngDV = Target.SpecialCells(xlCellTypeAllValidation)

If rngDV Is Nothing Then GoTo Errorhandling

'** Prüfen, ob eine gültige Zelle ausgewählt wurde und Werte eintragen

If Not Application.Intersect(Target, rngDV) Is Nothing Then

Application.EnableEvents = False

wertnew = Target.Value

Application.Undo

wertold = Target.Value

Target.Value = wertnew

If wertold <> "" Then

If wertnew <> "" Then

Target.Value = wertold & ", " & wertnew

End If

Application.EnableEvents = True

End If

Errorhandling:

Application.EnableEvents = True

End Sub

...zum Beitrag

Unerwartetes Dateiende in BASH Script?

Hallo,

In meinem Bash Programm wird beim Compilen "Unerwartetes Dateiende" angezeigt.

Woran liegt das ?

CODE:

#!/bin/bash
# Functions
function pingpass(){
   dialog --msgbox "Ping Successfull ! -> Host is Online !"
   sleep 4
   dialog --clear
   logonconf
}
function pingfail(){    dialog --msgbox "Ping Failed ! -> Host is Offline !"    sleep 4    dialog --clear    dialog --msgbox "Programm Terminated because of an Error !" }
function logoncof(){    dialog --title "RDP Logon Srcipt" --yesno "Please confirm your choosen Option:\n $logon" 0 0 }

Main
logon=
dialog --title "RDP Logon Srcipt" --menu "Please choose a Server to Logon !" 0 0 0 \
&nbsp;"Linux1" "" "Linux2" "" "Linux3" "" 3&gt;&amp;1 1&gt;&amp;2 2&gt;&amp;3
 dialog --clear

if [$logon = "Linux1"]
   then
      ping -c1 192.168.2.1 > /dev/null
      if [ $? -eq 0 ]
    then 
   pingpass
    else
   pingfail
fi

...zum Beitrag

Datum in Zelle darf nicht Zukünftiges Datum enthalten und muss im Aktuellen Jahr sein?

Hallo,

verzweifelt wende ich mich an das Internet da ich leider nicht weiss wie ich dieses Problem lösen kann. Folgende Idee... / Ich möchte in der Lage sein Spalte A1-A30 ein Datum zu geben das sich nur im Aktuellen Jahr befindet und nicht in der Zukunft liegen kann. Sollte dies der Fall sein soll eine Fehlermeldung Erscheinen mit einem von mir angegebenen Text... Ich habe bereits einen Code mit verschiedenen Funktionen wie Z.B das Zelle A1-A30 die Heute Funktion anwenden jedoch editierbar ist. Leider weiss ich nicht wie ich die o.g. 2 Sachen noch in den code einbinden kann oder wie dies Funktioniert. Ich hoffe ihr könnt mir helfen mit evtl den vollständigen Code? :)

Anbei der Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A3:A30")) Is Nothing Then
If Target.Value = "" Then Target.FormulaLocal = "=HEUTE()"
Else
If Intersect(Target, Range("D3:D30")) Is Nothing Then Exit Sub
If Target.Value = "" Then Target.Value = 1 End If End Sub

...zum Beitrag

Mining Turtle bleibt stehen wenn ich FtB schließe?

Hallo Community, ich habe das Problem das wenn ich Singleplayer in FtB Ultimate eine Mining Turtle arbeiten lasse, diese immer stoppt wenn ich das Spiel verlasse. Kann man dagegen etwas machen?

...zum Beitrag

Target.Address Fehlermeldung Laufzeitfehler "424": Objekt erforderlich?

Hallo,

ich verschiedene Befehle mit VBA realisieren, um eine Auswahlliste anzupassen. Zum einen sollen Zellen ausgeblendet werden, wenn eine bestimmte Zelle leer ist und daher ein ganzer Teil der Liste entfallen kann. Der Befehl sieht folgendermaßen aus:

Sub HdlZellenVerbergen()

If Target.Address = "$C$9" Then

If C9 = "" Then

Rows("164:195").Hidden = True

Else

Rows("164:195").Hidden = False

End If

End Sub

Da ich mich nun Hals über Kopf in VBA geschmissen habe und schon einige Male Internetrecherche betrieben habe, weiß ich nicht wo der Fehler liegt, da mir hier die Erfahrung fehlt. Der Fehler lautet wie in der Überschrift angegeben. Was muss ich machen, damit das ganze nun funktioniert.

Ein ähnliches Problem erwarte ich dann bei folgendem Code:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$C$8" Then

If [C8] = "x" Then [D22] = "y"

End If

End Sub

Auch hier wäre eine Hilfe super.

Vielen Dank im Voraus.

...zum Beitrag

Warum geht dieser VBA-Code nicht?

Kann man keine If-Anweisungen in If-Anweisungen packen oder wieso geht der Code nicht?

Als Fehlermeldung kommt "Else ohne If" und das Else if ganz links am Rand wird markiert.