1
0
mirror of https://github.com/TomHarte/CLK.git synced 2025-04-05 04:37:41 +00:00

Start Shaker test case.

This commit is contained in:
Thomas Harte 2024-06-28 21:52:04 -04:00
parent f742266177
commit 7a145d72f9
28 changed files with 4954 additions and 1 deletions

View File

@ -540,6 +540,8 @@
4B8805F41DCFD22A003085B1 /* Commodore.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B8805F21DCFD22A003085B1 /* Commodore.cpp */; };
4B8805F71DCFF6C9003085B1 /* Commodore.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B8805F51DCFF6C9003085B1 /* Commodore.cpp */; };
4B8805FB1DCFF807003085B1 /* Oric.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B8805F91DCFF807003085B1 /* Oric.cpp */; };
4B882F592C2F9C6A00D84031 /* CPCShakerTests.mm in Sources */ = {isa = PBXBuildFile; fileRef = 4B882F582C2F9C6900D84031 /* CPCShakerTests.mm */; };
4B882F5B2C2F9C7700D84031 /* Shaker in Resources */ = {isa = PBXBuildFile; fileRef = 4B882F5A2C2F9C7700D84031 /* Shaker */; };
4B89449520194CB3007DE474 /* MachineForTarget.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B055ABE1FAE98000060FFFF /* MachineForTarget.cpp */; };
4B894518201967B4007DE474 /* ConfidenceCounter.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B8944E6201967B4007DE474 /* ConfidenceCounter.cpp */; };
4B894519201967B4007DE474 /* ConfidenceCounter.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B8944E6201967B4007DE474 /* ConfidenceCounter.cpp */; };
@ -1649,6 +1651,8 @@
4B8805F61DCFF6C9003085B1 /* Commodore.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = Commodore.hpp; sourceTree = "<group>"; };
4B8805F91DCFF807003085B1 /* Oric.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = Oric.cpp; path = Parsers/Oric.cpp; sourceTree = "<group>"; };
4B8805FA1DCFF807003085B1 /* Oric.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = Oric.hpp; path = Parsers/Oric.hpp; sourceTree = "<group>"; };
4B882F582C2F9C6900D84031 /* CPCShakerTests.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = CPCShakerTests.mm; sourceTree = "<group>"; };
4B882F5A2C2F9C7700D84031 /* Shaker */ = {isa = PBXFileReference; lastKnownFileType = folder; path = Shaker; sourceTree = "<group>"; };
4B89449220194A47007DE474 /* CSStaticAnalyser+TargetVector.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = "CSStaticAnalyser+TargetVector.h"; path = "StaticAnalyser/CSStaticAnalyser+TargetVector.h"; sourceTree = "<group>"; };
4B8944E4201967B4007DE474 /* ConfidenceSummary.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = ConfidenceSummary.hpp; sourceTree = "<group>"; };
4B8944E5201967B4007DE474 /* ConfidenceSource.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = ConfidenceSource.hpp; sourceTree = "<group>"; };
@ -2716,7 +2720,6 @@
4B1414631B588A1100E04248 /* Test Binaries */ = {
isa = PBXGroup;
children = (
4BB505882B9C0E6F0031C43C /* Messy ARM */,
4B680CE323A555CA00451D43 /* 68000 Comparative Tests */,
4B75F97A280D7C7700121055 /* 68000 Decoding */,
4B683B002727BE6F0043E541 /* Amiga Blitter Tests */,
@ -2725,7 +2728,9 @@
4BB0CAB127E51D2A00672A88 /* dingusdev PowerPC tests */,
4B7C7A06282C3DED002D6C0B /* flamewing 68000 BCD tests */,
4BBB77DC2867EBB300D335A1 /* IIgs Memory Map */,
4BB505882B9C0E6F0031C43C /* Messy ARM */,
4B98A1CD1FFADEC400ADF63B /* MSX ROMs */,
4B882F5A2C2F9C7700D84031 /* Shaker */,
4B018B88211930DE002A3937 /* 65C02_extended_opcodes_test.bin */,
4BE211DD253E4E4800435408 /* 65C02_no_Rockwell_test.bin */,
4B44EBF61DC9883B00A7820C /* 6502_functional_test.bin */,
@ -4569,6 +4574,7 @@
4B2005422B804D6400420C5C /* ARMDecoderTests.mm */,
4B924E981E74D22700B76AF1 /* AtariStaticAnalyserTests.mm */,
4BE34437238389E10058E78F /* AtariSTVideoTests.mm */,
4B882F582C2F9C6900D84031 /* CPCShakerTests.mm */,
4BB2A9AE1E13367E001A5C23 /* CRCTests.mm */,
4BB0CAA627E51B6300672A88 /* DingusdevPowerPCTests.mm */,
428168392A37AFB4008ECD27 /* DispatcherTests.mm */,
@ -5512,6 +5518,7 @@
4BB298FE1B587D8400A49093 /* anday in Resources */,
4BB299141B587D8400A49093 /* axsz in Resources */,
4BB2991D1B587D8400A49093 /* bplr in Resources */,
4B882F5B2C2F9C7700D84031 /* Shaker in Resources */,
4BB298FB1B587D8400A49093 /* ancb in Resources */,
4BB299431B587D8400A49093 /* dcma in Resources */,
4BB298FD1B587D8400A49093 /* andax in Resources */,
@ -6517,6 +6524,7 @@
4B7752B828217F110073E2C5 /* Amiga.cpp in Sources */,
4B3BA0C31D318AEC005DD7A7 /* C1540Tests.swift in Sources */,
4BDA8235261E8E000021AA19 /* Z80ContentionTests.mm in Sources */,
4B882F592C2F9C6A00D84031 /* CPCShakerTests.mm in Sources */,
4B7752C328217F720073E2C5 /* Z80.cpp in Sources */,
4B778F1A23A5ED320000D260 /* Video.cpp in Sources */,
4B778F3B23A5F1650000D260 /* KeyboardMachine.cpp in Sources */,

View File

@ -0,0 +1,42 @@
//
// CPCShakerTests.m
// Clock SignalTests
//
// Created by Thomas Harte on 28/06/2024.
// Copyright © 2024 Thomas Harte. All rights reserved.
//
#import <XCTest/XCTest.h>
#include <array>
#include <cassert>
#include "CSL.hpp"
@interface CPCShakerTests : XCTestCase
@end
@implementation CPCShakerTests {
}
- (void)testCSLPath:(NSString *)path name:(NSString *)name {
using namespace Storage::Automation;
const auto steps = CSL::parse([[path stringByAppendingPathComponent:name] UTF8String]);
NSLog(@"%@ / %@", path, name);
}
- (void)testModulePath:(NSString *)path name:(NSString *)name {
NSString *basePath =
[[NSBundle bundleForClass:[self class]]
pathForResource:@"Shaker"
ofType:nil];
[self testCSLPath:[basePath stringByAppendingPathComponent:path] name:name];
}
- (void)testModuleA { [self testModulePath:@"MODULE A" name:@"SHAKE26A-0.CSL"]; }
- (void)testModuleB { [self testModulePath:@"MODULE B" name:@"SHAKE26B-0.CSL"]; }
- (void)testModuleC { [self testModulePath:@"MODULE C" name:@"SHAKE26C-0.CSL"]; }
- (void)testModuleD { [self testModulePath:@"MODULE D" name:@"SHAKE26D-0.CSL"]; }
- (void)testModuleE { [self testModulePath:@"MODULE E" name:@"SHAKE26E-0.CSL"]; }
@end

View File

@ -0,0 +1,297 @@
;
; Fichier de script CSL
; Execution du module SHAKE26A du DSK SHAKER26.DSK en CRTC 0
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 0
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26A"\(RET)'
wait 10000000
;
; test 1
key_output '1'
wait 800000 ; fin affichage 1er ecran & ssm 595215
key_output ' '
wait 800000 ; fin affichage 2nd ecran & ssm 659451
key_output ' '
wait 800000 ; fin affichage 3eme ecran & ssm 627963
key_output ' '
wait 800000 ; fin affichage 4eme ecran & ssm 698883
key_output ' '
wait 800000 ; fin affichage 5eme ecran & ssm 551415
key_output ' '
wait 1000000 ; retour menu
;
; test 2
key_output '2'
wait 800000 ; 519961 crt 0 1 ecran
key_output ' '
wait 800000 ; 2 ecrans
wait 800000 ;
key_output ' '
wait 800000 ; 723923
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 1000000 ; retour menu
;
; test 3
key_output '3'
wait 800000 ; 596058
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 730624
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 750685
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 710656
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726016
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726952
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 845824
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 706048
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 730624
wait 800000 ; 698880
key_output ' '
wait 900000 ; 745984
wait 800000 ; 698880
key_output ' '
wait 900000 ; 805888
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 865792
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 10000000
;
key_output '4'
wait 9000000 ; 6743019
key_output ' '
wait 1000000
;
key_output '5'
wait 800000 ; 434016
key_output ' '
wait 800000 ; 547328
key_output ' '
wait 800000 ; 567296
key_output ' '
wait 800000 ; 587264
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 1000000
;
key_output '6'
wait 800000 ; 473960
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 800000 ; 627200
key_output ' '
wait 800000 ; 647168
key_output ' '
wait 800000 ; 667136
key_output ' '
wait 1000000
;
key_output '7'
wait 800000 ; 473957
key_output ' '
wait 800000 ; 667072
key_output ' '
wait 800000 ; 527296
key_output ' '
wait 800000 ; 547264
key_output ' '
wait 800000 ; 567232
key_output ' '
wait 1000000
;
key_output '8'
wait 800000 ; 431083
key_output ' '
wait 1000000
;
key_output '9'
wait 800000 ; 474048
key_output ' '
wait 800000 ; 559104
key_output ' '
wait 800000 ; 598363
key_output ' '
wait 1000000
;
key_output 'E'
wait 800000 ; 514468
key_output ' '
wait 1000000
;
key_output 'R'
wait 800000 ; 592695
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 599040
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 658944
wait 1200000 ; 998400
key_output ' '
wait 1000000
;
key_output 'T'
wait 800000 ; 531832
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 638976
key_output ' '
wait 1000000
;
key_output 'Y'
wait 800000 ; 511931
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; ???
key_output ' '
wait 1000000
;
key_output 'U'
wait 14000000 ; 11803953+1007210
key_output ' '
wait 1000000
;
key_output 'I'
wait 2200000 ; 2013010
key_output ' '
wait 2200000 ; 2315008
key_output ' '
wait 5000000 ; 4233216
key_output ' '
wait 35000000 ; 31301630
key_output ' '
wait 2000000 ; 1557507
key_output ' '
wait 1000000
;
key_output 'O'
wait 800000 ; 576098
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 800000 ; 497671
key_output ' '
wait 800000 ; 469504
key_output ' '
wait 800000 ; 522696
key_output ' '
wait 800000 ; 547978
key_output ' '
wait 800000 ; 579072
; crtc 1
;key_output ' '
;wait 800000 ; 482251
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 519680
key_output ' '
wait 1000000
;
key_output 'P'
wait 450000 ; 427222
wait 5200000 ; 5111808
key_output ' '
wait 800000 ; 529408
key_output ' '
wait 800000 ; 489472
key_output ' '
wait 800000 ; 449536
key_output ' '
wait 800000 ; 509440
key_output ' '
wait 800000 ; 587307
key_output ' '
wait 800000 ; 479104
key_output ' '
wait 800000 ; 479360
key_output ' '
wait 800000 ; 490944
key_output ' '
wait 800000 ; 638464
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 1000000
;
csl_load 'SHAKE26A-1'

View File

@ -0,0 +1,297 @@
;
; Fichier de script CSL
; Execution du module SHAKE26A du DSK SHAKER26.DSK en CRTC 1
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 1
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26A"\(RET)'
wait 10000000
;
; test 1
key_output '1'
wait 800000 ; fin affichage 1er ecran & ssm 595215
key_output ' '
wait 800000 ; fin affichage 2nd ecran & ssm 659451
key_output ' '
wait 800000 ; fin affichage 3eme ecran & ssm 627963
key_output ' '
wait 800000 ; fin affichage 4eme ecran & ssm 698883
key_output ' '
wait 800000 ; fin affichage 5eme ecran & ssm 551415
key_output ' '
wait 1000000 ; retour menu
;
; test 2
key_output '2'
wait 800000 ; 519961 crt 0 1 ecran
wait 800000 ; 2 ecrans
key_output ' '
wait 800000 ;
key_output ' '
wait 800000 ; 723923
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 1000000 ; retour menu
;
; test 3
key_output '3'
wait 800000 ; 596058
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 730624
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 750685
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 710656
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726016
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726952
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 845824
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 706048
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 730624
wait 800000 ; 698880
key_output ' '
wait 900000 ; 745984
wait 800000 ; 698880
key_output ' '
wait 900000 ; 805888
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 865792
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 10000000
;
key_output '4'
wait 8000000 ; 6743019
key_output ' '
wait 1000000
;
key_output '5'
wait 800000 ; 434016
key_output ' '
wait 800000 ; 547328
key_output ' '
wait 800000 ; 567296
key_output ' '
wait 800000 ; 587264
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 1000000
;
key_output '6'
wait 800000 ; 473960
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 800000 ; 627200
key_output ' '
wait 800000 ; 647168
key_output ' '
wait 800000 ; 667136
key_output ' '
wait 1000000
;
key_output '7'
wait 800000 ; 473957
key_output ' '
wait 800000 ; 667072
key_output ' '
wait 800000 ; 527296
key_output ' '
wait 800000 ; 547264
key_output ' '
wait 800000 ; 567232
key_output ' '
wait 1000000
;
key_output '8'
wait 800000 ; 431083
key_output ' '
wait 1000000
;
key_output '9'
wait 800000 ; 474048
key_output ' '
wait 800000 ; 559104
key_output ' '
wait 800000 ; 598363
key_output ' '
wait 1000000
;
key_output 'E'
wait 800000 ; 514468
key_output ' '
wait 1000000
;
key_output 'R'
wait 800000 ; 592695
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 599040
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 658944
wait 1200000 ; 998400
key_output ' '
wait 1000000
;
key_output 'T'
wait 800000 ; 531832
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 638976
key_output ' '
wait 1000000
;
key_output 'Y'
wait 800000 ; 511931
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; ???
key_output ' '
wait 1000000
;
key_output 'U'
wait 14000000 ; 11803953+1007210
key_output ' '
wait 1000000
;
key_output 'I'
wait 2200000 ; 2013010
key_output ' '
wait 2200000 ; 2315008
key_output ' '
wait 5000000 ; 4233216
key_output ' '
wait 35000000 ; 31301630
key_output ' '
wait 2000000 ; 1557507
key_output ' '
wait 1000000
;
key_output 'O'
wait 800000 ; 576098
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 800000 ; 497671
key_output ' '
wait 800000 ; 469504
key_output ' '
wait 800000 ; 522696
key_output ' '
wait 800000 ; 547978
key_output ' '
wait 800000 ; 579072
; crtc 1
;key_output ' '
;wait 800000 ; 482251
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 519680
key_output ' '
wait 1000000
;
key_output 'P'
wait 450000 ; 427222
wait 5200000 ; 5111808
key_output ' '
wait 800000 ; 529408
key_output ' '
wait 800000 ; 489472
key_output ' '
wait 800000 ; 449536
key_output ' '
wait 800000 ; 509440
key_output ' '
wait 800000 ; 587307
key_output ' '
wait 800000 ; 479104
key_output ' '
wait 800000 ; 479360
key_output ' '
wait 800000 ; 490944
key_output ' '
wait 800000 ; 638464
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 1000000
csl_load 'SHAKE26A-2'

View File

@ -0,0 +1,267 @@
;
; Fichier de script CSL
; Execution du module SHAKE26A du DSK SHAKER26.DSK en CRTC 2
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 2
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26A"\(RET)'
wait 10000000
;
; test 1
key_output '1'
wait 800000 ; fin affichage 1er ecran & ssm 595215
key_output ' '
wait 800000 ; fin affichage 2nd ecran & ssm 659451
key_output ' '
wait 800000 ; fin affichage 3eme ecran & ssm 627963
key_output ' '
wait 800000 ; fin affichage 4eme ecran & ssm 698883
key_output ' '
wait 800000 ; fin affichage 5eme ecran & ssm 551415
key_output ' '
wait 1000000 ; retour menu
;
; test 2
key_output '2'
wait 800000 ; 519961 crt 0 1 ecran
key_output ' '
wait 800000 ; 2 ecrans
wait 800000 ;
key_output ' '
wait 800000 ; 723923
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 1000000 ; retour menu
;
; test 3
key_output '3'
wait 800000 ; 596058
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 730624
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 750685
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 710656
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726016
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726952
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 845824
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 706048
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 730624
wait 800000 ; 698880
key_output ' '
wait 900000 ; 745984
wait 800000 ; 698880
key_output ' '
wait 900000 ; 805888
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 865792
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 10000000
;
key_output '4'
wait 8000000 ; 6743019
key_output ' '
wait 1000000
;
key_output '8'
wait 800000 ; 431083
key_output ' '
wait 1000000
;
key_output '9'
wait 800000 ; 474048
key_output ' '
wait 800000 ; 559104
key_output ' '
wait 800000 ; 598363
key_output ' '
wait 1000000
;
key_output 'E'
wait 800000 ; 514468
key_output ' '
wait 1000000
;
key_output 'R'
wait 800000 ; 592695
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 599040
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 658944
wait 1200000 ; 998400
key_output ' '
wait 1000000
;
key_output 'T'
wait 800000 ; 531832
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 638976
key_output ' '
wait 1000000
;
key_output 'Y'
wait 800000 ; 511931
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; ???
key_output ' '
wait 1000000
;
key_output 'U'
wait 14000000 ; 11803953+1007210
key_output ' '
wait 1000000
;
key_output 'I'
wait 2200000 ; 2013010
key_output ' '
wait 2200000 ; 2315008
key_output ' '
wait 5000000 ; 4233216
key_output ' '
wait 35000000 ; 31301630
key_output ' '
wait 2000000 ; 1557507
key_output ' '
wait 1000000
;
key_output 'O'
wait 800000 ; 576098
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 800000 ; 497671
key_output ' '
wait 800000 ; 469504
key_output ' '
wait 800000 ; 522696
key_output ' '
wait 800000 ; 547978
key_output ' '
wait 800000 ; 579072
; crtc 1
;key_output ' '
;wait 800000 ; 482251
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 519680
key_output ' '
wait 1000000
;
key_output 'P'
wait 450000 ; 427222
wait 5200000 ; 5111808
key_output ' '
wait 800000 ; 529408
key_output ' '
wait 800000 ; 489472
key_output ' '
wait 800000 ; 449536
key_output ' '
wait 800000 ; 509440
key_output ' '
wait 800000 ; 587307
key_output ' '
wait 800000 ; 479104
key_output ' '
wait 800000 ; 479360
key_output ' '
wait 800000 ; 490944
key_output ' '
wait 800000 ; 638464
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 1000000
;
; crtc 2
;
key_output '\(COP)'
wait 8500000 ; 8313240
wait 500000 ; 319488
key_output ' '
wait 1000000
;
;
csl_load 'SHAKE26A-4'

View File

@ -0,0 +1,296 @@
;
; Fichier de script CSL
; Execution du module SHAKE26A du DSK SHAKER26.DSK en CRTC 3
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 3
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26A"\(RET)'
wait 10000000
;
; test 1
key_output '1'
wait 800000 ; fin affichage 1er ecran & ssm 595215
key_output ' '
wait 800000 ; fin affichage 2nd ecran & ssm 659451
key_output ' '
wait 800000 ; fin affichage 3eme ecran & ssm 627963
key_output ' '
wait 800000 ; fin affichage 4eme ecran & ssm 698883
key_output ' '
wait 800000 ; fin affichage 5eme ecran & ssm 551415
key_output ' '
wait 1000000 ; retour menu
;
; test 2
key_output '2'
wait 800000 ; 519961 crt 0 1 ecran
key_output ' '
wait 800000 ; 2 ecrans
wait 800000 ;
key_output ' '
wait 800000 ; 723923
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 1000000 ; retour menu
;
; test 3
key_output '3'
wait 800000 ; 596058
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 730624
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 750685
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 710656
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726016
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726952
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 845824
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 706048
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 730624
wait 800000 ; 698880
key_output ' '
wait 900000 ; 745984
wait 800000 ; 698880
key_output ' '
wait 900000 ; 805888
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 865792
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 10000000
;
key_output '4'
wait 8000000 ; 6743019
key_output ' '
wait 1000000
;
key_output '5'
wait 800000 ; 434016
key_output ' '
wait 800000 ; 547328
key_output ' '
wait 800000 ; 567296
key_output ' '
wait 800000 ; 587264
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 1000000
;
key_output '6'
wait 800000 ; 473960
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 800000 ; 627200
key_output ' '
wait 800000 ; 647168
key_output ' '
wait 800000 ; 667136
key_output ' '
wait 1000000
;
key_output '7'
wait 800000 ; 473957
key_output ' '
wait 800000 ; 667072
key_output ' '
wait 800000 ; 527296
key_output ' '
wait 800000 ; 547264
key_output ' '
wait 800000 ; 567232
key_output ' '
wait 1000000
;
key_output '8'
wait 800000 ; 431083
key_output ' '
wait 1000000
;
key_output '9'
wait 800000 ; 474048
key_output ' '
wait 800000 ; 559104
key_output ' '
wait 800000 ; 598363
key_output ' '
wait 1000000
;
key_output 'E'
wait 800000 ; 514468
key_output ' '
wait 1000000
;
key_output 'R'
wait 800000 ; 592695
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 599040
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 658944
wait 1200000 ; 998400
key_output ' '
wait 1000000
;
key_output 'T'
wait 800000 ; 531832
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 638976
key_output ' '
wait 1000000
;
key_output 'Y'
wait 800000 ; 511931
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; ???
key_output ' '
wait 1000000
;
key_output 'U'
wait 14000000 ; 11803953+1007210
key_output ' '
wait 1000000
;
key_output 'I'
wait 2200000 ; 2013010
key_output ' '
wait 2200000 ; 2315008
key_output ' '
wait 5000000 ; 4233216
key_output ' '
wait 35000000 ; 31301630
key_output ' '
wait 2000000 ; 1557507
key_output ' '
wait 1000000
;
key_output 'O'
wait 800000 ; 576098
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 800000 ; 497671
key_output ' '
wait 800000 ; 469504
key_output ' '
wait 800000 ; 522696
key_output ' '
wait 800000 ; 547978
key_output ' '
wait 800000 ; 579072
; crtc 1
;key_output ' '
;wait 800000 ; 482251
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 519680
key_output ' '
wait 1000000
;
key_output 'P'
wait 450000 ; 427222
wait 5200000 ; 5111808
key_output ' '
wait 800000 ; 529408
key_output ' '
wait 800000 ; 489472
key_output ' '
wait 800000 ; 449536
key_output ' '
wait 800000 ; 509440
key_output ' '
wait 800000 ; 587307
key_output ' '
wait 800000 ; 479104
key_output ' '
wait 800000 ; 479360
key_output ' '
wait 800000 ; 490944
key_output ' '
wait 800000 ; 638464
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 1000000
reset

View File

@ -0,0 +1,297 @@
;
; Fichier de script CSL
; Execution du module SHAKE26A du DSK SHAKER26.DSK en CRTC 4
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 4
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26A"\(RET)'
wait 10000000
;
; test 1
key_output '1'
wait 800000 ; fin affichage 1er ecran & ssm 595215
key_output ' '
wait 800000 ; fin affichage 2nd ecran & ssm 659451
key_output ' '
wait 800000 ; fin affichage 3eme ecran & ssm 627963
key_output ' '
wait 800000 ; fin affichage 4eme ecran & ssm 698883
key_output ' '
wait 800000 ; fin affichage 5eme ecran & ssm 551415
key_output ' '
wait 1000000 ; retour menu
;
; test 2
key_output '2'
wait 800000 ; 519961 crt 0 1 ecran
key_output ' '
wait 800000 ; 2 ecrans
wait 800000 ;
key_output ' '
wait 800000 ; 723923
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 1000000 ; retour menu
;
; test 3
key_output '3'
wait 800000 ; 596058
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 730624
wait 1500000 ; 1337856
key_output ' '
wait 800000 ; 750685
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 750592
wait 800000 ; 698880
key_output ' '
wait 800000 ; 710656
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726016
wait 800000 ; 698880
key_output ' '
wait 800000 ; 726952
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 845824
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 666112
wait 800000 ; 698880
key_output ' '
wait 800000 ; 706048
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 610816
wait 800000 ; 698880
key_output ' '
wait 800000 ; 730624
wait 800000 ; 698880
key_output ' '
wait 900000 ; 745984
wait 800000 ; 698880
key_output ' '
wait 900000 ; 805888
wait 800000 ; 698880
key_output ' '
wait 1000000 ; 865792
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 800000 ; 686080
wait 800000 ; 698880
key_output ' '
wait 10000000
;
key_output '4'
wait 12000000 ; 6743019
key_output ' '
wait 1000000
;
key_output '5'
wait 800000 ; 434016
key_output ' '
wait 800000 ; 547328
key_output ' '
wait 800000 ; 567296
key_output ' '
wait 800000 ; 587264
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 1000000
;
key_output '6'
wait 800000 ; 473960
key_output ' '
wait 800000 ; 607232
key_output ' '
wait 800000 ; 627200
key_output ' '
wait 800000 ; 647168
key_output ' '
wait 800000 ; 667136
key_output ' '
wait 1000000
;
key_output '7'
wait 800000 ; 473957
key_output ' '
wait 800000 ; 667072
key_output ' '
wait 800000 ; 527296
key_output ' '
wait 800000 ; 547264
key_output ' '
wait 800000 ; 567232
key_output ' '
wait 1000000
;
key_output '8'
wait 800000 ; 431083
key_output ' '
wait 1000000
;
key_output '9'
wait 800000 ; 474048
key_output ' '
wait 800000 ; 559104
key_output ' '
wait 800000 ; 598363
key_output ' '
wait 1000000
;
key_output 'E'
wait 800000 ; 514468
key_output ' '
wait 1000000
;
key_output 'R'
wait 800000 ; 592695
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 599040
wait 1200000 ; 998400
key_output ' '
wait 800000 ; 658944
wait 1200000 ; 998400
key_output ' '
wait 1000000
;
key_output 'T'
wait 800000 ; 531832
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 579072
key_output ' '
wait 800000 ; 638976
key_output ' '
wait 1000000
;
key_output 'Y'
wait 800000 ; 511931
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 800000 ; ???
key_output ' '
wait 1000000
;
key_output 'U'
wait 14000000 ; 11803953+1007210
key_output ' '
wait 1000000
;
key_output 'I'
wait 2200000 ; 2013010
key_output ' '
wait 2200000 ; 2315008
key_output ' '
wait 5000000 ; 4233216
key_output ' '
wait 35000000 ; 31301630
key_output ' '
wait 2000000 ; 1557507
key_output ' '
wait 1000000
;
key_output 'O'
wait 800000 ; 576098
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 698880
key_output ' '
wait 800000 ; 599040
key_output ' '
wait 800000 ; 497671
key_output ' '
wait 800000 ; 469504
key_output ' '
wait 800000 ; 522696
key_output ' '
wait 800000 ; 547978
key_output ' '
wait 800000 ; 579072
; crtc 1
;key_output ' '
;wait 800000 ; 482251
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 599552
;key_output ' '
;wait 800000 ; 519680
key_output ' '
wait 1000000
;
key_output 'P'
wait 450000 ; 427222
wait 5200000 ; 5111808
key_output ' '
wait 800000 ; 529408
key_output ' '
wait 800000 ; 489472
key_output ' '
wait 800000 ; 449536
key_output ' '
wait 800000 ; 509440
key_output ' '
wait 800000 ; 587307
key_output ' '
wait 800000 ; 479104
key_output ' '
wait 800000 ; 479360
key_output ' '
wait 800000 ; 490944
key_output ' '
wait 800000 ; 638464
key_output ' '
wait 800000 ; 619008
key_output ' '
wait 1000000
csl_load 'SHAKE26A-3'

View File

@ -0,0 +1,390 @@
;
; Fichier de script CSL
; Execution du module SHAKE26B du DSK SHAKER26.DSK en CRTC 0
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 0
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26B"\(RET)'
wait 10000000
;
; test 1 interlace c4/c9 counters R9 base=07 Parity Odd
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
key_output 'Y' ; bascule sur parity Even (R9 Base=7)
wait 300000
;
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
key_output 'Z' ; Passe sur R9 BASE=6 (parity Even)
wait 300000
;
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
key_output 'Y' ; bascule sur parity Odd (R9 base=6)
wait 300000
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
; test 9 (garder la foi tu dois, mecreant)
key_output '9' ; En Odd
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output 'Y' ; Repasser en Even
wait 100000
key_output '9' ; En even
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output '0' ; vertical sub pixel scroll
wait 1000000 ; 816677 1/8
key_output ' '
wait 1000000 ; 890842 1/16
key_output ' '
wait 1000000 ; 830950 1/32
key_output ' '
wait 1000000 ; 870899 1/64
key_output ' '
wait 1000000 ; 830965 1/128
key_output ' '
wait 1000000 ; menu
;
;
key_output '4' ;
wait 2000000 ; 1913669
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 1000000 ;
key_output ' '
wait 1000000 ; menu
;
key_output '5' ; rlal crtc 2 (tous crtc)
wait 900000
key_output ' '
wait 2000000
key_output ' ' ; Menu
wait 1000000
;
;
key_output '\(RET)'
wait 800000 ; 632429
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 647344
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 667312
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 1000000
;
;Test Bounga
key_output '\(FN0)'
wait 30000000 ; ???
key_output ' '
wait 1000000
;
; Test RVNI LTD
;
key_output '\(CAP)'
wait 6000000 ; 753563
key_output ' '
wait 6000000 ; 727728
key_output ' '
wait 6000000 ; 728880
key_output ' '
wait 6000000
;
; Shaker Killer Don't be afraid
;
key_output 'R'
wait 5000000 ; 2615301 z80aintb
key_output ' '
wait 6000000 ; 4692484 r52Reset
key_output ' '
wait 9000000 ; 7867387 Inter Test IM1
key_output ' '
wait 9000000 ; 6888966 Inter Test IM2
key_output ' '
wait 3000000 ; 1711766 R52 Incr
key_output ' '
wait 900000 ; 486262 Otir Zone
key_output ' '
wait 1000000 ; menu
;
; R3 JIT
key_output 'I'
wait 1000000 ; 474622
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 499200
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 599040
key_output ' '
wait 1000000 ; Menu
;
; test crtc 0,1 only
;
key_output '\(COP)'
wait 1000000 ; 787700
key_output ' '
wait 1000000 ; 778752
key_output ' '
wait 2000000 ; 702326+19968
key_output ' '
wait 2000000 ; 835656
key_output ' '
wait 2000000 ; 924826
key_output ' '
wait 4000000
;
;
; test crtc 1 , ouvert aux autres CRTCs
;
key_output '6'
wait 10000000 ; 1676617
key_output ' '
wait 1000000
;
; test crtc 0 only
;
key_output '7' ; resultat a verifier
wait 800000 ; 613742
wait 600000 ; 511808
wait 2000000 ; 1277952
wait 5000000 ; 3833856
wait 2000000 ; 1277952
wait 5000000 ; 3833856
wait 2000000 ; 1277952
key_output ' '
wait 800000 ; 533680
wait 6000000 ; 5111808
wait 2000000 ; 1277952
wait 6000000 ; 3833856
wait 2000000 ; 1277952
wait 6000000 ; 3833856
wait 2000000 ; 1277952
key_output ' '
wait 800000 ; 565936
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 2000000 ; 1277952
wait 6000000 ; 3833856
wait 2000000 ; 1277952
key_output ' '
key_output ' '
wait 800000 ; 565936
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 2000000 ; 1277952
wait 6000000 ; 3833856
wait 2000000 ; 1277952
key_output ' '
wait 1000000 ; menu
;
; test crtc 0 only
;
key_output 'U'
wait 1200000 ;
key_output ' ' ; A
wait 1200000 ;
key_output ' ' ; B
wait 1200000 ;
key_output ' ' ; C
wait 1200000 ;
key_output ' ' ; D
wait 1200000 ;
key_output ' ' ; E
wait 1200000 ;
key_output ' ' ; F
wait 1200000 ;
key_output ' ' ; G
wait 1200000 ;
key_output ' ' ; H
wait 1200000 ;
key_output ' ' ; I
wait 1200000 ;
key_output ' ' ; J
wait 1200000 ;
key_output ' ' ; K
wait 1200000 ;
key_output ' ' ; L
wait 1200000 ;
key_output ' ' ; M
wait 1200000 ;
key_output ' ' ; N
wait 1200000 ;
key_output ' ' ; O
wait 1200000 ;
key_output ' ' ; P
wait 1200000 ;
key_output ' ' ; Q
wait 1200000 ;
key_output ' ' ; R
wait 1200000 ;
key_output ' ' ; S
wait 1200000 ;
;
; Test Analyzer des premieres heures
;
key_output 'P'
wait 100000000 ; 12828735+638976
key_output ' '
wait 100000000 ; 5440000+638976
key_output ' '
wait 100000000 ; 11637760+638976
key_output ' '
wait 100000000 ; 13560624+638976
key_output ' '
wait 1000000
csl_load 'SHAKE26B-1'

View File

@ -0,0 +1,278 @@
;
; Fichier de script CSL
; Execution du module SHAKE26B du DSK SHAKER26.DSK en CRTC 1
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 1A
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26B"\(RET)'
wait 10000000
;
; test 1 interlace c4/c9 counters R9 base=07
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
key_output 'Z' ; Passe sur R9 BASE=6
wait 300000
;
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
; test 9 (garder la foi tu dois, mecreant)
key_output '9'
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output '0' ; vertical sub pixel scroll
wait 1000000 ; 816677 1/8
key_output ' '
wait 1000000 ; 890842 1/16
key_output ' '
wait 1000000 ; 830950 1/32
key_output ' '
wait 1000000 ; 870899 1/64
key_output ' '
wait 1000000 ; 830965 1/128
key_output ' '
wait 1000000 ; menu
;
key_output '4' ;
wait 2000000 ; 1913669
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 1000000 ;
key_output ' '
wait 1000000 ; menu
;
key_output '5' ; rlal crtc 2 (tous crtc)
wait 900000
key_output ' '
wait 2000000
key_output ' ' ; Menu
wait 1000000
;
;
key_output '\(RET)'
wait 800000 ; 632429
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 647344
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 667312
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 1000000
;
;Test Bounga
key_output '\(FN0)'
wait 30000000 ; ???
key_output ' '
wait 1000000
;
; Test RVNI LTD
;
key_output '\(CAP)'
wait 6000000 ; 753563
key_output ' '
wait 6000000 ; 727728
key_output ' '
wait 6000000 ; 728880
key_output ' '
wait 6000000
;
; Shaker Killer Don't be afraid
;
key_output 'R'
wait 5000000 ; 2615301 z80aintb
key_output ' '
wait 6000000 ; 4692484 r52Reset
key_output ' '
wait 9000000 ; 7867387 Inter Test IM1
key_output ' '
wait 9000000 ; 6888966 Inter Test IM2
key_output ' '
wait 3000000 ; 1711766 R52 Incr
key_output ' '
wait 900000 ; 486262 Otir Zone
key_output ' '
wait 1000000 ; menu
;
; R3 JIT
key_output 'I'
wait 1000000 ; 474622
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 499200
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 599040
key_output ' '
wait 1000000 ; Menu
;
; test crtc 0,1 only
;
key_output '\(COP)'
wait 1000000 ; 787700
key_output ' '
wait 1000000 ; 778752
key_output ' '
wait 2000000 ; 702326+19968
key_output ' '
wait 2000000 ; 835656
key_output ' '
wait 2000000 ; 924826
key_output ' '
wait 4000000
;
;
; test crtc 1 , ouvert aux autres CRTCs
;
key_output '6'
wait 10000000 ; 1676617
key_output ' '
wait 1000000
;
; test crtc 1 only : identification crtc 1A/1B
; pour le 1A
key_output 'O'
wait 500000 ; 336980
key_output ' '
wait 1000000
;
;
; test crtc 1 only : BE00 check
;
key_output 'S'
wait 5000000 ; 1976392
key_output ' '
wait 1000000
;
;
; Test Analyzer des premieres heures
;
key_output 'P'
wait 100000000 ; 12828735+638976
key_output ' '
wait 100000000 ; 5440000+638976
key_output ' '
wait 100000000 ; 11637760+638976
key_output ' '
wait 100000000 ; 13560624+638976
key_output ' '
wait 1000000
;
; Test RFD
;
key_output '\(CTR)'
wait 10000000
;
; Si la selection de crtc en cours de route pose prb sortir ce test
;
crtc_select 1B
;
; test crtc 1 only : identification crtc 1A/1B
; pour le 1B
key_output 'E'
wait 500000 ; 336980
key_output ' '
wait 1000000
;
csl_load 'SHAKE26B-2'

View File

@ -0,0 +1,306 @@
;
; Fichier de script CSL
; Execution du module SHAKE26B du DSK SHAKER26.DSK en CRTC 2
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 2
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26B"\(RET)'
wait 10000000
;
; test 1 interlace c4/c9 counters R9 base=07 Parity Odd
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
key_output 'Y' ; bascule sur parity Even (R9 Base=7)
wait 300000
;
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
key_output 'Z' ; Passe sur R9 BASE=6 (parity Even)
wait 300000
;
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
key_output 'Y' ; bascule sur parity Odd (R9 base=6)
wait 300000
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
; test 9 (garder la foi tu dois, mecreant)
key_output '9' ; En Odd
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output 'Y' ; Repasser en Even
wait 100000
key_output '9' ; En even
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output '0' ; vertical sub pixel scroll
wait 1000000 ; 816677 1/8
key_output ' '
wait 1000000 ; 890842 1/16
key_output ' '
wait 1000000 ; 830950 1/32
key_output ' '
wait 1000000 ; 870899 1/64
key_output ' '
wait 1000000 ; 830965 1/128
key_output ' '
wait 1000000 ; menu
;
; ** crtc 2 only Even mode 1 ecran
key_output '2' ;
wait 3000000 ; 1245718
key_output ' ' ;
wait 1000000 ; menu
key_output 'Y' ; repasser en Odd
key_output '2'
wait 3000000 ; 1245718
key_output ' ' ;
wait 3000000 ; 1245718 2 ecrans
;
key_output '4' ;
wait 2000000 ; 1913669
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 1000000 ;
key_output ' '
wait 1000000 ; menu
;
key_output '5' ; rlal crtc 2 (tous crtc)
wait 900000
key_output ' '
wait 2000000
key_output ' ' ; Menu
wait 1000000
;
;
key_output '\(RET)'
wait 800000 ; 632429
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 647344
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 667312
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 1000000
;
;Test Bounga
key_output '\(FN0)'
wait 30000000 ; ???
key_output ' '
wait 1000000
;
; Test RVNI LTD
;
key_output '\(CAP)'
wait 6000000 ; 753563
key_output ' '
wait 6000000 ; 727728
key_output ' '
wait 6000000 ; 728880
key_output ' '
wait 6000000
;
; Shaker Killer Don't be afraid
;
key_output 'R'
wait 5000000 ; 2615301 z80aintb
key_output ' '
wait 6000000 ; 4692484 r52Reset
key_output ' '
wait 9000000 ; 7867387 Inter Test IM1
key_output ' '
wait 9000000 ; 6888966 Inter Test IM2
key_output ' '
wait 3000000 ; 1711766 R52 Incr
key_output ' '
wait 900000 ; 486262 Otir Zone
key_output ' '
wait 1000000 ; menu
;
; R3 JIT
key_output 'I'
wait 1000000 ; 474622
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 499200
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 599040
key_output ' '
wait 1000000 ; Menu
;
; test crtc 1 , ouvert aux autres CRTCs
;
key_output '6'
wait 20000000 ; 1676617
key_output ' '
wait 1000000
;
;
; Test Analyzer des premieres heures
;
key_output 'P'
wait 100000000 ; 12828735+638976
key_output ' '
wait 100000000 ; 5440000+638976
key_output ' '
wait 100000000 ; 11637760+638976
key_output ' '
wait 100000000 ; 13560624+638976
key_output ' '
wait 1000000
csl_load 'SHAKE26B-4'

View File

@ -0,0 +1,242 @@
;
; Fichier de script CSL
; Execution du module SHAKE26B du DSK SHAKER26.DSK en CRTC 3
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 3
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26B"\(RET)'
wait 10000000
;
; test 1 interlace c4/c9 counters R9 base=07
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
key_output 'Z' ; Passe sur R9 BASE=6
wait 300000
;
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
; test 9 (garder la foi tu dois, mecreant)
key_output '9'
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output 'Y' ; Repasser en Even
wait 100000
key_output '9' ; En even
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output '0' ; vertical sub pixel scroll
wait 1000000 ; 816677 1/8
key_output ' '
wait 1000000 ; 890842 1/16
key_output ' '
wait 1000000 ; 830950 1/32
key_output ' '
wait 1000000 ; 870899 1/64
key_output ' '
wait 1000000 ; 830965 1/128
key_output ' '
wait 1000000 ; menu
;
key_output '4' ;
wait 2000000 ; 1913669
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 1000000 ;
key_output ' '
wait 1000000 ; menu
;
key_output '5' ; rlal crtc 2 (tous crtc)
wait 900000
key_output ' '
wait 2000000
key_output ' ' ; Menu
wait 1000000
;
;
key_output '\(RET)'
wait 800000 ; 632429
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 647344
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 667312
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 1000000
;
;Test Bounga
key_output '\(FN0)'
wait 30000000 ; ???
key_output ' '
wait 1000000
;
; Test RVNI LTD
;
key_output '\(CAP)'
wait 6000000 ; 753563
key_output ' '
wait 6000000 ; 727728
key_output ' '
wait 6000000 ; 728880
key_output ' '
wait 6000000
;
; Shaker Killer Don't be afraid
;
key_output 'R'
wait 5000000 ; 2615301 z80aintb
key_output ' '
wait 6000000 ; 4692484 r52Reset
key_output ' '
wait 9000000 ; 7867387 Inter Test IM1
key_output ' '
wait 9000000 ; 6888966 Inter Test IM2
key_output ' '
wait 3000000 ; 1711766 R52 Incr
key_output ' '
wait 900000 ; 486262 Otir Zone
key_output ' '
wait 1000000 ; menu
;
; R3 JIT
key_output 'I'
wait 1000000 ; 474622
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 499200
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 599040
key_output ' '
wait 1000000 ; Menu
;
;
; test crtc 1 , ouvert aux autres CRTCs
;
key_output '6'
wait 2000000 ; 1676617
key_output ' '
wait 1000000
;
; Test Analyzer des premieres heures
;
key_output 'P'
wait 100000000 ; 12828735+638976
key_output ' '
wait 100000000 ; 5440000+638976
key_output ' '
wait 100000000 ; 11637760+638976
key_output ' '
wait 100000000 ; 13560624+638976
key_output ' '
wait 1000000
;
reset
;

View File

@ -0,0 +1,241 @@
;
; Fichier de script CSL
; Execution du module SHAKE26B du DSK SHAKER26.DSK en CRTC 4
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 4
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26B"\(RET)'
wait 10000000
;
; test 1 interlace c4/c9 counters R9 base=06
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
key_output 'X' ; Passe sur R9 BASE=7
wait 300000
;
key_output '1'
wait 5000000 ; Ecran settings, ecran intermediaire
wait 7000000 ; 1er ecran
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; 5251584
key_output ' '
wait 7000000 ; menu
;
; test 9 (garder la foi tu dois, mecreant)
key_output '9'
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output 'Y' ; Repasser en Even
wait 100000
key_output '9' ; En even
wait 20000000 ;
key_output ' '
wait 20000000
key_output ' '
wait 1000000
;
key_output '0' ; vertical sub pixel scroll
wait 1000000 ; 816677 1/8
key_output ' '
wait 1000000 ; 890842 1/16
key_output ' '
wait 1000000 ; 830950 1/32
key_output ' '
wait 1000000 ; 870899 1/64
key_output ' '
wait 1000000 ; 830965 1/128
key_output ' '
wait 1000000 ; menu
;
key_output '4' ;
wait 2000000 ; 1913669
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 900000 ; 730624
key_output ' '
wait 1000000 ;
key_output ' '
wait 1000000 ; menu
;
key_output '5' ; rlal crtc 2 (tous crtc)
wait 900000
key_output ' '
wait 2000000
key_output ' ' ; Menu
wait 1000000
;
;
key_output '\(RET)'
wait 800000 ; 632429
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 647344
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 800000 ; 667312
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
wait 6000000 ; 5111808
key_output ' '
wait 1000000
;
;Test Bounga
key_output '\(FN0)'
wait 50000000 ; ???
key_output ' '
wait 1000000
;
; Test RVNI LTD
;
key_output '\(CAP)'
wait 6000000 ; 753563
key_output ' '
wait 6000000 ; 727728
key_output ' '
wait 6000000 ; 728880
key_output ' '
wait 6000000
;
; Shaker Killer Don't be afraid
;
key_output 'R'
wait 5000000 ; 2615301 z80aintb
key_output ' '
wait 6000000 ; 4692484 r52Reset
key_output ' '
wait 9000000 ; 7867387 Inter Test IM1
key_output ' '
wait 9000000 ; 6888966 Inter Test IM2
key_output ' '
wait 3000000 ; 1711766 R52 Incr
key_output ' '
wait 900000 ; 486262 Otir Zone
key_output ' '
wait 1000000 ; menu
;
; R3 JIT
key_output 'I'
wait 1000000 ; 474622
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 519168
key_output ' '
wait 1000000 ; 499200
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 619008
key_output ' '
wait 1000000 ; 599040
key_output ' '
wait 1000000 ; Menu
;
;
; test crtc 1 , ouvert aux autres CRTCs
;
key_output '6'
wait 12000000 ; 1676617
key_output ' '
wait 1000000
;
; Test Analyzer des premieres heures
;
key_output 'P'
wait 100000000 ; 12828735+638976
key_output ' '
wait 100000000 ; 5440000+638976
key_output ' '
wait 100000000 ; 11637760+638976
key_output ' '
wait 100000000 ; 13560624+638976
key_output ' '
wait 1000000
;
csl_load 'SHAKE26B-3'

View File

@ -0,0 +1,96 @@
;
; Fichier de script CSL
; Execution du module SHAKE26C du DSK SHAKER26.DSK en CRTC 0
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 0
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26C"\(RET)'
wait 10000000
;
; test 5 Parity Check Select CRTC 0, 2
key_output '5'
wait 10000000
key_output ' '
wait 1000000 ; menu
; test prevu pour CRTC 2 mais disp autre crc Last Line cond
key_output '7'
wait 64000000
key_output ' '
wait 1000000 ; menu
; test crtc 2 vma' sur R1=0
key_output 'T'
wait 1100000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1000000 ; menu
; crtc 2 ghost vsync vs Last Line (others crtc welcome)
key_output '\(RET)'
wait 5000000
key_output ' '
wait 2000000
key_output ' '
wait 1000000 ; menu
; Add Line R5 on last line
key_output 'E'
wait 10000000
key_output ' '
wait 5000000
key_output ' '
wait 1000000 ; menu
; Add line R8
key_output 'P'
wait 12000000
key_output ' '
wait 1000000 ; menu
; r5 additional line in interlace mode
key_output 'S'
wait 2000000
key_output ' '
wait 1000000 ; menu
; CRTC 0,3,4 Interlace vsync nightmare (2 1er test uniqu CRTC1)
key_output 'O'
wait 4000000
key_output ' '
wait 6000000
key_output ' '
wait 1000000
wait 8000000
key_output ' '
wait 9000000
key_output ' '
wait 9000000
key_output ' '
wait 10000000
key_output ' '
wait 9000000
key_output ' '
wait 10000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000 ; menu
; R9/R4 UPD LAST LIMIT
key_output 'R'
wait 5000000
key_output ' '
wait 10000000 ; menu
csl_load 'SHAKE26C-1'

View File

@ -0,0 +1,187 @@
;
; Fichier de script CSL
; Execution du module SHAKE26C du DSK SHAKER26.DSK en CRTC 1
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 1
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26C"\(RET)'
wait 10000000
;
; R8 IVM ODD C9
key_output '2'
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000 ; menu
; Parity Switch Status
key_output '3'
wait 5000000
key_output ' '
wait 1000000 ; menu
; Ivm On/Off
key_output '4'
wait 800000 ; 23D
key_output ' '
wait 1000000 ; 23E
key_output ' '
wait 1000000 ; 23F
key_output ' '
wait 1000000 ; 27F
key_output ' '
wait 1000000 ; 280
key_output ' '
wait 1000000 ; 281
key_output ' '
wait 1000000 ; 282
key_output ' '
wait 1000000 ; 283
key_output ' '
wait 1000000 ; 284
key_output ' '
wait 1000000 ; 285, 286
key_output ' '
wait 1000000 ; 287, 288
key_output ' '
wait 1000000 ; 289
key_output ' '
wait 1000000 ; 28A
key_output ' '
wait 1000000 ; 28B
key_output ' '
wait 1000000 ; 28c
key_output ' '
wait 1000000 ; 28d
key_output ' '
wait 1000000 ; 28e
key_output ' '
wait 1000000 ; 28f
key_output ' '
wait 1000000 ; 290
key_output ' '
wait 1000000 ; 291
key_output ' '
wait 1000000 ; 292
key_output ' '
wait 1000000 ; 293
key_output ' '
wait 1000000 ; 294
key_output ' '
wait 1000000 ; 295
key_output ' '
wait 1000000 ; 296, 297
key_output ' '
wait 1000000 ; 298, 299
key_output ' '
wait 1000000 ; 29a
key_output ' '
wait 1000000 ; 29b
key_output ' '
wait 1000000 ; 29c
key_output ' '
wait 1000000 ; 29d
key_output ' '
; test prevu pour CRTC 2 mais disp autre crc Last Line cond
key_output '7'
wait 64000000
key_output ' '
wait 1000000 ; menu
; test crtc 2 vma' sur R1=0
key_output 'T'
wait 1100000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1000000 ; menu
; crtc 2 ghost vsync vs Last Line (others crtc welcome)
key_output '\(RET)'
wait 5000000
key_output ' '
wait 2000000
key_output ' '
wait 1000000 ; menu
; Add Line R5 on last line
key_output 'E'
wait 20000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000 ; menu
; Add line R8
key_output 'P'
wait 20000000
key_output ' '
wait 1000000 ; menu
; r5 additional line in interlace mode
key_output 'S'
wait 4000000
key_output ' '
wait 1000000 ; menu
; CRTC 1 Interlace vsync nightmare (2 1er test uniqu CRTC1)
key_output 'O'
wait 12000000 ; cvsct1_a
key_output ' '
wait 6000000 ; cvsct1_b
key_output ' '
wait 3500000 ; cvstot
key_output ' '
wait 2000000 ; parity00
wait 8000000
key_output ' '
wait 6000000 ; cvms_a
key_output ' '
wait 6000000 ; cvms_b
key_output ' '
wait 6000000 ; cvms_b
key_output ' '
wait 6000000 ; cvms_c
key_output ' '
wait 6000000 ; cvms_c
key_output ' '
wait 3000000 ; parity01a
key_output ' '
wait 3000000 ; parity01b
key_output ' '
wait 3000000 ; parity01c
key_output ' '
wait 3000000 ; parity01d
key_output ' '
wait 3000000 ; parity01e
key_output ' '
wait 3000000 ; parity01f
key_output ' '
wait 1000000
csl_load 'SHAKE26C-2'

View File

@ -0,0 +1,154 @@
;
; Fichier de script CSL
; Execution du module SHAKE26C du DSK SHAKER26.DSK en CRTC 2
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 2
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26C"\(RET)'
wait 10000000
;
; test 5 Parity Check Select CRTC 0, 2
key_output '5'
wait 10000000
key_output ' '
wait 1000000 ; menu
; C9 IVM Switch
key_output '6'
wait 1200000 ; 29f
key_output ' '
wait 1200000 ; 2a4
key_output ' '
wait 1200000 ; 2a5
key_output ' '
wait 1200000 ; 2a6
key_output ' '
wait 1200000 ; 2a7
key_output ' '
wait 1200000 ; 2ac
key_output ' '
wait 1200000 ; 2ad
key_output ' '
wait 1200000 ; 2ae
key_output ' '
wait 1200000 ; 2af
key_output ' '
wait 1200000 ; 2b4
key_output ' '
wait 1200000 ; 2b5
key_output ' '
wait 1200000 ; 2b6
key_output ' '
wait 1200000 ; 2b7
key_output ' '
wait 1200000 ; 2bc
key_output ' '
wait 1200000 ; 2bd
key_output ' '
wait 1200000 ; 2be
key_output ' '
wait 1000000 ; menu
; test prevu pour CRTC 2 mais disp autre crc Last Line cond
key_output '7'
wait 64000000
key_output ' '
wait 1000000 ; menu
;
; add line on parity bug
key_output '8'
wait 2000000 ; 2c0
key_output ' '
wait 2000000 ; 2c1
key_output ' '
wait 2000000 ; 2c2
key_output ' '
wait 2000000 ; 2c3
key_output ' '
wait 2000000 ; 2c4
key_output ' '
wait 2000000 ; 2c5
key_output ' '
wait 2000000 ; 2c6
key_output ' '
wait 1000000 ; menu
; add line rq & trigger
key_output '9'
wait 2000000 ; 2c7
key_output ' '
wait 300000000
key_output ' '
; test crtc 2 vma' sur R1=0
key_output 'T'
wait 1100000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1000000 ; menu
; crtc 2 ghost vsync vs Last Line (others crtc welcome)
key_output '\(RET)'
wait 5000000
key_output ' '
wait 2000000
key_output ' '
wait 1000000 ; menu
; Add Line R5 on last line
key_output 'E'
wait 20000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000 ; menu
; Add line R8
key_output 'P'
wait 20000000
key_output ' '
wait 1000000 ; menu
; r5 additional line in interlace mode
key_output 'S'
wait 2000000
key_output ' '
wait 1000000 ; menu
; CRTC 2 Interlace vsync nightmare (2 1er test uniqu CRTC1)
key_output 'O'
wait 6000000 ; cvstot
key_output ' '
wait 2000000 ; parity00 2d8
wait 8000000 ; 2d9
key_output ' '
wait 10000000 ; cvms_a ; 2da
key_output ' '
wait 10000000 ; cvms_b ; 2db
key_output ' '
wait 10000000 ; cvms_b ; 2dc
key_output ' '
wait 10000000 ; cvms_c ; 2dd
key_output ' '
wait 10000000 ; cvms_c ; 2de
key_output ' '
wait 10000000 ; menu
; R9/R4 UPD LAST LIMIT
key_output 'R'
wait 5000000 ; 3ad
key_output ' '
wait 10000000 ; menu
cls_load 'SHAKE26C-4'

View File

@ -0,0 +1,94 @@
;
; Fichier de script CSL
; Execution du module SHAKE26C du DSK SHAKER26.DSK en CRTC 3
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 3
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26C"\(RET)'
wait 10000000
; test prevu pour CRTC 2 mais disp autre crc Last Line cond
key_output '7'
wait 64000000
key_output ' '
wait 1000000 ; menu
;
; test crtc 2 vma' sur R1=0
key_output 'T'
wait 1100000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1000000 ; menu
; crtc 2 ghost vsync vs Last Line (others crtc welcome)
key_output '\(RET)'
wait 5000000 ; 2cd
key_output ' '
wait 2000000 ; 2ce
key_output ' '
wait 1000000 ; menu
; Add Line R5 on last line
key_output 'E'
wait 10000000 ; 2c9
key_output ' '
wait 5000000 ; 2ca
key_output ' '
wait 1000000 ; menu
; r5 additional line in interlace mode
key_output 'S'
wait 2000000 ; 2d3
key_output ' '
wait 1000000 ; menu
; CRTC 2 Interlace vsync nightmare (2 1er test uniqu CRTC1)
key_output 'O'
wait 6000000 ; cvstot 2d6
key_output ' '
wait 3500000 ; cvstot 2d7
key_output ' '
wait 2000000 ; parity00
wait 8000000
key_output ' '
wait 10000000 ; cvms_a 2d8
key_output ' '
wait 10000000 ; cvms_b
key_output ' '
wait 10000000 ; cvms_b
key_output ' '
wait 10000000 ; cvms_c
key_output ' '
wait 10000000 ; cvms_c
key_output ' '
wait 10000000 ; menu
; Y crtc 3/4 parity
key_output 'Y'
wait 4500000 ; 2df
key_output ' '
wait 1000000 ; 2e0
key_output ' '
wait 1000000 ; 2e1
key_output ' '
wait 1000000 ; 2e2
key_output ' '
wait 10000000 ; menu
; R9/R4 UPD LAST LIMIT
key_output 'R'
wait 5000000
key_output ' '
wait 10000000 ; menu
reset

View File

@ -0,0 +1,94 @@
;
; Fichier de script CSL
; Execution du module SHAKE26C du DSK SHAKER26.DSK en CRTC 4
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 4
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26C"\(RET)'
wait 10000000
; test prevu pour CRTC 2 mais disp autre crc Last Line cond
key_output '7'
wait 64000000
key_output ' '
wait 1000000 ; menu
;
; test crtc 2 vma' sur R1=0
key_output 'T'
wait 1100000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1200000
key_output ' '
wait 1000000 ; menu
; crtc 2 ghost vsync vs Last Line (others crtc welcome)
key_output '\(RET)'
wait 5000000 ; 2cd
key_output ' '
wait 2000000 ; 2ce
key_output ' '
wait 1000000 ; menu
; Add Line R5 on last line
key_output 'E'
wait 10000000 ; 2c9
key_output ' '
wait 5000000 ; 2ca
key_output ' '
wait 1000000 ; menu
; r5 additional line in interlace mode
key_output 'S'
wait 2000000 ; 2d3
key_output ' '
wait 1000000 ; menu
; CRTC 2 Interlace vsync nightmare (2 1er test uniqu CRTC1)
key_output 'O'
wait 6000000 ; cvstot 2d6
key_output ' '
wait 3500000 ; cvstot 2d7
key_output ' '
wait 2000000 ; parity00
wait 8000000
key_output ' '
wait 10000000 ; cvms_a 2d8
key_output ' '
wait 10000000 ; cvms_b
key_output ' '
wait 10000000 ; cvms_b
key_output ' '
wait 10000000 ; cvms_c
key_output ' '
wait 10000000 ; cvms_c
key_output ' '
wait 10000000 ; menu
; Y crtc 3/4 parity
key_output 'Y'
wait 4500000 ; 2df
key_output ' '
wait 1000000 ; 2e0
key_output ' '
wait 1000000 ; 2e1
key_output ' '
wait 1000000 ; 2e2
key_output ' '
wait 10000000 ; menu
; R9/R4 UPD LAST LIMIT
key_output 'R'
wait 5000000
key_output ' '
wait 10000000 ; menu
csl_load 'SHAKE26C-3'

View File

@ -0,0 +1,201 @@
;
; Fichier de script CSL
; Execution du module SHAKE26D du DSK SHAKER26.DSK en CRTC 0
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 0
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26D"\(RET)'
wait 10000000
;
; SHAKER KILLER 2
key_output 'I'
wait 2000000 ; 2e3 ecran bleu
key_output ' '
wait 2000000 ; 2e4
key_output ' '
wait 2000000 ; 2e5
key_output ' '
wait 2000000 ; 2e6
key_output ' '
wait 2000000 ; 2e7
key_output ' '
wait 2000000 ; 2e8
key_output ' '
wait 2000000 ; 2e9
key_output ' '
wait 1000000 ; menu
; VSYNC TORTURE (LOCK MECHANISM)
; Eventuellement ajouter des SS sur les 3 tests desync crtc 0
key_output 'R'
wait 22000000 ; 2ea
key_output ' '
wait 1000000 ; menu
; VSYNC/CSYNC GATE ARRAY
key_output 'T'
wait 800000 ; 2eb
key_output ' '
wait 2000000 ; 2ec
key_output ' '
wait 2000000 ; 2ed
key_output ' '
wait 2000000 ; 2ee
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2f0
key_output ' '
wait 2000000 ; 2f1
key_output ' '
wait 2000000 ; 2f2
key_output ' '
wait 2000000 ; 2f3
key_output ' '
wait 2000000 ; 2f4
key_output ' '
wait 2000000 ; 2f5
key_output ' '
wait 2000000 ; 2fb
key_output ' '
wait 8000000 ; 2fc 2fd
key_output ' '
wait 4000000 ; 2fe
key_output ' '
wait 4000000 ; 2ff
key_output ' '
wait 4000000 ; 300
key_output ' '
wait 4000000 ; 301
key_output ' '
wait 1000000
key_delay 90000
key_output ' '
key_output ' '
wait 1000000 ; menu
; HSYNC CSYNC GATE ARRAY
key_output 'H'
wait 1000000 ; 306
key_output ' '
wait 1200000 ; 307
key_output ' '
wait 1200000 ; 308
key_output ' '
wait 1200000 ; 309
key_output ' '
wait 1200000 ; 30A
key_output ' '
wait 1200000 ; 30B
key_output ' '
wait 1200000 ; 30C
key_output ' '
wait 1200000 ; 30D
key_output ' '
wait 1200000 ; 30E
key_output ' '
wait 1200000 ; 30F
key_output ' '
wait 1000000 ; menu
; CSYNC4 VS 2XCSYNC2
;
key_output '1'
wait 4600000 ; 310
wait 4000000 ; 311
wait 8000000
key_output ' '
wait 1000000 ; menu
; R2JIT >> NO CSYNC UPD
;
key_output '2'
wait 4500000 ; 312
wait 4000000 ; 313
wait 4000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000
; 2 CSYNC RELATIVE;
key_output '3'
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
; CSYNC MULTIPLES
key_output '4'
wait 1000000 ; 37f
key_output ' '
wait 3000000 ; 380
key_output ' '
wait 1000000
; Hardware scroll 1 pixel mode 1/0 (no buffering)
key_output '6'
wait 10000000 ; 381
key_output ' '
wait 10000000 ; 382
key_output ' '
wait 1000000
;
; R2 oscillation story;
key_output '7'
wait 10000000 ; 383
key_output ' '
wait 4000000 ; 384
key_output ' '
wait 4000000 ; 385
key_output ' '
wait 4000000 ; 386
key_output ' '
wait 4000000 ; 387
key_output ' '
wait 4000000 ; 388
key_output ' '
wait 4000000 ; 389
key_output ' '
wait 4000000 ; 38a
key_output ' '
wait 4000000 ; 38b
key_output ' '
wait 4000000 ; 38c
key_output ' '
wait 1000000 ; menu
;
; no hsync for xx line
key_output '8'
wait 3000000 ; 38d
key_output ' '
wait 3000000 ; 38e
key_output ' '
wait 3000000 ; 38f
key_output ' '
wait 3000000 ; 390
key_output ' '
wait 3000000 ; 391
key_output ' '
wait 3000000 ; 392
key_output ' '
wait 1000000 ; menu
csl_load 'SHAKE26D-1'

View File

@ -0,0 +1,238 @@
;
; Fichier de script CSL
; Execution du module SHAKE26D du DSK SHAKER26.DSK en CRTC 1
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 1
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26D"\(RET)'
wait 10000000
;
; SHAKER KILLER 2
key_output 'I'
wait 2000000 ; 2e3 ecran bleu
key_output ' '
wait 2000000 ; 2e4
key_output ' '
wait 2000000 ; 2e5
key_output ' '
wait 2000000 ; 2e6
key_output ' '
wait 2000000 ; 2e7
key_output ' '
wait 2000000 ; 2e8
key_output ' '
wait 2000000 ; 2e9
key_output ' '
wait 1000000 ; menu
; VSYNC TORTURE (LOCK MECHANISM)
; Eventuellement ajouter des SS sur les 3 tests desync crtc 0
key_output 'R'
wait 22000000 ; 2ea
key_output ' '
wait 1000000 ; menu
; VSYNC/CSYNC GATE ARRAY
key_output 'T'
wait 800000 ; 2eb
key_output ' '
wait 2000000 ; 2ec
key_output ' '
wait 2000000 ; 2ed
key_output ' '
wait 2000000 ; 2ee
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2f0
key_output ' '
wait 2000000 ; 2f1
key_output ' '
wait 2000000 ; 2f2
key_output ' '
wait 2000000 ; 2f3
key_output ' '
wait 2000000 ; 2f4
key_output ' '
wait 2000000 ; 2f5
key_output ' '
wait 2000000 ; 2fb
key_output ' '
wait 8000000 ; 2fc 2fd
key_output ' '
wait 4000000 ; 2fe
key_output ' '
wait 4000000 ; 2ff
key_output ' '
wait 4000000 ; 300
key_output ' '
wait 4000000 ; 301
key_output ' '
wait 1000000
key_delay 90000
key_output ' '
key_output ' '
wait 1000000 ; menu
; HSYNC CSYNC GATE ARRAY
key_output 'H'
wait 1000000 ; 306
key_output ' '
wait 1200000 ; 307
key_output ' '
wait 1200000 ; 308
key_output ' '
wait 1200000 ; 309
key_output ' '
wait 1200000 ; 30A
key_output ' '
wait 1200000 ; 30B
key_output ' '
wait 1200000 ; 30C
key_output ' '
wait 1200000 ; 30D
key_output ' '
wait 1200000 ; 30E
key_output ' '
wait 1200000 ; 30F
key_output ' '
wait 1000000 ; menu
; CSYNC4 VS 2XCSYNC2
;
key_output '1'
wait 4600000 ; 310
wait 4000000 ; 311
wait 8000000
key_output ' '
wait 1000000 ; menu
; R2JIT >> NO CSYNC UPD
;
key_output '2'
wait 4500000 ; 312
wait 4000000 ; 313
wait 4000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000
; 2 CSYNC RELATIVE;
key_output '3'
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
; CSYNC MULTIPLES
key_output '4'
wait 1000000 ; 37f
key_output ' '
wait 3000000 ; 380
key_output ' '
wait 1000000
; Hardware scroll 1 pixel mode 1/0 (no buffering)
key_output '6'
wait 10000000 ; 381
key_output ' '
wait 10000000 ; 382
key_output ' '
wait 1000000
;
; R2 oscillation story;
key_output '7'
wait 10000000 ; 383
key_output ' '
wait 4000000 ; 384
key_output ' '
wait 4000000 ; 385
key_output ' '
wait 4000000 ; 386
key_output ' '
wait 4000000 ; 387
key_output ' '
wait 4000000 ; 388
key_output ' '
wait 4000000 ; 389
key_output ' '
wait 4000000 ; 38a
key_output ' '
wait 4000000 ; 38b
key_output ' '
wait 4000000 ; 38c
key_output ' '
wait 1000000 ; menu
;
; no hsync for xx line
key_output '8'
wait 3000000 ; 38d
key_output ' '
wait 3000000 ; 38e
key_output ' '
wait 3000000 ; 38f
key_output ' '
wait 3000000 ; 390
key_output ' '
wait 3000000 ; 391
key_output ' '
wait 3000000 ; 392
key_output ' '
; rfd round 2
;
key_output '9'
wait 2000000 ; 393, 3f7
key_output ' '
wait 2000000 ; 394, 3f8
key_output ' '
wait 2000000 ; 395, 3f9
key_output ' '
wait 2000000 ; 396
key_output ' '
wait 2000000 ; 397
key_output ' '
wait 2000000 ; 398
key_output ' '
wait 2000000 ; 399
key_output ' '
wait 2000000 ; 39a
key_output ' '
wait 2000000 ; 39b
key_output ' '
wait 1000000 ; menu
; ofs upd in add managment
;
key_output 'E'
wait 1000000 ; 3ae
key_output ' '
wait 1000000 ; 3af
key_output ' '
wait 1000000 ; 3b4
key_output ' '
wait 1000000 ; 3b5
key_output ' '
wait 1000000 ; 3b6
key_output ' '
wait 1000000 ; 3b7
key_output ' '
wait 1000000 ; menu
csl_load 'SHAKE26D-2'

View File

@ -0,0 +1,199 @@
;
; Fichier de script CSL
; Execution du module SHAKE26D du DSK SHAKER26.DSK en CRTC 2
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 2
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26D"\(RET)'
wait 10000000
;
; SHAKER KILLER 2
key_output 'I'
wait 2000000 ; 2e3 ecran bleu
key_output ' '
wait 2000000 ; 2e4
key_output ' '
wait 2000000 ; 2e5
key_output ' '
wait 2000000 ; 2e6
key_output ' '
wait 2000000 ; 2e7
key_output ' '
wait 2000000 ; 2e8
key_output ' '
wait 2000000 ; 2e9
key_output ' '
wait 1000000 ; menu
; VSYNC TORTURE (LOCK MECHANISM)
; Eventuellement ajouter des SS sur les 3 tests desync crtc 0
key_output 'R'
wait 22000000 ; 2ea
key_output ' '
wait 1000000 ; menu
; VSYNC/CSYNC GATE ARRAY
key_output 'T'
wait 800000 ; 2eb
key_output ' '
wait 2000000 ; 2ec
key_output ' '
wait 2000000 ; 2ed
key_output ' '
wait 2000000 ; 2ee
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2f0
key_output ' '
wait 2000000 ; 2f1
key_output ' '
wait 2000000 ; 2f2
key_output ' '
wait 2000000 ; 2f3
key_output ' '
wait 2000000 ; 2f4
key_output ' '
wait 2000000 ; 2f5
key_output ' '
wait 2000000 ; 2fb
key_output ' '
wait 8000000 ; 2fc 2fd
key_output ' '
wait 4000000 ; 2fe
key_output ' '
wait 4000000 ; 2ff
key_output ' '
wait 4000000 ; 300
key_output ' '
wait 4000000 ; 301
key_output ' '
wait 1000000
key_delay 90000
key_output ' '
key_output ' '
wait 1000000 ; menu
; HSYNC CSYNC GATE ARRAY
key_output 'H'
wait 1000000 ; 306
key_output ' '
wait 1200000 ; 307
key_output ' '
wait 1200000 ; 308
key_output ' '
wait 1200000 ; 309
key_output ' '
wait 1200000 ; 30A
key_output ' '
wait 1200000 ; 30B
key_output ' '
wait 1200000 ; 30C
key_output ' '
wait 1200000 ; 30D
key_output ' '
wait 1200000 ; 30E
key_output ' '
wait 1200000 ; 30F
key_output ' '
wait 1000000 ; menu
; CSYNC4 VS 2XCSYNC2
;
key_output '1'
wait 4600000 ; 310
wait 4000000 ; 311
wait 8000000
key_output ' '
wait 1000000 ; menu
; R2JIT >> NO CSYNC UPD
;
key_output '2'
wait 4500000 ; 312
wait 4000000 ; 313
wait 4000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000
; 2 CSYNC RELATIVE;
key_output '3'
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
; CSYNC MULTIPLES
key_output '4'
wait 1000000 ; 37f
key_output ' '
wait 3000000 ; 380
key_output ' '
wait 1000000
; Hardware scroll 1 pixel mode 1/0 (no buffering)
key_output '6'
wait 10000000 ; 381
key_output ' '
wait 10000000 ; 382
key_output ' '
wait 1000000
;
; R2 oscillation story;
key_output '7'
wait 10000000 ; 383
key_output ' '
wait 4000000 ; 384
key_output ' '
wait 4000000 ; 385
key_output ' '
wait 4000000 ; 386
key_output ' '
wait 4000000 ; 387
key_output ' '
wait 4000000 ; 388
key_output ' '
wait 4000000 ; 389
key_output ' '
wait 4000000 ; 38a
key_output ' '
wait 4000000 ; 38b
key_output ' '
wait 4000000 ; 38c
key_output ' '
wait 1000000 ; menu
;
; no hsync for xx line
key_output '8'
wait 3000000 ; 38d
key_output ' '
wait 3000000 ; 38e
key_output ' '
wait 3000000 ; 38f
key_output ' '
wait 3000000 ; 390
key_output ' '
wait 3000000 ; 391
key_output ' '
wait 3000000 ; 392
key_output ' '
wait 1000000 ; menu
csl_load 'SHAKE26D-4'

View File

@ -0,0 +1,285 @@
;
; Fichier de script CSL
; Execution du module SHAKE26D du DSK SHAKER26.DSK en CRTC 4
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 3
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26D"\(RET)'
wait 10000000
;
; SHAKER KILLER 2
key_output 'I'
wait 2000000 ; 2e3 ecran bleu
key_output ' '
wait 2000000 ; 2e4
key_output ' '
wait 2000000 ; 2e5
key_output ' '
wait 2000000 ; 2e6
key_output ' '
wait 2000000 ; 2e7
key_output ' '
wait 2000000 ; 2e8
key_output ' '
wait 2000000 ; 2e9
key_output ' '
wait 1000000 ; menu
; VSYNC TORTURE (LOCK MECHANISM)
; Eventuellement ajouter des SS sur les 3 tests desync crtc 0
key_output 'R'
wait 22000000 ; 2ea
key_output ' '
wait 1000000 ; menu
; VSYNC/CSYNC GATE ARRAY
key_output 'T'
wait 800000 ; 2eb
key_output ' '
wait 2000000 ; 2ec
key_output ' '
wait 2000000 ; 2ed
key_output ' '
wait 2000000 ; 2ee
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2f0
key_output ' '
wait 2000000 ; 2f1
key_output ' '
wait 2000000 ; 2f2
key_output ' '
wait 2000000 ; 2f3
key_output ' '
wait 2000000 ; 2f4
key_output ' '
wait 2000000 ; 2f5
key_output ' '
wait 2000000 ; 2fb
key_output ' '
wait 8000000 ; 2fc 2fd
key_output ' '
wait 4000000 ; 2fe
key_output ' '
wait 4000000 ; 2ff
key_output ' '
wait 4000000 ; 300
key_output ' '
wait 4000000 ; 301
key_output ' '
wait 1000000
key_delay 90000
key_output ' '
key_output ' '
wait 1000000 ; menu
; HSYNC CSYNC GATE ARRAY
key_output 'H'
wait 1000000 ; 306
key_output ' '
wait 1200000 ; 307
key_output ' '
wait 1200000 ; 308
key_output ' '
wait 1200000 ; 309
key_output ' '
wait 1200000 ; 30A
key_output ' '
wait 1200000 ; 30B
key_output ' '
wait 1200000 ; 30C
key_output ' '
wait 1200000 ; 30D
key_output ' '
wait 1200000 ; 30E
key_output ' '
wait 1200000 ; 30F
key_output ' '
wait 1000000 ; menu
; CSYNC4 VS 2XCSYNC2
;
key_output '1'
wait 4600000 ; 310
wait 4000000 ; 311
wait 8000000
key_output ' '
wait 1000000 ; menu
; R2JIT >> NO CSYNC UPD
;
key_output '2'
wait 4500000 ; 312
wait 4000000 ; 313
wait 4000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000
; 2 CSYNC RELATIVE;
key_output '3'
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
; CSYNC MULTIPLES
key_output '4'
wait 1000000 ; 37f
key_output ' '
wait 3000000 ; 380
key_output ' '
wait 1000000
; Hardware scroll 1 pixel mode 1/0 (no buffering)
key_output '6'
wait 10000000 ; 381
key_output ' '
wait 10000000 ; 382
key_output ' '
wait 1000000
;
; R2 oscillation story;
key_output '7'
wait 10000000 ; 383
key_output ' '
wait 4000000 ; 384
key_output ' '
wait 4000000 ; 385
key_output ' '
wait 4000000 ; 386
key_output ' '
wait 4000000 ; 387
key_output ' '
wait 4000000 ; 388
key_output ' '
wait 4000000 ; 389
key_output ' '
wait 4000000 ; 38a
key_output ' '
wait 4000000 ; 38b
key_output ' '
wait 4000000 ; 38c
key_output ' '
wait 1000000 ; menu
;
; no hsync for xx line
key_output '8'
wait 3000000 ; 38d
key_output ' '
wait 3000000 ; 38e
key_output ' '
wait 3000000 ; 38f
key_output ' '
wait 3000000 ; 390
key_output ' '
wait 3000000 ; 391
key_output ' '
wait 3000000 ; 392
key_output ' '
wait 1000000 ; menu
;
; CRTC 3/4 STATUS
key_output 'U'
wait 10000000 ; 3bc
key_output ' '
wait 10000000 ; 3bd
key_output ' '
wait 10000000 ; 3be
key_output ' '
wait 15000000 ; 3bf
key_output ' '
wait 45000000 ; 3c0
key_output ' '
wait 10000000 ; 3c1
key_output ' '
wait 4000000 ; 3c2
key_output ' '
wait 4000000 ; 3c3
key_output ' '
wait 4000000 ; 3c4
key_output ' '
wait 4000000 ; 3c5
key_output ' '
wait 4000000 ; 3c6
key_output ' '
wait 4000000 ; 3c7
key_output ' '
wait 4000000 ; 3c8
key_output ' '
wait 4000000 ; 3c9
key_output ' '
wait 4000000 ; 3ca
key_output ' '
wait 4000000 ; 3cb
key_output ' '
wait 4000000 ; 3cc
key_output ' '
wait 4000000 ; 3cd
key_output ' '
wait 4000000 ; 3ce
key_output ' '
wait 4000000 ; 3cf
key_output ' '
wait 4000000 ; 3d0
key_output ' '
wait 4000000 ; 3d1
key_output ' '
wait 4000000 ; 3d2
key_output ' '
wait 4000000 ; 3d3
key_output ' '
wait 4000000 ; 3d4
key_output ' '
wait 4000000 ; 3d5
key_output ' '
wait 4000000 ; 3d6
key_output ' '
wait 4000000 ; 3d7
key_output ' '
wait 4000000 ; 3d8
key_output ' '
wait 4000000 ; 3d9
key_output ' '
wait 4000000 ; 3da
key_output ' '
wait 4000000 ; 3db
key_output ' '
wait 4000000 ; 3dc
key_output ' '
wait 4000000 ; 3dd
key_output ' '
wait 4000000 ; 3de
key_output ' '
wait 4000000 ; 3df
key_output ' '
wait 4000000 ; 3e0
key_output ' '
wait 4000000 ; 3e1
key_output ' '
wait 4000000 ; 3e2
key_output ' '
wait 4000000 ; 3e3
key_output ' '
wait 4000000 ; 3e4
key_output ' '
wait 4000000 ; menu
reset

View File

@ -0,0 +1,286 @@
;
; Fichier de script CSL
; Execution du module SHAKE26D du DSK SHAKER26.DSK en CRTC 4
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 4
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26D"\(RET)'
wait 10000000
;
; SHAKER KILLER 2
key_output 'I'
wait 2000000 ; 2e3 ecran bleu
key_output ' '
wait 2000000 ; 2e4
key_output ' '
wait 2000000 ; 2e5
key_output ' '
wait 2000000 ; 2e6
key_output ' '
wait 2000000 ; 2e7
key_output ' '
wait 2000000 ; 2e8
key_output ' '
wait 2000000 ; 2e9
key_output ' '
wait 1000000 ; menu
; VSYNC TORTURE (LOCK MECHANISM)
; Eventuellement ajouter des SS sur les 3 tests desync crtc 0
key_output 'R'
wait 22000000 ; 2ea
key_output ' '
wait 1000000 ; menu
; VSYNC/CSYNC GATE ARRAY
key_output 'T'
wait 800000 ; 2eb
key_output ' '
wait 2000000 ; 2ec
key_output ' '
wait 2000000 ; 2ed
key_output ' '
wait 2000000 ; 2ee
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2ef
key_output ' '
wait 2000000 ; 2f0
key_output ' '
wait 2000000 ; 2f1
key_output ' '
wait 2000000 ; 2f2
key_output ' '
wait 2000000 ; 2f3
key_output ' '
wait 2000000 ; 2f4
key_output ' '
wait 2000000 ; 2f5
key_output ' '
wait 2000000 ; 2fb
key_output ' '
wait 8000000 ; 2fc 2fd
key_output ' '
wait 4000000 ; 2fe
key_output ' '
wait 4000000 ; 2ff
key_output ' '
wait 4000000 ; 300
key_output ' '
wait 4000000 ; 301
key_output ' '
wait 1000000
key_delay 90000
key_output ' '
key_output ' '
wait 1000000 ; menu
; HSYNC CSYNC GATE ARRAY
key_output 'H'
wait 1000000 ; 306
key_output ' '
wait 1200000 ; 307
key_output ' '
wait 1200000 ; 308
key_output ' '
wait 1200000 ; 309
key_output ' '
wait 1200000 ; 30A
key_output ' '
wait 1200000 ; 30B
key_output ' '
wait 1200000 ; 30C
key_output ' '
wait 1200000 ; 30D
key_output ' '
wait 1200000 ; 30E
key_output ' '
wait 1200000 ; 30F
key_output ' '
wait 1000000 ; menu
; CSYNC4 VS 2XCSYNC2
;
key_output '1'
wait 4600000 ; 310
wait 4000000 ; 311
wait 8000000
key_output ' '
wait 1000000 ; menu
; R2JIT >> NO CSYNC UPD
;
key_output '2'
wait 4500000 ; 312
wait 4000000 ; 313
wait 4000000
key_output ' '
wait 10000000
key_output ' '
wait 1000000
; 2 CSYNC RELATIVE;
key_output '3'
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
key_output ' '
wait 1000000
; CSYNC MULTIPLES
key_output '4'
wait 1000000 ; 37f
key_output ' '
wait 3000000 ; 380
key_output ' '
wait 1000000
; Hardware scroll 1 pixel mode 1/0 (no buffering)
key_output '6'
wait 10000000 ; 381
key_output ' '
wait 10000000 ; 382
key_output ' '
wait 1000000
;
; R2 oscillation story;
key_output '7'
wait 10000000 ; 383
key_output ' '
wait 4000000 ; 384
key_output ' '
wait 4000000 ; 385
key_output ' '
wait 4000000 ; 386
key_output ' '
wait 4000000 ; 387
key_output ' '
wait 4000000 ; 388
key_output ' '
wait 4000000 ; 389
key_output ' '
wait 4000000 ; 38a
key_output ' '
wait 4000000 ; 38b
key_output ' '
wait 4000000 ; 38c
key_output ' '
wait 1000000 ; menu
;
; no hsync for xx line
key_output '8'
wait 3000000 ; 38d
key_output ' '
wait 3000000 ; 38e
key_output ' '
wait 3000000 ; 38f
key_output ' '
wait 3000000 ; 390
key_output ' '
wait 3000000 ; 391
key_output ' '
wait 3000000 ; 392
key_output ' '
wait 1000000 ; menu
;
; CRTC 3/4 STATUS
key_output 'U'
wait 10000000 ; 3bc
key_output ' '
wait 10000000 ; 3bd
key_output ' '
wait 10000000 ; 3be
key_output ' '
wait 15000000 ; 3bf
key_output ' '
wait 45000000 ; 3c0
key_output ' '
wait 10000000 ; 3c1
key_output ' '
wait 4000000 ; 3c2
key_output ' '
wait 4000000 ; 3c3
key_output ' '
wait 4000000 ; 3c4
key_output ' '
wait 4000000 ; 3c5
key_output ' '
wait 4000000 ; 3c6
key_output ' '
wait 4000000 ; 3c7
key_output ' '
wait 4000000 ; 3c8
key_output ' '
wait 4000000 ; 3c9
key_output ' '
wait 4000000 ; 3ca
key_output ' '
wait 4000000 ; 3cb
key_output ' '
wait 4000000 ; 3cc
key_output ' '
wait 4000000 ; 3cd
key_output ' '
wait 4000000 ; 3ce
key_output ' '
wait 4000000 ; 3cf
key_output ' '
wait 4000000 ; 3d0
key_output ' '
wait 4000000 ; 3d1
key_output ' '
wait 4000000 ; 3d2
key_output ' '
wait 4000000 ; 3d3
key_output ' '
wait 4000000 ; 3d4
key_output ' '
wait 4000000 ; 3d5
key_output ' '
wait 4000000 ; 3d6
key_output ' '
wait 4000000 ; 3d7
key_output ' '
wait 4000000 ; 3d8
key_output ' '
wait 4000000 ; 3d9
key_output ' '
wait 4000000 ; 3da
key_output ' '
wait 4000000 ; 3db
key_output ' '
wait 4000000 ; 3dc
key_output ' '
wait 4000000 ; 3dd
key_output ' '
wait 4000000 ; 3de
key_output ' '
wait 4000000 ; 3df
key_output ' '
wait 4000000 ; 3e0
key_output ' '
wait 4000000 ; 3e1
key_output ' '
wait 4000000 ; 3e2
key_output ' '
wait 4000000 ; 3e3
key_output ' '
wait 4000000 ; 3e4
key_output ' '
wait 4000000 ; menu
csl_load 'SHAKE26D-3'

View File

@ -0,0 +1,37 @@
;
; Fichier de script CSL
; Execution du module SHAKE26E du DSK SHAKER26.DSK en CRTC 0
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 0
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26E"\(RET)'
wait 10000000
;
; R5 STORIES 2ND ROUND
key_output '1'
wait 2000000 ; 3fa
key_output ' '
wait 2000000 ; 3fb
key_output ' '
wait 2000000 ; 3fc
key_output ' '
wait 2000000 ; 3fd
key_output ' '
;
;
; CRTC 0 : C4/C9 COUNTER LOGIC
key_output '3'
wait 2000000 ; 403
key_output ' '
wait 2000000 ; 404
key_output ' '
wait 2000000 ; 405
key_output ' '
;
;
csl_load 'SHAKE26E-1'

View File

@ -0,0 +1,38 @@
;
; Fichier de script CSL
; Execution du module SHAKE26E du DSK SHAKER26.DSK en CRTC 1
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 1
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26E"\(RET)'
wait 10000000
;
; R5 STORIES 2ND ROUND
key_output '1'
wait 2000000 ; 3fa
key_output ' '
wait 2000000 ; 3fb
key_output ' '
wait 2000000 ; 3fc
key_output ' '
wait 2000000 ; 3fd
key_output ' '
;
;
; CRTC 1 : VMA TRT C4=R4=0 ON ADJ LINE
;
key_output '2'
wait 2000000 ; 400
key_output ' '
wait 2000000 ; 401
key_output ' '
wait 2000000 ; 402
key_output ' '
;
;
csl_load 'SHAKE26E-2'

View File

@ -0,0 +1,28 @@
;
; Fichier de script CSL
; Execution du module SHAKE26E du DSK SHAKER26.DSK en CRTC 2
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 2
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26E"\(RET)'
wait 10000000
;
; R5 STORIES 2ND ROUND
key_output '1'
wait 2000000 ; 3fa
key_output ' '
wait 2000000 ; 3fb
key_output ' '
wait 2000000 ; 3fc
key_output ' '
wait 2000000 ; 3fd
key_output ' '
;
;
;
csl_load 'SHAKE26E-4'

View File

@ -0,0 +1,27 @@
;
; Fichier de script CSL
; Execution du module SHAKE26E du DSK SHAKER26.DSK en CRTC 3
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 3
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26E"\(RET)'
wait 10000000
;
; R5 STORIES 2ND ROUND
key_output '1'
wait 2000000 ; 3fa
key_output ' '
wait 2000000 ; 3fb
key_output ' '
wait 2000000 ; 3fc
key_output ' '
wait 2000000 ; 3fd
key_output ' '
;
;
;

View File

@ -0,0 +1,28 @@
;
; Fichier de script CSL
; Execution du module SHAKE26E du DSK SHAKER26.DSK en CRTC 4
; Le module genere des instructions au format SSM
;
csl_version 1.0
crtc_select 4
reset
wait 3000000
disk_insert 'shaker26.dsk'
key_delay 70000 70000 400000
key_output 'RUN"SHAKE26E"\(RET)'
wait 10000000
;
; R5 STORIES 2ND ROUND
key_output '1'
wait 2000000 ; 3fa
key_output ' '
wait 2000000 ; 3fb
key_output ' '
wait 2000000 ; 3fc
key_output ' '
wait 2000000 ; 3fd
key_output ' '
;
;
;
csl_load 'SHAKE26E-3'

Binary file not shown.