LANGUAGE: Karel

CREATED: 2016-10-31

MODIFIED: 2019-11-21

CODE   

/PROG  POWERUP
/ATTR
OWNER  = MNEDITOR;
COMMENT  = “RUN AT POWERUP”;
PROG_SIZE = 1231;
CREATE  = DATE 16-10-31  TIME 13:33:52;
MODIFIED = DATE 19-11-21  TIME 11:36:00;
FILE_NAME = ;
VERSION  = 0;
LINE_COUNT = 27;
MEMORY_SIZE = 1503;
PROTECT  = READ_WRITE;
TCD:  STACK_SIZE = 0,
TASK_PRIORITY = 50,
TIME_SLICE = 0,
BUSY_LAMP_OFF = 0,
ABORT_REQUEST = 0,
PAUSE_REQUEST = 7;
DEFAULT_GROUP = *,*,*,*,*;
CONTROL_CODE = 00000000 00000000;
/APPL

AUTO_SINGULARITY_HEADER;
ENABLE_SINGULARITY_AVOIDANCE   : TRUE;
/MN
1:  –eg:Copyright (c) 2019 DIY-Robotics.com All rights reserved. ;
2:  –eg: ;
3:  –eg:Redistribution and use in source and binary forms, with or without ;
4:  –eg:modification, are permitted provided that the following conditions
:  are ;
5:  –eg:met: ;
6:  –eg: ;
7:  –eg:Redistributions of source code must retain the above copyright ;
8:  –eg:notice, this list of conditions and the following disclaimer. ;
9:  –eg:Redistributions in binary form must reproduce the above ;
10:  –eg:copyright notice, this list of conditions and the following
:  disclaimer ;
11:  –eg:in the documentation and/or other materials provided with the ;
12:  –eg:distribution. ;
13:  –eg:Neither the name of DIY-Robotics.com nor the names of its ;
14:  –eg:contributors may be used to endorse or promote products derived from ;
15:  –eg:this software without specific prior written permission. ;
16:  –eg: ;
17:  !Loop500ms Timer Start ;
18:  TIMER[19]=RESET ;
19:  TIMER[19]=START ;
20:   ;
21:  !StartResetLock Timer ;
22:  TIMER[20]=RESET ;
23:  TIMER[20]=START ;
24:   ;
25:  WAIT   1.00(sec) ;
26:  RUN UALM_LOG ;
27:   ;
/POS
/END

LANGUAGE: Karel

CREATED: 2017-05-17

MODIFIED: 2017-05-17

CODE   

/PROG  RENAME_PROG1
/ATTR
OWNER  = MNEDITOR;
COMMENT  = “”;
PROG_SIZE = 1050;
CREATE  = DATE 17-05-17  TIME 20:07:10;
MODIFIED = DATE 19-11-21  TIME 11:36:14;
FILE_NAME = ;
VERSION  = 0;
LINE_COUNT = 17;
MEMORY_SIZE = 1354;
PROTECT  = READ_WRITE;
TCD:  STACK_SIZE = 0,
TASK_PRIORITY = 50,
TIME_SLICE = 0,
BUSY_LAMP_OFF = 0,
ABORT_REQUEST = 0,
PAUSE_REQUEST = 0;
DEFAULT_GROUP = 1,*,*,*,*;
CONTROL_CODE = 00000000 00000000;
/MN
1:  –eg:Copyright (c) 2019 DIY-Robotics.com All rights reserved. ;
2:  –eg: ;
3:  –eg:Redistribution and use in source and binary forms, with or without ;
4:  –eg:modification, are permitted provided that the following conditions
:  are ;
5:  –eg:met: ;
6:  –eg: ;
7:  –eg:Redistributions of source code must retain the above copyright ;
8:  –eg:notice, this list of conditions and the following disclaimer. ;
9:  –eg:Redistributions in binary form must reproduce the above ;
10:  –eg:copyright notice, this list of conditions and the following
:  disclaimer ;
11:  –eg:in the documentation and/or other materials provided with the ;
12:  –eg:distribution. ;
13:  –eg:Neither the name of DIY-Robotics.com nor the names of its ;
14:  –eg:contributors may be used to endorse or promote products derived from ;
15:  –eg:this software without specific prior written permission. ;
16:  –eg: ;
17:  SR[AR[1]]=AR[2]+AR[3]    ;
/POS
/END

