Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 1 PC Object I Line Source A 1 ; Zilog Z8 Encore! ANSI C Compiler Release 3.60 A 2 ; -nofastcall -const=RAM -model=L -nooptlink -regvar A 3 ; -noreduceopt -debug -revaa -peephole -localcse -optsize A 4 ; -alias A 5 DEFINE main_TEXT,SPACE=ROM A 6 FILE ".\MAIN.C" A 7 .debug "C" A 8 SEGMENT main_TEXT A 9 .begrec "fmt_type",16 A 10 .define "status" A 11 .value 0 A 12 .class 8 A 13 .type 12 A 14 .type 0 A 15 .endef A 16 .define "flags" A 17 .value 1 A 18 .class 8 A 19 .type 12 A 20 .type 0 A 21 .endef A 22 .define "size" A 23 .value 2 A 24 .class 8 A 25 .type 2 A 26 .type 0 A 27 .endef A 28 .define "chr" A 29 .value 3 A 30 .class 8 A 31 .type 2 A 32 .type 0 A 33 .endef A 34 .define "type" A 35 .value 4 A 36 .class 8 A 37 .type 2 A 38 .type 0 A 39 .endef A 40 .define "field_width" A 41 .value 5 A 42 .class 8 A 43 .type 2 A 44 .type 0 A 45 .endef A 46 .define "precision" A 47 .value 6 A 48 .class 8 A 49 .type 2 A 50 .type 0 A 51 .endef A 52 .define "set_begin" Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 2 PC Object I Line Source main.src A 53 .value 7 A 54 .class 8 A 55 .type 162 A 56 .type 0 A 57 .endef A 58 .define "set_end" A 59 .value 9 A 60 .class 8 A 61 .type 162 A 62 .type 0 A 63 .endef A 64 .define "pad_whole" A 65 .value 11 A 66 .class 8 A 67 .type 12 A 68 .type 0 A 69 .endef A 70 .define "pad_pre_fract" A 71 .value 12 A 72 .class 8 A 73 .type 12 A 74 .type 0 A 75 .endef A 76 .define "pad_post_fract" A 77 .value 13 A 78 .class 8 A 79 .type 12 A 80 .type 0 A 81 .endef A 82 .define "pad_at" A 83 .value 14 A 84 .class 8 A 85 .type 162 A 86 .type 0 A 87 .endef A 88 .endrec "fmt_type" A 89 .begrec "flt_info",12 A 90 .define "flags" A 91 .value 0 A 92 .class 8 A 93 .type 12 A 94 .type 0 A 95 .endef A 96 .define "exp" A 97 .value 1 A 98 .class 8 A 99 .type 2 A 100 .type 0 A 101 .endef A 102 .define "digits" A 103 .value 2 A 104 .class 8 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 3 PC Object I Line Source main.src A 105 .dim 10 A 106 .type 108 A 107 .type 0 A 108 .endef A 109 .endrec "flt_info" A 110 .begrec "NONAME0",6 A 111 .define "baudRate" A 112 .value 0 A 113 .class 8 A 114 .type 5 A 115 .type 0 A 116 .endef A 117 .define "stopBits" A 118 .value 4 A 119 .class 8 A 120 .type 12 A 121 .type 0 A 122 .endef A 123 .define "parity" A 124 .value 5 A 125 .class 8 A 126 .type 12 A 127 .type 0 A 128 .endef A 129 .endrec "NONAME0" A 130 .begrec "NONAME1",5 A 131 .define "pBuffer" A 132 .value 0 A 133 .class 8 A 134 .type 172 A 135 .type 0 A 136 .endef A 137 .define "next_in" A 138 .value 2 A 139 .class 8 A 140 .type 12 A 141 .type 0 A 142 .endef A 143 .define "next_out" A 144 .value 3 A 145 .class 8 A 146 .type 12 A 147 .type 0 A 148 .endef A 149 .define "size" A 150 .value 4 A 151 .class 8 A 152 .type 12 A 153 .type 0 A 154 .endef A 155 .endrec "NONAME1" A 156 DEFINE ___flash_option1_segment,SPACE=ROM,ORG=%0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 4 PC Object I Line Source main.src A 157 SEGMENT ___flash_option1_segment 000000 A 158 _flash_option1: 000000 FF A 159 DB 255 A 160 .define "flash_option1" A 161 .alias "_flash_option1" A 162 .class 37 A 163 .value _flash_option1 A 164 .type 2 A 165 .type 0 A 166 .endef A 167 DEFINE ___flash_option2_segment,SPACE=ROM,ORG=%1 A 168 SEGMENT ___flash_option2_segment 000001 A 169 _flash_option2: 000001 FF A 170 DB 255 A 171 .define "flash_option2" A 172 .alias "_flash_option2" A 173 .class 37 A 174 .value _flash_option2 A 175 .type 2 A 176 .type 0 A 177 .endef A 178 SEGMENT FAR_DATA 000000 A 179 _subtmr: 000000 0A A 180 DB 10 A 181 .define "subtmr" A 182 .alias "_subtmr" A 183 .class 69 A 184 .value _subtmr A 185 .type 2 A 186 .type 0 A 187 .endef 000001 A 188 _t1: 000001 00 A 189 DB 0 A 190 .define "t1" A 191 .alias "_t1" A 192 .class 69 A 193 .value _t1 A 194 .type 2 A 195 .type 0 A 196 .endef 000002 A 197 _t2: 000002 00 A 198 DB 0 A 199 .define "t2" A 200 .alias "_t2" A 201 .class 69 A 202 .value _t2 A 203 .type 2 A 204 .type 0 A 205 .endef 000003 A 206 _t3: 000003 00 A 207 DB 0 A 208 .define "t3" Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 5 PC Object I Line Source main.src A 209 .alias "_t3" A 210 .class 69 A 211 .value _t3 A 212 .type 2 A 213 .type 0 A 214 .endef 000004 A 215 _t4: 000004 00 A 216 DB 0 A 217 .define "t4" A 218 .alias "_t4" A 219 .class 69 A 220 .value _t4 A 221 .type 2 A 222 .type 0 A 223 .endef 000005 A 224 _t5: 000005 00 A 225 DB 0 A 226 .define "t5" A 227 .alias "_t5" A 228 .class 69 A 229 .value _t5 A 230 .type 2 A 231 .type 0 A 232 .endef A 233 SEGMENT FAR_BSS 000000 A 234 _lt1: 000000 A 235 DS 2*1 A 236 .define "lt1" A 237 .alias "_lt1" A 238 .class 83 A 239 .value _lt1 A 240 .type 3 A 241 .type 0 A 242 .endef A 243 SEGMENT FAR_DATA 000006 A 244 _ircode: 000006 00 A 245 DB 0 A 246 .define "ircode" A 247 .alias "_ircode" A 248 .class 69 A 249 .value _ircode A 250 .type 12 A 251 .type 0 A 252 .endef 000007 A 253 _oldir: 000007 00 A 254 DB 0 A 255 .define "oldir" A 256 .alias "_oldir" A 257 .class 69 A 258 .value _oldir A 259 .type 12 A 260 .type 0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 6 PC Object I Line Source main.src A 261 .endef A 262 SEGMENT ROM_DATA A 263 A 264 A 265 ;**************************** _walk *************************** A 266 ;Name Addr/Register Size Type A 267 ;_wait IMPORT ----- function A 268 ;_move IMPORT ----- function A 269 ;_servo_out IMPORT ----- function A 270 ;angle R15+4 1 parameter A 271 A 272 A 273 ; Aggregate Stack Size: 0 (words) A 274 A 275 A 276 .FRAME _n_walk,?_n_walk,RDATA A 277 .FCALL _n_servo_out A 278 .FCALL _n_move A 279 .FCALL _n_wait A 280 .FRAME _f_walk,?_f_walk,EDATA A 281 .FCALL _f_servo_out A 282 .FCALL _f_move A 283 .FCALL _f_wait A 284 SEGMENT main_TEXT 000000 A 285 _walk: A 286 .define "_walk" A 287 .value _walk A 288 .class 2 A 289 .type 65 A 290 .type 0 A 291 .endef A 292 .begfunc "walk",54,"_walk" A 293 .define "angle" A 294 .class 17 A 295 .reg -1 A 296 .type 3 A 297 .type 0 A 298 .endef 000000 D6 0000 A 299 CALL __b_frameset00 A 300 ; 1 /********************************************************************/ A 301 ; 2 A 302 ; 3 #include A 303 ; 4 #include A 304 ; 5 #include // non-standard I/O A 305 ; 6 #include "main.h" A 306 ; 7 #include "timer.h" A 307 ; 8 #include "test_button.h" A 308 ; 9 #include "uart.h" A 309 ; 10 #include "servo.h" A 310 ; 11 A 311 ; 12 // Default user flash optionbits. A 312 ; 13 FLASH_OPTION1 = 0xFF; Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 7 PC Object I Line Source main.src A 313 ; 14 FLASH_OPTION2 = 0xFF; A 314 ; 15 A 315 ; 16 /////////////////////////////////////////////////////// A 316 ; 17 // Global - Variable A 317 ; 18 A 318 ; 19 char subtmr=10; A 319 ; 20 char t1=0; A 320 ; 21 char t2=0; A 321 ; 22 char t3=0; A 322 ; 23 char t4=0; A 323 ; 24 char t5=0; A 324 ; 25 int lt1; A 325 ; 26 char unsigned ircode=0; A 326 ; 27 char unsigned oldir=0; A 327 ; 28 A 328 ; 29 A 329 ; 30 A 330 ; 31 #define LEG1a 1 A 331 ; 32 #define LEG1b 2 A 332 ; 33 #define LEG2a 3 A 333 ; 34 #define LEG2b 4 A 334 ; 35 #define LEG3a 11 A 335 ; 36 #define LEG3b 12 A 336 ; 37 #define LEG4a 7 A 337 ; 38 #define LEG4b 8 A 338 ; 39 #define LEG5a 5 A 339 ; 40 #define LEG5b 6 A 340 ; 41 #define LEG6a 13 A 341 ; 42 #define LEG6b 14 A 342 ; 43 A 343 ; 44 // IR Codes, connected in PC7..PC4 A 344 ; 45 #define FWD 0x80 A 345 ; 46 #define REV 0x40 A 346 ; 47 #define TRIGHT 0x60 A 347 ; 48 #define TLEFT 0xa0 A 348 ; 49 #define STOP 0x90 A 349 ; 50 #define SIT 0xc0 A 350 ; 51 #define STAND 0x20 A 351 ; 52 A 352 ; 53 void walk(int angle) A 353 ; 54 { A 354 ; 55 servo_out(0,8,0xFF); // turn on servos A 355 .line 55 000003 B0E0 A 356 CLR R0 000005 1CFF A 357 LD R1,#255 000007 70E1 A 358 PUSH R1 000009 70E0 A 359 PUSH R0 00000B 1C08 A 360 LD R1,#8 00000D 70E1 A 361 PUSH R1 00000F 70E0 A 362 PUSH R0 000011 B0E1 A 363 CLR R1 000013 70E1 A 364 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 8 PC Object I Line Source main.src 000015 70E0 A 365 PUSH R0 000017 D6 0000 A 366 CALL _servo_out 00001A 50E0 A 367 POP R0 00001C 50E0 A 368 POP R0 00001E 50E0 A 369 POP R0 000020 50E0 A 370 POP R0 000022 50E0 A 371 POP R0 000024 50E0 A 372 POP R0 A 373 ; 56 servo_out(9,8,0xFF); A 374 .line 56 000026 B0E0 A 375 CLR R0 000028 1CFF A 376 LD R1,#255 00002A 70E1 A 377 PUSH R1 00002C 70E0 A 378 PUSH R0 00002E 1C08 A 379 LD R1,#8 000030 70E1 A 380 PUSH R1 000032 70E0 A 381 PUSH R0 000034 1C09 A 382 LD R1,#9 000036 70E1 A 383 PUSH R1 000038 70E0 A 384 PUSH R0 00003A D6 0000 A 385 CALL _servo_out 00003D 50E0 A 386 POP R0 00003F 50E0 A 387 POP R0 000041 50E0 A 388 POP R0 000043 50E0 A 389 POP R0 000045 50E0 A 390 POP R0 000047 50E0 A 391 POP R0 A 392 ; 57 A 393 ; 58 move(LEG1a,55,2); A 394 .line 58 000049 B0E0 A 395 CLR R0 00004B 1C02 A 396 LD R1,#2 00004D 70E1 A 397 PUSH R1 00004F 70E0 A 398 PUSH R0 000051 1C37 A 399 LD R1,#55 000053 70E1 A 400 PUSH R1 000055 70E0 A 401 PUSH R0 000057 1C01 A 402 LD R1,#1 000059 70E1 A 403 PUSH R1 00005B 70E0 A 404 PUSH R0 00005D D6 0000 A 405 CALL _move 000060 50E0 A 406 POP R0 000062 50E0 A 407 POP R0 000064 50E0 A 408 POP R0 000066 50E0 A 409 POP R0 000068 50E0 A 410 POP R0 00006A 50E0 A 411 POP R0 A 412 ; 59 move(LEG5a,-55,2); A 413 .line 59 00006C B0E0 A 414 CLR R0 00006E 1C02 A 415 LD R1,#2 000070 70E1 A 416 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 9 PC Object I Line Source main.src 000072 70E0 A 417 PUSH R0 000074 0CFF A 418 LD R0,#255 000076 1CC9 A 419 LD R1,#201 000078 70E1 A 420 PUSH R1 00007A 70E0 A 421 PUSH R0 00007C B0E0 A 422 CLR R0 00007E 1C05 A 423 LD R1,#5 000080 70E1 A 424 PUSH R1 000082 70E0 A 425 PUSH R0 000084 D6 0000 A 426 CALL _move 000087 50E0 A 427 POP R0 000089 50E0 A 428 POP R0 00008B 50E0 A 429 POP R0 00008D 50E0 A 430 POP R0 00008F 50E0 A 431 POP R0 000091 50E0 A 432 POP R0 A 433 ; 60 move(LEG3a,55,2); A 434 .line 60 000093 B0E0 A 435 CLR R0 000095 1C02 A 436 LD R1,#2 000097 70E1 A 437 PUSH R1 000099 70E0 A 438 PUSH R0 00009B 1C37 A 439 LD R1,#55 00009D 70E1 A 440 PUSH R1 00009F 70E0 A 441 PUSH R0 0000A1 1C0B A 442 LD R1,#11 0000A3 70E1 A 443 PUSH R1 0000A5 70E0 A 444 PUSH R0 0000A7 D6 0000 A 445 CALL _move 0000AA 50E0 A 446 POP R0 0000AC 50E0 A 447 POP R0 0000AE 50E0 A 448 POP R0 0000B0 50E0 A 449 POP R0 0000B2 50E0 A 450 POP R0 0000B4 50E0 A 451 POP R0 A 452 ; 61 move(LEG1b,angle,2); A 453 .line 61 0000B6 B0E0 A 454 CLR R0 0000B8 1C02 A 455 LD R1,#2 0000BA 70E1 A 456 PUSH R1 0000BC 70E0 A 457 PUSH R0 0000BE 880E04 A 458 LDX R0,4(RR14) 0000C1 881E05 A 459 LDX R1,5(RR14) 0000C4 70E1 A 460 PUSH R1 0000C6 70E0 A 461 PUSH R0 0000C8 B0E0 A 462 CLR R0 0000CA 1C02 A 463 LD R1,#2 0000CC 70E1 A 464 PUSH R1 0000CE 70E0 A 465 PUSH R0 0000D0 D6 0000 A 466 CALL _move 0000D3 50E0 A 467 POP R0 0000D5 50E0 A 468 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 10 PC Object I Line Source main.src 0000D7 50E0 A 469 POP R0 0000D9 50E0 A 470 POP R0 0000DB 50E0 A 471 POP R0 0000DD 50E0 A 472 POP R0 A 473 ; 62 if(wait(6)!=0) return; A 474 .line 62 0000DF B0E0 A 475 CLR R0 0000E1 1C06 A 476 LD R1,#6 0000E3 70E1 A 477 PUSH R1 0000E5 70E0 A 478 PUSH R0 0000E7 D6 0000 A 479 CALL _wait 0000EA 50E1 A 480 POP R1 0000EC 50E1 A 481 POP R1 0000EE 4200 A 482 OR R0,R0 0000F0 ED 04 BB A 483 JR NE,_1_L_16 A 484 ; 63 move(LEG5b,-angle,2); A 485 .line 63 0000F3 B0E0 A 486 CLR R0 0000F5 1C02 A 487 LD R1,#2 0000F7 70E1 A 488 PUSH R1 0000F9 70E0 A 489 PUSH R0 0000FB 882E04 A 490 LDX R2,4(RR14) 0000FE 883E05 A 491 LDX R3,5(RR14) 000101 60E2 A 492 COM R2 000103 60E3 A 493 COM R3 000105 A0E2 A 494 INCW RR2 000107 E4E2E0 A 495 LD R0,R2 00010A 70E3 A 496 PUSH R3 00010C 70E0 A 497 PUSH R0 00010E B0E0 A 498 CLR R0 000110 1C06 A 499 LD R1,#6 000112 70E1 A 500 PUSH R1 000114 70E0 A 501 PUSH R0 000116 D6 0000 A 502 CALL _move 000119 50E0 A 503 POP R0 00011B 50E0 A 504 POP R0 00011D 50E0 A 505 POP R0 00011F 50E0 A 506 POP R0 000121 50E0 A 507 POP R0 000123 50E0 A 508 POP R0 A 509 ; 64 move(LEG1a,0,2); A 510 .line 64 000125 B0E0 A 511 CLR R0 000127 1C02 A 512 LD R1,#2 000129 70E1 A 513 PUSH R1 00012B 70E0 A 514 PUSH R0 00012D B0E1 A 515 CLR R1 00012F 70E1 A 516 PUSH R1 000131 70E0 A 517 PUSH R0 000133 1C01 A 518 LD R1,#1 000135 70E1 A 519 PUSH R1 000137 70E0 A 520 PUSH R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 11 PC Object I Line Source main.src 000139 D6 0000 A 521 CALL _move 00013C 50E0 A 522 POP R0 00013E 50E0 A 523 POP R0 000140 50E0 A 524 POP R0 000142 50E0 A 525 POP R0 000144 50E0 A 526 POP R0 000146 50E0 A 527 POP R0 A 528 ; 65 if(wait(6)!=0) return; A 529 .line 65 000148 B0E0 A 530 CLR R0 00014A 1C06 A 531 LD R1,#6 00014C 70E1 A 532 PUSH R1 00014E 70E0 A 533 PUSH R0 000150 D6 0000 A 534 CALL _wait 000153 50E1 A 535 POP R1 000155 50E1 A 536 POP R1 000157 4200 A 537 OR R0,R0 000159 ED 04 BB A 538 JR NE,_1_L_16 A 539 ; 66 move(LEG3b,angle,2); A 540 .line 66 00015C B0E0 A 541 CLR R0 00015E 1C02 A 542 LD R1,#2 000160 70E1 A 543 PUSH R1 000162 70E0 A 544 PUSH R0 000164 880E04 A 545 LDX R0,4(RR14) 000167 881E05 A 546 LDX R1,5(RR14) 00016A 70E1 A 547 PUSH R1 00016C 70E0 A 548 PUSH R0 00016E B0E0 A 549 CLR R0 000170 1C0C A 550 LD R1,#12 000172 70E1 A 551 PUSH R1 000174 70E0 A 552 PUSH R0 000176 D6 0000 A 553 CALL _move 000179 50E0 A 554 POP R0 00017B 50E0 A 555 POP R0 00017D 50E0 A 556 POP R0 00017F 50E0 A 557 POP R0 000181 50E0 A 558 POP R0 000183 50E0 A 559 POP R0 A 560 ; 67 move(LEG5a,0,2); A 561 .line 67 000185 B0E0 A 562 CLR R0 000187 1C02 A 563 LD R1,#2 000189 70E1 A 564 PUSH R1 00018B 70E0 A 565 PUSH R0 00018D B0E1 A 566 CLR R1 00018F 70E1 A 567 PUSH R1 000191 70E0 A 568 PUSH R0 000193 1C05 A 569 LD R1,#5 000195 70E1 A 570 PUSH R1 000197 70E0 A 571 PUSH R0 000199 D6 0000 A 572 CALL _move Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 12 PC Object I Line Source main.src 00019C 50E0 A 573 POP R0 00019E 50E0 A 574 POP R0 0001A0 50E0 A 575 POP R0 0001A2 50E0 A 576 POP R0 0001A4 50E0 A 577 POP R0 0001A6 50E0 A 578 POP R0 A 579 ; 68 if(wait(6)!=0) return; A 580 .line 68 0001A8 B0E0 A 581 CLR R0 0001AA 1C06 A 582 LD R1,#6 0001AC 70E1 A 583 PUSH R1 0001AE 70E0 A 584 PUSH R0 0001B0 D6 0000 A 585 CALL _wait 0001B3 50E1 A 586 POP R1 0001B5 50E1 A 587 POP R1 0001B7 4200 A 588 OR R0,R0 0001B9 ED 04 BB A 589 JR NE,_1_L_16 A 590 ; 69 move(LEG3a,0,2); A 591 .line 69 0001BC B0E0 A 592 CLR R0 0001BE 1C02 A 593 LD R1,#2 0001C0 70E1 A 594 PUSH R1 0001C2 70E0 A 595 PUSH R0 0001C4 B0E1 A 596 CLR R1 0001C6 70E1 A 597 PUSH R1 0001C8 70E0 A 598 PUSH R0 0001CA 1C0B A 599 LD R1,#11 0001CC 70E1 A 600 PUSH R1 0001CE 70E0 A 601 PUSH R0 0001D0 D6 0000 A 602 CALL _move 0001D3 50E0 A 603 POP R0 0001D5 50E0 A 604 POP R0 0001D7 50E0 A 605 POP R0 0001D9 50E0 A 606 POP R0 0001DB 50E0 A 607 POP R0 0001DD 50E0 A 608 POP R0 A 609 ; 70 if(wait(6)!=0) return; A 610 .line 70 0001DF B0E0 A 611 CLR R0 0001E1 1C06 A 612 LD R1,#6 0001E3 70E1 A 613 PUSH R1 0001E5 70E0 A 614 PUSH R0 0001E7 D6 0000 A 615 CALL _wait 0001EA 50E1 A 616 POP R1 0001EC 50E1 A 617 POP R1 0001EE 4200 A 618 OR R0,R0 0001F0 ED 04 BB A 619 JR NE,_1_L_16 A 620 ; 71 move(LEG1b,-angle,3); A 621 .line 71 0001F3 B0E0 A 622 CLR R0 0001F5 1C03 A 623 LD R1,#3 0001F7 70E1 A 624 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 13 PC Object I Line Source main.src 0001F9 70E0 A 625 PUSH R0 0001FB 882E04 A 626 LDX R2,4(RR14) 0001FE 883E05 A 627 LDX R3,5(RR14) 000201 60E2 A 628 COM R2 000203 60E3 A 629 COM R3 000205 A0E2 A 630 INCW RR2 000207 E4E2E0 A 631 LD R0,R2 00020A 70E3 A 632 PUSH R3 00020C 70E0 A 633 PUSH R0 00020E B0E0 A 634 CLR R0 000210 1C02 A 635 LD R1,#2 000212 70E1 A 636 PUSH R1 000214 70E0 A 637 PUSH R0 000216 D6 0000 A 638 CALL _move 000219 50E0 A 639 POP R0 00021B 50E0 A 640 POP R0 00021D 50E0 A 641 POP R0 00021F 50E0 A 642 POP R0 000221 50E0 A 643 POP R0 000223 50E0 A 644 POP R0 A 645 ; 72 move(LEG5b,angle,3); A 646 .line 72 000225 B0E0 A 647 CLR R0 000227 1C03 A 648 LD R1,#3 000229 70E1 A 649 PUSH R1 00022B 70E0 A 650 PUSH R0 00022D 880E04 A 651 LDX R0,4(RR14) 000230 881E05 A 652 LDX R1,5(RR14) 000233 70E1 A 653 PUSH R1 000235 70E0 A 654 PUSH R0 000237 B0E0 A 655 CLR R0 000239 1C06 A 656 LD R1,#6 00023B 70E1 A 657 PUSH R1 00023D 70E0 A 658 PUSH R0 00023F D6 0000 A 659 CALL _move 000242 50E0 A 660 POP R0 000244 50E0 A 661 POP R0 000246 50E0 A 662 POP R0 000248 50E0 A 663 POP R0 00024A 50E0 A 664 POP R0 00024C 50E0 A 665 POP R0 A 666 ; 73 move(LEG3b,-angle,3); A 667 .line 73 00024E B0E0 A 668 CLR R0 000250 1C03 A 669 LD R1,#3 000252 70E1 A 670 PUSH R1 000254 70E0 A 671 PUSH R0 000256 882E04 A 672 LDX R2,4(RR14) 000259 883E05 A 673 LDX R3,5(RR14) 00025C 60E2 A 674 COM R2 00025E 60E3 A 675 COM R3 000260 A0E2 A 676 INCW RR2 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 14 PC Object I Line Source main.src 000262 E4E2E0 A 677 LD R0,R2 000265 70E3 A 678 PUSH R3 000267 70E0 A 679 PUSH R0 000269 B0E0 A 680 CLR R0 00026B 1C0C A 681 LD R1,#12 00026D 70E1 A 682 PUSH R1 00026F 70E0 A 683 PUSH R0 000271 D6 0000 A 684 CALL _move 000274 50E0 A 685 POP R0 000276 50E0 A 686 POP R0 000278 50E0 A 687 POP R0 00027A 50E0 A 688 POP R0 00027C 50E0 A 689 POP R0 00027E 50E0 A 690 POP R0 A 691 ; 74 A 692 ; 75 // Other side A 693 ; 76 A 694 ; 77 move(LEG2a,55,2); A 695 .line 77 000280 B0E0 A 696 CLR R0 000282 1C02 A 697 LD R1,#2 000284 70E1 A 698 PUSH R1 000286 70E0 A 699 PUSH R0 000288 1C37 A 700 LD R1,#55 00028A 70E1 A 701 PUSH R1 00028C 70E0 A 702 PUSH R0 00028E 1C03 A 703 LD R1,#3 000290 70E1 A 704 PUSH R1 000292 70E0 A 705 PUSH R0 000294 D6 0000 A 706 CALL _move 000297 50E0 A 707 POP R0 000299 50E0 A 708 POP R0 00029B 50E0 A 709 POP R0 00029D 50E0 A 710 POP R0 00029F 50E0 A 711 POP R0 0002A1 50E0 A 712 POP R0 A 713 ; 78 move(LEG4a,-55,2); A 714 .line 78 0002A3 B0E0 A 715 CLR R0 0002A5 1C02 A 716 LD R1,#2 0002A7 70E1 A 717 PUSH R1 0002A9 70E0 A 718 PUSH R0 0002AB 0CFF A 719 LD R0,#255 0002AD 1CC9 A 720 LD R1,#201 0002AF 70E1 A 721 PUSH R1 0002B1 70E0 A 722 PUSH R0 0002B3 B0E0 A 723 CLR R0 0002B5 1C07 A 724 LD R1,#7 0002B7 70E1 A 725 PUSH R1 0002B9 70E0 A 726 PUSH R0 0002BB D6 0000 A 727 CALL _move 0002BE 50E0 A 728 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 15 PC Object I Line Source main.src 0002C0 50E0 A 729 POP R0 0002C2 50E0 A 730 POP R0 0002C4 50E0 A 731 POP R0 0002C6 50E0 A 732 POP R0 0002C8 50E0 A 733 POP R0 A 734 ; 79 move(LEG6a,-55,2); A 735 .line 79 0002CA B0E0 A 736 CLR R0 0002CC 1C02 A 737 LD R1,#2 0002CE 70E1 A 738 PUSH R1 0002D0 70E0 A 739 PUSH R0 0002D2 0CFF A 740 LD R0,#255 0002D4 1CC9 A 741 LD R1,#201 0002D6 70E1 A 742 PUSH R1 0002D8 70E0 A 743 PUSH R0 0002DA B0E0 A 744 CLR R0 0002DC 1C0D A 745 LD R1,#13 0002DE 70E1 A 746 PUSH R1 0002E0 70E0 A 747 PUSH R0 0002E2 D6 0000 A 748 CALL _move 0002E5 50E0 A 749 POP R0 0002E7 50E0 A 750 POP R0 0002E9 50E0 A 751 POP R0 0002EB 50E0 A 752 POP R0 0002ED 50E0 A 753 POP R0 0002EF 50E0 A 754 POP R0 A 755 ; 80 move(LEG4b,-angle,2); A 756 .line 80 0002F1 B0E0 A 757 CLR R0 0002F3 1C02 A 758 LD R1,#2 0002F5 70E1 A 759 PUSH R1 0002F7 70E0 A 760 PUSH R0 0002F9 882E04 A 761 LDX R2,4(RR14) 0002FC 883E05 A 762 LDX R3,5(RR14) 0002FF 60E2 A 763 COM R2 000301 60E3 A 764 COM R3 000303 A0E2 A 765 INCW RR2 000305 E4E2E0 A 766 LD R0,R2 000308 70E3 A 767 PUSH R3 00030A 70E0 A 768 PUSH R0 00030C B0E0 A 769 CLR R0 00030E 1C08 A 770 LD R1,#8 000310 70E1 A 771 PUSH R1 000312 70E0 A 772 PUSH R0 000314 D6 0000 A 773 CALL _move 000317 50E0 A 774 POP R0 000319 50E0 A 775 POP R0 00031B 50E0 A 776 POP R0 00031D 50E0 A 777 POP R0 00031F 50E0 A 778 POP R0 000321 50E0 A 779 POP R0 A 780 ; 81 if(wait(6)!=0) return; Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 16 PC Object I Line Source main.src A 781 .line 81 000323 B0E0 A 782 CLR R0 000325 1C06 A 783 LD R1,#6 000327 70E1 A 784 PUSH R1 000329 70E0 A 785 PUSH R0 00032B D6 0000 A 786 CALL _wait 00032E 50E1 A 787 POP R1 000330 50E1 A 788 POP R1 000332 4200 A 789 OR R0,R0 000334 ED 04 BB A 790 JR NE,_1_L_16 A 791 ; 82 move(LEG2b,angle,2); A 792 .line 82 000337 B0E0 A 793 CLR R0 000339 1C02 A 794 LD R1,#2 00033B 70E1 A 795 PUSH R1 00033D 70E0 A 796 PUSH R0 00033F 880E04 A 797 LDX R0,4(RR14) 000342 881E05 A 798 LDX R1,5(RR14) 000345 70E1 A 799 PUSH R1 000347 70E0 A 800 PUSH R0 000349 B0E0 A 801 CLR R0 00034B 1C04 A 802 LD R1,#4 00034D 70E1 A 803 PUSH R1 00034F 70E0 A 804 PUSH R0 000351 D6 0000 A 805 CALL _move 000354 50E0 A 806 POP R0 000356 50E0 A 807 POP R0 000358 50E0 A 808 POP R0 00035A 50E0 A 809 POP R0 00035C 50E0 A 810 POP R0 00035E 50E0 A 811 POP R0 A 812 ; 83 move(LEG4a,0,2); A 813 .line 83 000360 B0E0 A 814 CLR R0 000362 1C02 A 815 LD R1,#2 000364 70E1 A 816 PUSH R1 000366 70E0 A 817 PUSH R0 000368 B0E1 A 818 CLR R1 00036A 70E1 A 819 PUSH R1 00036C 70E0 A 820 PUSH R0 00036E 1C07 A 821 LD R1,#7 000370 70E1 A 822 PUSH R1 000372 70E0 A 823 PUSH R0 000374 D6 0000 A 824 CALL _move 000377 50E0 A 825 POP R0 000379 50E0 A 826 POP R0 00037B 50E0 A 827 POP R0 00037D 50E0 A 828 POP R0 00037F 50E0 A 829 POP R0 000381 50E0 A 830 POP R0 A 831 ; 84 if(wait(6)!=0) return; A 832 .line 84 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 17 PC Object I Line Source main.src 000383 B0E0 A 833 CLR R0 000385 1C06 A 834 LD R1,#6 000387 70E1 A 835 PUSH R1 000389 70E0 A 836 PUSH R0 00038B D6 0000 A 837 CALL _wait 00038E 50E1 A 838 POP R1 000390 50E1 A 839 POP R1 000392 4200 A 840 OR R0,R0 000394 ED 04 BB A 841 JR NE,_1_L_16 A 842 ; 85 move(LEG6b,-angle,2); A 843 .line 85 000397 B0E0 A 844 CLR R0 000399 1C02 A 845 LD R1,#2 00039B 70E1 A 846 PUSH R1 00039D 70E0 A 847 PUSH R0 00039F 882E04 A 848 LDX R2,4(RR14) 0003A2 883E05 A 849 LDX R3,5(RR14) 0003A5 60E2 A 850 COM R2 0003A7 60E3 A 851 COM R3 0003A9 A0E2 A 852 INCW RR2 0003AB E4E2E0 A 853 LD R0,R2 0003AE 70E3 A 854 PUSH R3 0003B0 70E0 A 855 PUSH R0 0003B2 B0E0 A 856 CLR R0 0003B4 1C0E A 857 LD R1,#14 0003B6 70E1 A 858 PUSH R1 0003B8 70E0 A 859 PUSH R0 0003BA D6 0000 A 860 CALL _move 0003BD 50E0 A 861 POP R0 0003BF 50E0 A 862 POP R0 0003C1 50E0 A 863 POP R0 0003C3 50E0 A 864 POP R0 0003C5 50E0 A 865 POP R0 0003C7 50E0 A 866 POP R0 A 867 ; 86 move(LEG2a,0,2); A 868 .line 86 0003C9 B0E0 A 869 CLR R0 0003CB 1C02 A 870 LD R1,#2 0003CD 70E1 A 871 PUSH R1 0003CF 70E0 A 872 PUSH R0 0003D1 B0E1 A 873 CLR R1 0003D3 70E1 A 874 PUSH R1 0003D5 70E0 A 875 PUSH R0 0003D7 1C03 A 876 LD R1,#3 0003D9 70E1 A 877 PUSH R1 0003DB 70E0 A 878 PUSH R0 0003DD D6 0000 A 879 CALL _move 0003E0 50E0 A 880 POP R0 0003E2 50E0 A 881 POP R0 0003E4 50E0 A 882 POP R0 0003E6 50E0 A 883 POP R0 0003E8 50E0 A 884 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 18 PC Object I Line Source main.src 0003EA 50E0 A 885 POP R0 A 886 ; 87 if(wait(6)!=0) return; A 887 .line 87 0003EC B0E0 A 888 CLR R0 0003EE 1C06 A 889 LD R1,#6 0003F0 70E1 A 890 PUSH R1 0003F2 70E0 A 891 PUSH R0 0003F4 D6 0000 A 892 CALL _wait 0003F7 50E1 A 893 POP R1 0003F9 50E1 A 894 POP R1 0003FB 4200 A 895 OR R0,R0 0003FD ED 04 BB A 896 JR NE,_1_L_16 A 897 ; 88 move(LEG6a,0,2); A 898 .line 88 000400 B0E0 A 899 CLR R0 000402 1C02 A 900 LD R1,#2 000404 70E1 A 901 PUSH R1 000406 70E0 A 902 PUSH R0 000408 B0E1 A 903 CLR R1 00040A 70E1 A 904 PUSH R1 00040C 70E0 A 905 PUSH R0 00040E 1C0D A 906 LD R1,#13 000410 70E1 A 907 PUSH R1 000412 70E0 A 908 PUSH R0 000414 D6 0000 A 909 CALL _move 000417 50E0 A 910 POP R0 000419 50E0 A 911 POP R0 00041B 50E0 A 912 POP R0 00041D 50E0 A 913 POP R0 00041F 50E0 A 914 POP R0 000421 50E0 A 915 POP R0 A 916 ; 89 if(wait(6)!=0) return; A 917 .line 89 000423 B0E0 A 918 CLR R0 000425 1C06 A 919 LD R1,#6 000427 70E1 A 920 PUSH R1 000429 70E0 A 921 PUSH R0 00042B D6 0000 A 922 CALL _wait 00042E 50E1 A 923 POP R1 000430 50E1 A 924 POP R1 000432 4200 A 925 OR R0,R0 000434 ED 04 BB A 926 JR NE,_1_L_16 A 927 ; 90 move(LEG2b,-angle,4); A 928 .line 90 000437 B0E0 A 929 CLR R0 000439 1C04 A 930 LD R1,#4 00043B 70E1 A 931 PUSH R1 00043D 70E0 A 932 PUSH R0 00043F 880E04 A 933 LDX R0,4(RR14) 000442 881E05 A 934 LDX R1,5(RR14) 000445 60E0 A 935 COM R0 000447 60E1 A 936 COM R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 19 PC Object I Line Source main.src 000449 A0E0 A 937 INCW RR0 00044B E4E0E2 A 938 LD R2,R0 00044E 70E1 A 939 PUSH R1 000450 70E2 A 940 PUSH R2 000452 B0E0 A 941 CLR R0 000454 1C04 A 942 LD R1,#4 000456 70E1 A 943 PUSH R1 000458 70E0 A 944 PUSH R0 00045A D6 0000 A 945 CALL _move 00045D 50E0 A 946 POP R0 00045F 50E0 A 947 POP R0 000461 50E0 A 948 POP R0 000463 50E0 A 949 POP R0 000465 50E0 A 950 POP R0 000467 50E0 A 951 POP R0 A 952 ; 91 move(LEG4b,angle,4); A 953 .line 91 000469 B0E0 A 954 CLR R0 00046B 1C04 A 955 LD R1,#4 00046D 70E1 A 956 PUSH R1 00046F 70E0 A 957 PUSH R0 000471 880E04 A 958 LDX R0,4(RR14) 000474 881E05 A 959 LDX R1,5(RR14) 000477 70E1 A 960 PUSH R1 000479 70E0 A 961 PUSH R0 00047B B0E0 A 962 CLR R0 00047D 1C08 A 963 LD R1,#8 00047F 70E1 A 964 PUSH R1 000481 70E0 A 965 PUSH R0 000483 D6 0000 A 966 CALL _move 000486 50E0 A 967 POP R0 000488 50E0 A 968 POP R0 00048A 50E0 A 969 POP R0 00048C 50E0 A 970 POP R0 00048E 50E0 A 971 POP R0 000490 50E0 A 972 POP R0 A 973 ; 92 move(LEG6b,angle,4); A 974 .line 92 000492 B0E0 A 975 CLR R0 000494 1C04 A 976 LD R1,#4 000496 70E1 A 977 PUSH R1 000498 70E0 A 978 PUSH R0 00049A 880E04 A 979 LDX R0,4(RR14) 00049D 881E05 A 980 LDX R1,5(RR14) 0004A0 70E1 A 981 PUSH R1 0004A2 70E0 A 982 PUSH R0 0004A4 B0E0 A 983 CLR R0 0004A6 1C0E A 984 LD R1,#14 0004A8 70E1 A 985 PUSH R1 0004AA 70E0 A 986 PUSH R0 0004AC D6 0000 A 987 CALL _move 0004AF 50E0 A 988 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 20 PC Object I Line Source main.src 0004B1 50E0 A 989 POP R0 0004B3 50E0 A 990 POP R0 0004B5 50E0 A 991 POP R0 0004B7 50E0 A 992 POP R0 0004B9 50E0 A 993 POP R0 A 994 ; 93 } 0004BB A 995 _1_L_16: A 996 .line 93 0004BB D6 0000 A 997 CALL __b_framereset 0004BE AF A 998 RET A 999 .endfunc "walk",93,"_walk" A 1000 SEGMENT ROM_DATA A 1001 A 1002 A 1003 ;**************************** _forward *************************** A 1004 ;Name Addr/Register Size Type A 1005 A 1006 A 1007 ; Aggregate Stack Size: 0 (words) A 1008 A 1009 A 1010 .FRAME _n_forward,?_n_forward,RDATA A 1011 .FCALL _n_walk A 1012 .FRAME _f_forward,?_f_forward,EDATA A 1013 .FCALL _f_walk A 1014 SEGMENT main_TEXT 0004BF A 1015 _forward: A 1016 .define "_forward" A 1017 .value _forward A 1018 .class 2 A 1019 .type 65 A 1020 .type 0 A 1021 .endef A 1022 .begfunc "forward",96,"_forward" A 1023 ; 94 A 1024 ; 95 void forward(void) A 1025 ; 96 { A 1026 ; 97 walk(-35); A 1027 .line 97 0004BF 0CFF A 1028 LD R0,#255 0004C1 1CDD A 1029 LD R1,#221 0004C3 70E1 A 1030 PUSH R1 0004C5 70E0 A 1031 PUSH R0 0004C7 D6 0000 A 1032 CALL _walk 0004CA 50E0 A 1033 POP R0 0004CC 50E0 A 1034 POP R0 A 1035 ; 98 } A 1036 .line 98 0004CE AF A 1037 RET A 1038 .endfunc "forward",98,"_forward" A 1039 SEGMENT ROM_DATA A 1040 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 21 PC Object I Line Source main.src A 1041 A 1042 ;**************************** _reverse *************************** A 1043 ;Name Addr/Register Size Type A 1044 A 1045 A 1046 ; Aggregate Stack Size: 0 (words) A 1047 A 1048 A 1049 .FRAME _n_reverse,?_n_reverse,RDATA A 1050 .FCALL _n_walk A 1051 .FRAME _f_reverse,?_f_reverse,EDATA A 1052 .FCALL _f_walk A 1053 SEGMENT main_TEXT 0004CF A 1054 _reverse: A 1055 .define "_reverse" A 1056 .value _reverse A 1057 .class 2 A 1058 .type 65 A 1059 .type 0 A 1060 .endef A 1061 .begfunc "reverse",101,"_reverse" A 1062 ; 99 A 1063 ; 100 void reverse(void) A 1064 ; 101 { A 1065 ; 102 walk(35); A 1066 .line 102 0004CF B0E0 A 1067 CLR R0 0004D1 1C23 A 1068 LD R1,#35 0004D3 70E1 A 1069 PUSH R1 0004D5 70E0 A 1070 PUSH R0 0004D7 D6 0000 A 1071 CALL _walk 0004DA 50E0 A 1072 POP R0 0004DC 50E0 A 1073 POP R0 A 1074 ; 103 } A 1075 .line 103 0004DE AF A 1076 RET A 1077 .endfunc "reverse",103,"_reverse" A 1078 SEGMENT ROM_DATA A 1079 A 1080 A 1081 ;**************************** _tenhut *************************** A 1082 ;Name Addr/Register Size Type A 1083 ;_oldir STATIC 0 variable A 1084 ;_wait IMPORT ----- function A 1085 ;_move IMPORT ----- function A 1086 ;_servo_out IMPORT ----- function A 1087 A 1088 A 1089 ; Aggregate Stack Size: 0 (words) A 1090 A 1091 A 1092 .FRAME _n_tenhut,?_n_tenhut,RDATA Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 22 PC Object I Line Source main.src A 1093 .FCALL _n_servo_out A 1094 .FCALL _n_move A 1095 .FCALL _n_wait A 1096 .FRAME _f_tenhut,?_f_tenhut,EDATA A 1097 .FCALL _f_servo_out A 1098 .FCALL _f_move A 1099 .FCALL _f_wait A 1100 SEGMENT main_TEXT 0004DF A 1101 _tenhut: A 1102 .define "_tenhut" A 1103 .value _tenhut A 1104 .class 2 A 1105 .type 65 A 1106 .type 0 A 1107 .endef A 1108 .begfunc "tenhut",106,"_tenhut" A 1109 ; 104 A 1110 ; 105 void tenhut(void) A 1111 ; 106 { A 1112 ; 107 servo_out(0,8,0xFF); // turn on servos A 1113 .line 107 0004DF B0E0 A 1114 CLR R0 0004E1 1CFF A 1115 LD R1,#255 0004E3 70E1 A 1116 PUSH R1 0004E5 70E0 A 1117 PUSH R0 0004E7 1C08 A 1118 LD R1,#8 0004E9 70E1 A 1119 PUSH R1 0004EB 70E0 A 1120 PUSH R0 0004ED B0E1 A 1121 CLR R1 0004EF 70E1 A 1122 PUSH R1 0004F1 70E0 A 1123 PUSH R0 0004F3 D6 0000 A 1124 CALL _servo_out 0004F6 50E0 A 1125 POP R0 0004F8 50E0 A 1126 POP R0 0004FA 50E0 A 1127 POP R0 0004FC 50E0 A 1128 POP R0 0004FE 50E0 A 1129 POP R0 000500 50E0 A 1130 POP R0 A 1131 ; 108 servo_out(9,8,0xFF); A 1132 .line 108 000502 B0E0 A 1133 CLR R0 000504 1CFF A 1134 LD R1,#255 000506 70E1 A 1135 PUSH R1 000508 70E0 A 1136 PUSH R0 00050A 1C08 A 1137 LD R1,#8 00050C 70E1 A 1138 PUSH R1 00050E 70E0 A 1139 PUSH R0 000510 1C09 A 1140 LD R1,#9 000512 70E1 A 1141 PUSH R1 000514 70E0 A 1142 PUSH R0 000516 D6 0000 A 1143 CALL _servo_out 000519 50E0 A 1144 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 23 PC Object I Line Source main.src 00051B 50E0 A 1145 POP R0 00051D 50E0 A 1146 POP R0 00051F 50E0 A 1147 POP R0 000521 50E0 A 1148 POP R0 000523 50E0 A 1149 POP R0 A 1150 ; 109 // all legs stand up A 1151 ; 110 move(LEG1a,0,3); A 1152 .line 110 000525 B0E0 A 1153 CLR R0 000527 1C03 A 1154 LD R1,#3 000529 70E1 A 1155 PUSH R1 00052B 70E0 A 1156 PUSH R0 00052D B0E1 A 1157 CLR R1 00052F 70E1 A 1158 PUSH R1 000531 70E0 A 1159 PUSH R0 000533 1C01 A 1160 LD R1,#1 000535 70E1 A 1161 PUSH R1 000537 70E0 A 1162 PUSH R0 000539 D6 0000 A 1163 CALL _move 00053C 50E0 A 1164 POP R0 00053E 50E0 A 1165 POP R0 000540 50E0 A 1166 POP R0 000542 50E0 A 1167 POP R0 000544 50E0 A 1168 POP R0 000546 50E0 A 1169 POP R0 A 1170 ; 111 move(LEG2a,0,3); A 1171 .line 111 000548 B0E0 A 1172 CLR R0 00054A 1C03 A 1173 LD R1,#3 00054C 70E1 A 1174 PUSH R1 00054E 70E0 A 1175 PUSH R0 000550 B0E1 A 1176 CLR R1 000552 70E1 A 1177 PUSH R1 000554 70E0 A 1178 PUSH R0 000556 1C03 A 1179 LD R1,#3 000558 70E1 A 1180 PUSH R1 00055A 70E0 A 1181 PUSH R0 00055C D6 0000 A 1182 CALL _move 00055F 50E0 A 1183 POP R0 000561 50E0 A 1184 POP R0 000563 50E0 A 1185 POP R0 000565 50E0 A 1186 POP R0 000567 50E0 A 1187 POP R0 000569 50E0 A 1188 POP R0 A 1189 ; 112 move(LEG3a,0,3); A 1190 .line 112 00056B B0E0 A 1191 CLR R0 00056D 1C03 A 1192 LD R1,#3 00056F 70E1 A 1193 PUSH R1 000571 70E0 A 1194 PUSH R0 000573 B0E1 A 1195 CLR R1 000575 70E1 A 1196 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 24 PC Object I Line Source main.src 000577 70E0 A 1197 PUSH R0 000579 1C0B A 1198 LD R1,#11 00057B 70E1 A 1199 PUSH R1 00057D 70E0 A 1200 PUSH R0 00057F D6 0000 A 1201 CALL _move 000582 50E0 A 1202 POP R0 000584 50E0 A 1203 POP R0 000586 50E0 A 1204 POP R0 000588 50E0 A 1205 POP R0 00058A 50E0 A 1206 POP R0 00058C 50E0 A 1207 POP R0 A 1208 ; 113 move(LEG4a,0,3); A 1209 .line 113 00058E B0E0 A 1210 CLR R0 000590 1C03 A 1211 LD R1,#3 000592 70E1 A 1212 PUSH R1 000594 70E0 A 1213 PUSH R0 000596 B0E1 A 1214 CLR R1 000598 70E1 A 1215 PUSH R1 00059A 70E0 A 1216 PUSH R0 00059C 1C07 A 1217 LD R1,#7 00059E 70E1 A 1218 PUSH R1 0005A0 70E0 A 1219 PUSH R0 0005A2 D6 0000 A 1220 CALL _move 0005A5 50E0 A 1221 POP R0 0005A7 50E0 A 1222 POP R0 0005A9 50E0 A 1223 POP R0 0005AB 50E0 A 1224 POP R0 0005AD 50E0 A 1225 POP R0 0005AF 50E0 A 1226 POP R0 A 1227 ; 114 move(LEG5a,0,3); A 1228 .line 114 0005B1 B0E0 A 1229 CLR R0 0005B3 1C03 A 1230 LD R1,#3 0005B5 70E1 A 1231 PUSH R1 0005B7 70E0 A 1232 PUSH R0 0005B9 B0E1 A 1233 CLR R1 0005BB 70E1 A 1234 PUSH R1 0005BD 70E0 A 1235 PUSH R0 0005BF 1C05 A 1236 LD R1,#5 0005C1 70E1 A 1237 PUSH R1 0005C3 70E0 A 1238 PUSH R0 0005C5 D6 0000 A 1239 CALL _move 0005C8 50E0 A 1240 POP R0 0005CA 50E0 A 1241 POP R0 0005CC 50E0 A 1242 POP R0 0005CE 50E0 A 1243 POP R0 0005D0 50E0 A 1244 POP R0 0005D2 50E0 A 1245 POP R0 A 1246 ; 115 move(LEG6a,0,3); A 1247 .line 115 0005D4 B0E0 A 1248 CLR R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 25 PC Object I Line Source main.src 0005D6 1C03 A 1249 LD R1,#3 0005D8 70E1 A 1250 PUSH R1 0005DA 70E0 A 1251 PUSH R0 0005DC B0E1 A 1252 CLR R1 0005DE 70E1 A 1253 PUSH R1 0005E0 70E0 A 1254 PUSH R0 0005E2 1C0D A 1255 LD R1,#13 0005E4 70E1 A 1256 PUSH R1 0005E6 70E0 A 1257 PUSH R0 0005E8 D6 0000 A 1258 CALL _move 0005EB 50E0 A 1259 POP R0 0005ED 50E0 A 1260 POP R0 0005EF 50E0 A 1261 POP R0 0005F1 50E0 A 1262 POP R0 0005F3 50E0 A 1263 POP R0 0005F5 50E0 A 1264 POP R0 A 1265 ; 116 if(wait(6)!=0) return; A 1266 .line 116 0005F7 B0E0 A 1267 CLR R0 0005F9 1C06 A 1268 LD R1,#6 0005FB 70E1 A 1269 PUSH R1 0005FD 70E0 A 1270 PUSH R0 0005FF D6 0000 A 1271 CALL _wait 000602 50E1 A 1272 POP R1 000604 50E1 A 1273 POP R1 000606 4200 A 1274 OR R0,R0 000608 ED 09 52 A 1275 JR NE,_4_L_31 A 1276 ; 117 move(LEG1a,55,2); A 1277 .line 117 00060B B0E0 A 1278 CLR R0 00060D 1C02 A 1279 LD R1,#2 00060F 70E1 A 1280 PUSH R1 000611 70E0 A 1281 PUSH R0 000613 1C37 A 1282 LD R1,#55 000615 70E1 A 1283 PUSH R1 000617 70E0 A 1284 PUSH R0 000619 1C01 A 1285 LD R1,#1 00061B 70E1 A 1286 PUSH R1 00061D 70E0 A 1287 PUSH R0 00061F D6 0000 A 1288 CALL _move 000622 50E0 A 1289 POP R0 000624 50E0 A 1290 POP R0 000626 50E0 A 1291 POP R0 000628 50E0 A 1292 POP R0 00062A 50E0 A 1293 POP R0 00062C 50E0 A 1294 POP R0 A 1295 ; 118 move(LEG5a,-55,2); A 1296 .line 118 00062E B0E0 A 1297 CLR R0 000630 1C02 A 1298 LD R1,#2 000632 70E1 A 1299 PUSH R1 000634 70E0 A 1300 PUSH R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 26 PC Object I Line Source main.src 000636 0CFF A 1301 LD R0,#255 000638 1CC9 A 1302 LD R1,#201 00063A 70E1 A 1303 PUSH R1 00063C 70E0 A 1304 PUSH R0 00063E B0E0 A 1305 CLR R0 000640 1C05 A 1306 LD R1,#5 000642 70E1 A 1307 PUSH R1 000644 70E0 A 1308 PUSH R0 000646 D6 0000 A 1309 CALL _move 000649 50E0 A 1310 POP R0 00064B 50E0 A 1311 POP R0 00064D 50E0 A 1312 POP R0 00064F 50E0 A 1313 POP R0 000651 50E0 A 1314 POP R0 000653 50E0 A 1315 POP R0 A 1316 ; 119 move(LEG3a,55,2); A 1317 .line 119 000655 B0E0 A 1318 CLR R0 000657 1C02 A 1319 LD R1,#2 000659 70E1 A 1320 PUSH R1 00065B 70E0 A 1321 PUSH R0 00065D 1C37 A 1322 LD R1,#55 00065F 70E1 A 1323 PUSH R1 000661 70E0 A 1324 PUSH R0 000663 1C0B A 1325 LD R1,#11 000665 70E1 A 1326 PUSH R1 000667 70E0 A 1327 PUSH R0 000669 D6 0000 A 1328 CALL _move 00066C 50E0 A 1329 POP R0 00066E 50E0 A 1330 POP R0 000670 50E0 A 1331 POP R0 000672 50E0 A 1332 POP R0 000674 50E0 A 1333 POP R0 000676 50E0 A 1334 POP R0 A 1335 ; 120 if(wait(6)!=0) return; A 1336 .line 120 000678 B0E0 A 1337 CLR R0 00067A 1C06 A 1338 LD R1,#6 00067C 70E1 A 1339 PUSH R1 00067E 70E0 A 1340 PUSH R0 000680 D6 0000 A 1341 CALL _wait 000683 50E1 A 1342 POP R1 000685 50E1 A 1343 POP R1 000687 4200 A 1344 OR R0,R0 000689 ED 09 52 A 1345 JR NE,_4_L_31 A 1346 ; 121 move(LEG1b,30,2); A 1347 .line 121 00068C B0E0 A 1348 CLR R0 00068E 1C02 A 1349 LD R1,#2 000690 70E1 A 1350 PUSH R1 000692 70E0 A 1351 PUSH R0 000694 1C1E A 1352 LD R1,#30 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 27 PC Object I Line Source main.src 000696 70E1 A 1353 PUSH R1 000698 70E0 A 1354 PUSH R0 00069A 1C02 A 1355 LD R1,#2 00069C 70E1 A 1356 PUSH R1 00069E 70E0 A 1357 PUSH R0 0006A0 D6 0000 A 1358 CALL _move 0006A3 50E0 A 1359 POP R0 0006A5 50E0 A 1360 POP R0 0006A7 50E0 A 1361 POP R0 0006A9 50E0 A 1362 POP R0 0006AB 50E0 A 1363 POP R0 0006AD 50E0 A 1364 POP R0 A 1365 ; 122 move(LEG5b,0,2); A 1366 .line 122 0006AF B0E0 A 1367 CLR R0 0006B1 1C02 A 1368 LD R1,#2 0006B3 70E1 A 1369 PUSH R1 0006B5 70E0 A 1370 PUSH R0 0006B7 B0E1 A 1371 CLR R1 0006B9 70E1 A 1372 PUSH R1 0006BB 70E0 A 1373 PUSH R0 0006BD 1C06 A 1374 LD R1,#6 0006BF 70E1 A 1375 PUSH R1 0006C1 70E0 A 1376 PUSH R0 0006C3 D6 0000 A 1377 CALL _move 0006C6 50E0 A 1378 POP R0 0006C8 50E0 A 1379 POP R0 0006CA 50E0 A 1380 POP R0 0006CC 50E0 A 1381 POP R0 0006CE 50E0 A 1382 POP R0 0006D0 50E0 A 1383 POP R0 A 1384 ; 123 move(LEG3b,-30,2); A 1385 .line 123 0006D2 B0E0 A 1386 CLR R0 0006D4 1C02 A 1387 LD R1,#2 0006D6 70E1 A 1388 PUSH R1 0006D8 70E0 A 1389 PUSH R0 0006DA 0CFF A 1390 LD R0,#255 0006DC 1CE2 A 1391 LD R1,#226 0006DE 70E1 A 1392 PUSH R1 0006E0 70E0 A 1393 PUSH R0 0006E2 B0E0 A 1394 CLR R0 0006E4 1C0C A 1395 LD R1,#12 0006E6 70E1 A 1396 PUSH R1 0006E8 70E0 A 1397 PUSH R0 0006EA D6 0000 A 1398 CALL _move 0006ED 50E0 A 1399 POP R0 0006EF 50E0 A 1400 POP R0 0006F1 50E0 A 1401 POP R0 0006F3 50E0 A 1402 POP R0 0006F5 50E0 A 1403 POP R0 0006F7 50E0 A 1404 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 28 PC Object I Line Source main.src A 1405 ; 124 if(wait(6)!=0) return; A 1406 .line 124 0006F9 B0E0 A 1407 CLR R0 0006FB 1C06 A 1408 LD R1,#6 0006FD 70E1 A 1409 PUSH R1 0006FF 70E0 A 1410 PUSH R0 000701 D6 0000 A 1411 CALL _wait 000704 50E1 A 1412 POP R1 000706 50E1 A 1413 POP R1 000708 4200 A 1414 OR R0,R0 00070A ED 09 52 A 1415 JR NE,_4_L_31 A 1416 ; 125 move(LEG1a,0,2); A 1417 .line 125 00070D B0E0 A 1418 CLR R0 00070F 1C02 A 1419 LD R1,#2 000711 70E1 A 1420 PUSH R1 000713 70E0 A 1421 PUSH R0 000715 B0E1 A 1422 CLR R1 000717 70E1 A 1423 PUSH R1 000719 70E0 A 1424 PUSH R0 00071B 1C01 A 1425 LD R1,#1 00071D 70E1 A 1426 PUSH R1 00071F 70E0 A 1427 PUSH R0 000721 D6 0000 A 1428 CALL _move 000724 50E0 A 1429 POP R0 000726 50E0 A 1430 POP R0 000728 50E0 A 1431 POP R0 00072A 50E0 A 1432 POP R0 00072C 50E0 A 1433 POP R0 00072E 50E0 A 1434 POP R0 A 1435 ; 126 move(LEG5a,0,2); A 1436 .line 126 000730 B0E0 A 1437 CLR R0 000732 1C02 A 1438 LD R1,#2 000734 70E1 A 1439 PUSH R1 000736 70E0 A 1440 PUSH R0 000738 B0E1 A 1441 CLR R1 00073A 70E1 A 1442 PUSH R1 00073C 70E0 A 1443 PUSH R0 00073E 1C05 A 1444 LD R1,#5 000740 70E1 A 1445 PUSH R1 000742 70E0 A 1446 PUSH R0 000744 D6 0000 A 1447 CALL _move 000747 50E0 A 1448 POP R0 000749 50E0 A 1449 POP R0 00074B 50E0 A 1450 POP R0 00074D 50E0 A 1451 POP R0 00074F 50E0 A 1452 POP R0 000751 50E0 A 1453 POP R0 A 1454 ; 127 move(LEG3a,0,2); A 1455 .line 127 000753 B0E0 A 1456 CLR R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 29 PC Object I Line Source main.src 000755 1C02 A 1457 LD R1,#2 000757 70E1 A 1458 PUSH R1 000759 70E0 A 1459 PUSH R0 00075B B0E1 A 1460 CLR R1 00075D 70E1 A 1461 PUSH R1 00075F 70E0 A 1462 PUSH R0 000761 1C0B A 1463 LD R1,#11 000763 70E1 A 1464 PUSH R1 000765 70E0 A 1465 PUSH R0 000767 D6 0000 A 1466 CALL _move 00076A 50E0 A 1467 POP R0 00076C 50E0 A 1468 POP R0 00076E 50E0 A 1469 POP R0 000770 50E0 A 1470 POP R0 000772 50E0 A 1471 POP R0 000774 50E0 A 1472 POP R0 A 1473 ; 128 if(wait(6)!=0) return; A 1474 .line 128 000776 B0E0 A 1475 CLR R0 000778 1C06 A 1476 LD R1,#6 00077A 70E1 A 1477 PUSH R1 00077C 70E0 A 1478 PUSH R0 00077E D6 0000 A 1479 CALL _wait 000781 50E1 A 1480 POP R1 000783 50E1 A 1481 POP R1 000785 4200 A 1482 OR R0,R0 000787 ED 09 52 A 1483 JR NE,_4_L_31 A 1484 ; 129 move(LEG2a,55,2); A 1485 .line 129 00078A B0E0 A 1486 CLR R0 00078C 1C02 A 1487 LD R1,#2 00078E 70E1 A 1488 PUSH R1 000790 70E0 A 1489 PUSH R0 000792 1C37 A 1490 LD R1,#55 000794 70E1 A 1491 PUSH R1 000796 70E0 A 1492 PUSH R0 000798 1C03 A 1493 LD R1,#3 00079A 70E1 A 1494 PUSH R1 00079C 70E0 A 1495 PUSH R0 00079E D6 0000 A 1496 CALL _move 0007A1 50E0 A 1497 POP R0 0007A3 50E0 A 1498 POP R0 0007A5 50E0 A 1499 POP R0 0007A7 50E0 A 1500 POP R0 0007A9 50E0 A 1501 POP R0 0007AB 50E0 A 1502 POP R0 A 1503 ; 130 move(LEG4a,-55,2); A 1504 .line 130 0007AD B0E0 A 1505 CLR R0 0007AF 1C02 A 1506 LD R1,#2 0007B1 70E1 A 1507 PUSH R1 0007B3 70E0 A 1508 PUSH R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 30 PC Object I Line Source main.src 0007B5 0CFF A 1509 LD R0,#255 0007B7 1CC9 A 1510 LD R1,#201 0007B9 70E1 A 1511 PUSH R1 0007BB 70E0 A 1512 PUSH R0 0007BD B0E0 A 1513 CLR R0 0007BF 1C07 A 1514 LD R1,#7 0007C1 70E1 A 1515 PUSH R1 0007C3 70E0 A 1516 PUSH R0 0007C5 D6 0000 A 1517 CALL _move 0007C8 50E0 A 1518 POP R0 0007CA 50E0 A 1519 POP R0 0007CC 50E0 A 1520 POP R0 0007CE 50E0 A 1521 POP R0 0007D0 50E0 A 1522 POP R0 0007D2 50E0 A 1523 POP R0 A 1524 ; 131 move(LEG6a,-55,2); A 1525 .line 131 0007D4 B0E0 A 1526 CLR R0 0007D6 1C02 A 1527 LD R1,#2 0007D8 70E1 A 1528 PUSH R1 0007DA 70E0 A 1529 PUSH R0 0007DC 0CFF A 1530 LD R0,#255 0007DE 1CC9 A 1531 LD R1,#201 0007E0 70E1 A 1532 PUSH R1 0007E2 70E0 A 1533 PUSH R0 0007E4 B0E0 A 1534 CLR R0 0007E6 1C0D A 1535 LD R1,#13 0007E8 70E1 A 1536 PUSH R1 0007EA 70E0 A 1537 PUSH R0 0007EC D6 0000 A 1538 CALL _move 0007EF 50E0 A 1539 POP R0 0007F1 50E0 A 1540 POP R0 0007F3 50E0 A 1541 POP R0 0007F5 50E0 A 1542 POP R0 0007F7 50E0 A 1543 POP R0 0007F9 50E0 A 1544 POP R0 A 1545 ; 132 if(wait(6)!=0) return; A 1546 .line 132 0007FB B0E0 A 1547 CLR R0 0007FD 1C06 A 1548 LD R1,#6 0007FF 70E1 A 1549 PUSH R1 000801 70E0 A 1550 PUSH R0 000803 D6 0000 A 1551 CALL _wait 000806 50E1 A 1552 POP R1 000808 50E1 A 1553 POP R1 00080A 4200 A 1554 OR R0,R0 00080C ED 09 52 A 1555 JR NE,_4_L_31 A 1556 ; 133 move(LEG2b,0,2); A 1557 .line 133 00080F B0E0 A 1558 CLR R0 000811 1C02 A 1559 LD R1,#2 000813 70E1 A 1560 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 31 PC Object I Line Source main.src 000815 70E0 A 1561 PUSH R0 000817 B0E1 A 1562 CLR R1 000819 70E1 A 1563 PUSH R1 00081B 70E0 A 1564 PUSH R0 00081D 1C04 A 1565 LD R1,#4 00081F 70E1 A 1566 PUSH R1 000821 70E0 A 1567 PUSH R0 000823 D6 0000 A 1568 CALL _move 000826 50E0 A 1569 POP R0 000828 50E0 A 1570 POP R0 00082A 50E0 A 1571 POP R0 00082C 50E0 A 1572 POP R0 00082E 50E0 A 1573 POP R0 000830 50E0 A 1574 POP R0 A 1575 ; 134 move(LEG4b,-30,2); A 1576 .line 134 000832 B0E0 A 1577 CLR R0 000834 1C02 A 1578 LD R1,#2 000836 70E1 A 1579 PUSH R1 000838 70E0 A 1580 PUSH R0 00083A 0CFF A 1581 LD R0,#255 00083C 1CE2 A 1582 LD R1,#226 00083E 70E1 A 1583 PUSH R1 000840 70E0 A 1584 PUSH R0 000842 B0E0 A 1585 CLR R0 000844 1C08 A 1586 LD R1,#8 000846 70E1 A 1587 PUSH R1 000848 70E0 A 1588 PUSH R0 00084A D6 0000 A 1589 CALL _move 00084D 50E0 A 1590 POP R0 00084F 50E0 A 1591 POP R0 000851 50E0 A 1592 POP R0 000853 50E0 A 1593 POP R0 000855 50E0 A 1594 POP R0 000857 50E0 A 1595 POP R0 A 1596 ; 135 move(LEG6b,30,2); A 1597 .line 135 000859 B0E0 A 1598 CLR R0 00085B 1C02 A 1599 LD R1,#2 00085D 70E1 A 1600 PUSH R1 00085F 70E0 A 1601 PUSH R0 000861 1C1E A 1602 LD R1,#30 000863 70E1 A 1603 PUSH R1 000865 70E0 A 1604 PUSH R0 000867 1C0E A 1605 LD R1,#14 000869 70E1 A 1606 PUSH R1 00086B 70E0 A 1607 PUSH R0 00086D D6 0000 A 1608 CALL _move 000870 50E0 A 1609 POP R0 000872 50E0 A 1610 POP R0 000874 50E0 A 1611 POP R0 000876 50E0 A 1612 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 32 PC Object I Line Source main.src 000878 50E0 A 1613 POP R0 00087A 50E0 A 1614 POP R0 A 1615 ; 136 if(wait(6)!=0) return; A 1616 .line 136 00087C B0E0 A 1617 CLR R0 00087E 1C06 A 1618 LD R1,#6 000880 70E1 A 1619 PUSH R1 000882 70E0 A 1620 PUSH R0 000884 D6 0000 A 1621 CALL _wait 000887 50E1 A 1622 POP R1 000889 50E1 A 1623 POP R1 00088B 4200 A 1624 OR R0,R0 00088D ED 09 52 A 1625 JR NE,_4_L_31 A 1626 ; 137 move(LEG2a,0,2); A 1627 .line 137 000890 B0E0 A 1628 CLR R0 000892 1C02 A 1629 LD R1,#2 000894 70E1 A 1630 PUSH R1 000896 70E0 A 1631 PUSH R0 000898 B0E1 A 1632 CLR R1 00089A 70E1 A 1633 PUSH R1 00089C 70E0 A 1634 PUSH R0 00089E 1C03 A 1635 LD R1,#3 0008A0 70E1 A 1636 PUSH R1 0008A2 70E0 A 1637 PUSH R0 0008A4 D6 0000 A 1638 CALL _move 0008A7 50E0 A 1639 POP R0 0008A9 50E0 A 1640 POP R0 0008AB 50E0 A 1641 POP R0 0008AD 50E0 A 1642 POP R0 0008AF 50E0 A 1643 POP R0 0008B1 50E0 A 1644 POP R0 A 1645 ; 138 move(LEG4a,0,2); A 1646 .line 138 0008B3 B0E0 A 1647 CLR R0 0008B5 1C02 A 1648 LD R1,#2 0008B7 70E1 A 1649 PUSH R1 0008B9 70E0 A 1650 PUSH R0 0008BB B0E1 A 1651 CLR R1 0008BD 70E1 A 1652 PUSH R1 0008BF 70E0 A 1653 PUSH R0 0008C1 1C07 A 1654 LD R1,#7 0008C3 70E1 A 1655 PUSH R1 0008C5 70E0 A 1656 PUSH R0 0008C7 D6 0000 A 1657 CALL _move 0008CA 50E0 A 1658 POP R0 0008CC 50E0 A 1659 POP R0 0008CE 50E0 A 1660 POP R0 0008D0 50E0 A 1661 POP R0 0008D2 50E0 A 1662 POP R0 0008D4 50E0 A 1663 POP R0 A 1664 ; 139 move(LEG6a,0,2); Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 33 PC Object I Line Source main.src A 1665 .line 139 0008D6 B0E0 A 1666 CLR R0 0008D8 1C02 A 1667 LD R1,#2 0008DA 70E1 A 1668 PUSH R1 0008DC 70E0 A 1669 PUSH R0 0008DE B0E1 A 1670 CLR R1 0008E0 70E1 A 1671 PUSH R1 0008E2 70E0 A 1672 PUSH R0 0008E4 1C0D A 1673 LD R1,#13 0008E6 70E1 A 1674 PUSH R1 0008E8 70E0 A 1675 PUSH R0 0008EA D6 0000 A 1676 CALL _move 0008ED 50E0 A 1677 POP R0 0008EF 50E0 A 1678 POP R0 0008F1 50E0 A 1679 POP R0 0008F3 50E0 A 1680 POP R0 0008F5 50E0 A 1681 POP R0 0008F7 50E0 A 1682 POP R0 A 1683 ; 140 wait(30); A 1684 .line 140 0008F9 B0E0 A 1685 CLR R0 0008FB 1C1E A 1686 LD R1,#30 0008FD 70E1 A 1687 PUSH R1 0008FF 70E0 A 1688 PUSH R0 000901 D6 0000 A 1689 CALL _wait 000904 50E0 A 1690 POP R0 000906 50E0 A 1691 POP R0 A 1692 ; 141 servo_out(0,8,0x00); // turn off servos A 1693 .line 141 000908 B0E0 A 1694 CLR R0 00090A B0E1 A 1695 CLR R1 00090C 70E1 A 1696 PUSH R1 00090E 70E0 A 1697 PUSH R0 000910 1C08 A 1698 LD R1,#8 000912 70E1 A 1699 PUSH R1 000914 70E0 A 1700 PUSH R0 000916 B0E1 A 1701 CLR R1 000918 70E1 A 1702 PUSH R1 00091A 70E0 A 1703 PUSH R0 00091C D6 0000 A 1704 CALL _servo_out 00091F 50E0 A 1705 POP R0 000921 50E0 A 1706 POP R0 000923 50E0 A 1707 POP R0 000925 50E0 A 1708 POP R0 000927 50E0 A 1709 POP R0 000929 50E0 A 1710 POP R0 A 1711 ; 142 servo_out(9,8,0x00); A 1712 .line 142 00092B B0E0 A 1713 CLR R0 00092D B0E1 A 1714 CLR R1 00092F 70E1 A 1715 PUSH R1 000931 70E0 A 1716 PUSH R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 34 PC Object I Line Source main.src 000933 1C08 A 1717 LD R1,#8 000935 70E1 A 1718 PUSH R1 000937 70E0 A 1719 PUSH R0 000939 1C09 A 1720 LD R1,#9 00093B 70E1 A 1721 PUSH R1 00093D 70E0 A 1722 PUSH R0 00093F D6 0000 A 1723 CALL _servo_out 000942 50E0 A 1724 POP R0 000944 50E0 A 1725 POP R0 000946 50E0 A 1726 POP R0 000948 50E0 A 1727 POP R0 00094A 50E0 A 1728 POP R0 00094C 50E0 A 1729 POP R0 A 1730 ; 143 oldir=0; // to make sure this wont repeat A 1731 .line 143 00094E E9000007 A 1732 LDX _oldir,#-0 A 1733 ; 144 } 000952 A 1734 _4_L_31: A 1735 .line 144 000952 AF A 1736 RET A 1737 .endfunc "tenhut",144,"_tenhut" A 1738 SEGMENT ROM_DATA A 1739 A 1740 A 1741 ;**************************** _turn *************************** A 1742 ;Name Addr/Register Size Type A 1743 ;_wait IMPORT ----- function A 1744 ;_move IMPORT ----- function A 1745 ;_servo_out IMPORT ----- function A 1746 ;angle R15+4 1 parameter A 1747 A 1748 A 1749 ; Aggregate Stack Size: 0 (words) A 1750 A 1751 A 1752 .FRAME _n_turn,?_n_turn,RDATA A 1753 .FCALL _n_servo_out A 1754 .FCALL _n_move A 1755 .FCALL _n_wait A 1756 .FRAME _f_turn,?_f_turn,EDATA A 1757 .FCALL _f_servo_out A 1758 .FCALL _f_move A 1759 .FCALL _f_wait A 1760 SEGMENT main_TEXT 000953 A 1761 _turn: A 1762 .define "_turn" A 1763 .value _turn A 1764 .class 2 A 1765 .type 65 A 1766 .type 0 A 1767 .endef A 1768 .begfunc "turn",148,"_turn" Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 35 PC Object I Line Source main.src A 1769 .define "angle" A 1770 .class 17 A 1771 .reg -1 A 1772 .type 3 A 1773 .type 0 A 1774 .endef 000953 D6 0000 A 1775 CALL __b_frameset00 A 1776 ; 145 A 1777 ; 146 A 1778 ; 147 void turn(int angle) A 1779 ; 148 { A 1780 ; 149 servo_out(0,8,0xFF); // turn on servos A 1781 .line 149 000956 B0E0 A 1782 CLR R0 000958 1CFF A 1783 LD R1,#255 00095A 70E1 A 1784 PUSH R1 00095C 70E0 A 1785 PUSH R0 00095E 1C08 A 1786 LD R1,#8 000960 70E1 A 1787 PUSH R1 000962 70E0 A 1788 PUSH R0 000964 B0E1 A 1789 CLR R1 000966 70E1 A 1790 PUSH R1 000968 70E0 A 1791 PUSH R0 00096A D6 0000 A 1792 CALL _servo_out 00096D 50E0 A 1793 POP R0 00096F 50E0 A 1794 POP R0 000971 50E0 A 1795 POP R0 000973 50E0 A 1796 POP R0 000975 50E0 A 1797 POP R0 000977 50E0 A 1798 POP R0 A 1799 ; 150 servo_out(9,8,0xFF); A 1800 .line 150 000979 B0E0 A 1801 CLR R0 00097B 1CFF A 1802 LD R1,#255 00097D 70E1 A 1803 PUSH R1 00097F 70E0 A 1804 PUSH R0 000981 1C08 A 1805 LD R1,#8 000983 70E1 A 1806 PUSH R1 000985 70E0 A 1807 PUSH R0 000987 1C09 A 1808 LD R1,#9 000989 70E1 A 1809 PUSH R1 00098B 70E0 A 1810 PUSH R0 00098D D6 0000 A 1811 CALL _servo_out 000990 50E0 A 1812 POP R0 000992 50E0 A 1813 POP R0 000994 50E0 A 1814 POP R0 000996 50E0 A 1815 POP R0 000998 50E0 A 1816 POP R0 00099A 50E0 A 1817 POP R0 A 1818 ; 151 A 1819 ; 152 move(LEG1a,45,2); A 1820 .line 152 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 36 PC Object I Line Source main.src 00099C B0E0 A 1821 CLR R0 00099E 1C02 A 1822 LD R1,#2 0009A0 70E1 A 1823 PUSH R1 0009A2 70E0 A 1824 PUSH R0 0009A4 1C2D A 1825 LD R1,#45 0009A6 70E1 A 1826 PUSH R1 0009A8 70E0 A 1827 PUSH R0 0009AA 1C01 A 1828 LD R1,#1 0009AC 70E1 A 1829 PUSH R1 0009AE 70E0 A 1830 PUSH R0 0009B0 D6 0000 A 1831 CALL _move 0009B3 50E0 A 1832 POP R0 0009B5 50E0 A 1833 POP R0 0009B7 50E0 A 1834 POP R0 0009B9 50E0 A 1835 POP R0 0009BB 50E0 A 1836 POP R0 0009BD 50E0 A 1837 POP R0 A 1838 ; 153 move(LEG5a,-45,2); A 1839 .line 153 0009BF B0E0 A 1840 CLR R0 0009C1 1C02 A 1841 LD R1,#2 0009C3 70E1 A 1842 PUSH R1 0009C5 70E0 A 1843 PUSH R0 0009C7 0CFF A 1844 LD R0,#255 0009C9 1CD3 A 1845 LD R1,#211 0009CB 70E1 A 1846 PUSH R1 0009CD 70E0 A 1847 PUSH R0 0009CF B0E0 A 1848 CLR R0 0009D1 1C05 A 1849 LD R1,#5 0009D3 70E1 A 1850 PUSH R1 0009D5 70E0 A 1851 PUSH R0 0009D7 D6 0000 A 1852 CALL _move 0009DA 50E0 A 1853 POP R0 0009DC 50E0 A 1854 POP R0 0009DE 50E0 A 1855 POP R0 0009E0 50E0 A 1856 POP R0 0009E2 50E0 A 1857 POP R0 0009E4 50E0 A 1858 POP R0 A 1859 ; 154 move(LEG3a,45,2); A 1860 .line 154 0009E6 B0E0 A 1861 CLR R0 0009E8 1C02 A 1862 LD R1,#2 0009EA 70E1 A 1863 PUSH R1 0009EC 70E0 A 1864 PUSH R0 0009EE 1C2D A 1865 LD R1,#45 0009F0 70E1 A 1866 PUSH R1 0009F2 70E0 A 1867 PUSH R0 0009F4 1C0B A 1868 LD R1,#11 0009F6 70E1 A 1869 PUSH R1 0009F8 70E0 A 1870 PUSH R0 0009FA D6 0000 A 1871 CALL _move 0009FD 50E0 A 1872 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 37 PC Object I Line Source main.src 0009FF 50E0 A 1873 POP R0 000A01 50E0 A 1874 POP R0 000A03 50E0 A 1875 POP R0 000A05 50E0 A 1876 POP R0 000A07 50E0 A 1877 POP R0 A 1878 ; 155 if(wait(5)!=0) return; A 1879 .line 155 000A09 B0E0 A 1880 CLR R0 000A0B 1C05 A 1881 LD R1,#5 000A0D 70E1 A 1882 PUSH R1 000A0F 70E0 A 1883 PUSH R0 000A11 D6 0000 A 1884 CALL _wait 000A14 50E1 A 1885 POP R1 000A16 50E1 A 1886 POP R1 000A18 4200 A 1887 OR R0,R0 000A1A ED 0D 9B A 1888 JR NE,_5_L_44 A 1889 ; 156 move(LEG1b,angle,2); A 1890 .line 156 000A1D B0E0 A 1891 CLR R0 000A1F 1C02 A 1892 LD R1,#2 000A21 70E1 A 1893 PUSH R1 000A23 70E0 A 1894 PUSH R0 000A25 880E04 A 1895 LDX R0,4(RR14) 000A28 881E05 A 1896 LDX R1,5(RR14) 000A2B 70E1 A 1897 PUSH R1 000A2D 70E0 A 1898 PUSH R0 000A2F B0E0 A 1899 CLR R0 000A31 1C02 A 1900 LD R1,#2 000A33 70E1 A 1901 PUSH R1 000A35 70E0 A 1902 PUSH R0 000A37 D6 0000 A 1903 CALL _move 000A3A 50E0 A 1904 POP R0 000A3C 50E0 A 1905 POP R0 000A3E 50E0 A 1906 POP R0 000A40 50E0 A 1907 POP R0 000A42 50E0 A 1908 POP R0 000A44 50E0 A 1909 POP R0 A 1910 ; 157 move(LEG5b,angle,2); A 1911 .line 157 000A46 B0E0 A 1912 CLR R0 000A48 1C02 A 1913 LD R1,#2 000A4A 70E1 A 1914 PUSH R1 000A4C 70E0 A 1915 PUSH R0 000A4E 880E04 A 1916 LDX R0,4(RR14) 000A51 881E05 A 1917 LDX R1,5(RR14) 000A54 70E1 A 1918 PUSH R1 000A56 70E0 A 1919 PUSH R0 000A58 B0E0 A 1920 CLR R0 000A5A 1C06 A 1921 LD R1,#6 000A5C 70E1 A 1922 PUSH R1 000A5E 70E0 A 1923 PUSH R0 000A60 D6 0000 A 1924 CALL _move Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 38 PC Object I Line Source main.src 000A63 50E0 A 1925 POP R0 000A65 50E0 A 1926 POP R0 000A67 50E0 A 1927 POP R0 000A69 50E0 A 1928 POP R0 000A6B 50E0 A 1929 POP R0 000A6D 50E0 A 1930 POP R0 A 1931 ; 158 move(LEG3b,angle,2); A 1932 .line 158 000A6F B0E0 A 1933 CLR R0 000A71 1C02 A 1934 LD R1,#2 000A73 70E1 A 1935 PUSH R1 000A75 70E0 A 1936 PUSH R0 000A77 880E04 A 1937 LDX R0,4(RR14) 000A7A 881E05 A 1938 LDX R1,5(RR14) 000A7D 70E1 A 1939 PUSH R1 000A7F 70E0 A 1940 PUSH R0 000A81 B0E0 A 1941 CLR R0 000A83 1C0C A 1942 LD R1,#12 000A85 70E1 A 1943 PUSH R1 000A87 70E0 A 1944 PUSH R0 000A89 D6 0000 A 1945 CALL _move 000A8C 50E0 A 1946 POP R0 000A8E 50E0 A 1947 POP R0 000A90 50E0 A 1948 POP R0 000A92 50E0 A 1949 POP R0 000A94 50E0 A 1950 POP R0 000A96 50E0 A 1951 POP R0 A 1952 ; 159 if(wait(8)!=0) return; A 1953 .line 159 000A98 B0E0 A 1954 CLR R0 000A9A 1C08 A 1955 LD R1,#8 000A9C 70E1 A 1956 PUSH R1 000A9E 70E0 A 1957 PUSH R0 000AA0 D6 0000 A 1958 CALL _wait 000AA3 50E1 A 1959 POP R1 000AA5 50E1 A 1960 POP R1 000AA7 4200 A 1961 OR R0,R0 000AA9 ED 0D 9B A 1962 JR NE,_5_L_44 A 1963 ; 160 move(LEG1a,0,2); A 1964 .line 160 000AAC B0E0 A 1965 CLR R0 000AAE 1C02 A 1966 LD R1,#2 000AB0 70E1 A 1967 PUSH R1 000AB2 70E0 A 1968 PUSH R0 000AB4 B0E1 A 1969 CLR R1 000AB6 70E1 A 1970 PUSH R1 000AB8 70E0 A 1971 PUSH R0 000ABA 1C01 A 1972 LD R1,#1 000ABC 70E1 A 1973 PUSH R1 000ABE 70E0 A 1974 PUSH R0 000AC0 D6 0000 A 1975 CALL _move 000AC3 50E0 A 1976 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 39 PC Object I Line Source main.src 000AC5 50E0 A 1977 POP R0 000AC7 50E0 A 1978 POP R0 000AC9 50E0 A 1979 POP R0 000ACB 50E0 A 1980 POP R0 000ACD 50E0 A 1981 POP R0 A 1982 ; 161 move(LEG5a,0,2); A 1983 .line 161 000ACF B0E0 A 1984 CLR R0 000AD1 1C02 A 1985 LD R1,#2 000AD3 70E1 A 1986 PUSH R1 000AD5 70E0 A 1987 PUSH R0 000AD7 B0E1 A 1988 CLR R1 000AD9 70E1 A 1989 PUSH R1 000ADB 70E0 A 1990 PUSH R0 000ADD 1C05 A 1991 LD R1,#5 000ADF 70E1 A 1992 PUSH R1 000AE1 70E0 A 1993 PUSH R0 000AE3 D6 0000 A 1994 CALL _move 000AE6 50E0 A 1995 POP R0 000AE8 50E0 A 1996 POP R0 000AEA 50E0 A 1997 POP R0 000AEC 50E0 A 1998 POP R0 000AEE 50E0 A 1999 POP R0 000AF0 50E0 A 2000 POP R0 A 2001 ; 162 move(LEG3a,0,2); A 2002 .line 162 000AF2 B0E0 A 2003 CLR R0 000AF4 1C02 A 2004 LD R1,#2 000AF6 70E1 A 2005 PUSH R1 000AF8 70E0 A 2006 PUSH R0 000AFA B0E1 A 2007 CLR R1 000AFC 70E1 A 2008 PUSH R1 000AFE 70E0 A 2009 PUSH R0 000B00 1C0B A 2010 LD R1,#11 000B02 70E1 A 2011 PUSH R1 000B04 70E0 A 2012 PUSH R0 000B06 D6 0000 A 2013 CALL _move 000B09 50E0 A 2014 POP R0 000B0B 50E0 A 2015 POP R0 000B0D 50E0 A 2016 POP R0 000B0F 50E0 A 2017 POP R0 000B11 50E0 A 2018 POP R0 000B13 50E0 A 2019 POP R0 A 2020 ; 163 if(wait(5)!=0) return; A 2021 .line 163 000B15 B0E0 A 2022 CLR R0 000B17 1C05 A 2023 LD R1,#5 000B19 70E1 A 2024 PUSH R1 000B1B 70E0 A 2025 PUSH R0 000B1D D6 0000 A 2026 CALL _wait 000B20 50E1 A 2027 POP R1 000B22 50E1 A 2028 POP R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 40 PC Object I Line Source main.src 000B24 4200 A 2029 OR R0,R0 000B26 ED 0D 9B A 2030 JR NE,_5_L_44 A 2031 ; 164 A 2032 ; 165 move(LEG2a,45,2); A 2033 .line 165 000B29 B0E0 A 2034 CLR R0 000B2B 1C02 A 2035 LD R1,#2 000B2D 70E1 A 2036 PUSH R1 000B2F 70E0 A 2037 PUSH R0 000B31 1C2D A 2038 LD R1,#45 000B33 70E1 A 2039 PUSH R1 000B35 70E0 A 2040 PUSH R0 000B37 1C03 A 2041 LD R1,#3 000B39 70E1 A 2042 PUSH R1 000B3B 70E0 A 2043 PUSH R0 000B3D D6 0000 A 2044 CALL _move 000B40 50E0 A 2045 POP R0 000B42 50E0 A 2046 POP R0 000B44 50E0 A 2047 POP R0 000B46 50E0 A 2048 POP R0 000B48 50E0 A 2049 POP R0 000B4A 50E0 A 2050 POP R0 A 2051 ; 166 move(LEG4a,-45,2); A 2052 .line 166 000B4C B0E0 A 2053 CLR R0 000B4E 1C02 A 2054 LD R1,#2 000B50 70E1 A 2055 PUSH R1 000B52 70E0 A 2056 PUSH R0 000B54 0CFF A 2057 LD R0,#255 000B56 1CD3 A 2058 LD R1,#211 000B58 70E1 A 2059 PUSH R1 000B5A 70E0 A 2060 PUSH R0 000B5C B0E0 A 2061 CLR R0 000B5E 1C07 A 2062 LD R1,#7 000B60 70E1 A 2063 PUSH R1 000B62 70E0 A 2064 PUSH R0 000B64 D6 0000 A 2065 CALL _move 000B67 50E0 A 2066 POP R0 000B69 50E0 A 2067 POP R0 000B6B 50E0 A 2068 POP R0 000B6D 50E0 A 2069 POP R0 000B6F 50E0 A 2070 POP R0 000B71 50E0 A 2071 POP R0 A 2072 ; 167 move(LEG6a,-45,2); A 2073 .line 167 000B73 B0E0 A 2074 CLR R0 000B75 1C02 A 2075 LD R1,#2 000B77 70E1 A 2076 PUSH R1 000B79 70E0 A 2077 PUSH R0 000B7B 0CFF A 2078 LD R0,#255 000B7D 1CD3 A 2079 LD R1,#211 000B7F 70E1 A 2080 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 41 PC Object I Line Source main.src 000B81 70E0 A 2081 PUSH R0 000B83 B0E0 A 2082 CLR R0 000B85 1C0D A 2083 LD R1,#13 000B87 70E1 A 2084 PUSH R1 000B89 70E0 A 2085 PUSH R0 000B8B D6 0000 A 2086 CALL _move 000B8E 50E0 A 2087 POP R0 000B90 50E0 A 2088 POP R0 000B92 50E0 A 2089 POP R0 000B94 50E0 A 2090 POP R0 000B96 50E0 A 2091 POP R0 000B98 50E0 A 2092 POP R0 A 2093 ; 168 if(wait(5)!=0) return; A 2094 .line 168 000B9A B0E0 A 2095 CLR R0 000B9C 1C05 A 2096 LD R1,#5 000B9E 70E1 A 2097 PUSH R1 000BA0 70E0 A 2098 PUSH R0 000BA2 D6 0000 A 2099 CALL _wait 000BA5 50E1 A 2100 POP R1 000BA7 50E1 A 2101 POP R1 000BA9 4200 A 2102 OR R0,R0 000BAB ED 0D 9B A 2103 JR NE,_5_L_44 A 2104 ; 169 move(LEG2b,angle,2); A 2105 .line 169 000BAE B0E0 A 2106 CLR R0 000BB0 1C02 A 2107 LD R1,#2 000BB2 70E1 A 2108 PUSH R1 000BB4 70E0 A 2109 PUSH R0 000BB6 880E04 A 2110 LDX R0,4(RR14) 000BB9 881E05 A 2111 LDX R1,5(RR14) 000BBC 70E1 A 2112 PUSH R1 000BBE 70E0 A 2113 PUSH R0 000BC0 B0E0 A 2114 CLR R0 000BC2 1C04 A 2115 LD R1,#4 000BC4 70E1 A 2116 PUSH R1 000BC6 70E0 A 2117 PUSH R0 000BC8 D6 0000 A 2118 CALL _move 000BCB 50E0 A 2119 POP R0 000BCD 50E0 A 2120 POP R0 000BCF 50E0 A 2121 POP R0 000BD1 50E0 A 2122 POP R0 000BD3 50E0 A 2123 POP R0 000BD5 50E0 A 2124 POP R0 A 2125 ; 170 move(LEG4b,angle,2); A 2126 .line 170 000BD7 B0E0 A 2127 CLR R0 000BD9 1C02 A 2128 LD R1,#2 000BDB 70E1 A 2129 PUSH R1 000BDD 70E0 A 2130 PUSH R0 000BDF 880E04 A 2131 LDX R0,4(RR14) 000BE2 881E05 A 2132 LDX R1,5(RR14) Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 42 PC Object I Line Source main.src 000BE5 70E1 A 2133 PUSH R1 000BE7 70E0 A 2134 PUSH R0 000BE9 B0E0 A 2135 CLR R0 000BEB 1C08 A 2136 LD R1,#8 000BED 70E1 A 2137 PUSH R1 000BEF 70E0 A 2138 PUSH R0 000BF1 D6 0000 A 2139 CALL _move 000BF4 50E0 A 2140 POP R0 000BF6 50E0 A 2141 POP R0 000BF8 50E0 A 2142 POP R0 000BFA 50E0 A 2143 POP R0 000BFC 50E0 A 2144 POP R0 000BFE 50E0 A 2145 POP R0 A 2146 ; 171 move(LEG6b,angle,2); A 2147 .line 171 000C00 B0E0 A 2148 CLR R0 000C02 1C02 A 2149 LD R1,#2 000C04 70E1 A 2150 PUSH R1 000C06 70E0 A 2151 PUSH R0 000C08 880E04 A 2152 LDX R0,4(RR14) 000C0B 881E05 A 2153 LDX R1,5(RR14) 000C0E 70E1 A 2154 PUSH R1 000C10 70E0 A 2155 PUSH R0 000C12 B0E0 A 2156 CLR R0 000C14 1C0E A 2157 LD R1,#14 000C16 70E1 A 2158 PUSH R1 000C18 70E0 A 2159 PUSH R0 000C1A D6 0000 A 2160 CALL _move 000C1D 50E0 A 2161 POP R0 000C1F 50E0 A 2162 POP R0 000C21 50E0 A 2163 POP R0 000C23 50E0 A 2164 POP R0 000C25 50E0 A 2165 POP R0 000C27 50E0 A 2166 POP R0 A 2167 ; 172 if(wait(8)!=0) return; A 2168 .line 172 000C29 B0E0 A 2169 CLR R0 000C2B 1C08 A 2170 LD R1,#8 000C2D 70E1 A 2171 PUSH R1 000C2F 70E0 A 2172 PUSH R0 000C31 D6 0000 A 2173 CALL _wait 000C34 50E1 A 2174 POP R1 000C36 50E1 A 2175 POP R1 000C38 4200 A 2176 OR R0,R0 000C3A ED 0D 9B A 2177 JR NE,_5_L_44 A 2178 ; 173 move(LEG2a,0,2); A 2179 .line 173 000C3D B0E0 A 2180 CLR R0 000C3F 1C02 A 2181 LD R1,#2 000C41 70E1 A 2182 PUSH R1 000C43 70E0 A 2183 PUSH R0 000C45 B0E1 A 2184 CLR R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 43 PC Object I Line Source main.src 000C47 70E1 A 2185 PUSH R1 000C49 70E0 A 2186 PUSH R0 000C4B 1C03 A 2187 LD R1,#3 000C4D 70E1 A 2188 PUSH R1 000C4F 70E0 A 2189 PUSH R0 000C51 D6 0000 A 2190 CALL _move 000C54 50E0 A 2191 POP R0 000C56 50E0 A 2192 POP R0 000C58 50E0 A 2193 POP R0 000C5A 50E0 A 2194 POP R0 000C5C 50E0 A 2195 POP R0 000C5E 50E0 A 2196 POP R0 A 2197 ; 174 move(LEG4a,0,2); A 2198 .line 174 000C60 B0E0 A 2199 CLR R0 000C62 1C02 A 2200 LD R1,#2 000C64 70E1 A 2201 PUSH R1 000C66 70E0 A 2202 PUSH R0 000C68 B0E1 A 2203 CLR R1 000C6A 70E1 A 2204 PUSH R1 000C6C 70E0 A 2205 PUSH R0 000C6E 1C07 A 2206 LD R1,#7 000C70 70E1 A 2207 PUSH R1 000C72 70E0 A 2208 PUSH R0 000C74 D6 0000 A 2209 CALL _move 000C77 50E0 A 2210 POP R0 000C79 50E0 A 2211 POP R0 000C7B 50E0 A 2212 POP R0 000C7D 50E0 A 2213 POP R0 000C7F 50E0 A 2214 POP R0 000C81 50E0 A 2215 POP R0 A 2216 ; 175 move(LEG6a,0,2); A 2217 .line 175 000C83 B0E0 A 2218 CLR R0 000C85 1C02 A 2219 LD R1,#2 000C87 70E1 A 2220 PUSH R1 000C89 70E0 A 2221 PUSH R0 000C8B B0E1 A 2222 CLR R1 000C8D 70E1 A 2223 PUSH R1 000C8F 70E0 A 2224 PUSH R0 000C91 1C0D A 2225 LD R1,#13 000C93 70E1 A 2226 PUSH R1 000C95 70E0 A 2227 PUSH R0 000C97 D6 0000 A 2228 CALL _move 000C9A 50E0 A 2229 POP R0 000C9C 50E0 A 2230 POP R0 000C9E 50E0 A 2231 POP R0 000CA0 50E0 A 2232 POP R0 000CA2 50E0 A 2233 POP R0 000CA4 50E0 A 2234 POP R0 A 2235 ; 176 if(wait(5)!=0) return; A 2236 .line 176 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 44 PC Object I Line Source main.src 000CA6 B0E0 A 2237 CLR R0 000CA8 1C05 A 2238 LD R1,#5 000CAA 70E1 A 2239 PUSH R1 000CAC 70E0 A 2240 PUSH R0 000CAE D6 0000 A 2241 CALL _wait 000CB1 50E1 A 2242 POP R1 000CB3 50E1 A 2243 POP R1 000CB5 4200 A 2244 OR R0,R0 000CB7 ED 0D 9B A 2245 JR NE,_5_L_44 A 2246 ; 177 A 2247 ; 178 A 2248 ; 179 A 2249 ; 180 move(LEG1b,0,3); A 2250 .line 180 000CBA B0E0 A 2251 CLR R0 000CBC 1C03 A 2252 LD R1,#3 000CBE 70E1 A 2253 PUSH R1 000CC0 70E0 A 2254 PUSH R0 000CC2 B0E1 A 2255 CLR R1 000CC4 70E1 A 2256 PUSH R1 000CC6 70E0 A 2257 PUSH R0 000CC8 1C02 A 2258 LD R1,#2 000CCA 70E1 A 2259 PUSH R1 000CCC 70E0 A 2260 PUSH R0 000CCE D6 0000 A 2261 CALL _move 000CD1 50E0 A 2262 POP R0 000CD3 50E0 A 2263 POP R0 000CD5 50E0 A 2264 POP R0 000CD7 50E0 A 2265 POP R0 000CD9 50E0 A 2266 POP R0 000CDB 50E0 A 2267 POP R0 A 2268 ; 181 move(LEG2b,0,3); A 2269 .line 181 000CDD B0E0 A 2270 CLR R0 000CDF 1C03 A 2271 LD R1,#3 000CE1 70E1 A 2272 PUSH R1 000CE3 70E0 A 2273 PUSH R0 000CE5 B0E1 A 2274 CLR R1 000CE7 70E1 A 2275 PUSH R1 000CE9 70E0 A 2276 PUSH R0 000CEB 1C04 A 2277 LD R1,#4 000CED 70E1 A 2278 PUSH R1 000CEF 70E0 A 2279 PUSH R0 000CF1 D6 0000 A 2280 CALL _move 000CF4 50E0 A 2281 POP R0 000CF6 50E0 A 2282 POP R0 000CF8 50E0 A 2283 POP R0 000CFA 50E0 A 2284 POP R0 000CFC 50E0 A 2285 POP R0 000CFE 50E0 A 2286 POP R0 A 2287 ; 182 move(LEG3b,0,3); A 2288 .line 182 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 45 PC Object I Line Source main.src 000D00 B0E0 A 2289 CLR R0 000D02 1C03 A 2290 LD R1,#3 000D04 70E1 A 2291 PUSH R1 000D06 70E0 A 2292 PUSH R0 000D08 B0E1 A 2293 CLR R1 000D0A 70E1 A 2294 PUSH R1 000D0C 70E0 A 2295 PUSH R0 000D0E 1C0C A 2296 LD R1,#12 000D10 70E1 A 2297 PUSH R1 000D12 70E0 A 2298 PUSH R0 000D14 D6 0000 A 2299 CALL _move 000D17 50E0 A 2300 POP R0 000D19 50E0 A 2301 POP R0 000D1B 50E0 A 2302 POP R0 000D1D 50E0 A 2303 POP R0 000D1F 50E0 A 2304 POP R0 000D21 50E0 A 2305 POP R0 A 2306 ; 183 move(LEG4b,0,3); A 2307 .line 183 000D23 B0E0 A 2308 CLR R0 000D25 1C03 A 2309 LD R1,#3 000D27 70E1 A 2310 PUSH R1 000D29 70E0 A 2311 PUSH R0 000D2B B0E1 A 2312 CLR R1 000D2D 70E1 A 2313 PUSH R1 000D2F 70E0 A 2314 PUSH R0 000D31 1C08 A 2315 LD R1,#8 000D33 70E1 A 2316 PUSH R1 000D35 70E0 A 2317 PUSH R0 000D37 D6 0000 A 2318 CALL _move 000D3A 50E0 A 2319 POP R0 000D3C 50E0 A 2320 POP R0 000D3E 50E0 A 2321 POP R0 000D40 50E0 A 2322 POP R0 000D42 50E0 A 2323 POP R0 000D44 50E0 A 2324 POP R0 A 2325 ; 184 move(LEG5b,0,3); A 2326 .line 184 000D46 B0E0 A 2327 CLR R0 000D48 1C03 A 2328 LD R1,#3 000D4A 70E1 A 2329 PUSH R1 000D4C 70E0 A 2330 PUSH R0 000D4E B0E1 A 2331 CLR R1 000D50 70E1 A 2332 PUSH R1 000D52 70E0 A 2333 PUSH R0 000D54 1C06 A 2334 LD R1,#6 000D56 70E1 A 2335 PUSH R1 000D58 70E0 A 2336 PUSH R0 000D5A D6 0000 A 2337 CALL _move 000D5D 50E0 A 2338 POP R0 000D5F 50E0 A 2339 POP R0 000D61 50E0 A 2340 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 46 PC Object I Line Source main.src 000D63 50E0 A 2341 POP R0 000D65 50E0 A 2342 POP R0 000D67 50E0 A 2343 POP R0 A 2344 ; 185 move(LEG6b,0,3); A 2345 .line 185 000D69 B0E0 A 2346 CLR R0 000D6B 1C03 A 2347 LD R1,#3 000D6D 70E1 A 2348 PUSH R1 000D6F 70E0 A 2349 PUSH R0 000D71 B0E1 A 2350 CLR R1 000D73 70E1 A 2351 PUSH R1 000D75 70E0 A 2352 PUSH R0 000D77 1C0E A 2353 LD R1,#14 000D79 70E1 A 2354 PUSH R1 000D7B 70E0 A 2355 PUSH R0 000D7D D6 0000 A 2356 CALL _move 000D80 50E0 A 2357 POP R0 000D82 50E0 A 2358 POP R0 000D84 50E0 A 2359 POP R0 000D86 50E0 A 2360 POP R0 000D88 50E0 A 2361 POP R0 000D8A 50E0 A 2362 POP R0 A 2363 ; 186 wait(8); A 2364 .line 186 000D8C B0E0 A 2365 CLR R0 000D8E 1C08 A 2366 LD R1,#8 000D90 70E1 A 2367 PUSH R1 000D92 70E0 A 2368 PUSH R0 000D94 D6 0000 A 2369 CALL _wait 000D97 50E0 A 2370 POP R0 000D99 50E0 A 2371 POP R0 A 2372 ; 187 } 000D9B A 2373 _5_L_44: A 2374 .line 187 000D9B D6 0000 A 2375 CALL __b_framereset 000D9E AF A 2376 RET A 2377 .endfunc "turn",187,"_turn" A 2378 SEGMENT ROM_DATA A 2379 A 2380 A 2381 ;**************************** _left *************************** A 2382 ;Name Addr/Register Size Type A 2383 A 2384 A 2385 ; Aggregate Stack Size: 0 (words) A 2386 A 2387 A 2388 .FRAME _n_left,?_n_left,RDATA A 2389 .FCALL _n_turn A 2390 .FRAME _f_left,?_f_left,EDATA A 2391 .FCALL _f_turn A 2392 SEGMENT main_TEXT Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 47 PC Object I Line Source main.src 000D9F A 2393 _left: A 2394 .define "_left" A 2395 .value _left A 2396 .class 2 A 2397 .type 65 A 2398 .type 0 A 2399 .endef A 2400 .begfunc "left",190,"_left" A 2401 ; 188 A 2402 ; 189 void left(void) A 2403 ; 190 { A 2404 ; 191 turn(-70); A 2405 .line 191 000D9F 0CFF A 2406 LD R0,#255 000DA1 1CBA A 2407 LD R1,#186 000DA3 70E1 A 2408 PUSH R1 000DA5 70E0 A 2409 PUSH R0 000DA7 D6 0953 A 2410 CALL _turn 000DAA 50E0 A 2411 POP R0 000DAC 50E0 A 2412 POP R0 A 2413 ; 192 } A 2414 .line 192 000DAE AF A 2415 RET A 2416 .endfunc "left",192,"_left" A 2417 SEGMENT ROM_DATA A 2418 A 2419 A 2420 ;**************************** _right *************************** A 2421 ;Name Addr/Register Size Type A 2422 A 2423 A 2424 ; Aggregate Stack Size: 0 (words) A 2425 A 2426 A 2427 .FRAME _n_right,?_n_right,RDATA A 2428 .FCALL _n_turn A 2429 .FRAME _f_right,?_f_right,EDATA A 2430 .FCALL _f_turn A 2431 SEGMENT main_TEXT 000DAF A 2432 _right: A 2433 .define "_right" A 2434 .value _right A 2435 .class 2 A 2436 .type 65 A 2437 .type 0 A 2438 .endef A 2439 .begfunc "right",195,"_right" A 2440 ; 193 A 2441 ; 194 void right(void) A 2442 ; 195 { A 2443 ; 196 turn(70); A 2444 .line 196 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 48 PC Object I Line Source main.src 000DAF B0E0 A 2445 CLR R0 000DB1 1C46 A 2446 LD R1,#70 000DB3 70E1 A 2447 PUSH R1 000DB5 70E0 A 2448 PUSH R0 000DB7 D6 0953 A 2449 CALL _turn 000DBA 50E0 A 2450 POP R0 000DBC 50E0 A 2451 POP R0 A 2452 ; 197 } A 2453 .line 197 000DBE AF A 2454 RET A 2455 .endfunc "right",197,"_right" A 2456 SEGMENT ROM_DATA A 2457 A 2458 A 2459 ;**************************** _sit *************************** A 2460 ;Name Addr/Register Size Type A 2461 ;_wait IMPORT ----- function A 2462 ;_move IMPORT ----- function A 2463 ;_servo_out IMPORT ----- function A 2464 A 2465 A 2466 ; Aggregate Stack Size: 0 (words) A 2467 A 2468 A 2469 .FRAME _n_sit,?_n_sit,RDATA A 2470 .FCALL _n_servo_out A 2471 .FCALL _n_move A 2472 .FCALL _n_wait A 2473 .FRAME _f_sit,?_f_sit,EDATA A 2474 .FCALL _f_servo_out A 2475 .FCALL _f_move A 2476 .FCALL _f_wait A 2477 SEGMENT main_TEXT 000DBF A 2478 _sit: A 2479 .define "_sit" A 2480 .value _sit A 2481 .class 2 A 2482 .type 65 A 2483 .type 0 A 2484 .endef A 2485 .begfunc "sit",200,"_sit" A 2486 ; 198 A 2487 ; 199 void sit(void) A 2488 ; 200 { A 2489 ; 201 servo_out(0,8,0xFF); // turn on servos A 2490 .line 201 000DBF B0E0 A 2491 CLR R0 000DC1 1CFF A 2492 LD R1,#255 000DC3 70E1 A 2493 PUSH R1 000DC5 70E0 A 2494 PUSH R0 000DC7 1C08 A 2495 LD R1,#8 000DC9 70E1 A 2496 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 49 PC Object I Line Source main.src 000DCB 70E0 A 2497 PUSH R0 000DCD B0E1 A 2498 CLR R1 000DCF 70E1 A 2499 PUSH R1 000DD1 70E0 A 2500 PUSH R0 000DD3 D6 0000 A 2501 CALL _servo_out 000DD6 50E0 A 2502 POP R0 000DD8 50E0 A 2503 POP R0 000DDA 50E0 A 2504 POP R0 000DDC 50E0 A 2505 POP R0 000DDE 50E0 A 2506 POP R0 000DE0 50E0 A 2507 POP R0 A 2508 ; 202 servo_out(9,8,0xFF); A 2509 .line 202 000DE2 B0E0 A 2510 CLR R0 000DE4 1CFF A 2511 LD R1,#255 000DE6 70E1 A 2512 PUSH R1 000DE8 70E0 A 2513 PUSH R0 000DEA 1C08 A 2514 LD R1,#8 000DEC 70E1 A 2515 PUSH R1 000DEE 70E0 A 2516 PUSH R0 000DF0 1C09 A 2517 LD R1,#9 000DF2 70E1 A 2518 PUSH R1 000DF4 70E0 A 2519 PUSH R0 000DF6 D6 0000 A 2520 CALL _servo_out 000DF9 50E0 A 2521 POP R0 000DFB 50E0 A 2522 POP R0 000DFD 50E0 A 2523 POP R0 000DFF 50E0 A 2524 POP R0 000E01 50E0 A 2525 POP R0 000E03 50E0 A 2526 POP R0 A 2527 ; 203 A 2528 ; 204 move(LEG3a,45,2); A 2529 .line 204 000E05 B0E0 A 2530 CLR R0 000E07 1C02 A 2531 LD R1,#2 000E09 70E1 A 2532 PUSH R1 000E0B 70E0 A 2533 PUSH R0 000E0D 1C2D A 2534 LD R1,#45 000E0F 70E1 A 2535 PUSH R1 000E11 70E0 A 2536 PUSH R0 000E13 1C0B A 2537 LD R1,#11 000E15 70E1 A 2538 PUSH R1 000E17 70E0 A 2539 PUSH R0 000E19 D6 0000 A 2540 CALL _move 000E1C 50E0 A 2541 POP R0 000E1E 50E0 A 2542 POP R0 000E20 50E0 A 2543 POP R0 000E22 50E0 A 2544 POP R0 000E24 50E0 A 2545 POP R0 000E26 50E0 A 2546 POP R0 A 2547 ; 205 move(LEG3b,80,2); A 2548 .line 205 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 50 PC Object I Line Source main.src 000E28 B0E0 A 2549 CLR R0 000E2A 1C02 A 2550 LD R1,#2 000E2C 70E1 A 2551 PUSH R1 000E2E 70E0 A 2552 PUSH R0 000E30 1C50 A 2553 LD R1,#80 000E32 70E1 A 2554 PUSH R1 000E34 70E0 A 2555 PUSH R0 000E36 1C0C A 2556 LD R1,#12 000E38 70E1 A 2557 PUSH R1 000E3A 70E0 A 2558 PUSH R0 000E3C D6 0000 A 2559 CALL _move 000E3F 50E0 A 2560 POP R0 000E41 50E0 A 2561 POP R0 000E43 50E0 A 2562 POP R0 000E45 50E0 A 2563 POP R0 000E47 50E0 A 2564 POP R0 000E49 50E0 A 2565 POP R0 A 2566 ; 206 if(wait(5)!=0) return; A 2567 .line 206 000E4B B0E0 A 2568 CLR R0 000E4D 1C05 A 2569 LD R1,#5 000E4F 70E1 A 2570 PUSH R1 000E51 70E0 A 2571 PUSH R0 000E53 D6 0000 A 2572 CALL _wait 000E56 50E1 A 2573 POP R1 000E58 50E1 A 2574 POP R1 000E5A 4200 A 2575 OR R0,R0 000E5C ED 14 49 A 2576 JR NE,_8_L_84 A 2577 ; 207 move(LEG3a,0,1); A 2578 .line 207 000E5F B0E0 A 2579 CLR R0 000E61 1C01 A 2580 LD R1,#1 000E63 70E1 A 2581 PUSH R1 000E65 70E0 A 2582 PUSH R0 000E67 B0E1 A 2583 CLR R1 000E69 70E1 A 2584 PUSH R1 000E6B 70E0 A 2585 PUSH R0 000E6D 1C0B A 2586 LD R1,#11 000E6F 70E1 A 2587 PUSH R1 000E71 70E0 A 2588 PUSH R0 000E73 D6 0000 A 2589 CALL _move 000E76 50E0 A 2590 POP R0 000E78 50E0 A 2591 POP R0 000E7A 50E0 A 2592 POP R0 000E7C 50E0 A 2593 POP R0 000E7E 50E0 A 2594 POP R0 000E80 50E0 A 2595 POP R0 A 2596 ; 208 if(wait(5)!=0) return; A 2597 .line 208 000E82 B0E0 A 2598 CLR R0 000E84 1C05 A 2599 LD R1,#5 000E86 70E1 A 2600 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 51 PC Object I Line Source main.src 000E88 70E0 A 2601 PUSH R0 000E8A D6 0000 A 2602 CALL _wait 000E8D 50E1 A 2603 POP R1 000E8F 50E1 A 2604 POP R1 000E91 4200 A 2605 OR R0,R0 000E93 ED 14 49 A 2606 JR NE,_8_L_84 A 2607 ; 209 // A 2608 ; 210 move(LEG6a,-45,2); A 2609 .line 210 000E96 B0E0 A 2610 CLR R0 000E98 1C02 A 2611 LD R1,#2 000E9A 70E1 A 2612 PUSH R1 000E9C 70E0 A 2613 PUSH R0 000E9E 0CFF A 2614 LD R0,#255 000EA0 1CD3 A 2615 LD R1,#211 000EA2 70E1 A 2616 PUSH R1 000EA4 70E0 A 2617 PUSH R0 000EA6 B0E0 A 2618 CLR R0 000EA8 1C0D A 2619 LD R1,#13 000EAA 70E1 A 2620 PUSH R1 000EAC 70E0 A 2621 PUSH R0 000EAE D6 0000 A 2622 CALL _move 000EB1 50E0 A 2623 POP R0 000EB3 50E0 A 2624 POP R0 000EB5 50E0 A 2625 POP R0 000EB7 50E0 A 2626 POP R0 000EB9 50E0 A 2627 POP R0 000EBB 50E0 A 2628 POP R0 A 2629 ; 211 move(LEG6b,-80,2); A 2630 .line 211 000EBD B0E0 A 2631 CLR R0 000EBF 1C02 A 2632 LD R1,#2 000EC1 70E1 A 2633 PUSH R1 000EC3 70E0 A 2634 PUSH R0 000EC5 0CFF A 2635 LD R0,#255 000EC7 1CB0 A 2636 LD R1,#176 000EC9 70E1 A 2637 PUSH R1 000ECB 70E0 A 2638 PUSH R0 000ECD B0E0 A 2639 CLR R0 000ECF 1C0E A 2640 LD R1,#14 000ED1 70E1 A 2641 PUSH R1 000ED3 70E0 A 2642 PUSH R0 000ED5 D6 0000 A 2643 CALL _move 000ED8 50E0 A 2644 POP R0 000EDA 50E0 A 2645 POP R0 000EDC 50E0 A 2646 POP R0 000EDE 50E0 A 2647 POP R0 000EE0 50E0 A 2648 POP R0 000EE2 50E0 A 2649 POP R0 A 2650 ; 212 if(wait(5)!=0) return; A 2651 .line 212 000EE4 B0E0 A 2652 CLR R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 52 PC Object I Line Source main.src 000EE6 1C05 A 2653 LD R1,#5 000EE8 70E1 A 2654 PUSH R1 000EEA 70E0 A 2655 PUSH R0 000EEC D6 0000 A 2656 CALL _wait 000EEF 50E1 A 2657 POP R1 000EF1 50E1 A 2658 POP R1 000EF3 4200 A 2659 OR R0,R0 000EF5 ED 14 49 A 2660 JR NE,_8_L_84 A 2661 ; 213 move(LEG6a,0,1); A 2662 .line 213 000EF8 B0E0 A 2663 CLR R0 000EFA 1C01 A 2664 LD R1,#1 000EFC 70E1 A 2665 PUSH R1 000EFE 70E0 A 2666 PUSH R0 000F00 B0E1 A 2667 CLR R1 000F02 70E1 A 2668 PUSH R1 000F04 70E0 A 2669 PUSH R0 000F06 1C0D A 2670 LD R1,#13 000F08 70E1 A 2671 PUSH R1 000F0A 70E0 A 2672 PUSH R0 000F0C D6 0000 A 2673 CALL _move 000F0F 50E0 A 2674 POP R0 000F11 50E0 A 2675 POP R0 000F13 50E0 A 2676 POP R0 000F15 50E0 A 2677 POP R0 000F17 50E0 A 2678 POP R0 000F19 50E0 A 2679 POP R0 A 2680 ; 214 if(wait(5)!=0) return; A 2681 .line 214 000F1B B0E0 A 2682 CLR R0 000F1D 1C05 A 2683 LD R1,#5 000F1F 70E1 A 2684 PUSH R1 000F21 70E0 A 2685 PUSH R0 000F23 D6 0000 A 2686 CALL _wait 000F26 50E1 A 2687 POP R1 000F28 50E1 A 2688 POP R1 000F2A 4200 A 2689 OR R0,R0 000F2C ED 14 49 A 2690 JR NE,_8_L_84 A 2691 ; 215 A 2692 ; 216 move(LEG2a,45,2); A 2693 .line 216 000F2F B0E0 A 2694 CLR R0 000F31 1C02 A 2695 LD R1,#2 000F33 70E1 A 2696 PUSH R1 000F35 70E0 A 2697 PUSH R0 000F37 1C2D A 2698 LD R1,#45 000F39 70E1 A 2699 PUSH R1 000F3B 70E0 A 2700 PUSH R0 000F3D 1C03 A 2701 LD R1,#3 000F3F 70E1 A 2702 PUSH R1 000F41 70E0 A 2703 PUSH R0 000F43 D6 0000 A 2704 CALL _move Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 53 PC Object I Line Source main.src 000F46 50E0 A 2705 POP R0 000F48 50E0 A 2706 POP R0 000F4A 50E0 A 2707 POP R0 000F4C 50E0 A 2708 POP R0 000F4E 50E0 A 2709 POP R0 000F50 50E0 A 2710 POP R0 A 2711 ; 217 move(LEG2b,80,2); A 2712 .line 217 000F52 B0E0 A 2713 CLR R0 000F54 1C02 A 2714 LD R1,#2 000F56 70E1 A 2715 PUSH R1 000F58 70E0 A 2716 PUSH R0 000F5A 1C50 A 2717 LD R1,#80 000F5C 70E1 A 2718 PUSH R1 000F5E 70E0 A 2719 PUSH R0 000F60 1C04 A 2720 LD R1,#4 000F62 70E1 A 2721 PUSH R1 000F64 70E0 A 2722 PUSH R0 000F66 D6 0000 A 2723 CALL _move 000F69 50E0 A 2724 POP R0 000F6B 50E0 A 2725 POP R0 000F6D 50E0 A 2726 POP R0 000F6F 50E0 A 2727 POP R0 000F71 50E0 A 2728 POP R0 000F73 50E0 A 2729 POP R0 A 2730 ; 218 if(wait(5)!=0) return; A 2731 .line 218 000F75 B0E0 A 2732 CLR R0 000F77 1C05 A 2733 LD R1,#5 000F79 70E1 A 2734 PUSH R1 000F7B 70E0 A 2735 PUSH R0 000F7D D6 0000 A 2736 CALL _wait 000F80 50E1 A 2737 POP R1 000F82 50E1 A 2738 POP R1 000F84 4200 A 2739 OR R0,R0 000F86 ED 14 49 A 2740 JR NE,_8_L_84 A 2741 ; 219 move(LEG2a,0,1); A 2742 .line 219 000F89 B0E0 A 2743 CLR R0 000F8B 1C01 A 2744 LD R1,#1 000F8D 70E1 A 2745 PUSH R1 000F8F 70E0 A 2746 PUSH R0 000F91 B0E1 A 2747 CLR R1 000F93 70E1 A 2748 PUSH R1 000F95 70E0 A 2749 PUSH R0 000F97 1C03 A 2750 LD R1,#3 000F99 70E1 A 2751 PUSH R1 000F9B 70E0 A 2752 PUSH R0 000F9D D6 0000 A 2753 CALL _move 000FA0 50E0 A 2754 POP R0 000FA2 50E0 A 2755 POP R0 000FA4 50E0 A 2756 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 54 PC Object I Line Source main.src 000FA6 50E0 A 2757 POP R0 000FA8 50E0 A 2758 POP R0 000FAA 50E0 A 2759 POP R0 A 2760 ; 220 if(wait(5)!=0) return; A 2761 .line 220 000FAC B0E0 A 2762 CLR R0 000FAE 1C05 A 2763 LD R1,#5 000FB0 70E1 A 2764 PUSH R1 000FB2 70E0 A 2765 PUSH R0 000FB4 D6 0000 A 2766 CALL _wait 000FB7 50E1 A 2767 POP R1 000FB9 50E1 A 2768 POP R1 000FBB 4200 A 2769 OR R0,R0 000FBD ED 14 49 A 2770 JR NE,_8_L_84 A 2771 ; 221 // A 2772 ; 222 move(LEG5a,-45,2); A 2773 .line 222 000FC0 B0E0 A 2774 CLR R0 000FC2 1C02 A 2775 LD R1,#2 000FC4 70E1 A 2776 PUSH R1 000FC6 70E0 A 2777 PUSH R0 000FC8 0CFF A 2778 LD R0,#255 000FCA 1CD3 A 2779 LD R1,#211 000FCC 70E1 A 2780 PUSH R1 000FCE 70E0 A 2781 PUSH R0 000FD0 B0E0 A 2782 CLR R0 000FD2 1C05 A 2783 LD R1,#5 000FD4 70E1 A 2784 PUSH R1 000FD6 70E0 A 2785 PUSH R0 000FD8 D6 0000 A 2786 CALL _move 000FDB 50E0 A 2787 POP R0 000FDD 50E0 A 2788 POP R0 000FDF 50E0 A 2789 POP R0 000FE1 50E0 A 2790 POP R0 000FE3 50E0 A 2791 POP R0 000FE5 50E0 A 2792 POP R0 A 2793 ; 223 move(LEG5b,-80,2); A 2794 .line 223 000FE7 B0E0 A 2795 CLR R0 000FE9 1C02 A 2796 LD R1,#2 000FEB 70E1 A 2797 PUSH R1 000FED 70E0 A 2798 PUSH R0 000FEF 0CFF A 2799 LD R0,#255 000FF1 1CB0 A 2800 LD R1,#176 000FF3 70E1 A 2801 PUSH R1 000FF5 70E0 A 2802 PUSH R0 000FF7 B0E0 A 2803 CLR R0 000FF9 1C06 A 2804 LD R1,#6 000FFB 70E1 A 2805 PUSH R1 000FFD 70E0 A 2806 PUSH R0 000FFF D6 0000 A 2807 CALL _move 001002 50E0 A 2808 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 55 PC Object I Line Source main.src 001004 50E0 A 2809 POP R0 001006 50E0 A 2810 POP R0 001008 50E0 A 2811 POP R0 00100A 50E0 A 2812 POP R0 00100C 50E0 A 2813 POP R0 A 2814 ; 224 if(wait(5)!=0) return; A 2815 .line 224 00100E B0E0 A 2816 CLR R0 001010 1C05 A 2817 LD R1,#5 001012 70E1 A 2818 PUSH R1 001014 70E0 A 2819 PUSH R0 001016 D6 0000 A 2820 CALL _wait 001019 50E1 A 2821 POP R1 00101B 50E1 A 2822 POP R1 00101D 4200 A 2823 OR R0,R0 00101F ED 14 49 A 2824 JR NE,_8_L_84 A 2825 ; 225 move(LEG5a,0,1); A 2826 .line 225 001022 B0E0 A 2827 CLR R0 001024 1C01 A 2828 LD R1,#1 001026 70E1 A 2829 PUSH R1 001028 70E0 A 2830 PUSH R0 00102A B0E1 A 2831 CLR R1 00102C 70E1 A 2832 PUSH R1 00102E 70E0 A 2833 PUSH R0 001030 1C05 A 2834 LD R1,#5 001032 70E1 A 2835 PUSH R1 001034 70E0 A 2836 PUSH R0 001036 D6 0000 A 2837 CALL _move 001039 50E0 A 2838 POP R0 00103B 50E0 A 2839 POP R0 00103D 50E0 A 2840 POP R0 00103F 50E0 A 2841 POP R0 001041 50E0 A 2842 POP R0 001043 50E0 A 2843 POP R0 A 2844 ; 226 if(wait(10)!=0) return; A 2845 .line 226 001045 B0E0 A 2846 CLR R0 001047 1C0A A 2847 LD R1,#10 001049 70E1 A 2848 PUSH R1 00104B 70E0 A 2849 PUSH R0 00104D D6 0000 A 2850 CALL _wait 001050 50E1 A 2851 POP R1 001052 50E1 A 2852 POP R1 001054 4200 A 2853 OR R0,R0 001056 ED 14 49 A 2854 JR NE,_8_L_84 A 2855 ; 227 // A 2856 ; 228 move(LEG3a,60,5); A 2857 .line 228 001059 B0E0 A 2858 CLR R0 00105B 1C05 A 2859 LD R1,#5 00105D 70E1 A 2860 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 56 PC Object I Line Source main.src 00105F 70E0 A 2861 PUSH R0 001061 1C3C A 2862 LD R1,#60 001063 70E1 A 2863 PUSH R1 001065 70E0 A 2864 PUSH R0 001067 1C0B A 2865 LD R1,#11 001069 70E1 A 2866 PUSH R1 00106B 70E0 A 2867 PUSH R0 00106D D6 0000 A 2868 CALL _move 001070 50E0 A 2869 POP R0 001072 50E0 A 2870 POP R0 001074 50E0 A 2871 POP R0 001076 50E0 A 2872 POP R0 001078 50E0 A 2873 POP R0 00107A 50E0 A 2874 POP R0 A 2875 ; 229 move(LEG6a,-60,5); A 2876 .line 229 00107C B0E0 A 2877 CLR R0 00107E 1C05 A 2878 LD R1,#5 001080 70E1 A 2879 PUSH R1 001082 70E0 A 2880 PUSH R0 001084 0CFF A 2881 LD R0,#255 001086 1CC4 A 2882 LD R1,#196 001088 70E1 A 2883 PUSH R1 00108A 70E0 A 2884 PUSH R0 00108C B0E0 A 2885 CLR R0 00108E 1C0D A 2886 LD R1,#13 001090 70E1 A 2887 PUSH R1 001092 70E0 A 2888 PUSH R0 001094 D6 0000 A 2889 CALL _move 001097 50E0 A 2890 POP R0 001099 50E0 A 2891 POP R0 00109B 50E0 A 2892 POP R0 00109D 50E0 A 2893 POP R0 00109F 50E0 A 2894 POP R0 0010A1 50E0 A 2895 POP R0 A 2896 ; 230 wait(10); A 2897 .line 230 0010A3 B0E0 A 2898 CLR R0 0010A5 1C0A A 2899 LD R1,#10 0010A7 70E1 A 2900 PUSH R1 0010A9 70E0 A 2901 PUSH R0 0010AB D6 0000 A 2902 CALL _wait 0010AE 50E0 A 2903 POP R0 0010B0 50E0 A 2904 POP R0 A 2905 ; 231 while(1) 0010B2 A 2906 _8_L_83: A 2907 .line 231 A 2908 ; 232 { A 2909 ; 233 A 2910 ; 234 move(LEG1b,80,2); A 2911 .line 234 0010B2 B0E0 A 2912 CLR R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 57 PC Object I Line Source main.src 0010B4 1C02 A 2913 LD R1,#2 0010B6 70E1 A 2914 PUSH R1 0010B8 70E0 A 2915 PUSH R0 0010BA 1C50 A 2916 LD R1,#80 0010BC 70E1 A 2917 PUSH R1 0010BE 70E0 A 2918 PUSH R0 0010C0 1C02 A 2919 LD R1,#2 0010C2 70E1 A 2920 PUSH R1 0010C4 70E0 A 2921 PUSH R0 0010C6 D6 0000 A 2922 CALL _move 0010C9 50E0 A 2923 POP R0 0010CB 50E0 A 2924 POP R0 0010CD 50E0 A 2925 POP R0 0010CF 50E0 A 2926 POP R0 0010D1 50E0 A 2927 POP R0 0010D3 50E0 A 2928 POP R0 A 2929 ; 235 move(LEG4b,-80,2); A 2930 .line 235 0010D5 B0E0 A 2931 CLR R0 0010D7 1C02 A 2932 LD R1,#2 0010D9 70E1 A 2933 PUSH R1 0010DB 70E0 A 2934 PUSH R0 0010DD 0CFF A 2935 LD R0,#255 0010DF 1CB0 A 2936 LD R1,#176 0010E1 70E1 A 2937 PUSH R1 0010E3 70E0 A 2938 PUSH R0 0010E5 B0E0 A 2939 CLR R0 0010E7 1C08 A 2940 LD R1,#8 0010E9 70E1 A 2941 PUSH R1 0010EB 70E0 A 2942 PUSH R0 0010ED D6 0000 A 2943 CALL _move 0010F0 50E0 A 2944 POP R0 0010F2 50E0 A 2945 POP R0 0010F4 50E0 A 2946 POP R0 0010F6 50E0 A 2947 POP R0 0010F8 50E0 A 2948 POP R0 0010FA 50E0 A 2949 POP R0 A 2950 ; 236 if(wait(5)!=0) return; A 2951 .line 236 0010FC B0E0 A 2952 CLR R0 0010FE 1C05 A 2953 LD R1,#5 001100 70E1 A 2954 PUSH R1 001102 70E0 A 2955 PUSH R0 001104 D6 0000 A 2956 CALL _wait 001107 50E1 A 2957 POP R1 001109 50E1 A 2958 POP R1 00110B 4200 A 2959 OR R0,R0 00110D ED 14 49 A 2960 JR NE,_8_L_84 A 2961 ; 237 move(LEG1a,45,2); A 2962 .line 237 001110 B0E0 A 2963 CLR R0 001112 1C02 A 2964 LD R1,#2 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 58 PC Object I Line Source main.src 001114 70E1 A 2965 PUSH R1 001116 70E0 A 2966 PUSH R0 001118 1C2D A 2967 LD R1,#45 00111A 70E1 A 2968 PUSH R1 00111C 70E0 A 2969 PUSH R0 00111E 1C01 A 2970 LD R1,#1 001120 70E1 A 2971 PUSH R1 001122 70E0 A 2972 PUSH R0 001124 D6 0000 A 2973 CALL _move 001127 50E0 A 2974 POP R0 001129 50E0 A 2975 POP R0 00112B 50E0 A 2976 POP R0 00112D 50E0 A 2977 POP R0 00112F 50E0 A 2978 POP R0 001131 50E0 A 2979 POP R0 A 2980 ; 238 move(LEG4a,-45,2); A 2981 .line 238 001133 B0E0 A 2982 CLR R0 001135 1C02 A 2983 LD R1,#2 001137 70E1 A 2984 PUSH R1 001139 70E0 A 2985 PUSH R0 00113B 0CFF A 2986 LD R0,#255 00113D 1CD3 A 2987 LD R1,#211 00113F 70E1 A 2988 PUSH R1 001141 70E0 A 2989 PUSH R0 001143 B0E0 A 2990 CLR R0 001145 1C07 A 2991 LD R1,#7 001147 70E1 A 2992 PUSH R1 001149 70E0 A 2993 PUSH R0 00114B D6 0000 A 2994 CALL _move 00114E 50E0 A 2995 POP R0 001150 50E0 A 2996 POP R0 001152 50E0 A 2997 POP R0 001154 50E0 A 2998 POP R0 001156 50E0 A 2999 POP R0 001158 50E0 A 3000 POP R0 A 3001 ; 239 if(wait(5)!=0) return; A 3002 .line 239 00115A B0E0 A 3003 CLR R0 00115C 1C05 A 3004 LD R1,#5 00115E 70E1 A 3005 PUSH R1 001160 70E0 A 3006 PUSH R0 001162 D6 0000 A 3007 CALL _wait 001165 50E1 A 3008 POP R1 001167 50E1 A 3009 POP R1 001169 4200 A 3010 OR R0,R0 00116B ED 14 49 A 3011 JR NE,_8_L_84 A 3012 ; 240 move(LEG1a,0,2); A 3013 .line 240 00116E B0E0 A 3014 CLR R0 001170 1C02 A 3015 LD R1,#2 001172 70E1 A 3016 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 59 PC Object I Line Source main.src 001174 70E0 A 3017 PUSH R0 001176 B0E1 A 3018 CLR R1 001178 70E1 A 3019 PUSH R1 00117A 70E0 A 3020 PUSH R0 00117C 1C01 A 3021 LD R1,#1 00117E 70E1 A 3022 PUSH R1 001180 70E0 A 3023 PUSH R0 001182 D6 0000 A 3024 CALL _move 001185 50E0 A 3025 POP R0 001187 50E0 A 3026 POP R0 001189 50E0 A 3027 POP R0 00118B 50E0 A 3028 POP R0 00118D 50E0 A 3029 POP R0 00118F 50E0 A 3030 POP R0 A 3031 ; 241 move(LEG4a,-0,2); A 3032 .line 241 001191 B0E0 A 3033 CLR R0 001193 1C02 A 3034 LD R1,#2 001195 70E1 A 3035 PUSH R1 001197 70E0 A 3036 PUSH R0 001199 B0E1 A 3037 CLR R1 00119B 70E1 A 3038 PUSH R1 00119D 70E0 A 3039 PUSH R0 00119F 1C07 A 3040 LD R1,#7 0011A1 70E1 A 3041 PUSH R1 0011A3 70E0 A 3042 PUSH R0 0011A5 D6 0000 A 3043 CALL _move 0011A8 50E0 A 3044 POP R0 0011AA 50E0 A 3045 POP R0 0011AC 50E0 A 3046 POP R0 0011AE 50E0 A 3047 POP R0 0011B0 50E0 A 3048 POP R0 0011B2 50E0 A 3049 POP R0 A 3050 ; 242 if(wait(5)!=0) return; A 3051 .line 242 0011B4 B0E0 A 3052 CLR R0 0011B6 1C05 A 3053 LD R1,#5 0011B8 70E1 A 3054 PUSH R1 0011BA 70E0 A 3055 PUSH R0 0011BC D6 0000 A 3056 CALL _wait 0011BF 50E1 A 3057 POP R1 0011C1 50E1 A 3058 POP R1 0011C3 4200 A 3059 OR R0,R0 0011C5 ED 14 49 A 3060 JR NE,_8_L_84 A 3061 ; 243 move(LEG1a,45,2); A 3062 .line 243 0011C8 B0E0 A 3063 CLR R0 0011CA 1C02 A 3064 LD R1,#2 0011CC 70E1 A 3065 PUSH R1 0011CE 70E0 A 3066 PUSH R0 0011D0 1C2D A 3067 LD R1,#45 0011D2 70E1 A 3068 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 60 PC Object I Line Source main.src 0011D4 70E0 A 3069 PUSH R0 0011D6 1C01 A 3070 LD R1,#1 0011D8 70E1 A 3071 PUSH R1 0011DA 70E0 A 3072 PUSH R0 0011DC D6 0000 A 3073 CALL _move 0011DF 50E0 A 3074 POP R0 0011E1 50E0 A 3075 POP R0 0011E3 50E0 A 3076 POP R0 0011E5 50E0 A 3077 POP R0 0011E7 50E0 A 3078 POP R0 0011E9 50E0 A 3079 POP R0 A 3080 ; 244 move(LEG4a,-45,2); A 3081 .line 244 0011EB B0E0 A 3082 CLR R0 0011ED 1C02 A 3083 LD R1,#2 0011EF 70E1 A 3084 PUSH R1 0011F1 70E0 A 3085 PUSH R0 0011F3 0CFF A 3086 LD R0,#255 0011F5 1CD3 A 3087 LD R1,#211 0011F7 70E1 A 3088 PUSH R1 0011F9 70E0 A 3089 PUSH R0 0011FB B0E0 A 3090 CLR R0 0011FD 1C07 A 3091 LD R1,#7 0011FF 70E1 A 3092 PUSH R1 001201 70E0 A 3093 PUSH R0 001203 D6 0000 A 3094 CALL _move 001206 50E0 A 3095 POP R0 001208 50E0 A 3096 POP R0 00120A 50E0 A 3097 POP R0 00120C 50E0 A 3098 POP R0 00120E 50E0 A 3099 POP R0 001210 50E0 A 3100 POP R0 A 3101 ; 245 if(wait(5)!=0) return; A 3102 .line 245 001212 B0E0 A 3103 CLR R0 001214 1C05 A 3104 LD R1,#5 001216 70E1 A 3105 PUSH R1 001218 70E0 A 3106 PUSH R0 00121A D6 0000 A 3107 CALL _wait 00121D 50E1 A 3108 POP R1 00121F 50E1 A 3109 POP R1 001221 4200 A 3110 OR R0,R0 001223 ED 14 49 A 3111 JR NE,_8_L_84 A 3112 ; 246 move(LEG1a,0,2); A 3113 .line 246 001226 B0E0 A 3114 CLR R0 001228 1C02 A 3115 LD R1,#2 00122A 70E1 A 3116 PUSH R1 00122C 70E0 A 3117 PUSH R0 00122E B0E1 A 3118 CLR R1 001230 70E1 A 3119 PUSH R1 001232 70E0 A 3120 PUSH R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 61 PC Object I Line Source main.src 001234 1C01 A 3121 LD R1,#1 001236 70E1 A 3122 PUSH R1 001238 70E0 A 3123 PUSH R0 00123A D6 0000 A 3124 CALL _move 00123D 50E0 A 3125 POP R0 00123F 50E0 A 3126 POP R0 001241 50E0 A 3127 POP R0 001243 50E0 A 3128 POP R0 001245 50E0 A 3129 POP R0 001247 50E0 A 3130 POP R0 A 3131 ; 247 move(LEG4a,-0,2); A 3132 .line 247 001249 B0E0 A 3133 CLR R0 00124B 1C02 A 3134 LD R1,#2 00124D 70E1 A 3135 PUSH R1 00124F 70E0 A 3136 PUSH R0 001251 B0E1 A 3137 CLR R1 001253 70E1 A 3138 PUSH R1 001255 70E0 A 3139 PUSH R0 001257 1C07 A 3140 LD R1,#7 001259 70E1 A 3141 PUSH R1 00125B 70E0 A 3142 PUSH R0 00125D D6 0000 A 3143 CALL _move 001260 50E0 A 3144 POP R0 001262 50E0 A 3145 POP R0 001264 50E0 A 3146 POP R0 001266 50E0 A 3147 POP R0 001268 50E0 A 3148 POP R0 00126A 50E0 A 3149 POP R0 A 3150 ; 248 if(wait(5)!=0) return; A 3151 .line 248 00126C B0E0 A 3152 CLR R0 00126E 1C05 A 3153 LD R1,#5 001270 70E1 A 3154 PUSH R1 001272 70E0 A 3155 PUSH R0 001274 D6 0000 A 3156 CALL _wait 001277 50E1 A 3157 POP R1 001279 50E1 A 3158 POP R1 00127B 4200 A 3159 OR R0,R0 00127D ED 14 49 A 3160 JR NE,_8_L_84 A 3161 ; 249 A 3162 ; 250 move(LEG1b,0,2); A 3163 .line 250 001280 B0E0 A 3164 CLR R0 001282 1C02 A 3165 LD R1,#2 001284 70E1 A 3166 PUSH R1 001286 70E0 A 3167 PUSH R0 001288 B0E1 A 3168 CLR R1 00128A 70E1 A 3169 PUSH R1 00128C 70E0 A 3170 PUSH R0 00128E 1C02 A 3171 LD R1,#2 001290 70E1 A 3172 PUSH R1 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 62 PC Object I Line Source main.src 001292 70E0 A 3173 PUSH R0 001294 D6 0000 A 3174 CALL _move 001297 50E0 A 3175 POP R0 001299 50E0 A 3176 POP R0 00129B 50E0 A 3177 POP R0 00129D 50E0 A 3178 POP R0 00129F 50E0 A 3179 POP R0 0012A1 50E0 A 3180 POP R0 A 3181 ; 251 move(LEG4b,0,2); A 3182 .line 251 0012A3 B0E0 A 3183 CLR R0 0012A5 1C02 A 3184 LD R1,#2 0012A7 70E1 A 3185 PUSH R1 0012A9 70E0 A 3186 PUSH R0 0012AB B0E1 A 3187 CLR R1 0012AD 70E1 A 3188 PUSH R1 0012AF 70E0 A 3189 PUSH R0 0012B1 1C08 A 3190 LD R1,#8 0012B3 70E1 A 3191 PUSH R1 0012B5 70E0 A 3192 PUSH R0 0012B7 D6 0000 A 3193 CALL _move 0012BA 50E0 A 3194 POP R0 0012BC 50E0 A 3195 POP R0 0012BE 50E0 A 3196 POP R0 0012C0 50E0 A 3197 POP R0 0012C2 50E0 A 3198 POP R0 0012C4 50E0 A 3199 POP R0 A 3200 ; 252 if(wait(5)!=0) return; A 3201 .line 252 0012C6 B0E0 A 3202 CLR R0 0012C8 1C05 A 3203 LD R1,#5 0012CA 70E1 A 3204 PUSH R1 0012CC 70E0 A 3205 PUSH R0 0012CE D6 0000 A 3206 CALL _wait 0012D1 50E1 A 3207 POP R1 0012D3 50E1 A 3208 POP R1 0012D5 4200 A 3209 OR R0,R0 0012D7 ED 14 49 A 3210 JR NE,_8_L_84 A 3211 ; 253 move(LEG1a,45,2); A 3212 .line 253 0012DA B0E0 A 3213 CLR R0 0012DC 1C02 A 3214 LD R1,#2 0012DE 70E1 A 3215 PUSH R1 0012E0 70E0 A 3216 PUSH R0 0012E2 1C2D A 3217 LD R1,#45 0012E4 70E1 A 3218 PUSH R1 0012E6 70E0 A 3219 PUSH R0 0012E8 1C01 A 3220 LD R1,#1 0012EA 70E1 A 3221 PUSH R1 0012EC 70E0 A 3222 PUSH R0 0012EE D6 0000 A 3223 CALL _move 0012F1 50E0 A 3224 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 63 PC Object I Line Source main.src 0012F3 50E0 A 3225 POP R0 0012F5 50E0 A 3226 POP R0 0012F7 50E0 A 3227 POP R0 0012F9 50E0 A 3228 POP R0 0012FB 50E0 A 3229 POP R0 A 3230 ; 254 move(LEG4a,-45,2); A 3231 .line 254 0012FD B0E0 A 3232 CLR R0 0012FF 1C02 A 3233 LD R1,#2 001301 70E1 A 3234 PUSH R1 001303 70E0 A 3235 PUSH R0 001305 0CFF A 3236 LD R0,#255 001307 1CD3 A 3237 LD R1,#211 001309 70E1 A 3238 PUSH R1 00130B 70E0 A 3239 PUSH R0 00130D B0E0 A 3240 CLR R0 00130F 1C07 A 3241 LD R1,#7 001311 70E1 A 3242 PUSH R1 001313 70E0 A 3243 PUSH R0 001315 D6 0000 A 3244 CALL _move 001318 50E0 A 3245 POP R0 00131A 50E0 A 3246 POP R0 00131C 50E0 A 3247 POP R0 00131E 50E0 A 3248 POP R0 001320 50E0 A 3249 POP R0 001322 50E0 A 3250 POP R0 A 3251 ; 255 if(wait(5)!=0) return; A 3252 .line 255 001324 B0E0 A 3253 CLR R0 001326 1C05 A 3254 LD R1,#5 001328 70E1 A 3255 PUSH R1 00132A 70E0 A 3256 PUSH R0 00132C D6 0000 A 3257 CALL _wait 00132F 50E1 A 3258 POP R1 001331 50E1 A 3259 POP R1 001333 4200 A 3260 OR R0,R0 001335 ED 14 49 A 3261 JR NE,_8_L_84 A 3262 ; 256 move(LEG1a,0,2); A 3263 .line 256 001338 B0E0 A 3264 CLR R0 00133A 1C02 A 3265 LD R1,#2 00133C 70E1 A 3266 PUSH R1 00133E 70E0 A 3267 PUSH R0 001340 B0E1 A 3268 CLR R1 001342 70E1 A 3269 PUSH R1 001344 70E0 A 3270 PUSH R0 001346 1C01 A 3271 LD R1,#1 001348 70E1 A 3272 PUSH R1 00134A 70E0 A 3273 PUSH R0 00134C D6 0000 A 3274 CALL _move 00134F 50E0 A 3275 POP R0 001351 50E0 A 3276 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 64 PC Object I Line Source main.src 001353 50E0 A 3277 POP R0 001355 50E0 A 3278 POP R0 001357 50E0 A 3279 POP R0 001359 50E0 A 3280 POP R0 A 3281 ; 257 move(LEG4a,-0,2); A 3282 .line 257 00135B B0E0 A 3283 CLR R0 00135D 1C02 A 3284 LD R1,#2 00135F 70E1 A 3285 PUSH R1 001361 70E0 A 3286 PUSH R0 001363 B0E1 A 3287 CLR R1 001365 70E1 A 3288 PUSH R1 001367 70E0 A 3289 PUSH R0 001369 1C07 A 3290 LD R1,#7 00136B 70E1 A 3291 PUSH R1 00136D 70E0 A 3292 PUSH R0 00136F D6 0000 A 3293 CALL _move 001372 50E0 A 3294 POP R0 001374 50E0 A 3295 POP R0 001376 50E0 A 3296 POP R0 001378 50E0 A 3297 POP R0 00137A 50E0 A 3298 POP R0 00137C 50E0 A 3299 POP R0 A 3300 ; 258 if(wait(5)!=0) return; A 3301 .line 258 00137E B0E0 A 3302 CLR R0 001380 1C05 A 3303 LD R1,#5 001382 70E1 A 3304 PUSH R1 001384 70E0 A 3305 PUSH R0 001386 D6 0000 A 3306 CALL _wait 001389 50E1 A 3307 POP R1 00138B 50E1 A 3308 POP R1 00138D 4200 A 3309 OR R0,R0 00138F ED 14 49 A 3310 JR NE,_8_L_84 A 3311 ; 259 move(LEG1a,45,2); A 3312 .line 259 001392 B0E0 A 3313 CLR R0 001394 1C02 A 3314 LD R1,#2 001396 70E1 A 3315 PUSH R1 001398 70E0 A 3316 PUSH R0 00139A 1C2D A 3317 LD R1,#45 00139C 70E1 A 3318 PUSH R1 00139E 70E0 A 3319 PUSH R0 0013A0 1C01 A 3320 LD R1,#1 0013A2 70E1 A 3321 PUSH R1 0013A4 70E0 A 3322 PUSH R0 0013A6 D6 0000 A 3323 CALL _move 0013A9 50E0 A 3324 POP R0 0013AB 50E0 A 3325 POP R0 0013AD 50E0 A 3326 POP R0 0013AF 50E0 A 3327 POP R0 0013B1 50E0 A 3328 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 65 PC Object I Line Source main.src 0013B3 50E0 A 3329 POP R0 A 3330 ; 260 move(LEG4a,-45,2); A 3331 .line 260 0013B5 B0E0 A 3332 CLR R0 0013B7 1C02 A 3333 LD R1,#2 0013B9 70E1 A 3334 PUSH R1 0013BB 70E0 A 3335 PUSH R0 0013BD 0CFF A 3336 LD R0,#255 0013BF 1CD3 A 3337 LD R1,#211 0013C1 70E1 A 3338 PUSH R1 0013C3 70E0 A 3339 PUSH R0 0013C5 B0E0 A 3340 CLR R0 0013C7 1C07 A 3341 LD R1,#7 0013C9 70E1 A 3342 PUSH R1 0013CB 70E0 A 3343 PUSH R0 0013CD D6 0000 A 3344 CALL _move 0013D0 50E0 A 3345 POP R0 0013D2 50E0 A 3346 POP R0 0013D4 50E0 A 3347 POP R0 0013D6 50E0 A 3348 POP R0 0013D8 50E0 A 3349 POP R0 0013DA 50E0 A 3350 POP R0 A 3351 ; 261 if(wait(5)!=0) return; A 3352 .line 261 0013DC B0E0 A 3353 CLR R0 0013DE 1C05 A 3354 LD R1,#5 0013E0 70E1 A 3355 PUSH R1 0013E2 70E0 A 3356 PUSH R0 0013E4 D6 0000 A 3357 CALL _wait 0013E7 50E1 A 3358 POP R1 0013E9 50E1 A 3359 POP R1 0013EB 4200 A 3360 OR R0,R0 0013ED EB 5A A 3361 JR NE,_8_L_84 A 3362 ; 262 move(LEG1a,0,2); A 3363 .line 262 0013EF B0E0 A 3364 CLR R0 0013F1 1C02 A 3365 LD R1,#2 0013F3 70E1 A 3366 PUSH R1 0013F5 70E0 A 3367 PUSH R0 0013F7 B0E1 A 3368 CLR R1 0013F9 70E1 A 3369 PUSH R1 0013FB 70E0 A 3370 PUSH R0 0013FD 1C01 A 3371 LD R1,#1 0013FF 70E1 A 3372 PUSH R1 001401 70E0 A 3373 PUSH R0 001403 D6 0000 A 3374 CALL _move 001406 50E0 A 3375 POP R0 001408 50E0 A 3376 POP R0 00140A 50E0 A 3377 POP R0 00140C 50E0 A 3378 POP R0 00140E 50E0 A 3379 POP R0 001410 50E0 A 3380 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 66 PC Object I Line Source main.src A 3381 ; 263 move(LEG4a,-0,2); A 3382 .line 263 001412 B0E0 A 3383 CLR R0 001414 1C02 A 3384 LD R1,#2 001416 70E1 A 3385 PUSH R1 001418 70E0 A 3386 PUSH R0 00141A B0E1 A 3387 CLR R1 00141C 70E1 A 3388 PUSH R1 00141E 70E0 A 3389 PUSH R0 001420 1C07 A 3390 LD R1,#7 001422 70E1 A 3391 PUSH R1 001424 70E0 A 3392 PUSH R0 001426 D6 0000 A 3393 CALL _move 001429 50E0 A 3394 POP R0 00142B 50E0 A 3395 POP R0 00142D 50E0 A 3396 POP R0 00142F 50E0 A 3397 POP R0 001431 50E0 A 3398 POP R0 001433 50E0 A 3399 POP R0 A 3400 ; 264 if(wait(5)!=0) return; A 3401 .line 264 001435 B0E0 A 3402 CLR R0 001437 1C05 A 3403 LD R1,#5 001439 70E1 A 3404 PUSH R1 00143B 70E0 A 3405 PUSH R0 00143D D6 0000 A 3406 CALL _wait 001440 50E1 A 3407 POP R1 001442 50E1 A 3408 POP R1 001444 4200 A 3409 OR R0,R0 001446 6D 10 B2 A 3410 JR Z,_8_L_83 A 3411 ; 265 } A 3412 ; 266 A 3413 ; 267 A 3414 ; 268 } 001449 A 3415 _8_L_84: A 3416 .line 268 001449 AF A 3417 RET A 3418 .endfunc "sit",268,"_sit" A 3419 SEGMENT ROM_DATA A 3420 A 3421 A 3422 ;**************************** _stand *************************** A 3423 ;Name Addr/Register Size Type A 3424 ;_oldir STATIC 0 variable A 3425 ;_wait IMPORT ----- function A 3426 ;_move IMPORT ----- function A 3427 ;_servo_out IMPORT ----- function A 3428 A 3429 A 3430 ; Aggregate Stack Size: 0 (words) A 3431 A 3432 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 67 PC Object I Line Source main.src A 3433 .FRAME _n_stand,?_n_stand,RDATA A 3434 .FCALL _n_servo_out A 3435 .FCALL _n_move A 3436 .FCALL _n_wait A 3437 .FRAME _f_stand,?_f_stand,EDATA A 3438 .FCALL _f_servo_out A 3439 .FCALL _f_move A 3440 .FCALL _f_wait A 3441 SEGMENT main_TEXT 00144A A 3442 _stand: A 3443 .define "_stand" A 3444 .value _stand A 3445 .class 2 A 3446 .type 65 A 3447 .type 0 A 3448 .endef A 3449 .begfunc "stand",271,"_stand" A 3450 ; 269 A 3451 ; 270 void stand(void) A 3452 ; 271 { A 3453 ; 272 A 3454 ; 273 servo_out(0,8,0xFF); // turn on servos A 3455 .line 273 00144A B0E0 A 3456 CLR R0 00144C 1CFF A 3457 LD R1,#255 00144E 70E1 A 3458 PUSH R1 001450 70E0 A 3459 PUSH R0 001452 1C08 A 3460 LD R1,#8 001454 70E1 A 3461 PUSH R1 001456 70E0 A 3462 PUSH R0 001458 B0E1 A 3463 CLR R1 00145A 70E1 A 3464 PUSH R1 00145C 70E0 A 3465 PUSH R0 00145E D6 0000 A 3466 CALL _servo_out 001461 50E0 A 3467 POP R0 001463 50E0 A 3468 POP R0 001465 50E0 A 3469 POP R0 001467 50E0 A 3470 POP R0 001469 50E0 A 3471 POP R0 00146B 50E0 A 3472 POP R0 A 3473 ; 274 servo_out(9,8,0xFF); A 3474 .line 274 00146D B0E0 A 3475 CLR R0 00146F 1CFF A 3476 LD R1,#255 001471 70E1 A 3477 PUSH R1 001473 70E0 A 3478 PUSH R0 001475 1C08 A 3479 LD R1,#8 001477 70E1 A 3480 PUSH R1 001479 70E0 A 3481 PUSH R0 00147B 1C09 A 3482 LD R1,#9 00147D 70E1 A 3483 PUSH R1 00147F 70E0 A 3484 PUSH R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 68 PC Object I Line Source main.src 001481 D6 0000 A 3485 CALL _servo_out 001484 50E0 A 3486 POP R0 001486 50E0 A 3487 POP R0 001488 50E0 A 3488 POP R0 00148A 50E0 A 3489 POP R0 00148C 50E0 A 3490 POP R0 00148E 50E0 A 3491 POP R0 A 3492 ; 275 A 3493 ; 276 move(LEG1a,45,2); A 3494 .line 276 001490 B0E0 A 3495 CLR R0 001492 1C02 A 3496 LD R1,#2 001494 70E1 A 3497 PUSH R1 001496 70E0 A 3498 PUSH R0 001498 1C2D A 3499 LD R1,#45 00149A 70E1 A 3500 PUSH R1 00149C 70E0 A 3501 PUSH R0 00149E 1C01 A 3502 LD R1,#1 0014A0 70E1 A 3503 PUSH R1 0014A2 70E0 A 3504 PUSH R0 0014A4 D6 0000 A 3505 CALL _move 0014A7 50E0 A 3506 POP R0 0014A9 50E0 A 3507 POP R0 0014AB 50E0 A 3508 POP R0 0014AD 50E0 A 3509 POP R0 0014AF 50E0 A 3510 POP R0 0014B1 50E0 A 3511 POP R0 A 3512 ; 277 move(LEG1b,80,2); A 3513 .line 277 0014B3 B0E0 A 3514 CLR R0 0014B5 1C02 A 3515 LD R1,#2 0014B7 70E1 A 3516 PUSH R1 0014B9 70E0 A 3517 PUSH R0 0014BB 1C50 A 3518 LD R1,#80 0014BD 70E1 A 3519 PUSH R1 0014BF 70E0 A 3520 PUSH R0 0014C1 1C02 A 3521 LD R1,#2 0014C3 70E1 A 3522 PUSH R1 0014C5 70E0 A 3523 PUSH R0 0014C7 D6 0000 A 3524 CALL _move 0014CA 50E0 A 3525 POP R0 0014CC 50E0 A 3526 POP R0 0014CE 50E0 A 3527 POP R0 0014D0 50E0 A 3528 POP R0 0014D2 50E0 A 3529 POP R0 0014D4 50E0 A 3530 POP R0 A 3531 ; 278 if(wait(5)!=0) return; A 3532 .line 278 0014D6 B0E0 A 3533 CLR R0 0014D8 1C05 A 3534 LD R1,#5 0014DA 70E1 A 3535 PUSH R1 0014DC 70E0 A 3536 PUSH R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 69 PC Object I Line Source main.src 0014DE D6 0000 A 3537 CALL _wait 0014E1 50E1 A 3538 POP R1 0014E3 50E1 A 3539 POP R1 0014E5 4200 A 3540 OR R0,R0 0014E7 ED 16 12 A 3541 JR NE,_9_L_93 A 3542 ; 279 move(LEG1a,0,1); A 3543 .line 279 0014EA B0E0 A 3544 CLR R0 0014EC 1C01 A 3545 LD R1,#1 0014EE 70E1 A 3546 PUSH R1 0014F0 70E0 A 3547 PUSH R0 0014F2 B0E1 A 3548 CLR R1 0014F4 70E1 A 3549 PUSH R1 0014F6 70E0 A 3550 PUSH R0 0014F8 1C01 A 3551 LD R1,#1 0014FA 70E1 A 3552 PUSH R1 0014FC 70E0 A 3553 PUSH R0 0014FE D6 0000 A 3554 CALL _move 001501 50E0 A 3555 POP R0 001503 50E0 A 3556 POP R0 001505 50E0 A 3557 POP R0 001507 50E0 A 3558 POP R0 001509 50E0 A 3559 POP R0 00150B 50E0 A 3560 POP R0 A 3561 ; 280 if(wait(5)!=0) return; A 3562 .line 280 00150D B0E0 A 3563 CLR R0 00150F 1C05 A 3564 LD R1,#5 001511 70E1 A 3565 PUSH R1 001513 70E0 A 3566 PUSH R0 001515 D6 0000 A 3567 CALL _wait 001518 50E1 A 3568 POP R1 00151A 50E1 A 3569 POP R1 00151C 4200 A 3570 OR R0,R0 00151E ED 16 12 A 3571 JR NE,_9_L_93 A 3572 ; 281 // A 3573 ; 282 move(LEG4a,-45,2); A 3574 .line 282 001521 B0E0 A 3575 CLR R0 001523 1C02 A 3576 LD R1,#2 001525 70E1 A 3577 PUSH R1 001527 70E0 A 3578 PUSH R0 001529 0CFF A 3579 LD R0,#255 00152B 1CD3 A 3580 LD R1,#211 00152D 70E1 A 3581 PUSH R1 00152F 70E0 A 3582 PUSH R0 001531 B0E0 A 3583 CLR R0 001533 1C07 A 3584 LD R1,#7 001535 70E1 A 3585 PUSH R1 001537 70E0 A 3586 PUSH R0 001539 D6 0000 A 3587 CALL _move 00153C 50E0 A 3588 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 70 PC Object I Line Source main.src 00153E 50E0 A 3589 POP R0 001540 50E0 A 3590 POP R0 001542 50E0 A 3591 POP R0 001544 50E0 A 3592 POP R0 001546 50E0 A 3593 POP R0 A 3594 ; 283 move(LEG4b,-80,2); A 3595 .line 283 001548 B0E0 A 3596 CLR R0 00154A 1C02 A 3597 LD R1,#2 00154C 70E1 A 3598 PUSH R1 00154E 70E0 A 3599 PUSH R0 001550 0CFF A 3600 LD R0,#255 001552 1CB0 A 3601 LD R1,#176 001554 70E1 A 3602 PUSH R1 001556 70E0 A 3603 PUSH R0 001558 B0E0 A 3604 CLR R0 00155A 1C08 A 3605 LD R1,#8 00155C 70E1 A 3606 PUSH R1 00155E 70E0 A 3607 PUSH R0 001560 D6 0000 A 3608 CALL _move 001563 50E0 A 3609 POP R0 001565 50E0 A 3610 POP R0 001567 50E0 A 3611 POP R0 001569 50E0 A 3612 POP R0 00156B 50E0 A 3613 POP R0 00156D 50E0 A 3614 POP R0 A 3615 ; 284 if(wait(5)!=0) return; A 3616 .line 284 00156F B0E0 A 3617 CLR R0 001571 1C05 A 3618 LD R1,#5 001573 70E1 A 3619 PUSH R1 001575 70E0 A 3620 PUSH R0 001577 D6 0000 A 3621 CALL _wait 00157A 50E1 A 3622 POP R1 00157C 50E1 A 3623 POP R1 00157E 4200 A 3624 OR R0,R0 001580 ED 16 12 A 3625 JR NE,_9_L_93 A 3626 ; 285 move(LEG4a,0,1); A 3627 .line 285 001583 B0E0 A 3628 CLR R0 001585 1C01 A 3629 LD R1,#1 001587 70E1 A 3630 PUSH R1 001589 70E0 A 3631 PUSH R0 00158B B0E1 A 3632 CLR R1 00158D 70E1 A 3633 PUSH R1 00158F 70E0 A 3634 PUSH R0 001591 1C07 A 3635 LD R1,#7 001593 70E1 A 3636 PUSH R1 001595 70E0 A 3637 PUSH R0 001597 D6 0000 A 3638 CALL _move 00159A 50E0 A 3639 POP R0 00159C 50E0 A 3640 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 71 PC Object I Line Source main.src 00159E 50E0 A 3641 POP R0 0015A0 50E0 A 3642 POP R0 0015A2 50E0 A 3643 POP R0 0015A4 50E0 A 3644 POP R0 A 3645 ; 286 if(wait(5)!=0) return; A 3646 .line 286 0015A6 B0E0 A 3647 CLR R0 0015A8 1C05 A 3648 LD R1,#5 0015AA 70E1 A 3649 PUSH R1 0015AC 70E0 A 3650 PUSH R0 0015AE D6 0000 A 3651 CALL _wait 0015B1 50E1 A 3652 POP R1 0015B3 50E1 A 3653 POP R1 0015B5 4200 A 3654 OR R0,R0 0015B7 EB 59 A 3655 JR NE,_9_L_93 A 3656 ; 287 A 3657 ; 288 move(LEG3a,0,5); A 3658 .line 288 0015B9 B0E0 A 3659 CLR R0 0015BB 1C05 A 3660 LD R1,#5 0015BD 70E1 A 3661 PUSH R1 0015BF 70E0 A 3662 PUSH R0 0015C1 B0E1 A 3663 CLR R1 0015C3 70E1 A 3664 PUSH R1 0015C5 70E0 A 3665 PUSH R0 0015C7 1C0B A 3666 LD R1,#11 0015C9 70E1 A 3667 PUSH R1 0015CB 70E0 A 3668 PUSH R0 0015CD D6 0000 A 3669 CALL _move 0015D0 50E0 A 3670 POP R0 0015D2 50E0 A 3671 POP R0 0015D4 50E0 A 3672 POP R0 0015D6 50E0 A 3673 POP R0 0015D8 50E0 A 3674 POP R0 0015DA 50E0 A 3675 POP R0 A 3676 ; 289 move(LEG6a,0,5); A 3677 .line 289 0015DC B0E0 A 3678 CLR R0 0015DE 1C05 A 3679 LD R1,#5 0015E0 70E1 A 3680 PUSH R1 0015E2 70E0 A 3681 PUSH R0 0015E4 B0E1 A 3682 CLR R1 0015E6 70E1 A 3683 PUSH R1 0015E8 70E0 A 3684 PUSH R0 0015EA 1C0D A 3685 LD R1,#13 0015EC 70E1 A 3686 PUSH R1 0015EE 70E0 A 3687 PUSH R0 0015F0 D6 0000 A 3688 CALL _move 0015F3 50E0 A 3689 POP R0 0015F5 50E0 A 3690 POP R0 0015F7 50E0 A 3691 POP R0 0015F9 50E0 A 3692 POP R0 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 72 PC Object I Line Source main.src 0015FB 50E0 A 3693 POP R0 0015FD 50E0 A 3694 POP R0 A 3695 ; 290 wait(20); A 3696 .line 290 0015FF B0E0 A 3697 CLR R0 001601 1C14 A 3698 LD R1,#20 001603 70E1 A 3699 PUSH R1 001605 70E0 A 3700 PUSH R0 001607 D6 0000 A 3701 CALL _wait 00160A 50E0 A 3702 POP R0 00160C 50E0 A 3703 POP R0 A 3704 ; 291 oldir=0; A 3705 .line 291 00160E E9000007 A 3706 LDX _oldir,#-0 A 3707 ; 292 } 001612 A 3708 _9_L_93: A 3709 .line 292 001612 AF A 3710 RET A 3711 .endfunc "stand",292,"_stand" A 3712 SEGMENT ROM_DATA A 3713 A 3714 A 3715 ;**************************** _main *************************** A 3716 ;Name Addr/Register Size Type A 3717 ;_oldir STATIC 0 variable A 3718 ;_t1 STATIC 0 variable A 3719 ;_wait IMPORT ----- function A 3720 ;_EI IMPORT ----- function A 3721 ;_init_timer0 IMPORT ----- function A 3722 ;_DI IMPORT ----- function A 3723 ;_init_led_gpio IMPORT ----- function A 3724 A 3725 A 3726 ; Aggregate Stack Size: 0 (words) A 3727 A 3728 A 3729 .FRAME _n_main,?_n_main,RDATA A 3730 .FCALL _n_init_led_gpio A 3731 .FCALL _n_init_timer0 A 3732 .FCALL _n_wait A 3733 .FCALL _n_tenhut A 3734 .FCALL _n_stand A 3735 .FCALL _n_sit A 3736 .FCALL _n_forward A 3737 .FCALL _n_reverse A 3738 .FCALL _n_right A 3739 .FCALL _n_left A 3740 .FRAME _f_main,?_f_main,EDATA A 3741 .FCALL _f_init_led_gpio A 3742 .FCALL _f_init_timer0 A 3743 .FCALL _f_wait A 3744 .FCALL _f_tenhut Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 73 PC Object I Line Source main.src A 3745 .FCALL _f_stand A 3746 .FCALL _f_sit A 3747 .FCALL _f_forward A 3748 .FCALL _f_reverse A 3749 .FCALL _f_right A 3750 .FCALL _f_left A 3751 SEGMENT main_TEXT 001613 A 3752 _main: A 3753 .define "_main" A 3754 .value _main A 3755 .class 2 A 3756 .type 65 A 3757 .type 0 A 3758 .endef A 3759 .begfunc "main",299,"_main" A 3760 ; 293 A 3761 ; 294 //////////////////////////////////////////////////////// A 3762 ; 295 // Main program beings here A 3763 ; 296 // This program blinks LED-3 on the evaluation board A 3764 ; 297 A 3765 ; 298 void main () A 3766 ; 299 { A 3767 ; 300 init_led_gpio(); // Initializes LED ports (Port A and C) A 3768 .line 300 001613 D6 0000 A 3769 CALL _init_led_gpio A 3770 ; 301 DI(); // Disable Interrupts A 3771 .line 301 001616 8F A 3772 DI A 3773 ; 302 init_timer0(); // Intialize Timer-0 A 3774 .line 302 001617 D6 0000 A 3775 CALL _init_timer0 A 3776 ; 303 EI(); // Enable Interrupts A 3777 .line 303 00161A 9F A 3778 EI A 3779 ; 304 A 3780 ; 305 // allow the servo driver to wake up A 3781 ; 306 wait(10); A 3782 .line 306 00161B B0E0 A 3783 CLR R0 00161D 1C0A A 3784 LD R1,#10 00161F 70E1 A 3785 PUSH R1 001621 70E0 A 3786 PUSH R0 001623 D6 0000 A 3787 CALL _wait 001626 50E0 A 3788 POP R0 001628 50E0 A 3789 POP R0 A 3790 ; 307 A 3791 ; 308 tenhut(); A 3792 .line 308 00162A D6 04DF A 3793 CALL _tenhut A 3794 ; 309 A 3795 ; 310 // switch on servos A 3796 ; 311 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 74 PC Object I Line Source main.src A 3797 ; 312 A 3798 ; 313 A 3799 ; 314 A 3800 ; 315 while(1) // Infinite while loop 00162D A 3801 _10_L_115: A 3802 .line 315 A 3803 ; 316 { A 3804 ; 317 if(t1==0) A 3805 .line 317 00162D A9000001 A 3806 CPX _t1,#-0 001631 EB 2C A 3807 JR NE,_10_L_100 A 3808 ; 318 { A 3809 ; 319 PAOUT >>=1; A 3810 .line 319 001633 840FD3 A 3811 LDX R0,4051 001636 1FC0E0 A 3812 SRL R0 001639 E4E0E1 A 3813 LD R1,R0 00163C 940FD3 A 3814 LDX 4051,R0 A 3815 ; 320 if(PAOUT==0) A 3816 .line 320 00163F A9000FD3 A 3817 CPX 4051,#-0 001643 EB 04 A 3818 JR NE,_10_L_95 A 3819 ; 321 PAOUT=0x80; A 3820 .line 321 001645 E9800FD3 A 3821 LDX 4051,#128 001649 A 3822 _10_L_95: A 3823 ; 322 PCOUT <<= 1; A 3824 .line 322 001649 840FDB A 3825 LDX R0,4059 00164C 0200 A 3826 ADD R0,R0 00164E 940FDB A 3827 LDX 4059,R0 A 3828 ; 323 if(PCOUT==0) A 3829 .line 323 001651 A9000FDB A 3830 CPX 4059,#-0 001655 EB 04 A 3831 JR NE,_10_L_97 A 3832 ; 324 PCOUT= 0x01; A 3833 .line 324 001657 E9010FDB A 3834 LDX 4059,#1 00165B A 3835 _10_L_97: A 3836 ; 325 t1=4; A 3837 .line 325 00165B E9040001 A 3838 LDX _t1,#4 A 3839 ; 326 } 00165F A 3840 _10_L_100: A 3841 .line 326 A 3842 ; 327 A 3843 ; 328 // This is the main sequence program A 3844 ; 329 A 3845 ; 330 if(oldir==STAND) stand(); A 3846 .line 330 00165F A9200007 A 3847 CPX _oldir,#32 001663 EB 03 A 3848 JR NE,_10_L_102 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 75 PC Object I Line Source main.src 001665 D6 144A A 3849 CALL _stand 001668 A 3850 _10_L_102: A 3851 ; 331 if(oldir==SIT) sit(); A 3852 .line 331 001668 A9C00007 A 3853 CPX _oldir,#192 00166C EB 03 A 3854 JR NE,_10_L_104 00166E D6 0DBF A 3855 CALL _sit 001671 A 3856 _10_L_104: A 3857 ; 332 if(oldir==FWD) forward(); A 3858 .line 332 001671 A9800007 A 3859 CPX _oldir,#128 001675 EB 03 A 3860 JR NE,_10_L_106 001677 D6 04BF A 3861 CALL _forward 00167A A 3862 _10_L_106: A 3863 ; 333 if(oldir==REV) reverse(); A 3864 .line 333 00167A A9400007 A 3865 CPX _oldir,#64 00167E EB 03 A 3866 JR NE,_10_L_108 001680 D6 04CF A 3867 CALL _reverse 001683 A 3868 _10_L_108: A 3869 ; 334 if(oldir==TRIGHT) right(); A 3870 .line 334 001683 A9600007 A 3871 CPX _oldir,#96 001687 EB 03 A 3872 JR NE,_10_L_110 001689 D6 0DAF A 3873 CALL _right 00168C A 3874 _10_L_110: A 3875 ; 335 if(oldir==TLEFT) left(); A 3876 .line 335 00168C A9A00007 A 3877 CPX _oldir,#160 001690 EB 03 A 3878 JR NE,_10_L_112 001692 D6 0D9F A 3879 CALL _left 001695 A 3880 _10_L_112: A 3881 ; 336 if(oldir==STOP) tenhut(); A 3882 .line 336 001695 A9900007 A 3883 CPX _oldir,#144 001699 EB 03 A 3884 JR NE,_10_L_113 00169B D6 04DF A 3885 CALL _tenhut 00169E A 3886 _10_L_113: A 3887 ; 337 wait(1); A 3888 .line 337 00169E B0E0 A 3889 CLR R0 0016A0 1C01 A 3890 LD R1,#1 0016A2 70E1 A 3891 PUSH R1 0016A4 70E0 A 3892 PUSH R0 0016A6 D6 0000 A 3893 CALL _wait 0016A9 50E0 A 3894 POP R0 0016AB 50E0 A 3895 POP R0 A 3896 .line 315 0016AD 8D 16 2D A 3897 JR _10_L_115 A 3898 ; 338 } A 3899 ; 339 } // End of main program A 3900 .line 339 Zilog Z8 Encore! Macro Assembler Version 2.50 (08031703) 13-Oct-08 14:31:34 page: 76 PC Object I Line Source main.src 0016B0 AF A 3901 RET A 3902 .endfunc "main",339,"_main" A 3903 XREF _move:ROM A 3904 XREF _servo_out:ROM A 3905 XREF _wait:ROM A 3906 XREF _init_timer0:ROM A 3907 XREF _init_led_gpio:ROM A 3908 XREF __b_framereset:ROM A 3909 XREF __b_frameset00:ROM A 3910 XDEF _main A 3911 XDEF _stand A 3912 XDEF _sit A 3913 XDEF _right A 3914 XDEF _left A 3915 XDEF _turn A 3916 XDEF _tenhut A 3917 XDEF _reverse A 3918 XDEF _forward A 3919 XDEF _walk A 3920 XDEF _oldir A 3921 XDEF _ircode A 3922 XDEF _lt1 A 3923 XDEF _t5 A 3924 XDEF _t4 A 3925 XDEF _t3 A 3926 XDEF _t2 A 3927 XDEF _t1 A 3928 XDEF _subtmr A 3929 XDEF _flash_option2 A 3930 XDEF _flash_option1 A 3931 END Errors: 0 Warnings: 0 Lines Assembled: 3932