SET_POS_REG in KAREL

    Hi,
    I don't know Karel language well.
    I would like to set PR[1]. Value for axis X is in register R[1], value for axis Y is in R[2], value for axis Z is in R[3], value for axis W is in R[4], value for axis P is in R[5], value for axis R is in R[6].

    I know the funcion SET_POS_REG (1, POSN, STATUS,1), but data_type of POSN must be XYZWPR and I don't know how to give values from R[1]-R[6] into POSN.

    Can you write me, please, some example, or other way how to do it?

    Thank you very much
    David

    Thanks for your help, but unfortunately it doesn't work me ???

    VAR
    X :INTEGER
    realX :REAL
    posn :XYZWPR
    STATUS :INTEGER
    bool :BOOLEAN

    BEGIN
    GET_REG (1, bool, X ,realX ,STATUS)
    SET_POS_REG (1, posn.realX , STATUS,1)
    END

    I tried also SET_POS_REG (1, posn.X , STATUS,1) but I have a error still:

    94 SET_POS_REG (1, bod.X , STATUS,1)
    ^ ERROR
    ROUTINE argument data type does not match the parameter definition.

    You need to modify it as follows:
    1. Write the register into the variable of type XYZWPR
    posn.X = x
    2. Write the variable back into PR.
    SET_POS_REG(1,posn,STATUS, status)


    You have below a working example:
    PROGRAM SET_POSREG
    VAR
    X :INTEGER
    realX :REAL
    posn :XYZWPR
    STATUS :INTEGER
    bool :BOOLEAN

    BEGIN
    GET_REG (1, bool, X ,realX ,STATUS)
    IF STATUS = 0 THEN
    posn.X = X
    ENDIF
    SET_POS_REG (1, posn , STATUS)
    END SET_POSREG

    Edited once, last by andreic (February 19, 2016 at 10:19 AM).

Advertising from our partners