1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
{IncludeFrom=asm <p2c/asm.h>}
{*VarStrings=1} {*ExportSymbol=asm_%s}
module asm;
import sysglobals;
export
type
stringmax = string[255];
procedure moveleft (anyvar s,d: integer; z:integer);
procedure moveright(anyvar s,d: integer; z:integer);
procedure fastmove ( s,d: anyptr; z:integer);
procedure newbytes(var p: anyptr; z:integer);
procedure powerup;
procedure errmsg;
procedure findroms;
procedure f_pwr_on;
procedure flpyread(sector: integer; anyvar buffer: integer);
procedure flpy_wrt(sector: integer; anyvar buffer: integer);
procedure flpymread(sector_count, sector: integer; anyvar buffer: integer);
procedure flpymwrite(sector_count, sector: integer; anyvar buffer: integer);
procedure flpyinit(ptr: anyptr; i: shortint);
procedure setintlevel(level: integer);
function intlevel: integer;
procedure newwords(var p: anyptr; wordsize: integer);
procedure userprogram (execloc,initsp: integer);
procedure sappend(var dest: string;src:stringmax);
function iand(a,b: integer): integer;
function ior (a,b: integer): integer;
procedure ci_switch;
procedure initvects;
procedure cpymsg(msg: string255);
function memavail:integer;
function ticker:integer;
procedure cache_on;
procedure cache_off;
procedure icache_off;
procedure icache_on;
procedure flush_icache;
end.
|
