0 REM"[141][147][158]           I M P E R A T O R[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]S O F T W A R E"(null)
1 POKE808,234:D$="":POKE53280,0:POKE53281,0:PRINT"[147]"D$
2 PRINTCHR$(8)CHR$(142)SPC(7)"[158][198][162][162][162][162][162][162][162][162][162][162][162][162][146][184][184][184][184][184][184][183][183][183][183][163][163]
3 [153][166]7)" GETRNDRNDGETNEWRNDGETNEWNEWGETNEWRNDGETNEWRNDWAITLOGRNDNEWGETNEWRNDGETNEWRND":[153][166]7)" GETGETGETGETNEWNEWGETNEWWAITCOSGETRNDNEWGETNEWRNDGETGETGETGETRNDNEW
4 PRINTSPC(7)" [146][188][188][188][188]  [188][162][162][146][188][188][162][146][188] [188] [188][162][146][188][162][162][146][188][188][187]
5 [153][166]7)"ANDWAIT S  O  F  T  W  A  R  ESYSGET
6 PRINTSPC(7)"[162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]
7 [129]I[178]0[164]17:[153]:[129]K[178]0[164]9:[130]K,I:[153]"
8 U$="[162][162][162][162][162][162][162][162][162][162][162][162][162][185][175][164]          [164][175][185][162]"
9 J$="[146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146] [146][163][146][183][146][184][162][185][175][164] [164][175][185][162][146][184][146][183][146][163]"
10 FORI=1TO13:PRINT""SPC(7)MID$(U$,I,13)MID$(U$,32-I)
11 PRINTSPC(7)MID$(J$,I+I,26)MID$(J$,77-I-I):NEXT
12 U$="        P R E S E N T S":FORI=1TO8
13 PRINT""SPC(11)MID$(U$,I,9)MID$(U$,25-I):FORJ=0TO99:NEXTJ,I
20 PRINT"[150]":U$(1)="[198][162][162][162][162][162][162][162][162][162][162][162][162][146][184][184][184][184][184][184][183][183][183][183][163][163]"
21 U$(2)=" [161][187][187][161][162][187][161][162][162][161][162][187][161][162][187][146][188][187][162][161][162][187][161][162][187]"
22 U$(3)=" [161][161][161][161][162][162][161][162][146][190][161][162][172][161][162][187][161][161][161][161][162][172]"
23 U$(4)="[175][146][188][188][188][188]  [188][162][162][146][188] [190][188] [188] [188][162][146][188][162][162][146][188] [190]"
25 U$(5)="[162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]"
30 FORI=1TO40:PRINTLEFT$(D$,9):FORJ=1TO5:PRINTSPC(7)LEFT$(U$(J),I):NEXT
31 FORJ=0TO0:NEXTJ,I:PRINT"[154]":U$="EINE WIRTSCHAFTS-KRIEGS-SIMULATION"
35 FORI=1TOLEN(U$):PRINTLEFT$(D$,17)SPC(37-I)RIGHT$(U$,I):B=9^9:NEXT
38 U$="(AUCH MIT SCHNELLADERN LAUFFAEHIG)"
39 FORI=1TOLEN(U$):PRINTLEFT$(D$,19)"[156]"LEFT$(U$,I):B=9^9:NEXT
40 U$="MOECHTEN SIE EINE ANLEITUNG? (J/N)"
42 FORI=1TOLEN(U$):PRINTLEFT$(D$,22)"[129]"SPC(37-I)RIGHT$(U$,I):B=9^9:NEXT
50 POKE198,0:WAIT198,1:GETU$:A$="IMP.TEIL2":IFU$="J"THENA$="IMP.TEIL1"
60 PRINT"[147][144]L[207]"CHR$(34)A$CHR$(34)",8":FORI=1TO9:PRINT"R[213]":NEXT
62 PRINTLEFT$(D$,13)SPC(8)"[158]ETWAS GEDULD BITTE...[144]
65 [151]631,13:[151]632,13:[151]198,2