LANGUAGE: Karel

CREATED: 2017-05-17

MODIFIED: 2019-11-21

CODE   

/PROG  RENAME_PROG0
/ATTR
OWNER  = MNEDITOR;
COMMENT  = “”;
PROG_SIZE = 1708;
CREATE  = DATE 19-06-08  TIME 12:37:12;
MODIFIED = DATE 19-11-21  TIME 11:36:06;
FILE_NAME = RENAME_P;
VERSION  = 0;
LINE_COUNT = 45;
MEMORY_SIZE = 2168;
PROTECT  = READ_WRITE;
TCD:  STACK_SIZE = 0,
      TASK_PRIORITY = 50,
      TIME_SLICE = 0,
      BUSY_LAMP_OFF = 0,
      ABORT_REQUEST = 0,
      PAUSE_REQUEST = 0;
DEFAULT_GROUP = 1,*,*,*,*;
CONTROL_CODE = 00000000 00000000;
/APPL
/MN
   1:  –eg:Copyright (c) 2019 DIY-Robotics.com All rights reserved. ;
   2:  –eg: ;
   3:  –eg:Redistribution and use in source and binary forms, with or without ;
   4:  –eg:modification, are permitted provided that the following conditions
    :  are ;
   5:  –eg:met: ;
   6:  –eg: ;
   7:  –eg:Redistributions of source code must retain the above copyright ;
   8:  –eg:notice, this list of conditions and the following disclaimer. ;
   9:  –eg:Redistributions in binary form must reproduce the above ;
  10:  –eg:copyright notice, this list of conditions and the following
    :  disclaimer ;
  11:  –eg:in the documentation and/or other materials provided with the ;
  12:  –eg:distribution. ;
  13:  –eg:Neither the name of DIY-Robotics.com nor the names of its ;
  14:  –eg:contributors may be used to endorse or promote products derived from ;
  15:  –eg:this software without specific prior written permission. ;
  16:  –eg: ;
  17:  !Product Selection ;
  18:  SELECT R[21:ProdSelection]=1,JMP LBL[1] ;
  19:         =2,JMP LBL[2] ;
  20:         =3,JMP LBL[3] ;
  21:         =4,JMP LBL[4] ;
  22:  R[21:ProdSelection]=0    ;
  23:  JMP LBL[100] ;
  24:   ;
  25:  LBL[1] ;
  26:  SR[1]=SR[51]    ;
  27:  JMP LBL[100] ;
  28:  LBL[2] ;
  29:  SR[1]=SR[52]    ;
  30:  JMP LBL[2] ;
  31:  LBL[3] ;
  32:  SR[1]=SR[53]    ;
  33:  JMP LBL[100] ;
  34:  LBL[4] ;
  35:  SR[1]=SR[54]    ;
  36:  JMP LBL[100] ;
  37:   ;
  38:  LBL[100] ;
  39:  CALL RENAME_PROG1(2,SR[1],’_MAINSEQ’) ;
  40:  CALL RENAME_PROG1(3,SR[1],’_HOMING’) ;
  41:  CALL RENAME_PROG1(4,SR[1],’_PARAM’) ;
  42:  CALL RENAME_PROG1(5,SR[1],’_INIT’) ;
  43:  CALL RENAME_PROG1(6,SR[1],’_PICK’) ;
  44:  CALL RENAME_PROG1(7,SR[1],’_DROP’) ;
  45:  CALL RENAME_PROG1(8,SR[1],’_REJECT’) ;
/POS
/END